(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 12.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 144621, 3044] NotebookOptionsPosition[ 60230, 1372] NotebookOutlinePosition[ 135960, 2855] CellTagsIndexPosition[ 135276, 2832] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell["BitBooleanFunction", "Title", CellTags->"Title"], Cell["Apply a Boolean function to corresponding bits in integers", "Text", CellTags->"Description"], Cell[CellGroupData[{ Cell[TextData[{ "Definition", Cell[BoxData[ TemplateBox[{"Definition",Cell[ BoxData[ FrameBox[ Cell[ "Define your function using the name you gave in the Title line above. \ You can add input cells and extra code to define additional input cases or \ prerequisites. All definitions, including dependencies, will be included in \ the generated resource function.\n\nThis section should be evaluated before \ creating the Examples section below.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoDefinition"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Section", Deletable->False, DefaultNewCellStyle->"Input", CellTags->"Definition", CellID->474513213], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"BitBooleanFunction", "[", RowBox[{"k_Integer", ",", " ", RowBox[{"n_Integer:", "2"}]}], "]"}], "[", "x__Integer", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"FromDigits", "[", RowBox[{ RowBox[{"Boole", "[", RowBox[{"Apply", "[", RowBox[{ RowBox[{"BooleanFunction", "[", RowBox[{"k", ",", " ", "n"}], "]"}], ",", " ", RowBox[{"Transpose", "[", RowBox[{"IntegerDigits", "[", RowBox[{ RowBox[{"{", "x", "}"}], ",", " ", "2", ",", " ", RowBox[{"Max", "[", RowBox[{"IntegerLength", "[", RowBox[{ RowBox[{"{", "x", "}"}], ",", " ", "2"}], "]"}], "]"}]}], "]"}], "]"}], ",", " ", RowBox[{"{", "1", "}"}]}], "]"}], "]"}], ",", " ", "2"}], "]"}], " ", "/;", " ", RowBox[{ RowBox[{"Length", "[", RowBox[{"{", "x", "}"}], "]"}], " ", "==", " ", "n"}]}]}]], "Input", InitializationCell->True] }, Open ]], Cell["Documentation", "Section", Deletable->False, CellTags->"Documentation", CellID->855965831], Cell[CellGroupData[{ Cell[TextData[{ "Usage", Cell[BoxData[ TemplateBox[{"Usage",Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Document input usage cases by first typing an input structure, then \ pressing ", Cell[ BoxData[ StyleBox[ DynamicBox[ ToBoxes[ If[$OperatingSystem === "MacOSX", "\[ReturnKey]", "\[EnterKey]"], StandardForm], SingleEvaluation -> True, Evaluator -> "System"], ShowStringCharacters -> False]]], " to add a brief explanation of the function\[CloseCurlyQuote]s \ behavior for that structure. Pressing ", Cell[ BoxData[ StyleBox[ DynamicBox[ ToBoxes[ If[$OperatingSystem === "MacOSX", "\[ReturnKey]", "\[EnterKey]"], StandardForm], SingleEvaluation -> True, Evaluator -> "System"], ShowStringCharacters -> False]]], " repeatedly will create new cases as needed. Every input usage \ case defined above should be demonstrated explicitly here.\n\nSee existing \ documentation pages for examples."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoUsage"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"UsageInputs", CellTags->"Usage", CellID->310800389], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"BitBooleanFunction", "[", StyleBox["k", "TI"], "]"}], "[", RowBox[{ StyleBox["x", "TI"], ",", StyleBox["y", "TI"]}], "]"}]], "UsageInputs"], Cell[TextData[{ "computes the ", Cell[BoxData[ StyleBox["k", "TI"]], "InlineFormula"], "th bitwise Boolean function of the integers ", Cell[BoxData[ StyleBox["x", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ StyleBox["y", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"BitBooleanFunction", "[", RowBox[{ StyleBox["k", "TI"], ",", StyleBox["n", "TI"]}], "]"}], "[", RowBox[{ SubscriptBox[ StyleBox["x", "TI"], StyleBox["1", "TR"]], ",", StyleBox["\[Ellipsis]", "TR"], ",", SubscriptBox[ StyleBox["x", "TI"], StyleBox["n", "TI"]]}], "]"}]], "UsageInputs"], Cell[TextData[{ "computes the ", Cell[BoxData[ StyleBox["k", "TI"]], "InlineFormula"], "th ", Cell[BoxData[ StyleBox["n", "TI"]], "InlineFormula"], "-input bitwise Boolean function of the integers ", Cell[BoxData[ SubscriptBox[ StyleBox["x", "TI"], StyleBox["i", "TI"]]], "InlineFormula"], "." }], "UsageDescription"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Details & Options", Cell[BoxData[ TemplateBox[{"Details & Options",Cell[ BoxData[ FrameBox[ Cell[ "Give a detailed explanation of how the function is used and \ configured (e.g. acceptable input types, result formats, options \ specifications, background information). This section may include multiple \ cells, bullet lists, tables, hyperlinks and additional styles/structures as \ needed.\n\nAdd any other information that may be relevant, such as when the \ function was first discovered or how and why it is used within a given field. \ Include all relevant background or contextual information related to the \ function, its development, and its usage.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoDetailsOptions"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Notes", CellTags->"Details & Options", CellID->66019318], Cell[TextData[{ "BitBooleanFunction is a generalization of ", Cell[BoxData[ ButtonBox["BitAnd", BaseStyle->"Link"]], "InlineFormula"], ", ", Cell[BoxData[ ButtonBox["BitXor", BaseStyle->"Link"]], "InlineFormula"], ", etc." }], "Notes", Editable->True, Deletable->True, GeneratedCell->True, CellAutoOverwrite->True, CellChangeTimes->{3.761397190385314*^9, 3.768139131808115*^9, 3.76815492521192*^9}, CellTags->"TabNext", CellID->107622986] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Examples", Cell[BoxData[ TemplateBox[{"Examples",Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Demonstrate the function\[CloseCurlyQuote]s usage, starting with \ the most basic use case and describing each example in a preceding text cell.\ \n\nWithin a group, individual examples can be delimited by inserting page \ breaks between them (either using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"[Right-click]\"", FontFamily -> "Source Sans Pro Semibold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Insert Page Break\"", FontFamily -> "Source Sans Pro Semibold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], " between cells or through the menu using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"Insert\"", FontFamily -> "Source Sans Pro Semibold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Page Break\"", FontFamily -> "Source Sans Pro Semibold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], ").\n\nExamples should be grouped into Subsection and Subsubsection \ cells similarly to existing documentation pages. Here are some typical \ Subsection names and the types of examples they normally contain:\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Basic Examples: \"", FontFamily -> "Source Sans Pro Semibold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "most basic function usage\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Scope: \"", FontFamily -> "Source Sans Pro Semibold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "input and display conventions, standard computational attributes \ (e.g. threading over lists)\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Options: \"", FontFamily -> "Source Sans Pro Semibold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "available options and parameters for the function\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Applications: \"", FontFamily -> "Source Sans Pro Semibold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "standard industry or academic applications\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Properties and Relations: \"", FontFamily -> "Source Sans Pro Semibold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "how the function relates to other functions\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Possible Issues: \"", FontFamily -> "Source Sans Pro Semibold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "limitations or unexpected behavior a user might experience\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Neat Examples: \"", FontFamily -> "Source Sans Pro Semibold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "particularly interesting, unconventional, or otherwise unique \ usage"}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Section", Deletable->False, CellTags->"Examples", CellID->180595041], Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", CellID->285421464], Cell["Compute the sixth bitwise Boolean function:", "Text", CellChangeTimes->{{3.7500071210475597`*^9, 3.7500071345604153`*^9}, 3.761397299944647*^9, {3.761414076124735*^9, 3.761414079788699*^9}, { 3.768151718283599*^9, 3.768151719508326*^9}}, CellID->449921612], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"BitBooleanFunction", "[", "6", "]"}], "[", RowBox[{"123", ",", "456"}], "]"}]], "Input", CellChangeTimes->{{3.750006545392145*^9, 3.7500065548470087`*^9}, { 3.7500065935800123`*^9, 3.750006597428092*^9}}, CellLabel->"In[48]:=", CellID->2129810224], Cell[BoxData["435"], "Output", CellChangeTimes->{ 3.750006598338677*^9, {3.750006784995352*^9, 3.750006809740581*^9}, 3.750006845662128*^9, 3.7528615043566713`*^9}, CellLabel->"Out[48]=", CellID->1977050247] }, Open ]], Cell["This corresponds to computing a bitwise XOR:", "Text", CellChangeTimes->{{3.75000713828899*^9, 3.750007149594466*^9}}, CellID->1587278112], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BitXor", "[", RowBox[{"123", ",", "456"}], "]"}]], "Input", CellChangeTimes->{{3.750006600476665*^9, 3.750006605084865*^9}}, CellLabel->"In[36]:=", CellID->1045172555], Cell[BoxData["435"], "Output", CellChangeTimes->{3.750006605457671*^9}, CellLabel->"Out[36]=", CellID->363335876] }, Open ]], Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter"], Cell["\<\ Compute the 150th bitwise Boolean function with three inputs:\ \>", "Text", CellChangeTimes->{{3.7500071210475597`*^9, 3.7500071345604153`*^9}, { 3.76200399348636*^9, 3.762004008506404*^9}, {3.7681517710725517`*^9, 3.768151790445815*^9}}, CellID->572413640], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"BitBooleanFunction", "[", RowBox[{"150", ",", "3"}], "]"}], "[", RowBox[{"123", ",", "456", ",", "789"}], "]"}]], "Input", CellChangeTimes->{{3.7500068508100157`*^9, 3.7500068644422083`*^9}}, CellLabel->"In[50]:=", CellID->610462718], Cell[BoxData["678"], "Output", CellChangeTimes->{3.750006865542939*^9, 3.752861504544388*^9}, CellLabel->"Out[50]=", CellID->1155948551] }, Open ]], Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter"], Cell["Plot of a Boolean function:", "Text", CellChangeTimes->{{3.7500071210475597`*^9, 3.7500071345604153`*^9}, { 3.76200399348636*^9, 3.762004008506404*^9}, {3.768139903425013*^9, 3.768139911410759*^9}, {3.768141536408038*^9, 3.7681415420077972`*^9}}, CellID->512425794], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLinePlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"BitBooleanFunction", "[", RowBox[{"1", ",", "2"}], "]"}], "[", RowBox[{"i", ",", RowBox[{"2", "i"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "64"}], "}"}]}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.7615743087429247`*^9, 3.761574340232833*^9}, { 3.761574406313142*^9, 3.76157444213783*^9}, 3.768139652513695*^9, 3.76813987102464*^9}, CellID->848691154], Cell[BoxData[ GraphicsBox[{{}, {{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[1, 60], 0.016666666666666666`]], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQEf7BlQgQOqOIcDqrSAA6q4CJq8BJp+GTR5BQdU cSUHVHNV0PSroenXQLNfC01eB02/Hpq8gQOquKEDqrlGaO4ydkB1twma/aZo 5puh2W+OJm8B5cP8bwmlYf63QtNvjabfBs1+WzR5OzT99nD5H/eq3+/9DuPb OQAAYIwh1w== "]], LineBox[CompressedData[" 1:eJxdjzEKwkAQRRcrSw9gYazEQhQbhRBXo4mamIBHEKy9gufRK3iHXEXIBYzm fYsZWB6PxzBscLmdrx3nXNC8L5+PZsbeu99ELe/yEK7hki5fwA2c0+VTGMMZ PTZ9C/t0eQ/u4HvVdrkmwbvsJ6anZj81fY9P2JeP4AEO6fIBPJr7ck1m7mem 57j+L9f/T2ZfrinM/cL00uyX/17VYVW/5JH/ALg6MSc= "]]}}, {}, {}, {}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0., 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], ImagePadding->All, Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0., 64.}, {0, 30.}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{{3.76157430964259*^9, 3.7615743406048326`*^9}, { 3.7615744123744497`*^9, 3.761574442563138*^9}}, CellLabel->"Out[48]=", CellID->1568289181] }, Open ]], Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter"], Cell[TextData[{ "A 2D plot of Boolean function versus ", Cell[BoxData[ RowBox[{ TemplateBox[{Cell[ TextData["Mod"]],"paclet:ref/Mod"}, "RefLink", BaseStyle->{"InlineFormula"}], "["}]], FontFamily->"Source Sans Pro"], StyleBox["i", "TI"], ", ", StyleBox["j", "TI"], "]:" }], "Text", CellChangeTimes->{{3.7500071210475597`*^9, 3.7500071345604153`*^9}, { 3.76200399348636*^9, 3.762004008506404*^9}, {3.768139903425013*^9, 3.768139911410759*^9}, {3.768141550275529*^9, 3.768141553668599*^9}, { 3.768141589406128*^9, 3.768141590949059*^9}, {3.7681430405966997`*^9, 3.768143041554873*^9}, {3.7681432347367268`*^9, 3.768143237450965*^9}, { 3.768151803488216*^9, 3.7681518038376102`*^9}, 3.768151836126849*^9}, CellID->1688414038], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ArrayPlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"Boole", "[", RowBox[{ RowBox[{ RowBox[{"BitBooleanFunction", "[", RowBox[{"4", ",", "2"}], "]"}], "[", RowBox[{"i", ",", "j"}], "]"}], "\[Equal]", RowBox[{"Mod", "[", RowBox[{"i", ",", " ", "j"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "64"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "64"}], "}"}]}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.762004107641626*^9, 3.7620041191419*^9}, { 3.762004195004306*^9, 3.762004267048304*^9}, 3.768139873102619*^9}, CellID->1344452458], Cell[BoxData[ GraphicsBox[RasterBox[CompressedData[" 1:eJyll9ERwjAMQ1M2YRNmYIQuwP5/fADXOootv9JczqhNqhZHkXvfX8/9NsZ4 fPv23+HmD3fY+7vm+E1vvJ/r7v3LaPmHiY7fRMvfizl/TLNgyx+zrNjxH++6 xJY/jlnhmj8uccGWfxjs+A22/Awrfy13qn88f9I756+1TvXP+aPeOX+MnL8e R/XP+etdnuqf89djqP45fz2C6p/zs+vc32c8Nfj86u/s/xN/h/lb+TtZP+Lv cP2qvzP9iL9D/Wb+3t0/xN/h/qX+zvZP8Xe4f6/8nfiH+Dv0L/V35p9Oz9n8 bEAXZ3rv1i+Z3rv1U6b3bv2W6b2Dz89l61VZ38f5333qenldP2d679Tv5xNX 4jnvOG4x7zzGvOO4fX5c78N/o5bdfyGX7Q062Q9Q "], {{0, 0}, {64, 64}}, {0, 1}], Frame->Automatic, FrameLabel->{None, None}, FrameTicks->{{None, None}, {None, None}}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]], "Output", CellChangeTimes->{ 3.762004119937687*^9, {3.762004200243585*^9, 3.762004267775221*^9}}, CellLabel->"Out[93]=", CellID->687025978] }, Open ]], Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter"], Cell["A 3D plot of a Boolean function:", "Text", CellChangeTimes->{{3.7500071210475597`*^9, 3.7500071345604153`*^9}, { 3.76200399348636*^9, 3.762004008506404*^9}, {3.768139903425013*^9, 3.768139911410759*^9}, {3.768141572807493*^9, 3.76814158017472*^9}, { 3.7681550001456337`*^9, 3.768155000560895*^9}}, CellID->325825208], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Graphics3D", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"Cuboid", "[", RowBox[{"{", RowBox[{"i", ",", "j", ",", RowBox[{ RowBox[{"BitBooleanFunction", "[", RowBox[{"1", ",", "2"}], "]"}], "[", RowBox[{"i", ",", RowBox[{"2", "j"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "31"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "31"}], "}"}]}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.761574625540169*^9, 3.761574633046672*^9}, 3.768139877985016*^9}, CellID->476599820], Cell[BoxData[ Graphics3DBox[{{CuboidBox[{1, 1, 0}], CuboidBox[{1, 2, 2}], CuboidBox[{1, 3, 0}], CuboidBox[{1, 4, 6}], CuboidBox[{1, 5, 4}], CuboidBox[{1, 6, 2}], CuboidBox[{1, 7, 0}], CuboidBox[{1, 8, 14}], CuboidBox[{1, 9, 12}], CuboidBox[{1, 10, 10}], CuboidBox[{1, 11, 8}], CuboidBox[{1, 12, 6}], CuboidBox[{1, 13, 4}], CuboidBox[{1, 14, 2}], CuboidBox[{1, 15, 0}], CuboidBox[{1, 16, 30}], CuboidBox[{1, 17, 28}], CuboidBox[{1, 18, 26}], CuboidBox[{1, 19, 24}], CuboidBox[{1, 20, 22}], CuboidBox[{1, 21, 20}], CuboidBox[{1, 22, 18}], CuboidBox[{1, 23, 16}], CuboidBox[{1, 24, 14}], CuboidBox[{1, 25, 12}], CuboidBox[{1, 26, 10}], CuboidBox[{1, 27, 8}], CuboidBox[{1, 28, 6}], CuboidBox[{1, 29, 4}], CuboidBox[{1, 30, 2}], CuboidBox[{1, 31, 0}]}, {CuboidBox[{2, 1, 1}], CuboidBox[{2, 2, 1}], CuboidBox[{2, 3, 1}], CuboidBox[{2, 4, 5}], CuboidBox[{2, 5, 5}], CuboidBox[{2, 6, 1}], CuboidBox[{2, 7, 1}], CuboidBox[{2, 8, 13}], CuboidBox[{2, 9, 13}], CuboidBox[{2, 10, 9}], CuboidBox[{2, 11, 9}], CuboidBox[{2, 12, 5}], CuboidBox[{2, 13, 5}], CuboidBox[{2, 14, 1}], CuboidBox[{2, 15, 1}], CuboidBox[{2, 16, 29}], CuboidBox[{2, 17, 29}], CuboidBox[{2, 18, 25}], CuboidBox[{2, 19, 25}], CuboidBox[{2, 20, 21}], CuboidBox[{2, 21, 21}], CuboidBox[{2, 22, 17}], CuboidBox[{2, 23, 17}], CuboidBox[{2, 24, 13}], CuboidBox[{2, 25, 13}], CuboidBox[{2, 26, 9}], CuboidBox[{2, 27, 9}], CuboidBox[{2, 28, 5}], CuboidBox[{2, 29, 5}], CuboidBox[{2, 30, 1}], CuboidBox[{2, 31, 1}]}, { CuboidBox[{3, 1, 0}], CuboidBox[{3, 2, 0}], CuboidBox[{3, 3, 0}], CuboidBox[{3, 4, 4}], CuboidBox[{3, 5, 4}], CuboidBox[{3, 6, 0}], CuboidBox[{3, 7, 0}], CuboidBox[{3, 8, 12}], CuboidBox[{3, 9, 12}], CuboidBox[{3, 10, 8}], CuboidBox[{3, 11, 8}], CuboidBox[{3, 12, 4}], CuboidBox[{3, 13, 4}], CuboidBox[{3, 14, 0}], CuboidBox[{3, 15, 0}], CuboidBox[{3, 16, 28}], CuboidBox[{3, 17, 28}], CuboidBox[{3, 18, 24}], CuboidBox[{3, 19, 24}], CuboidBox[{3, 20, 20}], CuboidBox[{3, 21, 20}], CuboidBox[{3, 22, 16}], CuboidBox[{3, 23, 16}], CuboidBox[{3, 24, 12}], CuboidBox[{3, 25, 12}], CuboidBox[{3, 26, 8}], CuboidBox[{3, 27, 8}], CuboidBox[{3, 28, 4}], CuboidBox[{3, 29, 4}], CuboidBox[{3, 30, 0}], CuboidBox[{3, 31, 0}]}, {CuboidBox[{4, 1, 1}], CuboidBox[{4, 2, 3}], CuboidBox[{4, 3, 1}], CuboidBox[{4, 4, 3}], CuboidBox[{4, 5, 1}], CuboidBox[{4, 6, 3}], CuboidBox[{4, 7, 1}], CuboidBox[{4, 8, 11}], CuboidBox[{4, 9, 9}], CuboidBox[{4, 10, 11}], CuboidBox[{4, 11, 9}], CuboidBox[{4, 12, 3}], CuboidBox[{4, 13, 1}], CuboidBox[{4, 14, 3}], CuboidBox[{4, 15, 1}], CuboidBox[{4, 16, 27}], CuboidBox[{4, 17, 25}], CuboidBox[{4, 18, 27}], CuboidBox[{4, 19, 25}], CuboidBox[{4, 20, 19}], CuboidBox[{4, 21, 17}], CuboidBox[{4, 22, 19}], CuboidBox[{4, 23, 17}], CuboidBox[{4, 24, 11}], CuboidBox[{4, 25, 9}], CuboidBox[{4, 26, 11}], CuboidBox[{4, 27, 9}], CuboidBox[{4, 28, 3}], CuboidBox[{4, 29, 1}], CuboidBox[{4, 30, 3}], CuboidBox[{4, 31, 1}]}, {CuboidBox[{5, 1, 0}], CuboidBox[{5, 2, 2}], CuboidBox[{5, 3, 0}], CuboidBox[{5, 4, 2}], CuboidBox[{5, 5, 0}], CuboidBox[{5, 6, 2}], CuboidBox[{5, 7, 0}], CuboidBox[{5, 8, 10}], CuboidBox[{5, 9, 8}], CuboidBox[{5, 10, 10}], CuboidBox[{5, 11, 8}], CuboidBox[{5, 12, 2}], CuboidBox[{5, 13, 0}], CuboidBox[{5, 14, 2}], CuboidBox[{5, 15, 0}], CuboidBox[{5, 16, 26}], CuboidBox[{5, 17, 24}], CuboidBox[{5, 18, 26}], CuboidBox[{5, 19, 24}], CuboidBox[{5, 20, 18}], CuboidBox[{5, 21, 16}], CuboidBox[{5, 22, 18}], CuboidBox[{5, 23, 16}], CuboidBox[{5, 24, 10}], CuboidBox[{5, 25, 8}], CuboidBox[{5, 26, 10}], CuboidBox[{5, 27, 8}], CuboidBox[{5, 28, 2}], CuboidBox[{5, 29, 0}], CuboidBox[{5, 30, 2}], CuboidBox[{5, 31, 0}]}, { CuboidBox[{6, 1, 1}], CuboidBox[{6, 2, 1}], CuboidBox[{6, 3, 1}], CuboidBox[{6, 4, 1}], CuboidBox[{6, 5, 1}], CuboidBox[{6, 6, 1}], CuboidBox[{6, 7, 1}], CuboidBox[{6, 8, 9}], CuboidBox[{6, 9, 9}], CuboidBox[{6, 10, 9}], CuboidBox[{6, 11, 9}], CuboidBox[{6, 12, 1}], CuboidBox[{6, 13, 1}], CuboidBox[{6, 14, 1}], CuboidBox[{6, 15, 1}], CuboidBox[{6, 16, 25}], CuboidBox[{6, 17, 25}], CuboidBox[{6, 18, 25}], CuboidBox[{6, 19, 25}], CuboidBox[{6, 20, 17}], CuboidBox[{6, 21, 17}], CuboidBox[{6, 22, 17}], CuboidBox[{6, 23, 17}], CuboidBox[{6, 24, 9}], CuboidBox[{6, 25, 9}], CuboidBox[{6, 26, 9}], CuboidBox[{6, 27, 9}], CuboidBox[{6, 28, 1}], CuboidBox[{6, 29, 1}], CuboidBox[{6, 30, 1}], CuboidBox[{6, 31, 1}]}, {CuboidBox[{7, 1, 0}], CuboidBox[{7, 2, 0}], CuboidBox[{7, 3, 0}], CuboidBox[{7, 4, 0}], CuboidBox[{7, 5, 0}], CuboidBox[{7, 6, 0}], CuboidBox[{7, 7, 0}], CuboidBox[{7, 8, 8}], CuboidBox[{7, 9, 8}], CuboidBox[{7, 10, 8}], CuboidBox[{7, 11, 8}], CuboidBox[{7, 12, 0}], CuboidBox[{7, 13, 0}], CuboidBox[{7, 14, 0}], CuboidBox[{7, 15, 0}], CuboidBox[{7, 16, 24}], CuboidBox[{7, 17, 24}], CuboidBox[{7, 18, 24}], CuboidBox[{7, 19, 24}], CuboidBox[{7, 20, 16}], CuboidBox[{7, 21, 16}], CuboidBox[{7, 22, 16}], CuboidBox[{7, 23, 16}], CuboidBox[{7, 24, 8}], CuboidBox[{7, 25, 8}], CuboidBox[{7, 26, 8}], CuboidBox[{7, 27, 8}], CuboidBox[{7, 28, 0}], CuboidBox[{7, 29, 0}], CuboidBox[{7, 30, 0}], CuboidBox[{7, 31, 0}]}, {CuboidBox[{8, 1, 5}], CuboidBox[{8, 2, 3}], CuboidBox[{8, 3, 1}], CuboidBox[{8, 4, 7}], CuboidBox[{8, 5, 5}], CuboidBox[{8, 6, 3}], CuboidBox[{8, 7, 1}], CuboidBox[{8, 8, 7}], CuboidBox[{8, 9, 5}], CuboidBox[{8, 10, 3}], CuboidBox[{8, 11, 1}], CuboidBox[{8, 12, 7}], CuboidBox[{8, 13, 5}], CuboidBox[{8, 14, 3}], CuboidBox[{8, 15, 1}], CuboidBox[{8, 16, 23}], CuboidBox[{8, 17, 21}], CuboidBox[{8, 18, 19}], CuboidBox[{8, 19, 17}], CuboidBox[{8, 20, 23}], CuboidBox[{8, 21, 21}], CuboidBox[{8, 22, 19}], CuboidBox[{8, 23, 17}], CuboidBox[{8, 24, 7}], CuboidBox[{8, 25, 5}], CuboidBox[{8, 26, 3}], CuboidBox[{8, 27, 1}], CuboidBox[{8, 28, 7}], CuboidBox[{8, 29, 5}], CuboidBox[{8, 30, 3}], CuboidBox[{8, 31, 1}]}, { CuboidBox[{9, 1, 4}], CuboidBox[{9, 2, 2}], CuboidBox[{9, 3, 0}], CuboidBox[{9, 4, 6}], CuboidBox[{9, 5, 4}], CuboidBox[{9, 6, 2}], CuboidBox[{9, 7, 0}], CuboidBox[{9, 8, 6}], CuboidBox[{9, 9, 4}], CuboidBox[{9, 10, 2}], CuboidBox[{9, 11, 0}], CuboidBox[{9, 12, 6}], CuboidBox[{9, 13, 4}], CuboidBox[{9, 14, 2}], CuboidBox[{9, 15, 0}], CuboidBox[{9, 16, 22}], CuboidBox[{9, 17, 20}], CuboidBox[{9, 18, 18}], CuboidBox[{9, 19, 16}], CuboidBox[{9, 20, 22}], CuboidBox[{9, 21, 20}], CuboidBox[{9, 22, 18}], CuboidBox[{9, 23, 16}], CuboidBox[{9, 24, 6}], CuboidBox[{9, 25, 4}], CuboidBox[{9, 26, 2}], CuboidBox[{9, 27, 0}], CuboidBox[{9, 28, 6}], CuboidBox[{9, 29, 4}], CuboidBox[{9, 30, 2}], CuboidBox[{9, 31, 0}]}, {CuboidBox[{10, 1, 5}], CuboidBox[{10, 2, 1}], CuboidBox[{10, 3, 1}], CuboidBox[{10, 4, 5}], CuboidBox[{10, 5, 5}], CuboidBox[{10, 6, 1}], CuboidBox[{10, 7, 1}], CuboidBox[{10, 8, 5}], CuboidBox[{10, 9, 5}], CuboidBox[{10, 10, 1}], CuboidBox[{10, 11, 1}], CuboidBox[{10, 12, 5}], CuboidBox[{10, 13, 5}], CuboidBox[{10, 14, 1}], CuboidBox[{10, 15, 1}], CuboidBox[{10, 16, 21}], CuboidBox[{10, 17, 21}], CuboidBox[{10, 18, 17}], CuboidBox[{10, 19, 17}], CuboidBox[{10, 20, 21}], CuboidBox[{10, 21, 21}], CuboidBox[{10, 22, 17}], CuboidBox[{10, 23, 17}], CuboidBox[{10, 24, 5}], CuboidBox[{10, 25, 5}], CuboidBox[{10, 26, 1}], CuboidBox[{10, 27, 1}], CuboidBox[{10, 28, 5}], CuboidBox[{10, 29, 5}], CuboidBox[{10, 30, 1}], CuboidBox[{10, 31, 1}]}, { CuboidBox[{11, 1, 4}], CuboidBox[{11, 2, 0}], CuboidBox[{11, 3, 0}], CuboidBox[{11, 4, 4}], CuboidBox[{11, 5, 4}], CuboidBox[{11, 6, 0}], CuboidBox[{11, 7, 0}], CuboidBox[{11, 8, 4}], CuboidBox[{11, 9, 4}], CuboidBox[{11, 10, 0}], CuboidBox[{11, 11, 0}], CuboidBox[{11, 12, 4}], CuboidBox[{11, 13, 4}], CuboidBox[{11, 14, 0}], CuboidBox[{11, 15, 0}], CuboidBox[{11, 16, 20}], CuboidBox[{11, 17, 20}], CuboidBox[{11, 18, 16}], CuboidBox[{11, 19, 16}], CuboidBox[{11, 20, 20}], CuboidBox[{11, 21, 20}], CuboidBox[{11, 22, 16}], CuboidBox[{11, 23, 16}], CuboidBox[{11, 24, 4}], CuboidBox[{11, 25, 4}], CuboidBox[{11, 26, 0}], CuboidBox[{11, 27, 0}], CuboidBox[{11, 28, 4}], CuboidBox[{11, 29, 4}], CuboidBox[{11, 30, 0}], CuboidBox[{11, 31, 0}]}, {CuboidBox[{12, 1, 1}], CuboidBox[{12, 2, 3}], CuboidBox[{12, 3, 1}], CuboidBox[{12, 4, 3}], CuboidBox[{12, 5, 1}], CuboidBox[{12, 6, 3}], CuboidBox[{12, 7, 1}], CuboidBox[{12, 8, 3}], CuboidBox[{12, 9, 1}], CuboidBox[{12, 10, 3}], CuboidBox[{12, 11, 1}], CuboidBox[{12, 12, 3}], CuboidBox[{12, 13, 1}], CuboidBox[{12, 14, 3}], CuboidBox[{12, 15, 1}], CuboidBox[{12, 16, 19}], CuboidBox[{12, 17, 17}], CuboidBox[{12, 18, 19}], CuboidBox[{12, 19, 17}], CuboidBox[{12, 20, 19}], CuboidBox[{12, 21, 17}], CuboidBox[{12, 22, 19}], CuboidBox[{12, 23, 17}], CuboidBox[{12, 24, 3}], CuboidBox[{12, 25, 1}], CuboidBox[{12, 26, 3}], CuboidBox[{12, 27, 1}], CuboidBox[{12, 28, 3}], CuboidBox[{12, 29, 1}], CuboidBox[{12, 30, 3}], CuboidBox[{12, 31, 1}]}, {CuboidBox[{13, 1, 0}], CuboidBox[{13, 2, 2}], CuboidBox[{13, 3, 0}], CuboidBox[{13, 4, 2}], CuboidBox[{13, 5, 0}], CuboidBox[{13, 6, 2}], CuboidBox[{13, 7, 0}], CuboidBox[{13, 8, 2}], CuboidBox[{13, 9, 0}], CuboidBox[{13, 10, 2}], CuboidBox[{13, 11, 0}], CuboidBox[{13, 12, 2}], CuboidBox[{13, 13, 0}], CuboidBox[{13, 14, 2}], CuboidBox[{13, 15, 0}], CuboidBox[{13, 16, 18}], CuboidBox[{13, 17, 16}], CuboidBox[{13, 18, 18}], CuboidBox[{13, 19, 16}], CuboidBox[{13, 20, 18}], CuboidBox[{13, 21, 16}], CuboidBox[{13, 22, 18}], CuboidBox[{13, 23, 16}], CuboidBox[{13, 24, 2}], CuboidBox[{13, 25, 0}], CuboidBox[{13, 26, 2}], CuboidBox[{13, 27, 0}], CuboidBox[{13, 28, 2}], CuboidBox[{13, 29, 0}], CuboidBox[{13, 30, 2}], CuboidBox[{13, 31, 0}]}, { CuboidBox[{14, 1, 1}], CuboidBox[{14, 2, 1}], CuboidBox[{14, 3, 1}], CuboidBox[{14, 4, 1}], CuboidBox[{14, 5, 1}], CuboidBox[{14, 6, 1}], CuboidBox[{14, 7, 1}], CuboidBox[{14, 8, 1}], CuboidBox[{14, 9, 1}], CuboidBox[{14, 10, 1}], CuboidBox[{14, 11, 1}], CuboidBox[{14, 12, 1}], CuboidBox[{14, 13, 1}], CuboidBox[{14, 14, 1}], CuboidBox[{14, 15, 1}], CuboidBox[{14, 16, 17}], CuboidBox[{14, 17, 17}], CuboidBox[{14, 18, 17}], CuboidBox[{14, 19, 17}], CuboidBox[{14, 20, 17}], CuboidBox[{14, 21, 17}], CuboidBox[{14, 22, 17}], CuboidBox[{14, 23, 17}], CuboidBox[{14, 24, 1}], CuboidBox[{14, 25, 1}], CuboidBox[{14, 26, 1}], CuboidBox[{14, 27, 1}], CuboidBox[{14, 28, 1}], CuboidBox[{14, 29, 1}], CuboidBox[{14, 30, 1}], CuboidBox[{14, 31, 1}]}, {CuboidBox[{15, 1, 0}], CuboidBox[{15, 2, 0}], CuboidBox[{15, 3, 0}], CuboidBox[{15, 4, 0}], CuboidBox[{15, 5, 0}], CuboidBox[{15, 6, 0}], CuboidBox[{15, 7, 0}], CuboidBox[{15, 8, 0}], CuboidBox[{15, 9, 0}], CuboidBox[{15, 10, 0}], CuboidBox[{15, 11, 0}], CuboidBox[{15, 12, 0}], CuboidBox[{15, 13, 0}], CuboidBox[{15, 14, 0}], CuboidBox[{15, 15, 0}], CuboidBox[{15, 16, 16}], CuboidBox[{15, 17, 16}], CuboidBox[{15, 18, 16}], CuboidBox[{15, 19, 16}], CuboidBox[{15, 20, 16}], CuboidBox[{15, 21, 16}], CuboidBox[{15, 22, 16}], CuboidBox[{15, 23, 16}], CuboidBox[{15, 24, 0}], CuboidBox[{15, 25, 0}], CuboidBox[{15, 26, 0}], CuboidBox[{15, 27, 0}], CuboidBox[{15, 28, 0}], CuboidBox[{15, 29, 0}], CuboidBox[{15, 30, 0}], CuboidBox[{15, 31, 0}]}, {CuboidBox[{16, 1, 13}], CuboidBox[{16, 2, 11}], CuboidBox[{16, 3, 9}], CuboidBox[{16, 4, 7}], CuboidBox[{16, 5, 5}], CuboidBox[{16, 6, 3}], CuboidBox[{16, 7, 1}], CuboidBox[{16, 8, 15}], CuboidBox[{16, 9, 13}], CuboidBox[{16, 10, 11}], CuboidBox[{16, 11, 9}], CuboidBox[{16, 12, 7}], CuboidBox[{16, 13, 5}], CuboidBox[{16, 14, 3}], CuboidBox[{16, 15, 1}], CuboidBox[{16, 16, 15}], CuboidBox[{16, 17, 13}], CuboidBox[{16, 18, 11}], CuboidBox[{16, 19, 9}], CuboidBox[{16, 20, 7}], CuboidBox[{16, 21, 5}], CuboidBox[{16, 22, 3}], CuboidBox[{16, 23, 1}], CuboidBox[{16, 24, 15}], CuboidBox[{16, 25, 13}], CuboidBox[{16, 26, 11}], CuboidBox[{16, 27, 9}], CuboidBox[{16, 28, 7}], CuboidBox[{16, 29, 5}], CuboidBox[{16, 30, 3}], CuboidBox[{16, 31, 1}]}, {CuboidBox[{17, 1, 12}], CuboidBox[{17, 2, 10}], CuboidBox[{17, 3, 8}], CuboidBox[{17, 4, 6}], CuboidBox[{17, 5, 4}], CuboidBox[{17, 6, 2}], CuboidBox[{17, 7, 0}], CuboidBox[{17, 8, 14}], CuboidBox[{17, 9, 12}], CuboidBox[{17, 10, 10}], CuboidBox[{17, 11, 8}], CuboidBox[{17, 12, 6}], CuboidBox[{17, 13, 4}], CuboidBox[{17, 14, 2}], CuboidBox[{17, 15, 0}], CuboidBox[{17, 16, 14}], CuboidBox[{17, 17, 12}], CuboidBox[{17, 18, 10}], CuboidBox[{17, 19, 8}], CuboidBox[{17, 20, 6}], CuboidBox[{17, 21, 4}], CuboidBox[{17, 22, 2}], CuboidBox[{17, 23, 0}], CuboidBox[{17, 24, 14}], CuboidBox[{17, 25, 12}], CuboidBox[{17, 26, 10}], CuboidBox[{17, 27, 8}], CuboidBox[{17, 28, 6}], CuboidBox[{17, 29, 4}], CuboidBox[{17, 30, 2}], CuboidBox[{17, 31, 0}]}, { CuboidBox[{18, 1, 13}], CuboidBox[{18, 2, 9}], CuboidBox[{18, 3, 9}], CuboidBox[{18, 4, 5}], CuboidBox[{18, 5, 5}], CuboidBox[{18, 6, 1}], CuboidBox[{18, 7, 1}], CuboidBox[{18, 8, 13}], CuboidBox[{18, 9, 13}], CuboidBox[{18, 10, 9}], CuboidBox[{18, 11, 9}], CuboidBox[{18, 12, 5}], CuboidBox[{18, 13, 5}], CuboidBox[{18, 14, 1}], CuboidBox[{18, 15, 1}], CuboidBox[{18, 16, 13}], CuboidBox[{18, 17, 13}], CuboidBox[{18, 18, 9}], CuboidBox[{18, 19, 9}], CuboidBox[{18, 20, 5}], CuboidBox[{18, 21, 5}], CuboidBox[{18, 22, 1}], CuboidBox[{18, 23, 1}], CuboidBox[{18, 24, 13}], CuboidBox[{18, 25, 13}], CuboidBox[{18, 26, 9}], CuboidBox[{18, 27, 9}], CuboidBox[{18, 28, 5}], CuboidBox[{18, 29, 5}], CuboidBox[{18, 30, 1}], CuboidBox[{18, 31, 1}]}, {CuboidBox[{19, 1, 12}], CuboidBox[{19, 2, 8}], CuboidBox[{19, 3, 8}], CuboidBox[{19, 4, 4}], CuboidBox[{19, 5, 4}], CuboidBox[{19, 6, 0}], CuboidBox[{19, 7, 0}], CuboidBox[{19, 8, 12}], CuboidBox[{19, 9, 12}], CuboidBox[{19, 10, 8}], CuboidBox[{19, 11, 8}], CuboidBox[{19, 12, 4}], CuboidBox[{19, 13, 4}], CuboidBox[{19, 14, 0}], CuboidBox[{19, 15, 0}], CuboidBox[{19, 16, 12}], CuboidBox[{19, 17, 12}], CuboidBox[{19, 18, 8}], CuboidBox[{19, 19, 8}], CuboidBox[{19, 20, 4}], CuboidBox[{19, 21, 4}], CuboidBox[{19, 22, 0}], CuboidBox[{19, 23, 0}], CuboidBox[{19, 24, 12}], CuboidBox[{19, 25, 12}], CuboidBox[{19, 26, 8}], CuboidBox[{19, 27, 8}], CuboidBox[{19, 28, 4}], CuboidBox[{19, 29, 4}], CuboidBox[{19, 30, 0}], CuboidBox[{19, 31, 0}]}, {CuboidBox[{20, 1, 9}], CuboidBox[{20, 2, 11}], CuboidBox[{20, 3, 9}], CuboidBox[{20, 4, 3}], CuboidBox[{20, 5, 1}], CuboidBox[{20, 6, 3}], CuboidBox[{20, 7, 1}], CuboidBox[{20, 8, 11}], CuboidBox[{20, 9, 9}], CuboidBox[{20, 10, 11}], CuboidBox[{20, 11, 9}], CuboidBox[{20, 12, 3}], CuboidBox[{20, 13, 1}], CuboidBox[{20, 14, 3}], CuboidBox[{20, 15, 1}], CuboidBox[{20, 16, 11}], CuboidBox[{20, 17, 9}], CuboidBox[{20, 18, 11}], CuboidBox[{20, 19, 9}], CuboidBox[{20, 20, 3}], CuboidBox[{20, 21, 1}], CuboidBox[{20, 22, 3}], CuboidBox[{20, 23, 1}], CuboidBox[{20, 24, 11}], CuboidBox[{20, 25, 9}], CuboidBox[{20, 26, 11}], CuboidBox[{20, 27, 9}], CuboidBox[{20, 28, 3}], CuboidBox[{20, 29, 1}], CuboidBox[{20, 30, 3}], CuboidBox[{20, 31, 1}]}, { CuboidBox[{21, 1, 8}], CuboidBox[{21, 2, 10}], CuboidBox[{21, 3, 8}], CuboidBox[{21, 4, 2}], CuboidBox[{21, 5, 0}], CuboidBox[{21, 6, 2}], CuboidBox[{21, 7, 0}], CuboidBox[{21, 8, 10}], CuboidBox[{21, 9, 8}], CuboidBox[{21, 10, 10}], CuboidBox[{21, 11, 8}], CuboidBox[{21, 12, 2}], CuboidBox[{21, 13, 0}], CuboidBox[{21, 14, 2}], CuboidBox[{21, 15, 0}], CuboidBox[{21, 16, 10}], CuboidBox[{21, 17, 8}], CuboidBox[{21, 18, 10}], CuboidBox[{21, 19, 8}], CuboidBox[{21, 20, 2}], CuboidBox[{21, 21, 0}], CuboidBox[{21, 22, 2}], CuboidBox[{21, 23, 0}], CuboidBox[{21, 24, 10}], CuboidBox[{21, 25, 8}], CuboidBox[{21, 26, 10}], CuboidBox[{21, 27, 8}], CuboidBox[{21, 28, 2}], CuboidBox[{21, 29, 0}], CuboidBox[{21, 30, 2}], CuboidBox[{21, 31, 0}]}, {CuboidBox[{22, 1, 9}], CuboidBox[{22, 2, 9}], CuboidBox[{22, 3, 9}], CuboidBox[{22, 4, 1}], CuboidBox[{22, 5, 1}], CuboidBox[{22, 6, 1}], CuboidBox[{22, 7, 1}], CuboidBox[{22, 8, 9}], CuboidBox[{22, 9, 9}], CuboidBox[{22, 10, 9}], CuboidBox[{22, 11, 9}], CuboidBox[{22, 12, 1}], CuboidBox[{22, 13, 1}], CuboidBox[{22, 14, 1}], CuboidBox[{22, 15, 1}], CuboidBox[{22, 16, 9}], CuboidBox[{22, 17, 9}], CuboidBox[{22, 18, 9}], CuboidBox[{22, 19, 9}], CuboidBox[{22, 20, 1}], CuboidBox[{22, 21, 1}], CuboidBox[{22, 22, 1}], CuboidBox[{22, 23, 1}], CuboidBox[{22, 24, 9}], CuboidBox[{22, 25, 9}], CuboidBox[{22, 26, 9}], CuboidBox[{22, 27, 9}], CuboidBox[{22, 28, 1}], CuboidBox[{22, 29, 1}], CuboidBox[{22, 30, 1}], CuboidBox[{22, 31, 1}]}, {CuboidBox[{23, 1, 8}], CuboidBox[{23, 2, 8}], CuboidBox[{23, 3, 8}], CuboidBox[{23, 4, 0}], CuboidBox[{23, 5, 0}], CuboidBox[{23, 6, 0}], CuboidBox[{23, 7, 0}], CuboidBox[{23, 8, 8}], CuboidBox[{23, 9, 8}], CuboidBox[{23, 10, 8}], CuboidBox[{23, 11, 8}], CuboidBox[{23, 12, 0}], CuboidBox[{23, 13, 0}], CuboidBox[{23, 14, 0}], CuboidBox[{23, 15, 0}], CuboidBox[{23, 16, 8}], CuboidBox[{23, 17, 8}], CuboidBox[{23, 18, 8}], CuboidBox[{23, 19, 8}], CuboidBox[{23, 20, 0}], CuboidBox[{23, 21, 0}], CuboidBox[{23, 22, 0}], CuboidBox[{23, 23, 0}], CuboidBox[{23, 24, 8}], CuboidBox[{23, 25, 8}], CuboidBox[{23, 26, 8}], CuboidBox[{23, 27, 8}], CuboidBox[{23, 28, 0}], CuboidBox[{23, 29, 0}], CuboidBox[{23, 30, 0}], CuboidBox[{23, 31, 0}]}, { CuboidBox[{24, 1, 5}], CuboidBox[{24, 2, 3}], CuboidBox[{24, 3, 1}], CuboidBox[{24, 4, 7}], CuboidBox[{24, 5, 5}], CuboidBox[{24, 6, 3}], CuboidBox[{24, 7, 1}], CuboidBox[{24, 8, 7}], CuboidBox[{24, 9, 5}], CuboidBox[{24, 10, 3}], CuboidBox[{24, 11, 1}], CuboidBox[{24, 12, 7}], CuboidBox[{24, 13, 5}], CuboidBox[{24, 14, 3}], CuboidBox[{24, 15, 1}], CuboidBox[{24, 16, 7}], CuboidBox[{24, 17, 5}], CuboidBox[{24, 18, 3}], CuboidBox[{24, 19, 1}], CuboidBox[{24, 20, 7}], CuboidBox[{24, 21, 5}], CuboidBox[{24, 22, 3}], CuboidBox[{24, 23, 1}], CuboidBox[{24, 24, 7}], CuboidBox[{24, 25, 5}], CuboidBox[{24, 26, 3}], CuboidBox[{24, 27, 1}], CuboidBox[{24, 28, 7}], CuboidBox[{24, 29, 5}], CuboidBox[{24, 30, 3}], CuboidBox[{24, 31, 1}]}, {CuboidBox[{25, 1, 4}], CuboidBox[{25, 2, 2}], CuboidBox[{25, 3, 0}], CuboidBox[{25, 4, 6}], CuboidBox[{25, 5, 4}], CuboidBox[{25, 6, 2}], CuboidBox[{25, 7, 0}], CuboidBox[{25, 8, 6}], CuboidBox[{25, 9, 4}], CuboidBox[{25, 10, 2}], CuboidBox[{25, 11, 0}], CuboidBox[{25, 12, 6}], CuboidBox[{25, 13, 4}], CuboidBox[{25, 14, 2}], CuboidBox[{25, 15, 0}], CuboidBox[{25, 16, 6}], CuboidBox[{25, 17, 4}], CuboidBox[{25, 18, 2}], CuboidBox[{25, 19, 0}], CuboidBox[{25, 20, 6}], CuboidBox[{25, 21, 4}], CuboidBox[{25, 22, 2}], CuboidBox[{25, 23, 0}], CuboidBox[{25, 24, 6}], CuboidBox[{25, 25, 4}], CuboidBox[{25, 26, 2}], CuboidBox[{25, 27, 0}], CuboidBox[{25, 28, 6}], CuboidBox[{25, 29, 4}], CuboidBox[{25, 30, 2}], CuboidBox[{25, 31, 0}]}, {CuboidBox[{26, 1, 5}], CuboidBox[{26, 2, 1}], CuboidBox[{26, 3, 1}], CuboidBox[{26, 4, 5}], CuboidBox[{26, 5, 5}], CuboidBox[{26, 6, 1}], CuboidBox[{26, 7, 1}], CuboidBox[{26, 8, 5}], CuboidBox[{26, 9, 5}], CuboidBox[{26, 10, 1}], CuboidBox[{26, 11, 1}], CuboidBox[{26, 12, 5}], CuboidBox[{26, 13, 5}], CuboidBox[{26, 14, 1}], CuboidBox[{26, 15, 1}], CuboidBox[{26, 16, 5}], CuboidBox[{26, 17, 5}], CuboidBox[{26, 18, 1}], CuboidBox[{26, 19, 1}], CuboidBox[{26, 20, 5}], CuboidBox[{26, 21, 5}], CuboidBox[{26, 22, 1}], CuboidBox[{26, 23, 1}], CuboidBox[{26, 24, 5}], CuboidBox[{26, 25, 5}], CuboidBox[{26, 26, 1}], CuboidBox[{26, 27, 1}], CuboidBox[{26, 28, 5}], CuboidBox[{26, 29, 5}], CuboidBox[{26, 30, 1}], CuboidBox[{26, 31, 1}]}, { CuboidBox[{27, 1, 4}], CuboidBox[{27, 2, 0}], CuboidBox[{27, 3, 0}], CuboidBox[{27, 4, 4}], CuboidBox[{27, 5, 4}], CuboidBox[{27, 6, 0}], CuboidBox[{27, 7, 0}], CuboidBox[{27, 8, 4}], CuboidBox[{27, 9, 4}], CuboidBox[{27, 10, 0}], CuboidBox[{27, 11, 0}], CuboidBox[{27, 12, 4}], CuboidBox[{27, 13, 4}], CuboidBox[{27, 14, 0}], CuboidBox[{27, 15, 0}], CuboidBox[{27, 16, 4}], CuboidBox[{27, 17, 4}], CuboidBox[{27, 18, 0}], CuboidBox[{27, 19, 0}], CuboidBox[{27, 20, 4}], CuboidBox[{27, 21, 4}], CuboidBox[{27, 22, 0}], CuboidBox[{27, 23, 0}], CuboidBox[{27, 24, 4}], CuboidBox[{27, 25, 4}], CuboidBox[{27, 26, 0}], CuboidBox[{27, 27, 0}], CuboidBox[{27, 28, 4}], CuboidBox[{27, 29, 4}], CuboidBox[{27, 30, 0}], CuboidBox[{27, 31, 0}]}, {CuboidBox[{28, 1, 1}], CuboidBox[{28, 2, 3}], CuboidBox[{28, 3, 1}], CuboidBox[{28, 4, 3}], CuboidBox[{28, 5, 1}], CuboidBox[{28, 6, 3}], CuboidBox[{28, 7, 1}], CuboidBox[{28, 8, 3}], CuboidBox[{28, 9, 1}], CuboidBox[{28, 10, 3}], CuboidBox[{28, 11, 1}], CuboidBox[{28, 12, 3}], CuboidBox[{28, 13, 1}], CuboidBox[{28, 14, 3}], CuboidBox[{28, 15, 1}], CuboidBox[{28, 16, 3}], CuboidBox[{28, 17, 1}], CuboidBox[{28, 18, 3}], CuboidBox[{28, 19, 1}], CuboidBox[{28, 20, 3}], CuboidBox[{28, 21, 1}], CuboidBox[{28, 22, 3}], CuboidBox[{28, 23, 1}], CuboidBox[{28, 24, 3}], CuboidBox[{28, 25, 1}], CuboidBox[{28, 26, 3}], CuboidBox[{28, 27, 1}], CuboidBox[{28, 28, 3}], CuboidBox[{28, 29, 1}], CuboidBox[{28, 30, 3}], CuboidBox[{28, 31, 1}]}, {CuboidBox[{29, 1, 0}], CuboidBox[{29, 2, 2}], CuboidBox[{29, 3, 0}], CuboidBox[{29, 4, 2}], CuboidBox[{29, 5, 0}], CuboidBox[{29, 6, 2}], CuboidBox[{29, 7, 0}], CuboidBox[{29, 8, 2}], CuboidBox[{29, 9, 0}], CuboidBox[{29, 10, 2}], CuboidBox[{29, 11, 0}], CuboidBox[{29, 12, 2}], CuboidBox[{29, 13, 0}], CuboidBox[{29, 14, 2}], CuboidBox[{29, 15, 0}], CuboidBox[{29, 16, 2}], CuboidBox[{29, 17, 0}], CuboidBox[{29, 18, 2}], CuboidBox[{29, 19, 0}], CuboidBox[{29, 20, 2}], CuboidBox[{29, 21, 0}], CuboidBox[{29, 22, 2}], CuboidBox[{29, 23, 0}], CuboidBox[{29, 24, 2}], CuboidBox[{29, 25, 0}], CuboidBox[{29, 26, 2}], CuboidBox[{29, 27, 0}], CuboidBox[{29, 28, 2}], CuboidBox[{29, 29, 0}], CuboidBox[{29, 30, 2}], CuboidBox[{29, 31, 0}]}, { CuboidBox[{30, 1, 1}], CuboidBox[{30, 2, 1}], CuboidBox[{30, 3, 1}], CuboidBox[{30, 4, 1}], CuboidBox[{30, 5, 1}], CuboidBox[{30, 6, 1}], CuboidBox[{30, 7, 1}], CuboidBox[{30, 8, 1}], CuboidBox[{30, 9, 1}], CuboidBox[{30, 10, 1}], CuboidBox[{30, 11, 1}], CuboidBox[{30, 12, 1}], CuboidBox[{30, 13, 1}], CuboidBox[{30, 14, 1}], CuboidBox[{30, 15, 1}], CuboidBox[{30, 16, 1}], CuboidBox[{30, 17, 1}], CuboidBox[{30, 18, 1}], CuboidBox[{30, 19, 1}], CuboidBox[{30, 20, 1}], CuboidBox[{30, 21, 1}], CuboidBox[{30, 22, 1}], CuboidBox[{30, 23, 1}], CuboidBox[{30, 24, 1}], CuboidBox[{30, 25, 1}], CuboidBox[{30, 26, 1}], CuboidBox[{30, 27, 1}], CuboidBox[{30, 28, 1}], CuboidBox[{30, 29, 1}], CuboidBox[{30, 30, 1}], CuboidBox[{30, 31, 1}]}, {CuboidBox[{31, 1, 0}], CuboidBox[{31, 2, 0}], CuboidBox[{31, 3, 0}], CuboidBox[{31, 4, 0}], CuboidBox[{31, 5, 0}], CuboidBox[{31, 6, 0}], CuboidBox[{31, 7, 0}], CuboidBox[{31, 8, 0}], CuboidBox[{31, 9, 0}], CuboidBox[{31, 10, 0}], CuboidBox[{31, 11, 0}], CuboidBox[{31, 12, 0}], CuboidBox[{31, 13, 0}], CuboidBox[{31, 14, 0}], CuboidBox[{31, 15, 0}], CuboidBox[{31, 16, 0}], CuboidBox[{31, 17, 0}], CuboidBox[{31, 18, 0}], CuboidBox[{31, 19, 0}], CuboidBox[{31, 20, 0}], CuboidBox[{31, 21, 0}], CuboidBox[{31, 22, 0}], CuboidBox[{31, 23, 0}], CuboidBox[{31, 24, 0}], CuboidBox[{31, 25, 0}], CuboidBox[{31, 26, 0}], CuboidBox[{31, 27, 0}], CuboidBox[{31, 28, 0}], CuboidBox[{31, 29, 0}], CuboidBox[{31, 30, 0}], CuboidBox[{31, 31, 0}]}}, ImageSize->{365.268717683825, 384.21559560841496`}, ImageSizeRaw->Automatic, ViewPoint->{1.605301683613667, -2.3983645769138704`, 1.7665938584722514`}, ViewVertical->{0.08980116456615791, -0.03317028053269283, 0.9954071947358754}]], "Output", CellChangeTimes->{{3.761574626304991*^9, 3.761574633404875*^9}}, CellLabel->"Out[68]=", CellID->1854978713] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Properties and Relations", "Subsection", CellID->461307998], Cell[TextData[{ "BitBooleanFunction for ", Cell[BoxData[ TemplateBox[{Cell[ TextData["BitAnd"]],"paclet:ref/BitAnd"}, "RefLink", BaseStyle->{"InlineFormula"}]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", CellChangeTimes->{{3.7500071210475597`*^9, 3.7500071345604153`*^9}, { 3.76200399348636*^9, 3.762004008506404*^9}, {3.768139903425013*^9, 3.768139911410759*^9}, {3.768141572807493*^9, 3.76814158017472*^9}, { 3.768142512025326*^9, 3.76814254305305*^9}, {3.7681425749489326`*^9, 3.768142579868245*^9}, {3.768142631253093*^9, 3.768142652220725*^9}, { 3.768142740680834*^9, 3.768142742137141*^9}, {3.7681427814099417`*^9, 3.76814278347397*^9}}, CellID->728069419], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ArrayPlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"BitBooleanFunction", "[", "8", "]"}], "[", RowBox[{"i", ",", "j"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "63"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "63"}], "}"}]}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.7500068508100157`*^9, 3.7500068644422083`*^9}, { 3.768141865487102*^9, 3.7681419156414347`*^9}, {3.7681421197456713`*^9, 3.768142121230481*^9}, 3.768142215975766*^9, 3.768142253071101*^9, { 3.768142367375572*^9, 3.768142379042576*^9}, {3.768142464225115*^9, 3.7681424795952806`*^9}}, CellLabel->"In[628]:=", CellID->1237085510], Cell[BoxData[ GraphicsBox[RasterBox[CompressedData[" 1:eJyFVdGu0lAQBCq3QoUKCBUqVECoUKFChQoV9h/8hPsD/v+bZ+PZB6fJ2dlM Jpt92kwms3z98/u11Wg0yPL5+FXdbz/L6+VHcT59z4+Hb9l+9zXdbr6sV8vP yWL+KZ5NP0aT8YfRcPA+7PfeBd3OW/+l/cZrNRv0eFTV7VaWl0tRnE55fjhk 2W6XppvNer1cJsl8HsfTaRSNx6PRYBCGvV4QdDq+3257XrP5pGd1r+7ltbwW 5+KcH/Njts/26TbdrlfrVbJIFvEsnkWTaDIajoZhP+wH3aDrv/gvXstrEVFl UBoUBrlBZpAarA0Sg9ggMhgZhAaBgW/gGZjfyZB/Z/LvTP6dyb8z+Xcm/87k 35nmdzLk35n8O5N/Z/LvTP6dyb8z+Xem+Z2Hf+fh33n4dx7+nYd/5+Hfefh3 HvqH0iK3SC0Si8gitPAtrO9kVXwXFd9FxXdR6ztZFd9FxXdR8V3U+k5WxXdR 8V1UfBe1vpNV8V1UfBcV30Wt70LxXSi+C8V3ofVdKL4LxXeh+C60vsuI7zLi u4z4LkP/IwckgBAAeSfYMe+4Q94Jdsw77pB3gh3zjjvknWDHvOMOeSfYMe+4 Q94Jdsw77pB3gh3zjjvknWDHvOMOeUfFvKNC3lEx76iQd1TMOyrkHRXzjgp5 R2LekZB3JOYdCXnHwbzjkBuYd4TS75j/2t3d75h/vCv9jvmv3d39jvnHu9Lv mP/a3d3vmH+8K/2O+a/d3f2O+ce70u+Y/9rd3e+Yf7wr/Y75r93d/Y75x7vS 75j/2t3d75h/vCv9jvmv3d39jvnHu9Lv6u7ud21X+l3d3f2u7Uq/q7u737Vd 6Xd1d/e7tiv9rqq73zVV+l1Vd79rqvS7Sne/a1T6XZu/lVzXBA== "], {{0, 0}, {63, 63}}, {0, 63}], Frame->Automatic, FrameLabel->{None, None}, FrameTicks->{{None, None}, {None, None}}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultPlotStyle" -> Automatic}]], "Output", CellChangeTimes->{3.768142490968708*^9}, CellLabel->"Out[628]="] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Source & Additional Information", "Section", Deletable->False, CellTags->"Source & Additional Information", CellID->318391102], Cell[CellGroupData[{ Cell[TextData[{ "Contributed By", Cell[BoxData[ TemplateBox[{"Contributed By",Cell[ BoxData[ FrameBox[ Cell[ "Enter the name of the person, people or organization that should be \ publicly credited with contributing this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoContributedBy"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Text", CellTags->"Contributed By", CellID->127820888], Cell["Stephen Wolfram", "Text"] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Keywords", Cell[BoxData[ TemplateBox[{"Keywords",Cell[ BoxData[ FrameBox[ Cell[ "List relevant terms (e.g. functional areas, algorithm names, related \ concepts) that should be used to include the function in search results.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoKeywords"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Item", CellTags->"Keywords", CellID->547400482], Cell["Boolean operator", "Item"], Cell["logical function", "Item"], Cell["logical operator", "Item"], Cell["truth table", "Item"] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Deletable->False, DefaultNewCellStyle->"Item", CellTags->"Categories", CellID->749076926], Cell["Higher Mathematical Computation", "Item"] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Symbols", Cell[BoxData[ TemplateBox[{"Related Symbols",Cell[ BoxData[ FrameBox[ Cell[ "List up to twenty documented, system-level Wolfram Language symbols \ related to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedSymbols"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Item", CellTags->"Related Symbols", CellID->161079978], Cell["SymbolName (documented Wolfram Language symbol)", "Item", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->"TabNext", CellID->79477165] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Resource Objects", Cell[BoxData[ TemplateBox[{"Related Resource Objects",Cell[ BoxData[ FrameBox[ Cell[ "List the names of published resource objects from any Wolfram \ repository that are related to this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedResourceObjects"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Item", CellTags->"Related Resource Objects", CellID->588449267], Cell["Resource Name (resources from any Wolfram repository)", "Item", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->"TabNext", CellID->960273585] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Source/Reference Citation", Cell[BoxData[ TemplateBox[{"Source/Reference Citation",Cell[ BoxData[ FrameBox[ Cell[ "Give a bibliographic-style citation for the original source of the \ function and/or its components (e.g. a published paper, algorithm, or code \ repository).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSourceReferenceCitation"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Text", CellTags->"Source/Reference Citation", CellID->642091068], Cell["Source, reference or citation information", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->"TabNext", CellID->343081869] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Links", Cell[BoxData[ TemplateBox[{"Links",Cell[ BoxData[ FrameBox[ Cell[ "List additional URLs or hyperlinks for external information related \ to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoLinks"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Item", CellTags->"Links", CellID->521525586], Cell["Link to other related material", "Item", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->"TabNext", CellID->485448166] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Tests", Cell[BoxData[ TemplateBox[{"Tests",Cell[ BoxData[ FrameBox[ Cell[ "Specify an optional list of tests for verifying that the function is \ working properly in any environment. Tests can be specified as Input/Output \ cell pairs or as symbolic VerificationTest expressions for including \ additional options.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoTests"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Subsection", Deletable->False, DefaultNewCellStyle->"Input", CellTags->"Tests", CellID->74308299], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MyFunction", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellLabel->"In[3]:=", CellID->667877521], Cell[BoxData[ RowBox[{"x", " ", "y"}]], "Output", CellLabel->"Out[3]=", CellID->993233288] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Author Notes", "Section", Deletable->False, DefaultNewCellStyle->"Text", CellTags->"Author Notes", CellID->795110225], Cell["Additional information about limitations, issues, etc.", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->"TabNext", CellID->567921317] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Submission Notes", Cell[BoxData[ TemplateBox[{"Submission Notes",Cell[ BoxData[ FrameBox[ Cell[ "Enter any additional information that you would like to communicate \ to the reviewer here. This section will not be included in the published \ resource.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSubmissionNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]]] }], "Section", Deletable->False, DefaultNewCellStyle->"Text", CellTags->"Submission Notes", CellID->843283583], Cell["Additional information for the reviewer.", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->"TabNext", CellID->920818074] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, TaggingRules->{ "ResourceType" -> "Function", "ResourceCreateNotebook" -> True, "TemplateVersion" -> "1.2.19"}, CreateCellID->True, FrontEndVersion->"12.0 for Linux x86 (64-bit) (April 8, 2019)", StyleDefinitions->Notebook[{ Cell[ StyleData[StyleDefinitions -> "Default.nb"]], Cell[ StyleData[All, "Working"], DockedCells -> { Cell[ BoxData[ TemplateBox[{}, "MainGridTemplate"]], "DockedCell", CellMargins -> {{-10, -10}, {-8, -8}}, CellFrame -> 0, CellTags -> {"MainDockedCell"}], Cell[ BoxData[ TemplateBox[{}, "ToolsGridTemplate"]], "DockedCell", TaggingRules -> {"Tools" -> True}, CellTags -> {"ToolbarDockedCell"}, Background -> RGBColor[0.996078, 0.941176, 0.921569], CellFrameMargins -> {{39, 5}, {2, 2}}, CellFrame -> {{0, 0}, {1, 0}}, CellFrameColor -> GrayLevel[0.75], CellOpen -> Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, False]]]}], Cell[ StyleData["Item"], DefaultNewCellStyle -> "Item"], Cell[ StyleData["MoreInfoText", StyleDefinitions -> StyleData["Text"]], FontColor -> GrayLevel[0.25]], Cell[ StyleData["ErrorText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, Inherited}, {10, 10}}, CellElementSpacings -> {"CellMinHeight" -> 0, "ClosedCellHeight" -> 0}, FontWeight -> Bold, FontColor -> RGBColor[1, 0, 0]], Cell[ StyleData["WarningText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, 35}, {0, 0}}, FontSize -> 14, GridBoxOptions -> {BaseStyle -> {}}], Cell[ StyleData["ButtonText"], FontFamily -> "Sans Serif", FontSize -> 11, FontWeight -> Bold, FontColor -> RGBColor[0.458824, 0.458824, 0.458824]], Cell[ StyleData["MoreInfoOpenerIconTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> GraphicsBox[{ Thickness[0.07142857142857142], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYCYpfunOe/V2o6MICBjAOM//GSb5KAhKLD46Wz jygUaDjIRKVY3+dXgahzUIPTMHGYOpg+XObKgtSfF4Xze6fnCTUf4Ifr/w8G bHDzn15Quv2z7o89zJ4nIHUbPtnD7IHxYfbA+DB7YPph9sDMh9EwcZg6mD5c 5qLbC3MXTD/M3TDzYf6C2YMrHGD2AAAVXK28 "], CurveClosed -> {1}]}, JoinForm[{"Miter", 3.25}], Thickness[0.049999999999999996`], RGBColor[0.627441, 0.627441, 0.627441, 1.], StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQ/Tcg88iZOhmHGu7Xx3YXKzm03fzoEzpdGs7nS6q6 eve8lMOjwkBdpVlKDtNeMcWlaUg5rLeT+/XumZKDfHH3s3cNkhD1xsoOydvP axnrSjrM0+V9eXcqgi+2tCUhlFcFzu+R+XP9TIsKXD/Y/GcqcPPB6g1V4fZ7 3Ng+uaNGFe4+sPpFqg4w98P4b+wjNu/OlYXzwerN5eD6T8maTZx5Ww7V/Hp5 uP0GLXO+/78oD3cfjA9zP4wP8x9MP8z/MPNh4QOzHxZ+MPfBwhc9/AFZSbHT "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQLeF07vf/KwoOe35VvNh9m88Bxg+bItQUGsrtcErW bOLMbHEMPky9Qcuc7/8vSjp80F0j/f4cP5xvEy11afdrATjfN0f78Zk/gnC+ thfnwVVSwnC+lOWP9TMtReD8Z6xHa9LMROH8SRvy1QUFxdD4EnA+p8bzeR0a knD+ooMNFkpCUnB+XK3Nl7tnpVDt65RGlfeVQXOfLIQvKe7wQ+xab3k5gn/0 8aIolz9yDinbz2sZ35VzWG8n9+vdKQWIfKK8Qw3362O7pyP4EP3ScD6Kf4B8 FP8C+Q3z48QYLETgfLD7RIXhfHD4fhaE88HueSIA58PiAz1+AUR/638= "]}]}, FaceForm[ RGBColor[0.627441, 0.627441, 0.627441, 1.]], StripOnInput -> False]}, ImageSize -> {14., 14.}, PlotRange -> {{0., 14.}, {0., 14.}}, AspectRatio -> Automatic], True -> GraphicsBox[{ Thickness[0.07142857142857142], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYCYpfunOe/V2o6MICBjAOM//GSb5KAhKLD46Wz jygUaDjIRKVY3+dXgahzUIPTMHGYOpg+XObKgtSfF4Xze6fnCTUf4Ifr/w8G bHDzn15Quv2z7o89zJ4nIHUbPtnD7IHxYfbA+DB7YPph9sDMh9EwcZg6mD5c 5qLbC3MXTD/M3TDzYf6C2YMrHGD2AAAVXK28 "], CurveClosed -> {1}]}, JoinForm[{"Miter", 3.25}], Thickness[0.049999999999999996`], RGBColor[0.5, 0.5, 0.5, 1.], StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYCYpfunOe/V2o6MICBjAOM//GSb5KAhKLD46Wz jygUaDjIRKVY3+dXgahzUIPTMHGYOpg+XObKgtSfF4Xze6fnCTUf4Ifr/w8G bHDzn15Quv2z7o89zJ4nIHUbPtnD7IHxYfbA+DB7YPph9sDMh9EwcZg6mD5c 5qLbC3MXTD/M3TDzYf6C2YMrHGD2AAAVXK28 "]]}, FaceForm[ RGBColor[0.5, 0.5, 0.5, 1.]], StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQ/Tcg88iZOhmHGu7Xx3YXKzm03fzoEzpdGs7nS6q6 eve8lMOjwkBdpVlKDtNeMcWlaUg5rLeT+/XumZKDfHH3s3cNkhD1xsoOydvP axnrSjrM0+V9eXcqgi+2tCUhlFcFzu+R+XP9TIsKXD/Y/GcqcPPB6g1V4fZ7 3Ng+uaNGFe4+sPpFqg4w98P4b+wjNu/OlYXzwerN5eD6T8maTZx5Ww7V/Hp5 uP0GLXO+/78oD3cfjA9zP4wP8x9MP8z/MPNh4QOzHxZ+MPfBwhc9/AFZSbHT "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQLeF07vf/KwoOe35VvNh9m88Bxg+bItQUGsrtcErW bOLMbHEMPky9Qcuc7/8vSjp80F0j/f4cP5xvEy11afdrATjfN0f78Zk/gnC+ thfnwVVSwnC+lOWP9TMtReD8Z6xHa9LMROH8SRvy1QUFxdD4EnA+p8bzeR0a knD+ooMNFkpCUnB+XK3Nl7tnpVDt65RGlfeVQXOfLIQvKe7wQ+xab3k5gn/0 8aIolz9yDinbz2sZ35VzWG8n9+vdKQWIfKK8Qw3362O7pyP4EP3ScD6Kf4B8 FP8C+Q3z48QYLETgfLD7RIXhfHD4fhaE88HueSIA58PiAz1+AUR/638= "]}]}, FaceForm[ RGBColor[0.999985, 0.999985, 0.999985, 1.]], StripOnInput -> False]}, ImageSize -> {14., 14.}, PlotRange -> {{0., 14.}, {0., 14.}}, AspectRatio -> Automatic]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["MoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ ButtonBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], "\"Click for more information\""}, "PrettyTooltipTemplate"], ButtonFunction :> (If[ MatchQ[ CurrentValue[ ButtonNotebook[], {TaggingRules, "AttachedCells", #}], Blank[CellObject]], NotebookDelete[ CurrentValue[ ButtonNotebook[], {TaggingRules, "AttachedCells", #}]]; CurrentValue[ ButtonNotebook[], {TaggingRules, "AttachedCells", #}] = Inherited, CurrentValue[ ButtonNotebook[], {TaggingRules, "AttachedCells", #}] = MathLink`CallFrontEnd[ FrontEnd`AttachCell[ ParentCell[ EvaluationCell[]], #2, "Inline", "ClosingActions" -> {"ParentChanged", "EvaluatorQuit"}]]; Null]; Null), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["ClickToCopyTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> TagBox[ GridBox[{{#, ButtonBox[ GraphicsBox[{ GrayLevel[0.85], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, { 9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {16.5, 4.5}, { 16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {15.75, 17.25}, { 15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, { 8.25, 18.}}, {{9.75, 17.25}, {12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, { 14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{8.25, 12.}, { 14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], ButtonFunction :> Null, Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Evaluator -> Automatic, Method -> "Preemptive"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], True -> DynamicModuleBox[{ FunctionResourceTools`BuildDefinitionNotebook`Private`clickTime$$ = 0., FunctionResourceTools`BuildDefinitionNotebook`Private`timeout$\ $ = 3.}, TagBox[ GridBox[{{#, TagBox[ ButtonBox[ DynamicBox[ ToBoxes[ Refresh[ If[ AbsoluteTime[] - FunctionResourceTools`BuildDefinitionNotebook`Private`\ clickTime$$ > FunctionResourceTools`BuildDefinitionNotebook`Private`timeout$$, (RawBoxes[ TemplateBox[{ ToBoxes[#], ToBoxes[#2]}, "PrettyTooltipTemplate"]]& )[ Mouseover[ Graphics[{ GrayLevel[0.65], Thickness[2/45], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], Graphics[{ RGBColor[0.988235, 0.419608, 0.203922], Thickness[2/45], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12]], "Click to copy to the clipboard"], (RawBoxes[ TemplateBox[{ ToBoxes[#], ToBoxes[#2]}, "PrettyTooltipTemplate"]]& )[ Graphics[{ RGBColor[0, 2/3, 0], Thickness[2/45], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], "Copied"]], UpdateInterval -> 1, TrackedSymbols :> { FunctionResourceTools`BuildDefinitionNotebook`Private`\ clickTime$$}], StandardForm], Evaluator -> "System"], ButtonFunction :> ( FunctionResourceTools`BuildDefinitionNotebook`Private`\ clickTime$$ = AbsoluteTime[]; CopyToClipboard[#2]), Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Method -> "Queued", Evaluator -> "System"], MouseAppearanceTag["LinkHand"]]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], DynamicModuleValues :> {}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["PrettyTooltipTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ TooltipBox[#, FrameBox[ StyleBox[#2, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain", StripOnInput -> False], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8, StripOnInput -> False], TooltipDelay -> 0.1, TooltipStyle -> {Background -> None, CellFrame -> 0}], Annotation[#, Framed[ Style[ FunctionResourceTools`BuildDefinitionNotebook`Private`$$tooltip, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain"], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8], "Tooltip"]& ]& )}], Cell[ StyleData["ToolsGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{ ButtonBox[ TemplateBox[{ StyleBox[ "\"Template Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection automatically using appropriate \ documentation styles\""}, "PrettyTooltipTemplate"], ButtonFunction :> ( Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False}, Symbol["System`ResourceFunction"]]; Identity[ FunctionResource`DocuToolsTemplate`FunctionTemplateToggle[]]), FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> RGBColor[1, 1, 1]}, { FontColor -> RGBColor[0.92549, 0.498039, 0.235294]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh9mpryfFAVBQDZcMVzZr9un gFK/H1+BWwFkA0WA4nBlf988A+l9fgvNMUARoDhQFuJaoJYP0xKwOhsoDpRl AANilBFpGvFuI9KnxIcbMbGABrDGKQDn48Vx "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh8mRbxvd4MgIBuuGK7s1+1T 7zs8fvbb/JkCRUA2UAQoDlf2982zDxNDf05AqIGqnGADFAfKQlwL1PKhwx1N DQQBxYGyDGBAjDIiTSPebUT6lPhwIyYWiIlTAA7cjww= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUu/6wt42OkMQkA1XDFf26/ap t81urxOUXodLQ1GCElAEKA5X9vfNs3c9wa/jFRFqICheESgOlIW4FqjlXYMz uhowAooDZRnAgBhlRJpGvNuI9Cnx4UZMLBATpwBrEHs/ "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.996078, 0.941176, 0.921569], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], ButtonBox[ TemplateBox[{ StyleBox[ "\"Literal Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection as literal Wolfram Language code\""}, "PrettyTooltipTemplate"], ButtonFunction :> ( Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False}, Symbol["System`ResourceFunction"]]; Identity[ FunctionResource`DocuToolsTemplate`\ FunctionTemplateLiteralInput[]]), FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> RGBColor[1, 1, 1]}, { FontColor -> RGBColor[0.92549, 0.498039, 0.235294]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh9mpryfFAVBQDZcMVzZr9un gFK/H1+BWwFkA0WA4nBlf988A+l9fgvNMUARoDhQFuJaoJYP0xKwOhsoDpRl AANilBFpGvFuI9KnxIcbMbGABrDGKQDn48Vx "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh8mRbxvd4MgIBuuGK7s1+1T 7zs8fvbb/JkCRUA2UAQoDlf2982zDxNDf05AqIGqnGADFAfKQlwL1PKhwx1N DQQBxYGyDGBAjDIiTSPebUT6lPhwIyYWiIlTAA7cjww= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUu/6wt42OkMQkA1XDFf26/ap t81urxOUXodLQ1GCElAEKA5X9vfNs3c9wa/jFRFqICheESgOlIW4FqjlXYMz uhowAooDZRnAgBhlRJpGvNuI9Cnx4UZMLBATpwBrEHs/ "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.996078, 0.941176, 0.921569], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], ButtonBox[ TemplateBox[{ StyleBox[ "\"Insert Delimiter\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert example delimiter\""}, "PrettyTooltipTemplate"], ButtonFunction :> ( Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False}, Symbol["System`ResourceFunction"]]; Identity[ FunctionResource`DocuToolsTemplate`DocDelimiter[]]), FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> RGBColor[1, 1, 1]}, { FontColor -> RGBColor[0.92549, 0.498039, 0.235294]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh9mpryfFAVBQDZcMVzZr9un gFK/H1+BWwFkA0WA4nBlf988A+l9fgvNMUARoDhQFuJaoJYP0xKwOhsoDpRl AANilBFpGvFuI9KnxIcbMbGABrDGKQDn48Vx "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh8mRbxvd4MgIBuuGK7s1+1T 7zs8fvbb/JkCRUA2UAQoDlf2982zDxNDf05AqIGqnGADFAfKQlwL1PKhwx1N DQQBxYGyDGBAjDIiTSPebUT6lPhwIyYWiIlTAA7cjww= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUu/6wt42OkMQkA1XDFf26/ap t81urxOUXodLQ1GCElAEKA5X9vfNs3c9wa/jFRFqICheESgOlIW4FqjlXYMz uhowAooDZRnAgBhlRJpGvNuI9Cnx4UZMLBATpwBrEHs/ "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.996078, 0.941176, 0.921569], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], ButtonBox[ TemplateBox[{ StyleBox[ "\"Subscripted Variable\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert subscripted variable placeholder\""}, "PrettyTooltipTemplate"], ButtonFunction :> ( Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False}, Symbol["System`ResourceFunction"]]; Identity[ FunctionResource`DocuToolsTemplate`InsertSubscript[]]), FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> RGBColor[1, 1, 1]}, { FontColor -> RGBColor[0.92549, 0.498039, 0.235294]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh9mpryfFAVBQDZcMVzZr9un gFK/H1+BWwFkA0WA4nBlf988A+l9fgvNMUARoDhQFuJaoJYP0xKwOhsoDpRl AANilBFpGvFuI9KnxIcbMbGABrDGKQDn48Vx "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh8mRbxvd4MgIBuuGK7s1+1T 7zs8fvbb/JkCRUA2UAQoDlf2982zDxNDf05AqIGqnGADFAfKQlwL1PKhwx1N DQQBxYGyDGBAjDIiTSPebUT6lPhwIyYWiIlTAA7cjww= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUu/6wt42OkMQkA1XDFf26/ap t81urxOUXodLQ1GCElAEKA5X9vfNs3c9wa/jFRFqICheESgOlIW4FqjlXYMz uhowAooDZRnAgBhlRJpGvNuI9Cnx4UZMLBATpwBrEHs/ "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.996078, 0.941176, 0.921569], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], ActionMenuBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Tables\[ThinSpace]\[ThinSpace]\[ThinSpace]\ \[FilledDownTriangle]\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Table Functions\""}, "PrettyTooltipTemplate"], ButtonFunction :> ( Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False}, Symbol["System`ResourceFunction"]]; FunctionResource`DefinitionNotebook`Private`showProgress[Null]), FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> RGBColor[1, 1, 1]}, { FontColor -> RGBColor[0.92549, 0.498039, 0.235294]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh9mpryfFAVBQDZcMVzZr9un gFK/H1+BWwFkA0WA4nBlf988A+l9fgvNMUARoDhQFuJaoJYP0xKwOhsoDpRl AANilBFpGvFuI9KnxIcbMbGABrDGKQDn48Vx "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh8mRbxvd4MgIBuuGK7s1+1T 7zs8fvbb/JkCRUA2UAQoDlf2982zDxNDf05AqIGqnGADFAfKQlwL1PKhwx1N DQQBxYGyDGBAjDIiTSPebUT6lPhwIyYWiIlTAA7cjww= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUu/6wt42OkMQkA1XDFf26/ap t81urxOUXodLQ1GCElAEKA5X9vfNs3c9wa/jFRFqICheESgOlIW4FqjlXYMz uhowAooDZRnAgBhlRJpGvNuI9Cnx4UZMLBATpwBrEHs/ "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.996078, 0.941176, 0.921569], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], { "\"Insert table with two columns\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DocuToolsTemplate`TableInsert[2]]", InputForm], "\"Insert table with three columns\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DocuToolsTemplate`TableInsert[3]]", InputForm], "\"Add a row to the selected table\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ System`FrontEndExecute[{System`FrontEndToken[System`ButtonNotebook[], \ \"NewRow\"]}]]", InputForm], "\"Sort the selected table\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DocuToolsTemplate`TableSort[]]", InputForm], "\"Merge selected tables\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DocuToolsTemplate`TableMerge[]]", InputForm]}, Appearance -> None, Method -> "Queued"], DynamicBox[ ToBoxes[ If[ CurrentValue[ EvaluationNotebook[], { TaggingRules, "SubmissionReviewData", "Review"}, False], Button[ RawBoxes[ TemplateBox[{ StyleBox[ "\"Insert Comment\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert comment for reviewer\""}, "PrettyTooltipTemplate"]], Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False}, Symbol["System`ResourceFunction"]]; Identity[ FunctionResource`DocuToolsTemplate`InsertComment[]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> RGBColor[1, 1, 1]}, { FontColor -> RGBColor[0.92549, 0.498039, 0.235294]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh9mpryfFAVBQDZcMVzZr9un gFK/H1+BWwFkA0WA4nBlf988A+l9fgvNMUARoDhQFuJaoJYP0xKwOhsoDpRl AANilBFpGvFuI9KnxIcbMbGABrDGKQDn48Vx "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUh8mRbxvd4MgIBuuGK7s1+1T 7zs8fvbb/JkCRUA2UAQoDlf2982zDxNDf05AqIGqnGADFAfKQlwL1PKhwx1N DQQBxYGyDGBAjDIiTSPebUT6lPhwIyYWiIlTAA7cjww= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQ/PvwGo5+3zsPQciCyMqAUu/6wt42OkMQkA1XDFf26/ap t81urxOUXodLQ1GCElAEKA5X9vfNs3c9wa/jFRFqICheESgOlIW4FqjlXYMz uhowAooDZRnAgBhlRJpGvNuI9Cnx4UZMLBATpwBrEHs/ "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.996078, 0.941176, 0.921569], Method -> "Queued", ImageSize -> {All, 20}], ""], StandardForm], Evaluator -> "System", SingleEvaluation -> True], ItemBox["\"\"", ItemSize -> Fit, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { RGBColor[0.996078, 0.941176, 0.921569]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> {1 -> RGBColor[0.996078, 0.941176, 0.921569]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "ColumnsIndexed" -> {1 -> 0, -1 -> 0}, "Rows" -> {{Automatic}}}, FrameStyle -> GrayLevel[0.75]], "Grid"]& )}], Cell[ StyleData["MainGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, { 0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, { 34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, {23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, { 24.953, 23.914}, {25.418, 23.91}, {29.746, 23.91}, { 30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, {33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, {31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> {Automatic, 32}, ImagePadding -> {{5, 0}, {0, 0}}, BaselinePosition -> Scaled[0.25], Background -> RGBColor[0.988235, 0.419608, 0.203922], AspectRatio -> Automatic, ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], StyleBox[ TagBox[ GridBox[{{ StyleBox[ "\"Function Resource\"", FontFamily -> "Source Sans Pro SemiBold", FontWeight -> "SemiBold", StripOnInput -> False], StyleBox[ "\"DEFINITION NOTEBOOK\"", FontFamily -> "Source Sans Pro", FontTracking -> "SemiCondensed", FontVariations -> {"CapsType" -> "AllSmallCaps"}, StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "ColumnsIndexed" -> {2 -> GrayLevel[1]}, "Rows" -> {{None}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], FontSize -> 24, FontColor -> GrayLevel[1], StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", ItemBox[ TemplateBox[{ StyleBox[ "\"Function Repository \[RightGuillemet] \"", "Text", FontColor -> GrayLevel[1], StripOnInput -> False], "https://resources.wolframcloud.com/FunctionRepository/"}, "HyperlinkURL"], Alignment -> {Right, Bottom}, StripOnInput -> False]}, { TemplateBox[{ TemplateBox[{ "\"Open Sample\"", "\"View a completed sample definition notebook\""}, "PrettyTooltipTemplate"], FunctionResource`DefinitionNotebook`Private`viewExampleNotebook[]\ & , "\"View a completed sample definition notebook\"", True}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ "\"Style Guidelines\"", "\"View general guidelines for authoring resource \ functions\""}, "PrettyTooltipTemplate"], FunctionResource`DefinitionNotebook`Private`viewStyleGuidelines[]\ & , "\"View general guidelines for authoring resource functions\"", True}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{"\"Tools\"", PaneSelectorBox[{False -> GraphicsBox[{ GrayLevel[1], AbsoluteThickness[1], LineBox[{{-1, -1}, {-1, 1}, {1, 1}, {1, -1}, {-1, -1}}], LineBox[{{0., 0.65}, {0., -0.65}}], LineBox[{{-0.65, 0.}, {0.65, 0.}}]}, ImageSize -> 12, PlotRangePadding -> None, Background -> None], True -> GraphicsBox[{ GrayLevel[1], AbsoluteThickness[1], LineBox[{{-1, -1}, {-1, 1}, {1, 1}, {1, -1}, {-1, -1}}], LineBox[{{-0.65, 0.}, {0.65, 0.}}]}, ImageSize -> 12, PlotRangePadding -> None, Background -> None]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]], BaselinePosition -> Scaled[0.1]]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.35}}}], "Grid"], "\"Toggle documentation toolbar\""}, "PrettyTooltipTemplate"], FunctionResource`DefinitionNotebook`Private`getResource[ ButtonNotebook[], "Tools"]& , "\"Toggle documentation toolbar\"", False}, "OrangeButtonTemplate"], TagBox[ GridBox[{{"\"\"", "\"\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxDividers -> { "ColumnsIndexed" -> {2 -> True}, "Rows" -> {{False}}}, GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{2}}}, GridBoxSpacings -> {"Columns" -> {{0.5}}}, FrameStyle -> RGBColor[0.994118, 0.709804, 0.601961]], "Grid"], TemplateBox[{ TemplateBox[{ "\"Check\"", "\"Check notebook for potential errors\""}, "PrettyTooltipTemplate"], FunctionResource`DefinitionNotebook`Private`checkNotebook[ ButtonNotebook[]]& , "\"Check notebook for potential errors\"", True}, "OrangeButtonTemplate"], ActionMenuBox[ TemplateBox[{ "\"Preview \[FilledDownTriangle]\"", Null& , "\"\"", True}, "OrangeButtonTemplate"], { "\"In a notebook\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DefinitionNotebook`Private`getResource[System`ButtonNotebook[\ ], \"Preview\"]]", InputForm], "\"On the cloud\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DefinitionNotebook`Private`getResource[System`ButtonNotebook[\ ], \"Cloud\"]]", InputForm]}, Appearance -> None, Method -> "Queued"], ActionMenuBox[ TemplateBox[{ "\"Deploy \[FilledDownTriangle]\"", Null& , "\"\"", True}, "OrangeButtonTemplate"], { "\"Locally on this computer\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DefinitionNotebook`Private`getResource[System`ButtonNotebook[\ ], \"Local\"]]", InputForm], "\"For my cloud account\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DefinitionNotebook`Private`getResource[System`ButtonNotebook[\ ], \"Cloud\"]]", InputForm], "\"Publicly in the cloud\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DefinitionNotebook`Private`getResource[System`ButtonNotebook[\ ], \"CloudPublic\"]]", InputForm], "\"In this session only (without documentation)\"" :> ToExpression[ "System`Block[{ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = System`False}, \ System`Symbol[\"System`ResourceFunction\"]; \ FunctionResource`DefinitionNotebook`Private`getResource[System`ButtonNotebook[\ ], \"KernelSession\"]]", InputForm]}, Appearance -> None, Method -> "Queued"], ItemBox[ StyleBox[ DynamicBox[ ToBoxes[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}, ""], StandardForm], Evaluator -> "System", Initialization :> (CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}] = "")], "Text", GrayLevel[1], StripOnInput -> False], ItemSize -> Fit, StripOnInput -> False], DynamicBox[ ToBoxes[ If[ CurrentValue[ EvaluationNotebook[], { TaggingRules, "SubmissionReviewData", "Review"}, False], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349206349206349], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, FaceForm[ RGBColor[0.960784, 0.705882, 0.498039, 1.]], StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, FaceForm[ RGBColor[1., 1., 1., 1.]], StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit Update\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit changes to update your resource submission\""}, "PrettyTooltipTemplate"], FunctionResource`DefinitionNotebook`Private`\ submitRepositoryUpdate[ ButtonNotebook[]]& , "\"Submit changes to update your resource submission\"", True}, "OrangeButtonTemplate"]], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349206349206349], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, FaceForm[ RGBColor[0.960784, 0.705882, 0.498039, 1.]], StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, FaceForm[ RGBColor[1., 1., 1., 1.]], StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit to Repository\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit your function to the Wolfram Function Repository\ \""}, "PrettyTooltipTemplate"], FunctionResource`DefinitionNotebook`Private`submitRepository[ ButtonNotebook[]]& , "\"Submit your function to the Wolfram Function \ Repository\"", True}, "OrangeButtonTemplate"]]], StandardForm], Evaluator -> "System", SingleEvaluation -> True]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { RGBColor[0.988235, 0.419608, 0.203922], RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> { 1 -> RGBColor[0.988235, 0.419608, 0.203922], 2 -> RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.9}, 5}, "RowsIndexed" -> {1 -> 1.1, 2 -> 1.3, 3 -> 1.55}}, FrameStyle -> RGBColor[0.988235, 0.419608, 0.203922]], "Grid"]& )}], Cell[ StyleData["ReviewerCommentLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{#, TemplateBox[{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, { 0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, {34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, { 23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, {24.953, 23.914}, { 25.418, 23.91}, {29.746, 23.91}, {30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, { 33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, { 31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> 12, Background -> None, AspectRatio -> Automatic, ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], "Wolfram Function Repository Reviewer"}, "PrettyTooltipTemplate"]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.25}}}], "Grid"]& )}], Cell[ StyleData["CommentCellLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ StyleBox[#, FontSize -> 11]}, { StyleBox[ DynamicBox[ ToBoxes[ DateString[ TimeZoneConvert[ DateObject[#2, TimeZone -> 0]], { "Month", "/", "Day", "/", "Year", " ", "Hour24", ":", "Minute"}], StandardForm], SingleEvaluation -> True], FontSize -> 9]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{Automatic}}, "Rows" -> {{0}}}], "Grid"], "CommentLabel", ShowStringCharacters -> False]& )}], Cell[ StyleData["OrangeButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (ButtonBox[ StyleBox[#, "Text", FontFamily -> "Source Sans Pro SemiBold", FontWeight -> "SemiBold", FontTracking -> -0.9, FontSize -> 13, FontColor -> GrayLevel[1], StripOnInput -> False], ButtonFunction :> Block[{ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, Symbol["System`ResourceFunction"]; If[ TrueQ[#4], CurrentValue[ ButtonNotebook[], {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; FunctionResource`DefinitionNotebook`Private`showProgress, Identity][ #2[]]], FrameMargins -> {{5, 5}, {0, 0}}, Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQvA6XhqPngeIQhCyIrAwodd2K5Yo5IwQB2XDFcGXPA8Wu WjBdNmVARkARoDhCWZjUdUsWNDUQBBQHykJcC9RyxRzdKAgCigNlGcCAGGVE mka824j1KdHhRkwsEBOnAMp0Eag= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQvA6XhqMHARIQhCyIrAwotdGIa7UuOwQB2XDFcGX3/MXX 6LEv12ZDRkARoDhc2ctQqQ1GnGhqIAgoDpSFuBarUcgGMoABMcqINI14txHp U+LDjZhYICZOAZ5bBHA= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQvA6XhqN3hfYQhCyIrAwo9e36ma8PbkIQkA1XDFf2vtzt 28Obu6Jsl2uzQRCQDRQBisOVvYlR+nr99I5gU7gaCAKKAMWBshDXArV8vnUR TQ0EAcWBsgxgQIwyIk0j3m1E+pT4cCMmFoiJUwBDsjmM "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.921569, 0.341176, 0.105882], Method -> "Queued", ImageSize -> {All, 23}, Evaluator -> Automatic]& )}], Cell[ StyleData["SuggestionGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ FrameBox[ AdjustmentBox[ TagBox[ GridBox[{{ TemplateBox[{#2, #3, {16., 16.}, {{1., 17.}, {1., 17.}}}, "SuggestionIconTemplate"], #, AdjustmentBox[ TemplateBox[{ ActionMenuBox[ TagBox[ PaneSelectorBox[{False -> GraphicsBox[{ EdgeForm[ Directive[ GrayLevel[1, 0], Thickness[0.025]]], FaceForm[#4], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], #5, LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0], True -> GraphicsBox[{ EdgeForm[ Directive[#5, Thickness[0.025]]], FaceForm[#2], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], GrayLevel[1], LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], MouseAppearanceTag["LinkHand"]], #6, Appearance -> None, Method -> "Queued"], "\"View suggestions\""}, "PrettyTooltipTemplate"], BoxBaselineShift -> -0.3]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {Automatic, Automatic, Fit}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], BoxMargins -> {{0.25, -1.}, {0.15, -0.15}}], RoundingRadius -> {13, 75}, Background -> #4, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, ImageMargins -> {{0, 0}, {5, 5}}, StripOnInput -> False], "Text", FontColor -> #5, FontSize -> 14, FontFamily -> "Source Sans Pro SemiBold", FontWeight -> "SemiBold", FontTracking -> "Plain", PrivateFontOptions -> {"OperatorSubstitution" -> False}, LineBreakWithin -> False]& )}], Cell[ StyleData["SuggestionIconTemplate"], TemplateBoxOptions -> {DisplayFunction -> (GraphicsBox[{ Thickness[0.05555555555555555], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGZigIIGAwcIQ8kBxk94ekHp9k9Vh4qXaoYcOfoO m+a+X37stKZDbP+hrxpzdOA0TBymDqYPl7n2pnG7PHlk4PzZRxQ2FGWIwPWD jI3p54WbLxuVYn3fnwluD8S8H/Yo9gD5KPYA+TB7YPph9sDMh9EwcZg6FPdh MRfdXpi7YPph7oaZD/MXzB5c4QCzBwA8nn+Z "]]}, FaceForm[#]], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{8.175292500000001, 7.416875}, {7.796855000000001, 11.3084375}, {7.796855000000001, 13.38}, {10.11998, 13.38}, {10.11998, 11.3084375}, { 9.741542500000001, 7.416875}, {8.175292500000001, 7.416875}}, CompressedData[" 1:eJxTTMoPSmViYGCQBGIQ/cTvZcLf/4oOD6tE1rk/5HNQjDzAkqeL4FsusdsW 1KjgwAAGAg7hCSdehX2Xd5BvfR24Q07QwaZCOJPjjZyDHdf1xQW2Qg56LJYa iWlyDv2HvmrEzBeG80GmVbmIwvkvtjT6Sb8Qg+t/BLLPUwJuPti6DEm4/WD7 2qTg7gMZJyIm7QBzP4y/zEVob88lJTi/7+dk7hV1ynD9c3LzfPxZVODmr3ro 0futUwVu/0bpbbqnzqjA3Qfjw9wP48P8B9MP8z/MfFj4wOyHhR/MfbDwRQ9/ ACBxmlc= "]}]}, FaceForm[#2]]}, ImageSize -> #3, PlotRange -> #4, AspectRatio -> Automatic, BaselinePosition -> Scaled[0.1]]& )}], Cell[ StyleData["UsageInputs", StyleDefinitions -> StyleData["Input"]], CellMargins -> {{66, 10}, {0, 8}}, StyleKeyMapping -> {"Tab" -> "UsageDescription"}, Evaluatable -> False, CellEventActions -> { "ReturnKeyDown" :> With[{FunctionResourceTools`BuildDefinitionNotebook`Private`nb = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[ FunctionResourceTools`BuildDefinitionNotebook`Private`nb, Cell["", "UsageDescription"], All]; SelectionMove[ FunctionResourceTools`BuildDefinitionNotebook`Private`nb, Before, CellContents]; Null], {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, ShowAutoStyles -> False, ShowCodeAssist -> False, CodeAssistOptions -> {"DynamicHighlighting" -> False}, LineSpacing -> {1, 3}, TabSpacings -> {2.5}, CounterIncrements -> "Text", FontFamily -> "Source Sans Pro", FontSize -> 15, FontWeight -> "Plain"], Cell[ StyleData["UsageDescription", StyleDefinitions -> StyleData["Text"]], CellMargins -> {{86, 10}, {7, 0}}, StyleKeyMapping -> {"Backspace" -> "UsageInputs"}, CellGroupingRules -> "OutputGrouping", CellEventActions -> { "ReturnKeyDown" :> With[{FunctionResourceTools`BuildDefinitionNotebook`Private`nb = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[ FunctionResourceTools`BuildDefinitionNotebook`Private`nb, Cell[ BoxData[""], "UsageInputs"], All]; SelectionMove[ FunctionResourceTools`BuildDefinitionNotebook`Private`nb, Before, CellContents]; Null], {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, ShowAutoSpellCheck -> False], Cell[ StyleData["Notes", StyleDefinitions -> StyleData["Item"]], StyleKeyMapping -> {}, DefaultNewCellStyle -> "Notes", ShowAutoSpellCheck -> False, GridBoxOptions -> {BaseStyle -> "TableNotes"}], Cell[ StyleData["TableNotes", StyleDefinitions -> StyleData["Notes"]], CellDingbat -> None, CellFrameColor -> RGBColor[0.749, 0.694, 0.553], StyleMenuListing -> None, ButtonBoxOptions -> {Appearance -> {Automatic, None}}, GridBoxOptions -> { FrameStyle -> GrayLevel[0.906], GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{True}}}, GridDefaultElement -> Cell["\[Placeholder]", "TableText"]}], Cell[ StyleData["TableText"], DefaultInlineFormatType -> "DefaultInputInlineFormatType", AutoQuoteCharacters -> {}, StyleMenuListing -> None], Cell[ StyleData["Hyperlink"], FontColor -> RGBColor[0.921569, 0.341176, 0.105882]], Cell[ StyleData["HyperlinkActive"], FontColor -> RGBColor[0.614379, 0.227451, 0.0705882]], Cell[ StyleData["InlineFormula"], FontSize -> 0.99 Inherited], Cell[ StyleData["ExampleDelimiter"], Selectable -> False, ShowCellBracket -> Automatic, CellMargins -> {{66, 14}, {5, 10}}, Evaluatable -> True, CellGroupingRules -> {"SectionGrouping", 58}, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False, CellLabelAutoDelete -> True, TabFilling -> "\[LongDash]\[NegativeThickSpace]", TabSpacings -> {100}, StyleMenuListing -> None, FontFamily -> "Verdana", FontWeight -> Bold, FontSlant -> "Plain", FontColor -> GrayLevel[0.905882]], Cell[ StyleData["ExampleText", StyleDefinitions -> StyleData["Text"]]], Cell[ StyleData["PageBreak", StyleDefinitions -> StyleData["ExampleDelimiter"]], Selectable -> False, CellFrame -> {{0, 0}, {1, 0}}, CellMargins -> {{66, 14}, {15, -5}}, CellElementSpacings -> {"CellMinHeight" -> 1}, Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), CellFrameColor -> GrayLevel[ Rational[77, 85]]], Cell[ StyleData["Subsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["Subsubsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["Comment", StyleDefinitions -> StyleData["Text"]], CellFrame -> {{3, 0}, {0, 0}}, CellMargins -> {{66, 0}, {1, 0}}, CellElementSpacings -> {"ClosedCellHeight" -> 0}, CellFrameColor -> RGBColor[0.880722, 0.611041, 0.142051], CellFrameLabelMargins -> {{0, 10}, {0, 0}}, FontColor -> GrayLevel[0.25], Background -> RGBColor[0.9821083, 0.94165615, 0.87130765]], Cell[ StyleData["AuthorComment", StyleDefinitions -> StyleData["Comment"]], CellFrameColor -> RGBColor[0.368417, 0.506779, 0.709798], Background -> RGBColor[0.90526255, 0.92601685, 0.9564697]], Cell[ StyleData["ReviewerComment", StyleDefinitions -> StyleData["Comment"]], CellFrameColor -> RGBColor[0.560181, 0.691569, 0.194885], Background -> RGBColor[0.9340271499999999, 0.95373535, 0.87923275]], Cell[ StyleData["CommentLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontSlant -> "Italic", FontColor -> GrayLevel[0.5]], Cell[ StyleData["CharactersRefLink"], ShowSpecialCharacters -> False]}, Visible -> False, FrontEndVersion -> "12.0 for Linux x86 (64-bit) (April 8, 2019)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Title"->{ Cell[558, 20, 55, 1, 70, "Title",ExpressionUUID->"59423203-ee37-494e-b72b-1893a013a708", CellTags->"Title"]}, "Description"->{ Cell[616, 23, 100, 1, 70, "Text",ExpressionUUID->"52e4344a-8813-4528-99ca-59cc0416e6b1", CellTags->"Description"]}, "Definition"->{ Cell[741, 28, 887, 21, 70, "Section",ExpressionUUID->"c41c0824-043c-4011-a8ae-ae468f0f0e54", CellTags->"Definition", CellID->474513213]}, "Documentation"->{ Cell[2665, 83, 99, 3, 70, "Section",ExpressionUUID->"439967e7-22c5-4e50-9443-3b62a2a6769b", CellTags->"Documentation", CellID->855965831]}, "Usage"->{ Cell[2789, 90, 1615, 42, 70, "Subsection",ExpressionUUID->"345ebea0-0037-4739-b818-e32454242f57", CellTags->"Usage", CellID->310800389]}, "Details & Options"->{ Cell[5768, 196, 1131, 24, 70, "Subsection",ExpressionUUID->"35d977fb-6048-4da1-8b39-6aa11378e362", CellTags->"Details & Options", CellID->66019318]}, "TabNext"->{ Cell[6902, 222, 463, 18, 70, "Notes",ExpressionUUID->"4285222c-d8f4-4ddd-ad41-e88f717167af", CellTags->"TabNext", CellID->107622986], Cell[53008, 1168, 501, 8, 70, "Item",ExpressionUUID->"5941946b-9de8-4cab-b184-ec6c97ab555c", CellTags->"TabNext", CellID->79477165], Cell[54260, 1201, 508, 8, 70, "Item",ExpressionUUID->"c1faae1e-f425-4674-9013-9f62e4289b53", CellTags->"TabNext", CellID->960273585], Cell[55570, 1235, 496, 8, 70, "Text",ExpressionUUID->"d20c1445-9fe6-4141-b6f0-78912a8069ac", CellTags->"TabNext", CellID->343081869], Cell[56720, 1268, 485, 8, 70, "Item",ExpressionUUID->"335e7a3c-cce1-415c-a617-40b7405810aa", CellTags->"TabNext", CellID->485448166], Cell[58450, 1327, 509, 8, 70, "Text",ExpressionUUID->"268f9ea0-4b7a-4506-aaa5-eb8fc5f57bbf", CellTags->"TabNext", CellID->567921317], Cell[59719, 1361, 495, 8, 70, "Text",ExpressionUUID->"97170fb1-9491-4d6e-aa1d-bfa34ec78f0c", CellTags->"TabNext", CellID->920818074]}, "Examples"->{ Cell[7402, 245, 6400, 143, 70, "Section",ExpressionUUID->"b5d1296d-c832-480d-9f34-ddd007dc0365", CellTags->"Examples", CellID->180595041]}, "Source & Additional Information"->{ Cell[50361, 1074, 135, 3, 70, "Section",ExpressionUUID->"f17b7fdf-83a4-4ae3-986d-a1de46f7a727", CellTags->"Source & Additional Information", CellID->318391102]}, "Contributed By"->{ Cell[50521, 1081, 683, 18, 70, "Subsection",ExpressionUUID->"306543ce-1f8f-48e0-a5b3-bd5b77607d43", CellTags->"Contributed By", CellID->127820888]}, "Keywords"->{ Cell[51275, 1106, 684, 18, 70, "Subsection",ExpressionUUID->"518e2947-60c3-4977-a23c-8dc8bf0dc742", CellTags->"Keywords", CellID->547400482]}, "Categories"->{ Cell[52131, 1137, 126, 4, 70, "Subsection",ExpressionUUID->"1fa2328f-5722-4e00-8384-9499638811ca", CellTags->"Categories", CellID->749076926]}, "Related Symbols"->{ Cell[52344, 1148, 661, 18, 70, "Subsection",ExpressionUUID->"478c9ea2-79c8-4965-9ab4-c4755c822e6c", CellTags->"Related Symbols", CellID->161079978]}, "Related Resource Objects"->{ Cell[53546, 1181, 711, 18, 70, "Subsection",ExpressionUUID->"57fe2552-ca3e-454e-bdeb-cbe25ae26b9f", CellTags->"Related Resource Objects", CellID->588449267]}, "Source/Reference Citation"->{ Cell[54805, 1214, 762, 19, 70, "Subsection",ExpressionUUID->"59eac6fb-2b0f-4a8d-adb8-a2abcc107808", CellTags->"Source/Reference Citation", CellID->642091068]}, "Links"->{ Cell[56103, 1248, 614, 18, 70, "Subsection",ExpressionUUID->"05f36ea0-ef88-49cd-91d3-1c84d61422d7", CellTags->"Links", CellID->521525586]}, "Tests"->{ Cell[57242, 1281, 767, 20, 70, "Subsection",ExpressionUUID->"f14c07d7-24ef-476b-ad4e-e30a6c978873", CellTags->"Tests", CellID->74308299]}, "Author Notes"->{ Cell[58320, 1321, 127, 4, 70, "Section",ExpressionUUID->"11a82001-7bcb-485d-b414-223e0011a4e1", CellTags->"Author Notes", CellID->795110225]}, "Submission Notes"->{ Cell[58996, 1340, 720, 19, 70, "Section",ExpressionUUID->"ae2baf65-7ffe-49fa-9ff7-146aff54f7e1", CellTags->"Submission Notes", CellID->843283583]} } *) (*CellTagsIndex CellTagsIndex->{ {"Title", 131190, 2737}, {"Description", 131323, 2740}, {"Definition", 131461, 2743}, {"Documentation", 131627, 2747}, {"Usage", 131787, 2751}, {"Details & Options", 131957, 2755}, {"TabNext", 132129, 2759}, {"Examples", 133138, 2781}, {"Source & Additional Information", 133324, 2785}, {"Contributed By", 133515, 2789}, {"Keywords", 133687, 2793}, {"Categories", 133855, 2797}, {"Related Symbols", 134029, 2801}, {"Related Resource Objects", 134218, 2805}, {"Source/Reference Citation", 134417, 2809}, {"Links", 134597, 2813}, {"Tests", 134757, 2817}, {"Author Notes", 134923, 2821}, {"Submission Notes", 135097, 2825} } *) (*NotebookFileOutline Notebook[{ Cell[558, 20, 55, 1, 70, "Title",ExpressionUUID->"59423203-ee37-494e-b72b-1893a013a708", CellTags->"Title"], Cell[616, 23, 100, 1, 70, "Text",ExpressionUUID->"52e4344a-8813-4528-99ca-59cc0416e6b1", CellTags->"Description"], Cell[CellGroupData[{ Cell[741, 28, 887, 21, 70, "Section",ExpressionUUID->"c41c0824-043c-4011-a8ae-ae468f0f0e54", CellTags->"Definition", CellID->474513213], Cell[1631, 51, 1019, 29, 70, "Input",ExpressionUUID->"2796cb41-1846-4284-a979-f53543a38b0e", InitializationCell->True] }, Open ]], Cell[2665, 83, 99, 3, 70, "Section",ExpressionUUID->"439967e7-22c5-4e50-9443-3b62a2a6769b", CellTags->"Documentation", CellID->855965831], Cell[CellGroupData[{ Cell[2789, 90, 1615, 42, 70, "Subsection",ExpressionUUID->"345ebea0-0037-4739-b818-e32454242f57", CellTags->"Usage", CellID->310800389], Cell[CellGroupData[{ Cell[4429, 136, 188, 6, 70, "UsageInputs",ExpressionUUID->"ad449f1f-f9e3-4a85-a6aa-e1745ed8b383"], Cell[4620, 144, 358, 13, 70, "UsageDescription",ExpressionUUID->"d3e94b31-0700-44d6-8049-e6d613b7b46c"] }, Open ]], Cell[CellGroupData[{ Cell[5015, 162, 364, 13, 70, "UsageInputs",ExpressionUUID->"ead4897c-c92f-4745-b0b2-6a5adc5479c0"], Cell[5382, 177, 337, 13, 70, "UsageDescription",ExpressionUUID->"ed3d9e69-f735-4fee-ab03-7b35fc515bdb"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[5768, 196, 1131, 24, 70, "Subsection",ExpressionUUID->"35d977fb-6048-4da1-8b39-6aa11378e362", CellTags->"Details & Options", CellID->66019318], Cell[6902, 222, 463, 18, 70, "Notes",ExpressionUUID->"4285222c-d8f4-4ddd-ad41-e88f717167af", CellTags->"TabNext", CellID->107622986] }, Open ]], Cell[CellGroupData[{ Cell[7402, 245, 6400, 143, 70, "Section",ExpressionUUID->"b5d1296d-c832-480d-9f34-ddd007dc0365", CellTags->"Examples", CellID->180595041], Cell[CellGroupData[{ Cell[13827, 392, 56, 1, 70, "Subsection",ExpressionUUID->"3cee2691-1f14-4ca7-95e1-582cdeeb091c", CellID->285421464], Cell[13886, 395, 271, 4, 70, "Text",ExpressionUUID->"bfb0ecb2-e8e4-43db-b48c-40f760b3f71c", CellID->449921612], Cell[CellGroupData[{ Cell[14182, 403, 290, 7, 70, "Input",ExpressionUUID->"99932f04-19e3-4099-8b59-05b3a751bd01", CellID->2129810224], Cell[14475, 412, 216, 5, 70, "Output",ExpressionUUID->"12c01dc9-7af4-43a5-9743-8648b726adf8", CellID->1977050247] }, Open ]], Cell[14706, 420, 146, 2, 70, "Text",ExpressionUUID->"863633e5-c728-4e4e-9087-0c316ffecfb1", CellID->1587278112], Cell[CellGroupData[{ Cell[14877, 426, 197, 5, 70, "Input",ExpressionUUID->"4dbe5f05-efdd-4fdd-b3a9-6931bed27b1b", CellID->1045172555], Cell[15077, 433, 116, 3, 70, "Output",ExpressionUUID->"8f660c94-d2f2-40ba-af12-83b5f70500e7", CellID->363335876] }, Open ]], Cell[15208, 439, 105, 2, 70, "ExampleDelimiter",ExpressionUUID->"482fb7a7-74bf-4c71-9592-f910c26a2a4b"], Cell[15316, 443, 274, 6, 70, "Text",ExpressionUUID->"95902a79-f4d7-4e3b-9c73-7fe5f363d5e2", CellID->572413640], Cell[CellGroupData[{ Cell[15615, 453, 278, 7, 70, "Input",ExpressionUUID->"0ba1cbce-30fc-4258-bd55-9bd4b6d469fa", CellID->610462718], Cell[15896, 462, 139, 3, 70, "Output",ExpressionUUID->"31af5695-00e3-411f-9423-9270b989f5a3", CellID->1155948551] }, Open ]], Cell[16050, 468, 105, 2, 70, "ExampleDelimiter",ExpressionUUID->"ccf8f84c-0410-477f-bc2b-3da644ecf821"], Cell[16158, 472, 278, 4, 70, "Text",ExpressionUUID->"129c7509-8e44-48cd-b097-a148b7667c66", CellID->512425794], Cell[CellGroupData[{ Cell[16461, 480, 510, 14, 70, "Input",ExpressionUUID->"da45a08b-5309-49e3-9900-612a54d76f94", CellID->848691154], Cell[16974, 496, 1794, 48, 70, "Output",ExpressionUUID->"f3d12d04-8514-44d4-b6df-baad382d7bfb", CellID->1568289181] }, Open ]], Cell[18783, 547, 105, 2, 70, "ExampleDelimiter",ExpressionUUID->"4b3497d6-e5cf-4b97-a9f5-1209f0ec1cf4"], Cell[18891, 551, 768, 20, 70, "Text",ExpressionUUID->"8a41c08d-e410-45f9-bc0a-fabad5606d55", CellID->1688414038], Cell[CellGroupData[{ Cell[19684, 575, 662, 18, 70, "Input",ExpressionUUID->"02ef8895-5100-45dd-b4de-1d81f1245d0e", CellID->1344452458], Cell[20349, 595, 883, 21, 70, "Output",ExpressionUUID->"2208c9ea-0b65-467b-ac40-4e566054ae81", CellID->687025978] }, Open ]], Cell[21247, 619, 105, 2, 70, "ExampleDelimiter",ExpressionUUID->"03608775-2426-4ce3-9f5a-916966038866"], Cell[21355, 623, 331, 5, 70, "Text",ExpressionUUID->"696f8a73-7e8e-43d6-aaba-94ff25060f99", CellID->325825208], Cell[CellGroupData[{ Cell[21711, 632, 611, 18, 70, "Input",ExpressionUUID->"dd1a9a48-8366-4f12-bb52-a35217cc50a0", CellID->476599820], Cell[22325, 652, 24766, 331, 70, "Output",ExpressionUUID->"68a78893-ca5c-4856-972d-d89abf689326", CellID->1854978713] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[47140, 989, 66, 1, 70, "Subsection",ExpressionUUID->"85b1bca6-569a-4d49-bf82-51eaaedb6c2f", CellID->461307998], Cell[47209, 992, 719, 17, 70, "Text",ExpressionUUID->"4a4965cf-bd18-4f7f-b8e0-f0f713dbef67", CellID->728069419], Cell[CellGroupData[{ Cell[47953, 1013, 702, 17, 70, "Input",ExpressionUUID->"66aa9492-6f2e-4407-8acc-04dfdedbcd45", CellID->1237085510], Cell[48658, 1032, 1642, 35, 70, "Output",ExpressionUUID->"f206286f-f598-4e63-be82-9431fc376668"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[50361, 1074, 135, 3, 70, "Section",ExpressionUUID->"f17b7fdf-83a4-4ae3-986d-a1de46f7a727", CellTags->"Source & Additional Information", CellID->318391102], Cell[CellGroupData[{ Cell[50521, 1081, 683, 18, 70, "Subsection",ExpressionUUID->"306543ce-1f8f-48e0-a5b3-bd5b77607d43", CellTags->"Contributed By", CellID->127820888], Cell[51207, 1101, 31, 0, 70, "Text",ExpressionUUID->"7c41a52b-ee43-49db-be81-2e39e8814045"] }, Open ]], Cell[CellGroupData[{ Cell[51275, 1106, 684, 18, 70, "Subsection",ExpressionUUID->"518e2947-60c3-4977-a23c-8dc8bf0dc742", CellTags->"Keywords", CellID->547400482], Cell[51962, 1126, 32, 0, 70, "Item",ExpressionUUID->"f924739c-b32d-4660-9507-9fb37e8ff3db"], Cell[51997, 1128, 32, 0, 70, "Item",ExpressionUUID->"d84204ff-0024-4db0-8ea2-6892963a8de6"], Cell[52032, 1130, 32, 0, 70, "Item",ExpressionUUID->"bbe31621-f0f0-4e28-bac8-70fcbb30581d"], Cell[52067, 1132, 27, 0, 70, "Item",ExpressionUUID->"d2ebd10f-b8e0-4365-a02e-ae1deb34c024"] }, Open ]], Cell[CellGroupData[{ Cell[52131, 1137, 126, 4, 70, "Subsection",ExpressionUUID->"1fa2328f-5722-4e00-8384-9499638811ca", CellTags->"Categories", CellID->749076926], Cell[52260, 1143, 47, 0, 70, "Item",ExpressionUUID->"8eb0c906-200f-48a4-b0c7-346c1e6b2a2f"] }, Open ]], Cell[CellGroupData[{ Cell[52344, 1148, 661, 18, 70, "Subsection",ExpressionUUID->"478c9ea2-79c8-4965-9ab4-c4755c822e6c", CellTags->"Related Symbols", CellID->161079978], Cell[53008, 1168, 501, 8, 70, "Item",ExpressionUUID->"5941946b-9de8-4cab-b184-ec6c97ab555c", CellTags->"TabNext", CellID->79477165] }, Open ]], Cell[CellGroupData[{ Cell[53546, 1181, 711, 18, 70, "Subsection",ExpressionUUID->"57fe2552-ca3e-454e-bdeb-cbe25ae26b9f", CellTags->"Related Resource Objects", CellID->588449267], Cell[54260, 1201, 508, 8, 70, "Item",ExpressionUUID->"c1faae1e-f425-4674-9013-9f62e4289b53", CellTags->"TabNext", CellID->960273585] }, Open ]], Cell[CellGroupData[{ Cell[54805, 1214, 762, 19, 70, "Subsection",ExpressionUUID->"59eac6fb-2b0f-4a8d-adb8-a2abcc107808", CellTags->"Source/Reference Citation", CellID->642091068], Cell[55570, 1235, 496, 8, 70, "Text",ExpressionUUID->"d20c1445-9fe6-4141-b6f0-78912a8069ac", CellTags->"TabNext", CellID->343081869] }, Open ]], Cell[CellGroupData[{ Cell[56103, 1248, 614, 18, 70, "Subsection",ExpressionUUID->"05f36ea0-ef88-49cd-91d3-1c84d61422d7", CellTags->"Links", CellID->521525586], Cell[56720, 1268, 485, 8, 70, "Item",ExpressionUUID->"335e7a3c-cce1-415c-a617-40b7405810aa", CellTags->"TabNext", CellID->485448166] }, Open ]], Cell[CellGroupData[{ Cell[57242, 1281, 767, 20, 70, "Subsection",ExpressionUUID->"f14c07d7-24ef-476b-ad4e-e30a6c978873", CellTags->"Tests", CellID->74308299], Cell[CellGroupData[{ Cell[58034, 1305, 129, 4, 70, "Input",ExpressionUUID->"3f4bba64-0275-4c08-8476-89fb1a7ad733", CellID->667877521], Cell[58166, 1311, 93, 3, 70, "Output",ExpressionUUID->"b2387619-4804-451c-a8ad-1ba5019e05c8", CellID->993233288] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[58320, 1321, 127, 4, 70, "Section",ExpressionUUID->"11a82001-7bcb-485d-b414-223e0011a4e1", CellTags->"Author Notes", CellID->795110225], Cell[58450, 1327, 509, 8, 70, "Text",ExpressionUUID->"268f9ea0-4b7a-4506-aaa5-eb8fc5f57bbf", CellTags->"TabNext", CellID->567921317] }, Open ]], Cell[CellGroupData[{ Cell[58996, 1340, 720, 19, 70, "Section",ExpressionUUID->"ae2baf65-7ffe-49fa-9ff7-146aff54f7e1", CellTags->"Submission Notes", CellID->843283583], Cell[59719, 1361, 495, 8, 70, "Text",ExpressionUUID->"97170fb1-9491-4d6e-aa1d-bfa34ec78f0c", CellTags->"TabNext", CellID->920818074] }, Open ]] } ] *) (* End of internal cache information *)