(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 355628, 7844] NotebookOptionsPosition[ 193141, 4748] NotebookOutlinePosition[ 336686, 7458] CellTagsIndexPosition[ 334834, 7407] WindowTitle->Pacletize | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Pacletize", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->499247539], Cell["\<\ Create a paclet layout from a collection of files, symbols and contexts\ \>", "Text", CellTags->{"Description", "TemplateCell"}, CellID->764855655], Cell[CellGroupData[{ Cell[TextData[{ "Definition", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Function", 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoFunction"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Function"}, DefaultNewCellStyle->"Input", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[BoxData[ RowBox[{ RowBox[{"Pacletize", "[", "args___", "]"}], ":=", RowBox[{"Catch", "[", RowBox[{"makepaclet", "[", "args", "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.777380495202503*^9, 3.7773805100960617`*^9}}, CellLabel->"In[67]:=", CellID->668446852], Cell[BoxData[ RowBox[{"Clear", "[", "makepaclet", "]"}]], "Input", CellChangeTimes->{{3.777387451731504*^9, 3.777387452869314*^9}}, CellLabel->"In[68]:=", CellID->280628223], Cell[BoxData[ RowBox[{ RowBox[{"makepaclet", "[", RowBox[{"name_String", ",", "includes_List", ",", "dir_String"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"files", ",", RowBox[{"contexts", "=", RowBox[{"{", RowBox[{"name", "<>", "\"\<`\>\""}], "}"}]}], ",", "symbols", ",", "kdir", ",", " ", "newfiles", ",", "dump", ",", " ", "loadfile"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"files", "=", RowBox[{"Cases", "[", RowBox[{"includes", ",", "_File", ",", RowBox[{"{", "1", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"symbols", "=", RowBox[{"Cases", "[", RowBox[{"includes", ",", "_String", ",", RowBox[{"{", "1", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"CreateDirectory", "[", RowBox[{ RowBox[{"kdir", "=", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"dir", ",", "name", ",", "\"\\""}], "}"}], "]"}]}], ",", RowBox[{"CreateIntermediateDirectories", "\[Rule]", "True"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"newfiles", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{ RowBox[{"copyFileOrDirectory", "[", RowBox[{"#", ",", "kdir"}], "]"}], "&"}], "/@", "files"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "symbols", "]"}], ">", "0"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dump", "=", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"kdir", ",", RowBox[{"name", "<>", "\"\\""}]}], "}"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"s", "=", "symbols"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"DumpSave", "[", RowBox[{"dump", ",", "s"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"newfiles", ",", "dump"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"contexts", "=", "\[IndentingNewLine]", RowBox[{"Append", "[", RowBox[{ RowBox[{"Select", "[", RowBox[{"symbols", ",", RowBox[{"(", RowBox[{ RowBox[{"StringMatchQ", "[", RowBox[{"#", ",", "\"\<*`\>\""}], "]"}], "&"}], ")"}]}], "]"}], ",", RowBox[{"name", "<>", "\"\<`\>\""}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"symbols", "=", RowBox[{"Complement", "[", RowBox[{"symbols", ",", "contexts"}], "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"loadfile", "=", RowBox[{"createloadfile", "[", RowBox[{"name", ",", "kdir", ",", "newfiles"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"createcontextfiles", "[", RowBox[{"#", ",", "kdir", ",", "newfiles", ",", "loadfile"}], "]"}], "&"}], "/@", "contexts"}], ";", "\[IndentingNewLine]", RowBox[{"createpacletinfofile", "[", RowBox[{ "name", ",", "dir", ",", "symbols", ",", "contexts", ",", "loadfile"}], "]"}], ";", "\[IndentingNewLine]", "dir"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.745235194554604*^9, 3.745235254904604*^9}, { 3.745235315690604*^9, 3.7452354650388985`*^9}, {3.7452355043657627`*^9, 3.745235605191924*^9}, {3.745235690410964*^9, 3.745235952280966*^9}, { 3.7452359910198393`*^9, 3.7452360347032075`*^9}, {3.745236149278664*^9, 3.745236347106445*^9}, {3.745236386125346*^9, 3.7452364531730504`*^9}, { 3.7452365004444995`*^9, 3.7452366009934998`*^9}, {3.7452366340914993`*^9, 3.7452367895004997`*^9}, {3.7452368263754997`*^9, 3.7452369958904996`*^9}, 3.7452407533701515`*^9, {3.7452411157323847`*^9, 3.7452411165024614`*^9}, { 3.745241196732484*^9, 3.745241208612672*^9}, 3.777380516966043*^9, { 3.777382705236471*^9, 3.7773827733484917`*^9}, {3.7773838946939287`*^9, 3.777383903645619*^9}, {3.777383942696788*^9, 3.7773839432349777`*^9}, { 3.7773840007050133`*^9, 3.7773840428810043`*^9}, 3.777387444856183*^9}, CellTags->"ResourceInitialization", CellLabel->"In[69]:=", CellID->282491367], Cell[BoxData[{ RowBox[{ RowBox[{"makepaclet", "[", RowBox[{"name_String", ",", "includes_"}], "]"}], ":=", RowBox[{"makepaclet", "[", RowBox[{"name", ",", "includes", ",", RowBox[{"CreateDirectory", "[", "]"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"makepaclet", "[", RowBox[{"name_String", ",", "expr_", ",", "dir_String"}], "]"}], ":=", RowBox[{ RowBox[{"makepaclet", "[", RowBox[{"name", ",", RowBox[{"{", "expr", "}"}], ",", "dir"}], "]"}], "/;", RowBox[{"!", RowBox[{"ListQ", "[", "dir", "]"}]}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"makepaclet", "[", "___", "]"}], ":=", "$Failed"}]}], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.745235194554604*^9, 3.745235254904604*^9}, { 3.745235315690604*^9, 3.7452354650388985`*^9}, {3.7452355043657627`*^9, 3.745235605191924*^9}, {3.745235690410964*^9, 3.745235952280966*^9}, { 3.7452359910198393`*^9, 3.7452360347032075`*^9}, {3.745236149278664*^9, 3.745236347106445*^9}, {3.745236386125346*^9, 3.7452364531730504`*^9}, { 3.7452365004444995`*^9, 3.7452366009934998`*^9}, {3.7452366340914993`*^9, 3.7452367895004997`*^9}, {3.7452368263754997`*^9, 3.7452369958904996`*^9}, 3.7452407533701515`*^9, {3.7452411157323847`*^9, 3.7452411165024614`*^9}, { 3.745241196732484*^9, 3.745241208612672*^9}, {3.777380516966043*^9, 3.777380518964211*^9}, {3.777381244657358*^9, 3.777381245547502*^9}}, CellTags->"ResourceInitialization", CellLabel->"In[70]:=", CellID->690280731], Cell[BoxData[ RowBox[{ RowBox[{"createcontextfiles", "[", RowBox[{ "context_String", ",", "kdir_", ",", "newfiles_List", ",", "loadfile_String"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"cfile", "=", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"kdir", ",", RowBox[{ RowBox[{"StringReplace", "[", RowBox[{"context", ",", RowBox[{"\"\<`\>\"", "\[Rule]", "\"\<\>\""}]}], "]"}], "<>", "\"\<.m\>\""}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"FileExistsQ", "[", "cfile", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"Export", "[", RowBox[{"cfile", ",", "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "Get", "}"}], ",", "\[IndentingNewLine]", RowBox[{"ToString", "[", RowBox[{ RowBox[{"Get", "[", "loadfile", "]"}], ",", "InputForm"}], "]"}]}], "\[IndentingNewLine]", "]"}], ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.7773827834792423`*^9, 3.777382905267702*^9}, 3.77738293995756*^9}, CellLabel->"In[73]:=", CellID->880393172], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"createloadfile", "[", RowBox[{"name_", ",", "kdir_", ",", "newfiles_"}], "]"}], ":=", RowBox[{"Export", "[", RowBox[{ RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"kdir", ",", RowBox[{"name", "<>", "\"\\""}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "newfiles", "]"}], ">", "0"}], ",", "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "Get", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"StringRiffle", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"ToString", "[", RowBox[{ RowBox[{"Get", "[", "#", "]"}], ",", "InputForm"}], "]"}], "&"}], "/@", "newfiles"}], ",", "\"\<;\\n\>\""}], "]"}], "<>", "\"\<;\>\""}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\"\<\>\""}], "]"}], ",", "\"\\""}], "]"}]}], ";"}]], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.745235194554604*^9, 3.745235254904604*^9}, { 3.745235315690604*^9, 3.7452354650388985`*^9}, {3.7452355043657627`*^9, 3.745235605191924*^9}, {3.745235690410964*^9, 3.745235952280966*^9}, { 3.7452359910198393`*^9, 3.7452360347032075`*^9}, {3.745236149278664*^9, 3.745236347106445*^9}, {3.745236386125346*^9, 3.7452364531730504`*^9}, { 3.7452365004444995`*^9, 3.7452366009934998`*^9}, {3.7452366340914993`*^9, 3.7452367895004997`*^9}, {3.7452368263754997`*^9, 3.7452369958904996`*^9}, 3.7452407533701515`*^9, {3.7452411157323847`*^9, 3.7452411165024614`*^9}, { 3.745241196732484*^9, 3.745241208612672*^9}, {3.777380516966043*^9, 3.7773805210087843`*^9}, 3.777384145088956*^9, {3.777384211992517*^9, 3.7773842349281187`*^9}}, CellTags->"ResourceInitialization", CellLabel->"In[74]:=", CellID->950696188], Cell[BoxData[ RowBox[{ RowBox[{"createpacletinfofile", "[", RowBox[{ "name_", ",", "dir_", ",", "symbols_", ",", "contexts_", ",", "loadfile_"}], "]"}], ":=", RowBox[{"Export", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"dir", ",", "name", ",", "\"\\""}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ "\"\<(* Paclet Info File *)\nPaclet[\n Name -> \\\"\>\"", "<>", "name", "<>", "\"\<\\\",\n Version -> \\\"1.0\\\",\n Loading -> \ Automatic,\n Extensions -> \n {{\\\"Kernel\\\", Symbols ->{\>\"", "<>", RowBox[{"StringRiffle", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"\"\<\\\"\>\"", "<>", RowBox[{"Context", "[", "#", "]"}], "<>", "#", "<>", "\"\<\\\"\>\""}], "&"}], "/@", "symbols"}], ",", "\"\<,\>\""}], "]"}], "<>", "\"\<},Root -> \\\"Kernel\\\",\n Context ->{\\\"\>\"", "<>", "name", "<>", "\"\\"", "<>", RowBox[{"contextString", "[", "contexts", "]"}], "<>", "\"\<}}}]\>\""}], ",", "\"\\""}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.745235194554604*^9, 3.745235254904604*^9}, { 3.745235315690604*^9, 3.7452354650388985`*^9}, {3.7452355043657627`*^9, 3.745235605191924*^9}, {3.745235690410964*^9, 3.745235952280966*^9}, { 3.7452359910198393`*^9, 3.7452360347032075`*^9}, {3.745236149278664*^9, 3.745236347106445*^9}, {3.745236386125346*^9, 3.7452364531730504`*^9}, { 3.7452365004444995`*^9, 3.7452366009934998`*^9}, {3.7452366340914993`*^9, 3.7452367895004997`*^9}, {3.7452368263754997`*^9, 3.7452369958904996`*^9}, 3.7452407533701515`*^9, {3.7452411157323847`*^9, 3.7452411165024614`*^9}, { 3.745241196732484*^9, 3.745241208612672*^9}, {3.777380516966043*^9, 3.7773805235346737`*^9}, {3.777381423999366*^9, 3.777381424578595*^9}, { 3.777381454679965*^9, 3.7773815494149103`*^9}, {3.777381598400642*^9, 3.7773815985777893`*^9}, 3.77738167978977*^9, {3.777381710800688*^9, 3.7773817155476294`*^9}, {3.777381953639143*^9, 3.777381954097938*^9}, 3.777382044801783*^9}, CellTags->"ResourceInitialization", CellLabel->"In[75]:=", CellID->876532920], Cell[BoxData[{ RowBox[{ RowBox[{"contextString", "[", RowBox[{"c", ":", RowBox[{"{", RowBox[{"_String", ".."}], "}"}]}], "]"}], ":=", RowBox[{"\"\<,\>\"", "<>", RowBox[{"StringRiffle", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"ToString", "[", RowBox[{"#", ",", "InputForm"}], "]"}], "&"}], "/@", "c"}], ",", "\"\<,\>\""}], "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"contextString", "[", "___", "]"}], ":=", "\"\<\>\""}]}], "Input", CellChangeTimes->{{3.777381661370373*^9, 3.777381723852552*^9}}, CellLabel->"In[76]:=", CellID->321760415], Cell[BoxData[{ RowBox[{ RowBox[{"copyFileOrDirectory", "[", RowBox[{"f_", ",", "kdir_"}], "]"}], ":=", RowBox[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"newdir", "=", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"kdir", ",", RowBox[{"FileNameTake", "[", "f", "]"}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"CopyDirectory", "[", RowBox[{"f", ",", "newdir"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"FileNames", "[", RowBox[{"\"\<*\>\"", ",", "newdir", ",", "Infinity"}], "]"}]}]}], "\[IndentingNewLine]", "]"}], "/;", RowBox[{"DirectoryQ", "[", "f", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"copyFileOrDirectory", "[", RowBox[{"f_", ",", "kdir_"}], "]"}], ":=", RowBox[{"CopyFile", "[", RowBox[{"f", ",", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"kdir", ",", RowBox[{"FileNameTake", "[", "f", "]"}]}], "}"}], "]"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.745235194554604*^9, 3.745235254904604*^9}, { 3.745235315690604*^9, 3.7452354650388985`*^9}, {3.7452355043657627`*^9, 3.745235605191924*^9}, {3.745235690410964*^9, 3.745235952280966*^9}, { 3.7452359910198393`*^9, 3.7452360347032075`*^9}, {3.745236149278664*^9, 3.745236347106445*^9}, {3.745236386125346*^9, 3.7452364531730504`*^9}, { 3.7452365004444995`*^9, 3.7452366009934998`*^9}, {3.7452366340914993`*^9, 3.7452367895004997`*^9}, {3.7452368263754997`*^9, 3.7452369958904996`*^9}, 3.7452407533701515`*^9, {3.7452411157323847`*^9, 3.7452411165024614`*^9}, { 3.745241196732484*^9, 3.745241208612672*^9}, {3.777380516966043*^9, 3.7773805235346737`*^9}}, CellTags->"ResourceInitialization", CellLabel->"In[78]:=", CellID->566817827] }, Open ]], Cell[CellGroupData[{ Cell["Documentation", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Documentation"}, CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[TextData[{ "Usage", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoUsage"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Usage"}, DefaultNewCellStyle->{"UsageInputs", FontFamily -> "Source Sans Pro"}, CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Pacletize", "[", RowBox[{ StyleBox["name", "TI"], ",", StyleBox["content", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->186923959], Cell[TextData[{ "creates a Wolfram Language paclet from the specified ", Cell[BoxData[ StyleBox["content", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " and returns the directory name." }], "UsageDescription", CellID->665382925] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Pacletize", "[", RowBox[{ StyleBox["name", "TI"], ",", " ", StyleBox["content", "TI"], ",", " ", StyleBox["location", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->930144124], Cell["stores the paclet in the specified directory.", "UsageDescription", CellID->944621484] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Details & Options", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Notes", 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Notes"}, DefaultNewCellStyle->"Notes", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[TextData[{ "The follow types of ", Cell[BoxData[ StyleBox["content", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " are supported in a list:" }], "Notes", CellID->812110324], Cell[BoxData[GridBox[{ {Cell[TextData[Cell[BoxData[ RowBox[{ TagBox[ ButtonBox[ StyleBox["File", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/File", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "[", StyleBox["\[Ellipsis]", "TR"], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"]], "TableText"], Cell[ "local file or directory containing code package files", "TableText"]}, {Cell[TextData[Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"]], "TableText"], Cell[ "context with symbol definitions", "TableText"]}, {Cell["\"name\"", "TableText"], Cell[ "symbol name with definitions", "TableText"]} }]], "TableNotes", CellID->653643784], Cell[TextData[{ "Contexts and symbols are included as in ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DumpSave", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DumpSave", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", CellID->520133638], Cell[TextData[{ Cell[BoxData[ RowBox[{"Pacletize", "[", RowBox[{ StyleBox["name", "TI"], ",", StyleBox["content", "TI"]}], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " uses ", Cell[BoxData[ RowBox[{ TagBox[ ButtonBox[ StyleBox["CreateDirectory", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/CreateDirectory", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "[", "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " to determine the paclet location." }], "Notes", CellID->900747704], Cell[TextData[{ "The paclet can be activated temporarily using ", Cell[BoxData["PacletManager`PacletDirectoryAdd"], "InlineFormula", FontFamily->"Source Sans Pro"], " and installed permanently with ", Cell[BoxData["PacletManager`PacletInstall"], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", CellID->80866489], Cell["\<\ Symbols included directly in the content list will be turned into autoloading \ symbols.\ \>", "Notes", CellID->878802679], Cell[TextData[{ "By default, using ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Get", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Get", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " or ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Needs", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Needs", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " on ", Cell[BoxData[ StyleBox["name`", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " or any included contexts will load the paclet once it is added with ", Cell[BoxData["PacletManager`PacletDirectoryAdd"], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", CellID->730608011], Cell[TextData[{ Cell[BoxData["Pacletize"], "InlineFormula", FontFamily->"Source Sans Pro"], " only supports the ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " paclet extension. Other extensions, like ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], ", are not supported." }], "Notes", CellID->301089530], Cell[TextData[{ "When ", Cell[BoxData[ StyleBox["location", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " is given, it must not already exist. Any intermediate directories are \ created automatically." }], "Notes", CellID->451744676], Cell[TextData[{ "The paclet created by ", Cell[BoxData["Pacletize"], "InlineFormula", FontFamily->"Source Sans Pro"], " uses ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DumpSave", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DumpSave", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " to produce ", Cell[BoxData[ ButtonBox["\"\\"", BaseStyle->"Link", ButtonData->"paclet:ref/format/MX"]], "InlineFormula", FontFamily->"Source Sans Pro"], " files. As such, there can be platform dependencies." }], "Notes", CellID->987277148] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Examples", Cell[BoxData[ PaneSelectorBox[{True-> 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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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", FontWeight -> "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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Examples"}, CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", TaggingRules->{}, CellID->904125756], Cell["Create a paclet from a function:", "Text", TaggingRules->{}, CellChangeTimes->{{3.745241679660694*^9, 3.7452417019502354`*^9}, { 3.777380534416491*^9, 3.777380542689528*^9}}, CellID->801711908], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"HalfSquared", "[", "x_", "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{"x", "/", "2"}], ")"}], "^", "2"}]}], "\[IndentingNewLine]", RowBox[{"dir", "=", RowBox[{"Pacletize", "[", RowBox[{"\"\\"", ",", RowBox[{"{", "\"\\"", "}"}]}], "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{ 3.70999648737139*^9, {3.74524128350716*^9, 3.745241371154924*^9}}, CellLabel->"In[14]:=", CellID->178879662], Cell[BoxData["\<\"/private/var/folders/1n/hkc4vnx96wb3xs7g7mfcm5y4000c4m/T/\ m000003369641\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{{3.745241378023611*^9, 3.745241403587167*^9}, 3.777380544868847*^9, 3.777381936640635*^9, 3.777381976909101*^9, 3.777382052984634*^9, 3.777382190559763*^9, 3.777383011906188*^9}, CellLabel->"Out[15]=", CellID->822538247] }, Open ]], Cell["\<\ Clear the local function definition and add register the paclet:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.745241687957034*^9, 3.745241711151395*^9}, { 3.777380549379693*^9, 3.777380598635524*^9}, {3.777383018082143*^9, 3.7773830246042624`*^9}}, CellID->920771703], Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", "HalfSquared", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PacletManager`PacletDirectoryAdd", "[", "dir", "]"}], ";"}]}], "Input", TaggingRules->{}, CellChangeTimes->{ 3.70999648737139*^9, {3.7452414208538933`*^9, 3.7452414577405815`*^9}, { 3.7773805597819233`*^9, 3.7773805599760113`*^9}}, CellLabel->"In[16]:=", CellID->156059635], Cell["The function will autoload the paclet and work:", "Text", TaggingRules->{}, CellChangeTimes->{{3.777383027898356*^9, 3.777383044778942*^9}}, CellID->962375779], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"HalfSquared", "[", "10", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{ 3.70999648737139*^9, {3.7452414398907967`*^9, 3.745241448159624*^9}}, CellLabel->"In[18]:=", CellID->776368567], Cell[BoxData["25"], "Output", TaggingRules->{}, CellChangeTimes->{3.745241449130721*^9, 3.777380601903417*^9, 3.777382193255864*^9, 3.777383048017817*^9}, CellLabel->"Out[18]=", CellID->787043786] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107562], Cell["Create a paclet layout in a specific location:", "Text", TaggingRules->{}, CellChangeTimes->{{3.777387126495865*^9, 3.777387147160802*^9}}, CellID->663371195], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"DoubleSpooky", "[", "x_", "]"}], ":=", RowBox[{"Nest", "[", RowBox[{ RowBox[{"ResourceFunction", "[", "\"\\"", "]"}], ",", RowBox[{"SpeechSynthesize", "[", "x", "]"}], ",", "2"}], "]"}]}], "\[IndentingNewLine]", RowBox[{"dir", "=", RowBox[{"Pacletize", "[", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\""}], "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.777387367642524*^9, 3.7773874280832872`*^9}, { 3.777387836154056*^9, 3.777387859514504*^9}, {3.777387904213271*^9, 3.777387930057065*^9}}, CellLabel->"In[92]:=", CellID->424200290], Cell[BoxData["\<\"ScaryStuff/SpookyPaclet\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{{3.777387432851296*^9, 3.777387460581902*^9}, { 3.77738791021411*^9, 3.777387930706661*^9}}, CellLabel->"Out[93]=", CellID->247639312] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"PacletDirectoryAdd", "[", "dir", "]"}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777387464754653*^9, 3.777387472851042*^9}, { 3.777387932444059*^9, 3.777387933228266*^9}}, CellLabel->"In[94]:=", CellID->370965682], Cell[TextData[{ "I made this on the ", StyleBox["spookiest", FontSize->18, FontSlant->"Italic", FontColor->RGBColor[1, 0, 0]], " day:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.777387947858966*^9, 3.777387953998665*^9}, { 3.777388291605301*^9, 3.777388294807602*^9}}, CellID->43553815], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Today", "->", RowBox[{"DoubleSpooky", "@", RowBox[{"DateString", "[", RowBox[{"Today", ",", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\< the \>\"", " ", ",", "\"\\"", ",", "\"\\""}], "}"}]}], "]"}]}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7773874951243563`*^9, 3.777387528215446*^9}, { 3.777387663958563*^9, 3.777387670693391*^9}, {3.777387785583514*^9, 3.777387797886191*^9}, {3.777387934627264*^9, 3.7773879627574863`*^9}}, CellLabel->"In[96]:=", CellID->622132759], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnelfFFe6x7O8uS/vv3D/i/t2MrlmskzuTGYyN9EkKooa9+CWOBqVRUE2 kU02EQXBiAhIZFGWgOxLCzQ09EKzL03TzSLiivdHHzyW1fRSvTc+38+BT9Wp 06dOVVd96zm19X8FHPhqxwfvvffeof/Av6+2HvtTUNDWX/7xnxj5ev+hH3fu D9z+6f7DgTsDg/474ENkfoO/+vffe29l+BVBEARBEARBEARBOMr09PTAwECn iYeEV2HfAr4OfCne3i4IgpDMgIn5+flHhA+AL4J9I97eLgiCkAyCooWFBW+3 gngDvg58Kd5uBUEQkkHvEkGRt1tBvAFfB74Ub7eCIAjJIBAinfoU+DooOiUI f4R06muQTgnCTyGd+hqkU4LwU+zX6ScRre5uzLpBLpebZ46OjtrzWdIpQfgp 9ut0Q0TLFzGSjfrs2TO9Xj80NKRUKvEfw8iR3kw/w/xaklartfMCE+mUIPwU STpF2pgoYU9//Pgxuyl9cXFxeXkZ/9lTA8h3tL3+gcicKpWK3aJvz2dJpwTh p0jVKdLOy932lEcUCnMajUZRPnKQv75jVKE5FQoFRqempkinBLG+cUCnSMdu 9Nksj3795OTkmpOQj6nSGupXcHPK5XIM49gxNzdHOiWI9Y1jOkW6UKa1Unh4 eLiwsBAh2ZpTkY+pjX5OU1MTFnPNBWTm7OrqwsCLFy8wTDoliHWPwzpFymsc t1QYqsnLy2MmMQf5mOptHbqAlpaWNRew8zXLy8ssxxmdYnXhAKTRaHp6ejoJ grAAOoNqtRo7iyXzuBuHdfpJeLOVwgjbbt26NTExseZU5Ofn53vbhc5iPTo1 Go34r9VqWY7DOkU9sOjg4OD09PTCwsLjx4+XCIIwA7sGdhDsJtjp4FWDwWDP 7uZaHNPpZ5FrR2VCJicnLb0ZCfmWTquuD5g58eViQKVSvXJUp9g2mJm9vakS hD8xOzsLo+p0Ovft42vigE6/jmu3p/yzZ89kMtnY2JgoHznIf0eu7OObxbBC oXBAp7AoNgk42dvbJkH4HyyYmZmZceN+boZUnQakS3jZEeLt1tbW/v5+LNTL ly/xH8PI8Uoc7kmE5sSBg5/bseezTKcvXrxAHx8HWW9vlQThr7CA5Pnz527b 0cVI0unRPNv3R4mYn5+HQhsbG6uqqvAfw8iR3kw/Q2ROuFGqTtFPGRwc9Pb2 SBD+jVartXQFxx3Yr9Oou46/Ih4HiKdPn3ryMOFdzM25vLwsSacajWZ6etrb GyNB+DfYiVQqFb/Bxt3QG6V8DaZT9PTprClBOAl2IvT3X7586Zmdl3TqazCd IpR18p6oxv6J/CaNftaGk43zjwpaBuoUY87MiyB8E+xE2JU81i8mnfoaXKfO bEVt6snPoiqRTt3qsF7yXHEnK/lAMe7MHAnCNyGdvsu4RKc3mzRMkt9fqrNe ckdGAyt5tVbpzBwJwjfpNL00wzM7r/t0Ojs7q9Vq8X/NUanF3IRjjQRPnz7l Tzy5FhfrNNmGTgNJp8S6Zh3o1GAwlJeXd3R04D8sJBqVWsxNONZIltna2lpd Xe2OVjmm0+wHqq/iqlmKLOkS6rRneJpPEqU29aRQp/HlPXwSKnTT5k0QnmQd 6LSrq0upVL4yve1TpVKJRhHa1dfXLy8vWy/m8la5pJEYGBwcxCSf0umVP/qZ FZHOFMhK2gfZMPrysoEpPkmUGvsnDlxrZsP5TZrzd7r4JFTops2bIDzJOtBp Y2Mju3t2eHgYcZ1o9OXLl+Pj4zaLubxVLmnk/Px8TU0NwlSf1em3ibVj07P/ /q19S8qD2t6xjOo+SzpNrOhtUk4EpNUfy2sb1c9uTnlgv06xHqbeRqfTIZKn l7RMz8zo9DMGy29amF9YeLS4KLVarPCeflVju0ytHVyU/nEXgk10bn7eRpnF RSylzapsritsTjbnZZ11oFP0hZmCRkZGuru7RaNSi7kJxxrZ0NAgk8nUavW9 e/fc8cCF8zpFOny9VTGin5iZu9Go+WtMlSWdfh5VmV2nGtfP9Y/OHL/RLpxk U6eVlZWn1yIkJCQ7O3tgYMCJPcBlpOfmf/TNVispMeu69RoSr+SwkkdCI+2Z Y3uXnJX/8fgZ0ST4MOlqbuCxX/9n07YN3wVuP3KyoPSePXX+dqd0c9AvH2/c xpv9l+93hMQlD4169PY2qC8158am/UdZS/5vd1BoXPLImPiGkJLKml2/nP7k u8ANm7bvOHYq//dySxVaWVegrrltz4mQz7fs+vO3AVuCjsdlXDXOzjnQ7HWg U/SOe3t70VOGedA1Fo1igM3UejGXt8oljRwaGtJoNH19fdCpnT9OKgmX6NT5 5LBOOSUlJQ5s/K4l7fpN6zpNuJJjvYb4zGxW8lDIeZuzQ6AVcPgEKw+lCCdN TU9DGuYNOB2TYKVCbAynYhIsNf7LgD2DI6P2rAfnwaJt3HfEvA2fbd6lUGl4 sZTsG+ZlolMz16zQ0rpasvDFbTtyYlj6EWQd6BSdkaqqKuxxdXV1WBbR6JMn T0pLS9mP8Vkp5vJWuaSR7LP4mtDld0er/EunZ86c4Z398fFxHGhqa2sjIiKY UeVyudSN37UI98q/Be4zT5dv3LJeQ8Lr6PRwqA2dwirbj57ksxMpIvO3Aj4J Xvpi6498tKK23lKdDa0dvBiCNES2CNgQ3PLM/b+G2b82nCH04qU3Gt+255+7 DvJRhNmszMj4BG/b37bv/WrHfl6mX/1Wb8X6uursUWBh2aRPf9ix+adfeMng C0lSW74OdApevnwJEVkalVrMTTjWSLfijE6/iqvemFTrZPr7hWr7dRoaGmo+ SafTRUZGYir+GwwG8wJYmZ45xcp1CgM4VsPCwiPj7CzSvOUzeIg8o1Iuf/za AOaKwMLy0I7Fw7Nzc//YeYDlnEtMtVRzTNoVbmDdtJ5lGozG7w8e4zPSz6yx hl0Ltsm/bt3Nw+n5hQV8g0lXc3kbxiYmUSwx6zobxaKhY45Vx5c6PCmNVWVz XYGQuGSWv+PnU5O6aeF6+HjjNqkB+frQKeEYzuj0co0LLsenVfU5qVOARWAB aktLC8+UyWTXrl27cOECYlpMio2NLSkp4S8hLC4uTk1NLSoqElXV3t6OfHwQ wxMTE6kment77VoW+3R6vbDkVHQ8UousMz03H7JCEJh18zYm3a36g01io2tS WH7fvGcqVATEUlB670J6VlBIBDMP2HsylJUMi79kqWaExKzM1kPHsWHw/PKa um/2HNoSdBxz6VW+uaVtYkp38fI1NP7rXQcPnDqLYT47ADWxZQlPTMPR4dqt oqDgiH/tDjp6NurOvWor6wex5f9u28ta0tT+kGUiwuQL29610g357sBRNorV zsrkFv0uWv821xVAEM7yb91dPe/ap34zryu/Wfwi1sQZnarV6tzcXPvLk059 DXfotHtQ16ycQJpbWAkL2XCHZgqTpo0LbLR/dDX4cYlOsRTh4eEocPfuXZZz 69atNU+xJicnCyuEafV6vbAqyBP5N27cWDK9b83c0lawU6cnIuN4ECjqR9tz 7pQrAsJMzblh6XygcOVU1TfxGcHYlkomCyLAb/cevnzjVldvn6XAvvVht7B/ zTvdDa2rDxoPDI2wTHTJIVJRSXTnrXcZEJQOjY7xmwrQbP5ZFkN++sNONgrb szKN7TJehl2gt2dd/WPHatxe/scDnsnD48hLl6000hxndHr+/Pn3338/JSXF zvKkU1/DHTrdl9XEzogOTRnnHy2y4U1JtZjUolp9uj+0cDXqcIlOQXp6Ogqw qHJ8fJxpMDs7W6PRsN+eyMrKYpmIAVBmamqKjdbW1vJKxsbGWCYLR1HPJRM9 PT32rBauU3QSEZKJ0h+Nq07mOhUmdtndHp1W1NYjwmRR4uUbBdZ1CiNxM5jk kGHlpim1dvCzzbvMDXkmNrGmoVn4wdm5uf/bHcTLbD38b34a8++B+9g1ca5T lv7y/Q7EgdyBSGU1Np6h4yDe3v3vYH4MQs6MwcDraWiTsWLyfiXP1A6P2Lmu EF2zfMTPLGdscpLX83N4jJ2NZDjZ2f/pp59gVBzT7SlMOvU11o1O0UtCAXTt MQxDBgcHh4WFCV/iOjQ0xFQpk63ufVeuXBHGq6CiogI5UVFRjp1rtX5lPz13 tU8q1Gl0aia6sTfu3NXpZ5YkXtlfskOnUA2fF0Rn80wg4tgvA/as2X4IjZ9Q vZpftHrg+DYAEeyS6cLQv14LlnlJqNNv9hxisx4ZG9+0f7WT/t2BY/YsIzQO n/Oq2KU05YCW57C+v6VMm+sqNi2L5eMA8bBHgSPFxdffAhIOAfY0kuP8udMD Bw7AqGlpaTZLkk59DXfoVD40DW0isc4+G5YNrHT29bMLbLR/dIYVdpVOMzMz USA+Pp6NopPIf0PQYDCoVKrq6mqm09bWVpbf3t7OckZHV/Z0NDUmJgajZWVl EtaFAKk6ReCHnVdYg8t1Wvmgcecvp/mVcYSIVu7MZMCZ6PWveZ/SlqDjM4aV tXo8IpblHDxzzrzxQSERS2/rtKi8khcruV/N8422fk8Hcemv0fG8/NGzUSxf eCq1o3u176AaGOSZLTLxJm1pXY1NTH6+5c2dD5/+sEO4yJ7XKdi3bx+Mig6X 9WKkU19jfVyKArGxsShw9epVNgqXVlVVYYNk51SF8BOhCwsL586dQ055+Yph lEql0K6OLMtrnWKXrG5oFiW1dogV4zr96Uy4qAaX65QBKSEMZiU3bNpu5+2U CPZulpQdOxf9Z8GVcYSvmCS8m+ivW3ezxC+gbw76Zeltncr73rzxpl89wPOF F7bWbLYwkscyzry+c2NySsfzmzpWezo9/SqeqdaKf6zHyrqqa277cttbMTlf ZBd29ufn50/ax4kTJz788EMYNSMjw8rOSzr1NVyi05tNmgPXmpEa+lceWoks 6Waj4/q5R4uP2fCv+StXKHqGp9ko/6xLdIoNlV2+Ly4uXjL9xgSLMxn4VEpK CmJO8+tKhYWF7KI/hgsKCjCcmmrxPiKbSL0UdeZComiSm3S6ZDovyl0hvObC gWOvFRRfvHwNPWvISjgJ3fkN3wWyz8ZlrByw+OWbNRPUuiTSaf8bnQrzO3sU lhqMLVPo0n2/hrLAmIHeB7c3MzxoedjFy5s/SWp9XY2MT+TcvhMSl4yeflP7 wyOhkaxwVIrLLkVhs/yT3bxn4vDhw1Z2XtKpr+ESnSZW9LIzouUPh5e8ce6U nfMEHR0r0r59+zYbRf7w8DA7EarX61lmc3Mz/6BGo2GZGGBxbENDg6RVIUSq Ts/Gp4gmuUSnECN667DigVNneTg3MDTMVVNcUWleVb/mTdAoOiGAjYTftorG I4c/coUAG9GmKLHIUKhNocAhK54/ZfkXyiIvZfBiR8IiRWdFAG9SdkExy+HX 8T/bvMvOdcWYX1jQDo/wE8twNT894skbpTjZ2dkffPDB7t27rRcjnfoaLtHp 7ZaBY3ltSM3KCYzGlfWw0YmZleiUDYeZ/KkY0bNR/r5T53U6NDSEfBZksvtq 4uPjhR1/hkwmY+ZsamoS5rPC7MaAkJAQo+X3Y9hEqk7PJ2eIJrlEpwi0uIgQ cYnahqRQqtes7esff+LhZW1T67zp58MQ5vG5fLRyc2YFMs8mpLLRz7f8yN8Z EpGUvudECP6XVNYsva1TNG/+9Y+RnYy6aHMtlVbV8s9uO3JiYmrlzSU8sW/5 9OvnYX84+DPLQQTLco6di7ZzXQnXzHcHjrEjb0VtPe/y81M0duK8TnNyctDT 37Vrl82f8COd+hr+de6U3ebEkMvliCTRQ2fdfNDe3s4KX7p0CaOINrkbVSpV WFgYK1ZX99b9OTU1Nfy0QF5ennASemd3TNj5q9lSdYoATDTJVZ194QP7CCCF o9uPnLT0hih+vZ6lL7b+iA8KHzJFYi8hkfe9uSXp+4PHrheWCK+Gm+v0I9Mz R5m/FRw9G8Vz0nPzLS0XGin8rCixk6X8lSZIB0+fQwTLR5vNrkNZWVcPWtr5 B/eeDMWR4pPXZzasv+JgTZzU6fXr1+HSwMBAe34OlXTqa7hEp9pJY5t6Emly ZqVH1jM8zUbR08fhng13aldOx+lnF9ioasyRK/tWqK9/8yg6v4gfHByMsFN4 HhWInoTS6/VcyKL7S919G7/7dIqYSni1mqfPt+xCp95SbfiyhLoTpQ2btgvf SSV86lOYQuKSWQGRTkVp474jli7rCy/QW9Ep+Dk8xnzq/lNnJa2rR4uLPKwV pm/2HNIMSgtNl5zTaX5+PlwaEBBg509Lk059DX85d8oNKSQyMhKBaHFxMfr7 wsLQwt27d+FSXjIhIUGhUJSWlmIYdhVVzu7wj4qKEoVtw8PD7ONtbW32rBb+ gr6/bd9rpRjv7Zpf5pD6gr4rv91m5c1fOgcp8espH5n6regC23zJHtxSWH4f JhGK5cuAPft/DZPJxU/a/l5ZI7yfCr5FaMcvGAl1WtfcxgPOj78NOB4Ry29h NScrv9C6TvlNUGgtDkD80QAE0miApReWWllX45NT/EtBQnSKQ56VFlrBGZ2W l5fv3bvX/t+Vtq7TTsJtWFrn/qJTB5ibm4Nm1Wr1rK2bG5OSkk47cbupLwO5 dfYouhT95pdyrKOfMaBHjw618DF8C7MwwLQKpVp0MV2o04GhlQ0DVaGklbc3 Owak2qtUYRn56VnHmJzSoXnyfqXwfQVS6aRXoLzDuESnmglDk3ICaVy/ss92 DerYKLuNnw23v35mn432SXxm332gg89C0PFx+q1qV2Ku03cB0um7jL9cinI5 8Py1a9fQzQ8JCYFLc3JsvNiZkArp1N2QTn0NZ3T6r/g/tqfXO5lQibeiU/7A VExMjOi9UoTzkE7dDenU13BMp9fr1dCgCxMqdNPmbYXGxsaCgoK6ujqdTme7 NCGR2bm58j8esOTY7y75I6TTdxmuU/pJUIJwEuxE2JWeP3/umZ2XdOprMJ3K 5fIF566KEgSBnQi7Eun0nYXpVK1WT1t+epogCHvATqRSqey/cdRJSKe+BtPp 1NSUVqv19sZIEP4NdqKxsTE7n2lyHtKpr8F0+uLFC3RSnHn7B0G847Df0Hny 5InHdl5JOv3nxY5TBUpR+iK6bWPiQ7c28p2C6RQDBoOhs7OTzqAShAOws6Y6 nc5joekriTo9nNNrnrkzU14i0311ocOl7Xp34ToF2BiwSdh8JJMgCCHo1iEU mZiY8NhZU4bzOm1UGTdEtCB9Et7s0qa9owh1CmZmZmBUrVY7PT2NAy7dPUUQ a4JdAzsIdhPsLCwu9bBLX7lCpxwY1RUtetcR6RQ8f/4cx1mVSoWNxBsvayEI /wA7CHaTsbGxJ0+eeLKPz/GuTkdHR1tbW/V6vfmkp0+f3r9/X6FQ3Lt3z0oN OAChTF9fn81byxYXF+UCcCCT2lrPYK5TBjYPLOxzE88IgngbtmtgH/GKSBkO 6JR17YWJTZWqU7Vaff78+bKysosXL8Jv5lPT09MNBkN8fLyVStLS0goLC3Ny coqKiqzPDtJmL3JHyeDgYMR7klrrMSzplCAIH8eL0WllZaVMJsNAQ0PD7du3 EZ9XVFRcuHAhNzcXkWRqaipkiwA+PDw8JSUFUu3oWLnapdForly5AgOj5Tqd LiEhAZlLS0thYWE4MDU3NycmJiYnJ3eaXigqLMznW1NTU1VVJWxJRkbG3Nxc V1dXdnb2K9M7Y/FBYVWYVFJS8sp0bSgrK0vSYkqFdEoQfooXo1PG1NQUlIje ent7e3FxMfr4+A/T9vf3M8cikhweHp6ZmYmOjkYwDzcizkRsCdnCgcjEaE9P D4rNzs7evHkTKh4dHU1KSkLMLyzMbj8zGo3IfPb2KxEKCgogTPwPCQnBx+Pi 4h4/fiysamFhISIiAnOvrq5G2xxYTPshnRKEn+Ldc6cPHjyAu3p7V6rNy8uD 6BAoIiBEKMh1GhMTwwojXpXL5aGhoRkmEMdCld3d3enp6YgqEZ2+ePHi3r17 sB9KoipYVFQYldTW1iLsFDWDBZ+IRe/cuYMmZWZmIlNY1SvTrxkqFAqUWfNM rwshnRKEn+KB6BRBHcK8VyZRwHh8FOEoOs78mQX0waEyDECkkCTXKTyJLjbz KvuPGlDP77//jqCxqKgIfXyYMyUlBaJDFIrIE9ZlIaiwMLtWBUMi8hQ1DP8R fEKYEHt4eHhdXZ2oKpTBADx/+fJlB1e03ZBOCcJPcUCn6qlFUWJTLekUYmTx HiK9gYEBPpqbmwt3xZhAcGgwGNLS0mBF6Av+VCqVhYWF8Oe5c+ciIyORyaJK uC4hISE2Nra0tBSj6JIj+EQNg4OD8OqlS5cyTURHR2s0GlHhsbExzMK8YQAh bn19PUzLrlKZVwX3Qrk4BEhfx9IgnRKEn+Jr950ajUYEk6JMqEz44O2S6Qky Poph/pHl5eX5+XkMILBkmaLC9mNelWcgnRKEnyJJp59Gtpr39Hm6+mDUrU19 RyCdEoSfQm+U8jVIpwThp5BOfQ3SKUH4Kdhz2dVtwkfA10E6JQh/BHuuXq9/ RPgM+DpIpwThj3R2dj4kfAz2hCxBEP7FNOGTeHu7IAhCMgiEjOuFdbMsFJ0S hD+ybhRkJJ0SBOFV1o2CjKRTgiC8imcUVFtbGxwcXFNTw3OCTbh2Lu5bFtZa 9kvNHoB0ShD+iCd1CsrKyoyv7eQvOg0W0NTU5I5ZiCCdEoQ/4rEOcl1dXfDb uHwW7lgW3tqSkhI2UF1d7fK5iCCdEoQ/4snzjR0dHe5zqdENOk1KShK29v79 ++5rvBDSKUH4Ix6+fKNUKgsKCtxUuTuWJTU1VTjaaMLlcxFBOiUIf2TdXA03 0pV9giC8yrpRkHG96HRmZoZ0ShD+CPbc4eFhbyuEWAUu7erqmpub8/Z2QRCE I2g0mk7CN+ju7iaXEgRBuJD/B8QJIS4= "], {{0, 88}, {453, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{226.5, Automatic}, ImageSizeRaw->{453, 88}, PlotRange->{{0, 453}, {0, 88}}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.777387498643688*^9, {3.777387793208076*^9, 3.777387799174157*^9}, { 3.777387937612883*^9, 3.7773879645837812`*^9}}, CellLabel->"Out[96]=", CellID->864556407] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Scope", "Subsection", TaggingRules->{}, CellID->204653245], Cell[CellGroupData[{ Cell["Using Contexts", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.777383272963522*^9, 3.777383275204013*^9}, 3.777383367674388*^9}, CellID->658866374], Cell["\<\ Paclets can be defined for a context. First define symbols in a new context:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.777380699618846*^9, 3.7773807042307673`*^9}, { 3.77738115121729*^9, 3.777381173766591*^9}}, CellID->134506778], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"AnimalConversations`BirdScream", "[", "str_String", "]"}], ":=", RowBox[{ RowBox[{"ResourceFunction", "[", "\"\\"", "]"}], "[", RowBox[{"Style", "[", RowBox[{ RowBox[{"ToUpperCase", "[", RowBox[{"str", "<>", "\"\\""}], "]"}], ",", "24"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AnimalConversations`BirdWolfChat", "[", RowBox[{"l", ":", RowBox[{"{", RowBox[{"_String", "..."}], "}"}]}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Column", "@", RowBox[{"Flatten", "@", RowBox[{"Transpose", "[", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"ResourceFunction", "[", "\"\\"", "]"}], "/@", "#1"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ResourceFunction", "[", "\"\\"", "]"}], "/@", "#2"}]}], "}"}], "]"}]}]}], "&"}], "@@", RowBox[{"Transpose", "[", RowBox[{"Partition", "[", RowBox[{"l", ",", "2", ",", "2", ",", "1", ",", "\"\<\>\""}], "]"}], "]"}]}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.777380706742669*^9, 3.777380779489468*^9}, 3.777380849588748*^9, {3.7773809129229507`*^9, 3.777381003132565*^9}, { 3.777381079941106*^9, 3.777381128769353*^9}, {3.777381344263839*^9, 3.777381345469636*^9}, {3.777382304893818*^9, 3.7773823061110697`*^9}}, CellLabel->"In[19]:=", CellID->432131019], Cell["Create the paclet directory:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7773811791566677`*^9, 3.7773811809259453`*^9}, 3.777381265231153*^9, {3.77738231078076*^9, 3.777382313666506*^9}}, CellID->650684479], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"dir", "=", RowBox[{"Pacletize", "[", RowBox[{ "\"\\"", ",", "\"\\""}], "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777381132355143*^9, 3.777381143248768*^9}, { 3.777381198025084*^9, 3.777381209316575*^9}, {3.777381257852303*^9, 3.777381262396521*^9}, 3.777381343087255*^9}, CellLabel->"In[21]:=", CellID->559764671], Cell[BoxData["\<\"/private/var/folders/1n/hkc4vnx96wb3xs7g7mfcm5y4000c4m/T/\ m000004369641\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{{3.777381187988386*^9, 3.777381209566845*^9}, 3.777381262941161*^9, 3.7773813484459553`*^9, {3.777381543814765*^9, 3.7773815579424067`*^9}, {3.777381609946971*^9, 3.7773816222101097`*^9}, 3.7773817347580442`*^9, 3.7773823153343267`*^9, {3.777382919766109*^9, 3.777382945939272*^9}, 3.777383053389415*^9}, CellLabel->"Out[21]=", CellID->289748026] }, Open ]], Cell["Clear the local definitions and add the paclet:", "Text", TaggingRules->{}, CellChangeTimes->{{3.745241687957034*^9, 3.745241711151395*^9}, { 3.777380549379693*^9, 3.777380598635524*^9}, {3.777381276355276*^9, 3.7773812779250097`*^9}}, CellID->500063577], Cell[BoxData[{ RowBox[{ RowBox[{"ClearAll", "[", "\"\\"", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PacletManager`PacletDirectoryAdd", "[", "dir", "]"}], ";"}]}], "Input", TaggingRules->{}, CellChangeTimes->{ 3.70999648737139*^9, {3.7452414208538933`*^9, 3.7452414577405815`*^9}, { 3.7773805597819233`*^9, 3.7773805599760113`*^9}, {3.777381285939867*^9, 3.7773813017144003`*^9}, {3.777381351123485*^9, 3.777381358904091*^9}, { 3.77738232049691*^9, 3.7773823207503023`*^9}, 3.777382351859686*^9}, CellLabel->"In[22]:=", CellID->448930252], Cell["Getting the context will load the paclet:", "Text", TaggingRules->{}, CellChangeTimes->{{3.777383057728445*^9, 3.77738307303181*^9}}, CellID->610026481], Cell[BoxData[ RowBox[{ RowBox[{"<<", "AnimalConversations`"}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{ 3.70999648737139*^9, {3.7452414208538933`*^9, 3.7452414577405815`*^9}, { 3.7773805597819233`*^9, 3.7773805599760113`*^9}, {3.777381285939867*^9, 3.777381362657415*^9}, {3.777381759727908*^9, 3.7773817664027443`*^9}, { 3.7773824016548767`*^9, 3.777382401994775*^9}, 3.777382443051435*^9}, CellLabel->"In[24]:=", CellID->464089587], Cell["The code is defined:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7773832222682*^9, 3.777383231116898*^9}}, CellID->995858436], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"AnimalConversations`BirdScream", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7773832369056797`*^9, 3.777383259803176*^9}}, CellLabel->"In[27]:=", CellID->967593365], Cell[BoxData[ InterpretationBox[ PanelBox[ StyleBox["\<\"SQUAWK!!!\"\>", StripOnInput->False, FontSize->24], Appearance->Image[CompressedData[" 1:eJztfQdAVFe+98y9dwpTYOhNepEivVtBpQhoaAIi0pk+A2qiCCgmG8WGJNHE xFgSNWJXlDa4idnsJvl2s/sSd/f7krz93mbNxtRVo4KNMu+ceymXAYZBwJHx /vaEncHh3jPn/O6/n3NcisrShAiNRlvLBj/SCtfHrFlTuCFdAN4sV66ViJSl JUuUz5eKStdEFqHgl619/8HXagpPN6g5ojAifvjhhyvD8Pnnn+u7XxT0CcCB 2tralJQUGxsb2liIjIxMSEioqakBf6XvjlOYQty6dauhoaG8vBzM+JisGJMz 9fX1QPjo+ztRmDR8+eWXBQUFbDZ7gtwYjujo6H379t2/f1/fX5HC4+P8+fNA TegoHKKHQUeZIxAIKioqKMEyvQA0C3jAnZ2dtbMCqB6ggL755psxL/jpp5/q oqrEYjG49dR/PwoTRWtr62i2KKDNxI1PQIPDhw8Di3fEW4Bbgw5M0lehMPkA 0wdsjxHnDigdoHom/XbAfB1RXoHbUdrnKcSIAgQYq0AFAMN1Sm8NNFFgYKDG rYGhAgTOlN6Xgu4AzgWwG4fTo7a29klaCOB2wx0oSqQ8Dfj888+9vLw0pgaY l1MtPUYE4MNwZwqIFCpyq0eAwQdTMFyA6LdXQMto9Aq8pUK1egFwXTWMECBS gK+q735BAJGSnZ2twV7K63nCAAzRcCvKy8uftsgnECkUT/SF4QypqanRd6dG xnCeUC7PEwBwWDQs1aeWIQQ0eAJA8WRKARSKRkTiKWcIAcAKsncMXlP+ztRB LBaTGQLe6rtHugJYI2SeAKo/bRaUYQB4kWSGFBQU6LtH48P58+fJ/a+oqNB3 jwwN4LkjG6uRkZH67tHjQEMSPiUOu8GAPLzTV6drUB28ppTOZAE8cdPOWB0N Gt9lGplVTzPAs0b2ecHr6f70aaQjqYj9xKExpAagxzUc+ZSUFH33aHrjhx9+ IHuOBiOcgU1FZv40NbGeEtTX1w+MpI2NzXRXNGSQiwrKy8v13Z1pDLIvAAij 7+5MJshhEyAtqQrqx4PGMBpeiZcBPwJPDAYvkDWUqb67M/0AxC/ZZDVI007j O056Pb/Bo6GhYWD0pmkQXhcACTnwNbOzs/XdnWkG8gqaaR1i1Q6yLwxMFH13 Z5qBXEtskLpmAORvanjG+dSBnOAw+OeLvGKUMkt0x759+wbGbdrVjYwXQJka thM3RSAXBhh8AIFcTBUdHa3v7kwbkPNfBp8kBY7wwJcFHrEhpR6mFOTowbMQ ryY/FIZtpU8Wvvnmm2fHaiVA9vepBRe6gBw6eEZ0NLlmBhjt+u7ONMAzaMjV 1tYOfGUDjhxOIsgkMXj/lwB5lR9RWEWjdqXWCvKIPYMkIewTfffoaQdFEn13 ZxqAXGv0jIwYmSTUyj5dQLZJnpFKcjJJKMNVFzyD3g05faP37bymBcjBtMDA QH1350mACqaNFxq5DH1350kACMyBr2zwuarJAnld57OQyyB/X71sLjodQa7D aWho0Hd3phb3798nJzSpLLCOIIepDb4Oh2yoPyM22KSAHCox4FJ5AuTVNwb/ REwiyLYrzdDLg8lr0Axet04uyAa/AXuFGuuzdDmhicIAyGaJAcddybFWg1es kw5ySM2AKz/JusbgS76nAuTogUEOoMZWNoZtek0RyGY/IIy+uzP5IC8Efkay VJMOw150r7HTl4F9uycJ8rPG4XAMKa9BtswNUk4+MZw4cYKstQ3mcQNmOVmM GKTF9cSgcfyuwQRMyE6NgW0Y+IShYfw3Nzfru0eTA40TcKgo60RAFiMGE08D 9ip5QxJqd6OJQOPgEoOpKiEf4AjYQsVGJgKD3Fhb48gbgzGx9AKNwTQMMaJx Ri0VPZsgDE+MaJxACvxfKuE7ERieGBl+Ri21dcAEQRYjBnAsxTQ6xXi6wMD2 k79165bGGbUGQHu9gzyk073gEzBcgyHPyNLmKYUhiRHg3pKDZhRDJguGIUaA itFIOQEkJCTou1+GAMMQI62treRgyABDqBTepGByxQjgGJiXJ7lkEggQ8rrv AbZTuwRMFiZdjERERKAoimHY1atXJ6WHWgCc3IqKCg0LhIZXv1MLeycLGkeg TlCMAL75+vqSJys7O3uKDoq9cuUKOWFHBiVAJhfkgueJiBFgD2i4nGRER0fv 27dvskwd4LyQi/nJAL83gMOLnyoAMUK29B5PjIAnmrziTzvAJ8FjPt5yWaBT GhoaQPeAEhntyuCLgCtTNuqkY4JiRAs94uLiNPTOcIAZB38OLIqamhqgp66Q AGRFDQ7gzw53WIZfh8r7TxE0xMi4Nh7UQg/gZQzkWIHkH81smBSAe1HKZUrx eAeIf/7558OjVcPpQQbwT8GTrrtKGhNAdABKT9NgzjSChhjRZVnBY9BDA2Ba xzQtRgToKrj1YxgzFCaCcYkRLfQAv3+8cAS4I2F+gJ7U9CMhISEax8BvgK1C FQjpBbqLETBBoxkVgB4GUJJEYTToIkYAPYYHuil6PCMYU4xooQdQBBQ9ngVo ESPAsCQf5alBD8pofEYwmhgB9ABOB3kZNUWPZxbDxQhFj6cQPT09HR0dd+7c 1QX4pzrAn0zKrTVWwgIHczR6BAYGGsxGE9MIDx8+7OzsBPRQtV9etDg2NCwi MioqEiAiIjIichAR/Q0gKio0PGJBzKKm5hbwh/fu3QNXePDgwWP3gbwpDQ1P 1lD0eBoA5hTQ4/btO9u270xJTctYnhURORtF0RGNwxGBIGhoaMTyzOzMzOzU tPQX1lXcvHmrq6trvD3R2ACKoofe0YMDzOb6ig0KZZlYInN2cUNw0AEQFEFR BPwfaDQ6bPT+hr9FYKMh/Z+E/9/3t4iZuWVubl5lVfXNmzeJu+jYJQ0xQoaz szNFjycM8Jj/7qOPXtu7p6i4mMPhEIV8dBo+0XRcONDoLDpqwTRx4lp7Gc8I tXSPsQ+IdQxZaB8433pWlKVXiLmbr6mjE9eCh7JQGvwjOhQpkDHwB4KAyxYU FOzZs+fD3/3u0aNHY3ZpNDEC6EEl2Z8wwHx9/Mmnp8+cTUhKBPPIwDBIC6Rv Rhg0xJrJ8xXMiLHxy3ZZUO6Xtjksr36O8Ej8880pv2nPqG1+7qXziRtPxFe8 s2j1G/MlL4esFHslJM8IDbfw8OTbWDK4KCQLQRg6xsA4Rpy4+PjTp898/PEn QKlp6dhwMULRQy/o6upubm4NDgnjG5uwSI8tSkctmSaz+I7xNkEK36S3Fso/ ydz179Kjv0jO3BSfvSs6d0984b7sEmj3pBc7pY33JBc7JY23peduSs78KDrx 97y3GpNrdkcVC2cuXmDp7cazNsU4DKiVIFtYLBafLwgMCj1x8tQXX1wdjSpk MQI8X4oeegFQMZeaLgUEBdERbGA6gBwRMDiBJs6SWcknEiuv5r7xbdGRW8KT D6UXepUtamW7WtGulqvw1kZq4JftPQpVr1KlVrapZc33RI0/lZz6V/G7f8p+ 5c2Fyiy3BTO51maYERMhRAuNyWDZz3D08fF7a//bIyZiBuhRX19PFfg9eQB6 dHR0NjU1B4cEwscbtxyAyWGCGAULnMsDlp1KrvxbwVu/Ss+rFWDSVWpFW6+8 tYfUeokm62/424F/UsPWhv/tb8Hbn4Wn/rTyjQPxawu9Y2fxZvAQJgYsYDq9 T4m4uu59fS9wlvU9KhQG0Xnv3hv73lyRkxseEQmtUzoN/MeloyGmLs8HpwED 48tVBzpk53oUzWow+9JBDqiHtl5SG/mfZK09sjb4U9n2sLz1F+mZz3NePx2/ XuqT6GlkxQCOEQYtWuAHuXt6vLrnNYonTwnu33+w7839njO9UeilQo8Wo6G2 qHGqc8T+hWX/yD/YJWtRy9rVkja1VEMyjLtB2aJogX8OqaLqkbf3ytu65Je+ yHvr5dlFEZY+LIQFDVrcX3bzcN+zdy+lVvSOBw8fHjh4yN3dEw9mADuEbkTH Zpk4lvsu+yB9+6+S872AIdIW8OyrJapeWXsPUBngN49LEsgTRXOvHPAEUA5c UAXYopa0dJe1/Lv0+MFFa5IdIywxLnS0MWioAL0D7JOJhGcpTBDAiThy9KiL qysRvgBTw2eyo+1m7ZpT8nXhwXvy5l5pG1AuPaBBLdNGvO1TN5PVwNUk4BYt 3fKmG6KTTakvZ7nGmGM83J+CJoqjs/PbBw8QPOnt7dX3mD1bAMN++N13nFyd 6bjFCOSIGWa83GXupbTaHyXnoMOieF8tJ9oHU9/AXS4D/6hDfvHDzPqVbtHA QQYcISxZFzfXD3/3ob4H7JkDUPTg8QSDD+OgoKE0FMHm2/vvX1L+9+ID34ka vis5fk14/Jro+LdC2K5NaoPXBFcWNZDa8X8Lj10vOfqd8NiXxQf3xZdF2nlD uwSFLDEWmAA+375zG/hfd+92DAf4JWXiTi4AQ/a9+Za7hweNMBERhAZpgjhw LefZ+yY5By1zDF7qEJbkFJHkFJbc35KcQpMcH7MlOsGWRDRH+DMZtjDyZ5Kd QpIdQ5LhZ8Ii7fyseRYMGu4UI3QmixkQGLA4NnbR4thFi/Cfgy1ucWz8/AUx EomM4slkATDkzTff9PSciT+mUM3gQr0vQkG86G/0kd6OuyGkRvr9GHeh9b/V kvAlukzH++7nF3jnzh19j64hANghBw4c8PLyggzBs7EIDYZWNWeib3r6Z2lw 8h4HwOTBG4rQcRebmH96/13pGJ4qHEaR4VQYBUTFQnBIGEWSiQMw5NAh4O26 Eyl7IMdN2Wb+Fu4mTC6tX5RgGGZhbeYT4O7j78435QksjD18HP2C3V09Z7BY jMGJ0VGM0EeWA8YmHC9/15n+LiYWfDrGEFiYevg4zQrxcPNyYhsxCUqQmauF IdAJwkkSEhJOkWSCwBly2NnFhUYUeICZQnkZbjFbFwjdeXYD08HhccLn+q+p Ll5dVezmO8MnzLN0TfaGbZJcURrfhD+W5B8QQ4Ngs1mWVua2dhY2duZWNqYc Lgvc29PHcc3GYmVlnk+wG8JGfIN9SstWVNZKCuXLAS2HXmNEuTIC/AModTNR fHDlQ1c3Dxru7oIHj4ew4h1CLi578eOVr6Y4RLrxrM2YXIRG4/KYYXNnra4p Xru5NCjSKywmULg+d8MOSZEyw97dmmvKYXOYyMCkDX+uB/+przm4zMjITyyQ pa+SpK0oTp7pC2uWPH2d1taUrt5UFDrf19TeODQ6WPRCXtUOqXBNtpOnHV/A YRoRKT9SgQKhi4aJEfDTxMTE1s4+KXkpcHP0PczTGI8ePXrn3SM8ngkcaww1 ojMX2gQcj193U3TqrvjcX1e92ZqzfZnHHODnMJh0F0/75MzFywuSV5amrhSn LS9JTsuPX16YsEKyLFuYEhjpy+UbDeEIYXZqqBY6bmjQ6b4Bnms2l1bukGzY Llm/pTRsjh+CInaOVsuyYpcXJC4vTMoRgbukZ5UuS89PyCxIzBOn5pY85zbT Ab+eJkloJB02oGvS0tLe/+DK3/7+f7u7u/U90tMVgCHnzzeGhUcxGWyMRmfT GbPNfQ7ErPlZeKpH3qKWtaqV798raxL7JUNnGKFxuGxLG3NHd9tccWr5pqKY xChrRzP/SM+yzYVVO+XJWYus7S1ppGnq40k/WzRI4hfsAbixsU5cVQd4Uho2 zxeQhM1hWdqauXk7FCiWb9wpK6vOX7g0ytbRYlaIm7Iqv3KbJCDMm7BJtZME ABhRMpmMyu9MBIAh586dj4iMQhBo3bHpSJi5694Fsu+KG3pgrr+lVwqTd7fk 50U+CTAJi1cVgk8yjbD0vPi1LxVHzQtCULqdq5W8qqB6hywjN26Gk3W/Y0If FCk0TUlCuDK+wa7rthRX7xZvqBPjJPHBc7ywM0CtrJKlb9otW11TMGdRGIoh No6m0vW5FdvE/qFeo0gSuoauwzBUIpFQJHlsdHV1XbhwMSpyDixPRehsGjKL b183p/ha0bEuZTvM2RH5XFlbp7zpWMKGSCtvDDiqOANYfGZm4dLVNcI5i4JN zI28Q9xX15Ru2lWWkZ/g7u3AMWahTAwvcx6UHLShb8A/WtibJa1YWLEdMERS XSeq3CYKmeONoH2ei4kpN1+2fHP9mrLqonkJEQJL/swAl/JNJdW7ZBHRflwT NptjROLhoOzqvwu8O5AkJSVCiiSPB6CgL15qCguPIOqOmXTMg2u7KSTr6+JD QIbAoo6BzCzM8LZ3lDW9t2RDluv8eXa+wKxFOWjkotAVotRlOYuik8IT0mPS Vi3JKEjMKExckh49JzbM3ccVY2D9Fmo/NfCXKANxcLbzDHBJXrFww3ZZ1W7p hl2i6t2iyu2ixMx5ngEOdk6WQMhwOEYLEqKWFyZnFS97LjduYXJkfPqC1FWJ 6XlJCalzYpZEevl5IBjSLzQGeUJQhcFkBwWHLklMfv31fboUUVPQAGBIa5sq MCiEWMSA0lA3lu0Lfsu/zD/QpWhRSwE3WnpJNR7dsK5D1Slt/Flx5nRatSvH CsyCEYcRvsBfuC5rfa04X55lbmfKMWWlrExYt1W2bqs0JSfRiMMmW6z47ME5 5fBYmbmJ67eIKmpLq3YBa0RYVSeq2gWaZN3W0he2FC9dsZgFvSSUyWECkRU0 17f0+RygZYrKM60czNlc1rLM6KptcsBMBhOjkS3kAfMHaCtjwf63D96+fYdi yGMAaJnm5paAwGBYpwp9XpoV00Q8M+lqzluPYPnQ5V4gRhRDakJ6FK1d8Geb es0HH2Zsd+ZY0/BS9uDZftKqnM17FEXlK3gCPniuU1Ymbnq1fNMrSqCM2Fw2 HnRBBiQJTAHR6EY8Zm5x0ouvyivrhJU7hdWQJ4Ah4so6SeVu8aY9svTCBAaH qKEFri7dL9xbUpG7eY9StG6lwMoE3DclO/rlvauX5izEGOggSUiihAa9deOj R9/T92BPSzx8+PBC46Xg4BAMpkrgiAqYnHyvhZ9m1z+QXVSPUlvYVzMma+0t u/xRxq4QvgsX4bIYzIBIv5LynPVbpLnCDGMTY4zJSF4et36raP0WYWpOPJvH wucMGbBIEDxXY2zOyREmb9otrYTSQzzQKmETbnxFnFG0hGtmxGACPchAEMwv xKdEmbVhq6hQvtzU0hjYT0CjVW+TJ6fNHyTJoClCJ0xrC0vrEydOUW7veNHT 03PxIrRD+h48FDVB2Dke8z/I2npPfq6vbnBY3ekQtihUPxY1XEyuqY9ThFp7 CsyMPXyc/YI8XT0dmEwMQVF7ZzvfYHffYA9HVzuMgQyqApwoDAbdwdk2MT1m 9eb86joJmSEDrXq3RFGdn1mQtOS5+eaWJuBPTc0F7t5O4JpuXo5MNgauZudo 4xfsOcPRklgG1m+SDIb6zc3Nt2yt7ejo1PeQTz8AMVK7bTuLxcZHE+EjRhmO UarnfgMYopY2adSm9o5StwyVUXn7dcWZVLc5SJ/fOZB6Qwb0ykDQgvyUs4wY QeE+5RuLoBjZKRqRJFW7pNW7JC+9WrZ6Y4GDixXJnSWlhGl90mlYRLdPjLi6 uX3//ff6Hu/pByBGfv/7PyQlLUVhqSrNCGXF2gc1Jm+8KzkLLJBeGWyjlbWT jNi2LujvqL4XnVrmFIkOEgQGLJAhOX3aQPZ/wLlhc1hBUT6KqvyNuyWjk0RS tVO4sU6i3Jjv6esEPC9gySAkJpLvMlBdMPgCJ6qpqWllZfXdu1Qcfhzo7e39 5I//Jz4hgclkgmeNQUf9TZ0Pxa25ITyllreNRIaRJQnu6bSBFzfEp34Tlrdk RkgSLDeCFUfJjoNtqWNYMmhOocucwmIdQ+y5VkTUy4jHDpvnp6wGJBldktSJ gK1SXSctrykMivQBwgc3ZpAZXMs4h5BE5whw5aV4S8YbUbMEXiQ6hnoJnDC4 2gMSUiAwO3nq9GTteWLwAAz57M9/iY2LxTCMKNdwYJtXB2f+T8GhXgUMg2jR MiOYJVJIkm7FpZ8kJ/9FrjksPQHaNfwn8eKa8MR10ckvCt5Md52L4uYrh28U sSCgfFNhtTaSCCFJdkOSBITPZLChacqiY1muc68WvHFdCK7cAG8hPPlt6Ul4 I/zu/xY1/FP0Xs3sVWYoHwoe4ALzTd49cowyXHXEvfv3E6GWQfFYOPR7F1n7 f5r1ygMFmOuxGTKEJLJWPIpC/GwfUqisuDystasVv/2+5HiO2wIUVrjRODxI krKNhUBQaCFJ1S4REDXKTfk+wa4MPKvMx9giryU3RCf7Sq/Jd+krk/6gV/H+ hYSqcDMPBgqFj7GJ6YmTp6j6+TFBDNFPP/3k5Q1PUoC7hdBoM7hmVcHZP5Wc 7C17n9AdWugxkkcMF8X0Stq7ZZeJ1XZE6xnWuqUwpP996fFV7tG4JKEbcdmh c2fh6kam4f9qqBvwAUASD38nuBKMRrNk8cv8U34Un1Ar2rqlLeS79C27wNdx /CXz1cKZiwQoXDbO45scPvyu9l0IKBC4efNmXkG+scAEGnrQqqPPtvJqXFrT ITkHrREpsYh70CbRmS1tvfK2Yfwhrwdvw7M/qpuSs1LfZBbCAPdnsRnAk5Vu WFn1inhUkgDDdZcQkEReXeTi7Yj7MXQHI/MNIVm/iE8B6dRvYBN3GZCB8Jc/ lZ7YNqfAAjPC3W3WvPnRzS2tlFmiHR0dHYXFRQwWk7D9wIDjyn3eV4UHemSX 4GjLBkkyJj3Gu3izF4+r3JFdqAzNtmAZw8J2lO7kaStatwKSRIt3Q5CkqsjJ 0wF3pREXjvXm8Jwb4jMkkgy7l7y1S9lyKrHSi2uLx08QeILh9h1UWF47Gk6e 4PP5eEaUqEmkWWMmFf4ZN8Sn1dDnBWOr0kXdjLHKW8vnFaq70sYdc0rceNZE aMPKwax4TVZVvVYXeJewuk4iXp83w9UWj4kgHjzb7VEFtyRnAUl6+kmieS/w dRSqP2a8muY8h8uAGofFYtXVv0JJEu14Yd06lhEbJ0lfDbq/wPmtaAWYOEJf qMdJEt251P9C1Sm79NbCskBTZ6Li0MzaOFeaumEXkdEbhSTALNkpypNn2Nhb EIEzP1On1xdIbuMkIWoYyCpy8CsoVN/mH6sOz7VkmeB1AoziUuGtW7f0PQ9P NQQCARGBJKq2gDRJcgz5MK22S9pM7B+iu0x4XLa0PZBdOp9QPd/GlyCJiRkv LW/J+q3CURgihq5NneiFLSXLcuIsLE0Jksy3nnUmaWOH7ALQj8Bm1lCRJO3W dld49p1FaxyMrIh4LIfHXb+h4gFlvo6OwaQXNAhoGB0p8Y39V/G7eBambaoZ QpDkobTpSsr2ZKdwFI+F8gScuNR5a14sHC13A0iyabe4bFP+7NhQnjEHzwQj 6c6z/7zy9S7ZJSCaeuWjkgQ6WYqW1rSXvfgOxNcGz0ipiCo60gZyLQd4jo0R VlVo1m15o0aUdUpJ0i1ruZr9eq5nDIYXJXKM2fMSQhUbVwGSVI7iAm+ql4rX r3T3d2YwMRhdoTOVPkk/i04CO6qbqFgYZrL256nbestUn6yojzL3wvB1whiG SaRU+aI2EGlRYmsg8BjbswTb5xTfh7UiqifAkL4mU31XdEzut5SFb7PG5jKD 53lLKlbgJBnBLIFBkjpJgTLDwsGMhq/os2eb74gouC+HlQzduLjQQhK1UvXF yteXOkZwMCZBErFYTJFECwBHmAjGZRph+AQ5G1m8Mk/8QNGsJoU4pkyGwNYD nY72Tmnj5vBcAb5JEcpEnbxmFJZlbaqXwVojog2RJOKK2pKMvHhjc7gJCZOG hpnPbFi0rkvaNMDt4R5W3wspIEn71wUHxL5LzFn4HiYYJhSL71EkGR1gkPgo 25ojYKFMnCSWgCQPnyBJ4FMva+9StOxbqPTg2qB4ms/YnJuRn1y5U0ooFzJJ gAICEqaselV0fCgH1izBwE6ay9zfp+3qkbaM2W21VAXcn3+XHH0papUjz5wg iVQmo0IlWsBDOe48GzeetREKB9wJJ8mTkSS9g7pA1a1suZyyJdEhhI0LNJYR I2ZJVNmmwqpdUugI15UO1TVS4eos/xAPFgumYNgIY41/2ncFx4YnIkewXWVw 58//CE+9vVDpxbfBayyR1JTUX375j76n4unFTMGM5zyi/I0d2Sgb6PcnTxL8 +qoeReu/Cg6tC0ozRqCdwGSi3gGuBcrl1XWKyqEkga5NnWyVONXeyRLDk7km KGdHZNEDySXtfR7UOzJVp/h849LNgQIHYhcvNoudl19IbU4yGhbaB7w4tzDM zJ2BwF3fgU1SP1/4QNn0xNQN/nS3q6XtnfLG/TFlDpgZrCBC6Obm/JScuMod 8so68dComqhyhyQtN55vCvMvKB3z5Tu8s3jNI2Bs96/y0EpIGHd9KG38bfrW EDNnYp9GcJ3FsfHUQuDRIPZJaEjdNN/Kh4EvqnIystgNSKJowjfAfFKSRKYC JOkua1Wl1S60DWAhTDz7hkTM85dW5OMaZ4h3U15TGJMYRdQasRHWUoewy6lb gcIiSDImJwFJHska38+oDTF3HtjMM2FJEkWS0bB/nviDrF2x1v4sSBKaFcP4 xaj8DuBLwiT7kJU1U0kSYn7b/lFwqCokyxrfOJGOIDa2Zs+tiK3cISPzpLpO mi/PmOnvimFw8YUxwl7rn/Lfq97uxVcl66DaSCTplyRA48TFJ1AkGQ1/zNj1 Xyv2ZrjM5jGg4WqEMGR+y66XvDcw4FMadB0gCbQnpa2d0gsXk6vDTZxg1Sod wTAkZK6fclPRhp2SAY2zvlaYkLaAZ2qEFzSjjkYW+xcpOyTn1TildVc3l9O2 AJIQUUQvL69XX91DOTij4Ybw9D8LDlcEZ9iy8YQXHXnOKfyTtJ1d0A58gjzB 506tVH2Vd0Dms8SCxcWjwIiNk/WyVXHPby+p2i2sBo7wTrHohezAcC8E6kaE gzITZoR+mFHXo2xXDwugDb9R/4u2TvG580nV/gIYmUdRTFgqorav0YKHitY7 pWeOxT3vYWxPFKwHmTkfilbiWWBVrw7VrZPFE7y1/So+ezx5Q5CJMyxtARqQ gXgEOheuztiwXbRxl3jDNnFyVoy1nSmMDtMRe5bZlqiCa0XHYJ0kqataqEiQ 5Ibw1MFFq72M7QiSSCUyqj5NC7rlcNvt/8reM89iFgoTZTRzBm+tf+qP0rM9 SpWG0pkikvSShAm0TPIPl3kvtWUKiHU5XGN2+IIARWXBxp0yZWV+UJQPisHC EyYdm2/mdTl9axdw2KWqXnmzthgamSQK1fXShto5pS48K4IkEpGUCstrQa8Y ngzybcG7QvcES4xPJIIznGf/Pf/gQ1nzk5EkQ4SJ7PJDcdOV5TsS7YPYdAZ0 h+l0Sxuz5MxFazYVZeTF2TpZEct0bFiCF/zT/qfwkBpugqEiqhPHJgnM3bT/ o+jd8oAMG7Yp3LoRg5KEIokW9Mja1Yq2X0QnX5sr8eLbEwu2wy08TyVV3oFr suAWE1PNkCHzCKslW29JTu+PLgs0cyMOakSZiIuXQ+aqpOAobyaXQew1EmDm cmnpi/fFjZrZGe3Xl4KH4vLf8vZnu0bzGbDMAENRiZjKAmtDtwLqlPvSC1cy di2wnoXgWyhbsUwlsxK/Lj4A/Q7plDvCQ4UJPMOiW3bpv4vfWR+U6cC2IErm WEYMt5lOAgs+IUYEmFGee8zX+YfgGUm6MxCSpK1H2vK71G2zzWYC5Qq+L4PB KBWWUiTRgi6FqhsfwG+LjhW6xfLpLBSlA+PE19Rxf3z5r3D5nqZOn0JdQ5gl cOVOy31F0ycZ9QWuMXyEheFLePGdp/t2+Q0ROB9dWH5bdJoon9PlFvAFrj1/ KWl4Y65ohpEpbpCgwSHBx9471tU97vOFnx0Aw7Ubluio7kou7I9ZHWLqhuFV jDyMlewQ9oe0nQ+lF3unOKpGZohaiv9G1tYjV92TXToZuz7Swp1NIzan6FsS zqajK1znfr1qfw+wmsYjRuDFFW1/Wrk3130Bj8kiCqG31G6lsjbaMTCSPbLW b4uPvxC03IrJJ9ZdOzBNK4Oz/2fVYXz6WsYMREyOJBm8ODCHVN8UHtkascrZ yBTt34UVzKybic2OOSW3RRfUcHslnfoz4D11KVrOJFfPEjhiuBfNYDB37NxF rfQcA6TA+ENFy/vp29JcZrPoMBXLoGP+fJeji9bdlpzDH8M2wqp8EiKlr1eg S81/XPFKiVesKYNHFGqjdGSZa+RH2bu7pIMZPR37Awye60XvvRSea4HxcKGE CEzNX39932OcZf9sgayy5ao74vMHYsr9BS4sOgPMCBthJc0IO7Os5hfFmR55 8/Cz86aUKoRX2ym9cClpc7S5L4fOBLLElmX6YvhKuAhLelktG8dyD8goRetH GTtTXedw8AorDpe/obL6zt27+p6Dpx1DVLYMnpH3VcGhdSGZ1gwTFF+MY8bk JTlFHE9a/x/x8W7FJY3y0amN1eNHf4Je/VByYu9csYexLfBHFtsFXFxW0y1t BiSBNQZa+0ASSnheT968P0bpwrVB8VUkxsaC4w0n9D0D0wCaT66s5b6y6Ur6 rtQZ4Vw6gzjqyAQ1irPzO7xQcb342CMFvsIXmrIjbGgzWcwZch0ZrIP9quBA id8SF5bVusDl/yw+2i3Dd4CUjnG7/uvgikna/E3RO8qAZSyETWxczOXy3nnn CGWQjImhMwIez+ZeRcvPwlPHE9ZH2weyUViZDPwdDh2bLfConyv6svBwl6wZ 90GGLwaffJIMeD0d0gsty2vX+qSdiau+r2wBToouhjRJSLY9kF+6kFSzyNYf gxYXnc/lLHsu9bPP/kJtPTEmhs4IEO84T+TNP4tOHE+sTLYPN0e50ClGgVhB fbkOm8NX/imr/o7obA/cWkSlHnFOJ4kwGjy5Lb1wNXvftbwjvcSOBMOYoF3X /Cg9XRWaY8MUEKt7ZtjaXr78225qFbAOGIEkoMFkWdOvwjOqlC2ZbvPNmTwU 36Ud2LIObNNs9/nHEiq/yn/3rvA8/jj3zxc+F+phRsvEedJLqEJpyyNp0yNZ 85DZH4skxIseSfNnOXtTXOdi8KgvGoPBiIqKvHr1r/oe/umBEcU7IZ/Bi9uy c1cydhR5LbIFDyC+hxRowBsN4LsVuie8F1fx/4ve7RRfgFkz2WW1tB1mY6X4 rjVwHxvN/Twfgy1DuzQ+eUX8Hq7rkavuiS8cXLzaz8KFWK/oO2tW++XLlOer I0Y3A9rAkwvc3g7Zuc9yXlsflDnTyJZJQ4kNDcH/zBn8YAu3Iu+4hrj114uO PZA2PZS2dMvwNCtgi6wdP0y8vVeuU92pjkrn8VinVrRdLzkm9VoCTwrGM0GR s6OoKiPdMeqkEFufSaET0S1r+3LVgfrZwlj7EFOMhxKHZ9GhQQuGPcrSS+yz pG6u6GzSpr/m7PtVcqarvLW7rA2u2oZU6b+yjKSPhtVGPgZPdJZFbfekje+n 18YQ6Uv8PIKw8LC7VHhEZ2jMxbBHFUZZe4ASkbX9UnLy0tLfrAvKWmQTZMEw wQ8sgifSAOHCRhjOXOsFdv6FM+Neisg7HLe2Pa32q1X7b4vOdivbesrbe8ra e0FTgqaCjgm0eNt6x1lGO05u9DET3Ovn0pO7o4o8eDbE9hrOLi5ba2upUjTd of2xHZgUdX8w6rrweGNSjdIvNcrK15xhTOxNRMfDKUw6yqYzTFGON29GkkPY Gr+U1+aKGxIqGpfWtKds+Sh9x58yX72as++rvIP/Kjhyo+T0I0Vzj7KlR9E8 XgKMo+F1s98WvlvqlWDO4sNjtBAkNS3j1q+/6nvgpxPGFO+D04fnd4D2uS9t vCY8diG5Ruy1JELgbmdkwkHRgY2/oe9ARwBb+KiRGca3ZZm4c61DzFxjbGel Oc0umhm/OjC9Omzl3mjFHzNf6RSfU8u0lR0+dhuUJMr2r/MPJttHMBEGfrow kpmVTVWPjAu6mAFDqaIiHJ9O8flvCt+5+NyLLwSnJzqG+Bk7OLLMzDEum47R yMCT+/DULQTjYCxjBseSaWzDNp3Btihwif5sxWsP5U1TwZBBYivb/5q3f56l H0wi42cELs/M6uykzh0YB8Y77P17/7apla29itYOyYVrhUe+WLmvNfXlvQuk Eu/EBaY+LkxLS5RvQjfiICzw/KKQNhiN8IxI8OM7Hl649o7wvI6FQ48lSVqA TfKXlW+EmXnhy34JkmR3UgUk44EukkSDJ+ohH8OtUKXqkeLiT6ITV1e91Z66 7Ujs8y+F5uZ7LI61D46w8PQ2drBjW/BRLgcIEwQDIoWJYiwEizb3uphY0yma kl2VyJLk87w3w8296TTiMHskYzklScaH8crwkcMU0FwBWqO5t6ylp7z1vvzi d4VH/5z1qmrZy2eTqo7Ert23UFk3V/hSRG5FSKbC/7kS73jlrMTDC5XXio90 4zbJpEuS/o7hNknB4XTnuRyMDfepxUlClaKND6PHMHVs/TPSgkf1YR5ZLe0r 3uhRtHYrW7vKWkB7qGzqEJ//T8mpa/lH/1/O2//MP3hXerYH7nExwsa8k9L6 SKJQXS9+rzIoy45rQcO9m8ysFdSy3/FhsmaEdBpOX0AeX2kFk3HQJyKaCsbt Zaqevh1iW6Fro2ierD6MyBNg8NwSnj4Yo/Q2dSRW/kZERrWpVNQGv7qjR94y VU2m0foPHYD/2tr3gam7e38DPLkvufjbtNq5Vt7EiUgoii5evJgSJuMA3PLU oBsscVR9VfJOmvNsJh1F8XKj8PBwKnejO+5JGw27dUoaO+VN/5AcFc1KskSN MXzjvtmzZ1OSRHfsnS/R3vZofTvxz09xE4MOvD5fsXNuSZJLuDnTmNjdMSIi 4saNG/oe+2kDXxNH0Hz6msMozZH0sdE+M5HPT1Xzxn/OMrb3Mra14QjYKKPv JA5r68rKSipaoiNQGko0RGvT5TMT+fxUNgShDTlDlDhwwcHB8eOPP9b38E8P 9B3EauCNlErqPxfY0dHpo9//Qd/DPz0wcOy25inLQw9c1uVjj/35KcRgP2gD vSFI4uzs/Ic/UCShQIGCgQOIO313Qf2/u1qqOw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output"], Style["SQUAWK!!!", 24]]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7773832513057528`*^9, 3.777383260270852*^9}}, CellLabel->"Out[27]=", CellID->589987228] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"AnimalConversations`BirdWolfChat", "[", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77738130522353*^9, 3.77738130755927*^9}, 3.777382363164558*^9, {3.777383078381094*^9, 3.777383151402853*^9}, { 3.777383194880528*^9, 3.777383211030629*^9}}, CellLabel->"In[25]:=", CellID->747922812], Cell[BoxData[ TagBox[GridBox[{ { InterpretationBox[ PanelBox["\<\"Hi Wolfie\"\>", Appearance->Image[CompressedData[" 1:eJztfQdAVFe+98y9dwpTYOhNepEivVtBpQhoaAIi0pk+A2qiCCgmG8WGJNHE xFgSNWJXlDa4idnsJvl2s/sSd/f7krz93mbNxtRVo4KNMu+ceymXAYZBwJHx /vaEncHh3jPn/O6/n3NcisrShAiNRlvLBj/SCtfHrFlTuCFdAN4sV66ViJSl JUuUz5eKStdEFqHgl619/8HXagpPN6g5ojAifvjhhyvD8Pnnn+u7XxT0CcCB 2tralJQUGxsb2liIjIxMSEioqakBf6XvjlOYQty6dauhoaG8vBzM+JisGJMz 9fX1QPjo+ztRmDR8+eWXBQUFbDZ7gtwYjujo6H379t2/f1/fX5HC4+P8+fNA TegoHKKHQUeZIxAIKioqKMEyvQA0C3jAnZ2dtbMCqB6ggL755psxL/jpp5/q oqrEYjG49dR/PwoTRWtr62i2KKDNxI1PQIPDhw8Di3fEW4Bbgw5M0lehMPkA 0wdsjxHnDigdoHom/XbAfB1RXoHbUdrnKcSIAgQYq0AFAMN1Sm8NNFFgYKDG rYGhAgTOlN6Xgu4AzgWwG4fTo7a29klaCOB2wx0oSqQ8Dfj888+9vLw0pgaY l1MtPUYE4MNwZwqIFCpyq0eAwQdTMFyA6LdXQMto9Aq8pUK1egFwXTWMECBS gK+q735BAJGSnZ2twV7K63nCAAzRcCvKy8uftsgnECkUT/SF4QypqanRd6dG xnCeUC7PEwBwWDQs1aeWIQQ0eAJA8WRKARSKRkTiKWcIAcAKsncMXlP+ztRB LBaTGQLe6rtHugJYI2SeAKo/bRaUYQB4kWSGFBQU6LtH48P58+fJ/a+oqNB3 jwwN4LkjG6uRkZH67tHjQEMSPiUOu8GAPLzTV6drUB28ppTOZAE8cdPOWB0N Gt9lGplVTzPAs0b2ecHr6f70aaQjqYj9xKExpAagxzUc+ZSUFH33aHrjhx9+ IHuOBiOcgU1FZv40NbGeEtTX1w+MpI2NzXRXNGSQiwrKy8v13Z1pDLIvAAij 7+5MJshhEyAtqQrqx4PGMBpeiZcBPwJPDAYvkDWUqb67M/0AxC/ZZDVI007j O056Pb/Bo6GhYWD0pmkQXhcACTnwNbOzs/XdnWkG8gqaaR1i1Q6yLwxMFH13 Z5qBXEtskLpmAORvanjG+dSBnOAw+OeLvGKUMkt0x759+wbGbdrVjYwXQJka thM3RSAXBhh8AIFcTBUdHa3v7kwbkPNfBp8kBY7wwJcFHrEhpR6mFOTowbMQ ryY/FIZtpU8Wvvnmm2fHaiVA9vepBRe6gBw6eEZ0NLlmBhjt+u7ONMAzaMjV 1tYOfGUDjhxOIsgkMXj/lwB5lR9RWEWjdqXWCvKIPYMkIewTfffoaQdFEn13 ZxqAXGv0jIwYmSTUyj5dQLZJnpFKcjJJKMNVFzyD3g05faP37bymBcjBtMDA QH1350mACqaNFxq5DH1350kACMyBr2zwuarJAnld57OQyyB/X71sLjodQa7D aWho0Hd3phb3798nJzSpLLCOIIepDb4Oh2yoPyM22KSAHCox4FJ5AuTVNwb/ REwiyLYrzdDLg8lr0Axet04uyAa/AXuFGuuzdDmhicIAyGaJAcddybFWg1es kw5ySM2AKz/JusbgS76nAuTogUEOoMZWNoZtek0RyGY/IIy+uzP5IC8Efkay VJMOw150r7HTl4F9uycJ8rPG4XAMKa9BtswNUk4+MZw4cYKstQ3mcQNmOVmM GKTF9cSgcfyuwQRMyE6NgW0Y+IShYfw3Nzfru0eTA40TcKgo60RAFiMGE08D 9ip5QxJqd6OJQOPgEoOpKiEf4AjYQsVGJgKD3Fhb48gbgzGx9AKNwTQMMaJx Ri0VPZsgDE+MaJxACvxfKuE7ERieGBl+Ri21dcAEQRYjBnAsxTQ6xXi6wMD2 k79165bGGbUGQHu9gzyk073gEzBcgyHPyNLmKYUhiRHg3pKDZhRDJguGIUaA itFIOQEkJCTou1+GAMMQI62treRgyABDqBTepGByxQjgGJiXJ7lkEggQ8rrv AbZTuwRMFiZdjERERKAoimHY1atXJ6WHWgCc3IqKCg0LhIZXv1MLeycLGkeg TlCMAL75+vqSJys7O3uKDoq9cuUKOWFHBiVAJhfkgueJiBFgD2i4nGRER0fv 27dvskwd4LyQi/nJAL83gMOLnyoAMUK29B5PjIAnmrziTzvAJ8FjPt5yWaBT GhoaQPeAEhntyuCLgCtTNuqkY4JiRAs94uLiNPTOcIAZB38OLIqamhqgp66Q AGRFDQ7gzw53WIZfh8r7TxE0xMi4Nh7UQg/gZQzkWIHkH81smBSAe1HKZUrx eAeIf/7558OjVcPpQQbwT8GTrrtKGhNAdABKT9NgzjSChhjRZVnBY9BDA2Ba xzQtRgToKrj1YxgzFCaCcYkRLfQAv3+8cAS4I2F+gJ7U9CMhISEax8BvgK1C FQjpBbqLETBBoxkVgB4GUJJEYTToIkYAPYYHuil6PCMYU4xooQdQBBQ9ngVo ESPAsCQf5alBD8pofEYwmhgB9ABOB3kZNUWPZxbDxQhFj6cQPT09HR0dd+7c 1QX4pzrAn0zKrTVWwgIHczR6BAYGGsxGE9MIDx8+7OzsBPRQtV9etDg2NCwi MioqEiAiIjIichAR/Q0gKio0PGJBzKKm5hbwh/fu3QNXePDgwWP3gbwpDQ1P 1lD0eBoA5hTQ4/btO9u270xJTctYnhURORtF0RGNwxGBIGhoaMTyzOzMzOzU tPQX1lXcvHmrq6trvD3R2ACKoofe0YMDzOb6ig0KZZlYInN2cUNw0AEQFEFR BPwfaDQ6bPT+hr9FYKMh/Z+E/9/3t4iZuWVubl5lVfXNmzeJu+jYJQ0xQoaz szNFjycM8Jj/7qOPXtu7p6i4mMPhEIV8dBo+0XRcONDoLDpqwTRx4lp7Gc8I tXSPsQ+IdQxZaB8433pWlKVXiLmbr6mjE9eCh7JQGvwjOhQpkDHwB4KAyxYU FOzZs+fD3/3u0aNHY3ZpNDEC6EEl2Z8wwHx9/Mmnp8+cTUhKBPPIwDBIC6Rv Rhg0xJrJ8xXMiLHxy3ZZUO6Xtjksr36O8Ej8880pv2nPqG1+7qXziRtPxFe8 s2j1G/MlL4esFHslJM8IDbfw8OTbWDK4KCQLQRg6xsA4Rpy4+PjTp898/PEn QKlp6dhwMULRQy/o6upubm4NDgnjG5uwSI8tSkctmSaz+I7xNkEK36S3Fso/ ydz179Kjv0jO3BSfvSs6d0984b7sEmj3pBc7pY33JBc7JY23peduSs78KDrx 97y3GpNrdkcVC2cuXmDp7cazNsU4DKiVIFtYLBafLwgMCj1x8tQXX1wdjSpk MQI8X4oeegFQMZeaLgUEBdERbGA6gBwRMDiBJs6SWcknEiuv5r7xbdGRW8KT D6UXepUtamW7WtGulqvw1kZq4JftPQpVr1KlVrapZc33RI0/lZz6V/G7f8p+ 5c2Fyiy3BTO51maYERMhRAuNyWDZz3D08fF7a//bIyZiBuhRX19PFfg9eQB6 dHR0NjU1B4cEwscbtxyAyWGCGAULnMsDlp1KrvxbwVu/Ss+rFWDSVWpFW6+8 tYfUeokm62/424F/UsPWhv/tb8Hbn4Wn/rTyjQPxawu9Y2fxZvAQJgYsYDq9 T4m4uu59fS9wlvU9KhQG0Xnv3hv73lyRkxseEQmtUzoN/MeloyGmLs8HpwED 48tVBzpk53oUzWow+9JBDqiHtl5SG/mfZK09sjb4U9n2sLz1F+mZz3NePx2/ XuqT6GlkxQCOEQYtWuAHuXt6vLrnNYonTwnu33+w7839njO9UeilQo8Wo6G2 qHGqc8T+hWX/yD/YJWtRy9rVkja1VEMyjLtB2aJogX8OqaLqkbf3ytu65Je+ yHvr5dlFEZY+LIQFDVrcX3bzcN+zdy+lVvSOBw8fHjh4yN3dEw9mADuEbkTH Zpk4lvsu+yB9+6+S872AIdIW8OyrJapeWXsPUBngN49LEsgTRXOvHPAEUA5c UAXYopa0dJe1/Lv0+MFFa5IdIywxLnS0MWioAL0D7JOJhGcpTBDAiThy9KiL qysRvgBTw2eyo+1m7ZpT8nXhwXvy5l5pG1AuPaBBLdNGvO1TN5PVwNUk4BYt 3fKmG6KTTakvZ7nGmGM83J+CJoqjs/PbBw8QPOnt7dX3mD1bAMN++N13nFyd 6bjFCOSIGWa83GXupbTaHyXnoMOieF8tJ9oHU9/AXS4D/6hDfvHDzPqVbtHA QQYcISxZFzfXD3/3ob4H7JkDUPTg8QSDD+OgoKE0FMHm2/vvX1L+9+ID34ka vis5fk14/Jro+LdC2K5NaoPXBFcWNZDa8X8Lj10vOfqd8NiXxQf3xZdF2nlD uwSFLDEWmAA+375zG/hfd+92DAf4JWXiTi4AQ/a9+Za7hweNMBERhAZpgjhw LefZ+yY5By1zDF7qEJbkFJHkFJbc35KcQpMcH7MlOsGWRDRH+DMZtjDyZ5Kd QpIdQ5LhZ8Ii7fyseRYMGu4UI3QmixkQGLA4NnbR4thFi/Cfgy1ucWz8/AUx EomM4slkATDkzTff9PSciT+mUM3gQr0vQkG86G/0kd6OuyGkRvr9GHeh9b/V kvAlukzH++7nF3jnzh19j64hANghBw4c8PLyggzBs7EIDYZWNWeib3r6Z2lw 8h4HwOTBG4rQcRebmH96/13pGJ4qHEaR4VQYBUTFQnBIGEWSiQMw5NAh4O26 Eyl7IMdN2Wb+Fu4mTC6tX5RgGGZhbeYT4O7j78435QksjD18HP2C3V09Z7BY jMGJ0VGM0EeWA8YmHC9/15n+LiYWfDrGEFiYevg4zQrxcPNyYhsxCUqQmauF IdAJwkkSEhJOkWSCwBly2NnFhUYUeICZQnkZbjFbFwjdeXYD08HhccLn+q+p Ll5dVezmO8MnzLN0TfaGbZJcURrfhD+W5B8QQ4Ngs1mWVua2dhY2duZWNqYc Lgvc29PHcc3GYmVlnk+wG8JGfIN9SstWVNZKCuXLAS2HXmNEuTIC/AModTNR fHDlQ1c3Dxru7oIHj4ew4h1CLi578eOVr6Y4RLrxrM2YXIRG4/KYYXNnra4p Xru5NCjSKywmULg+d8MOSZEyw97dmmvKYXOYyMCkDX+uB/+przm4zMjITyyQ pa+SpK0oTp7pC2uWPH2d1taUrt5UFDrf19TeODQ6WPRCXtUOqXBNtpOnHV/A YRoRKT9SgQKhi4aJEfDTxMTE1s4+KXkpcHP0PczTGI8ePXrn3SM8ngkcaww1 ojMX2gQcj193U3TqrvjcX1e92ZqzfZnHHODnMJh0F0/75MzFywuSV5amrhSn LS9JTsuPX16YsEKyLFuYEhjpy+UbDeEIYXZqqBY6bmjQ6b4Bnms2l1bukGzY Llm/pTRsjh+CInaOVsuyYpcXJC4vTMoRgbukZ5UuS89PyCxIzBOn5pY85zbT Ab+eJkloJB02oGvS0tLe/+DK3/7+f7u7u/U90tMVgCHnzzeGhUcxGWyMRmfT GbPNfQ7ErPlZeKpH3qKWtaqV798raxL7JUNnGKFxuGxLG3NHd9tccWr5pqKY xChrRzP/SM+yzYVVO+XJWYus7S1ppGnq40k/WzRI4hfsAbixsU5cVQd4Uho2 zxeQhM1hWdqauXk7FCiWb9wpK6vOX7g0ytbRYlaIm7Iqv3KbJCDMm7BJtZME ABhRMpmMyu9MBIAh586dj4iMQhBo3bHpSJi5694Fsu+KG3pgrr+lVwqTd7fk 50U+CTAJi1cVgk8yjbD0vPi1LxVHzQtCULqdq5W8qqB6hywjN26Gk3W/Y0If FCk0TUlCuDK+wa7rthRX7xZvqBPjJPHBc7ywM0CtrJKlb9otW11TMGdRGIoh No6m0vW5FdvE/qFeo0gSuoauwzBUIpFQJHlsdHV1XbhwMSpyDixPRehsGjKL b183p/ha0bEuZTvM2RH5XFlbp7zpWMKGSCtvDDiqOANYfGZm4dLVNcI5i4JN zI28Q9xX15Ru2lWWkZ/g7u3AMWahTAwvcx6UHLShb8A/WtibJa1YWLEdMERS XSeq3CYKmeONoH2ei4kpN1+2fHP9mrLqonkJEQJL/swAl/JNJdW7ZBHRflwT NptjROLhoOzqvwu8O5AkJSVCiiSPB6CgL15qCguPIOqOmXTMg2u7KSTr6+JD QIbAoo6BzCzM8LZ3lDW9t2RDluv8eXa+wKxFOWjkotAVotRlOYuik8IT0mPS Vi3JKEjMKExckh49JzbM3ccVY2D9Fmo/NfCXKANxcLbzDHBJXrFww3ZZ1W7p hl2i6t2iyu2ixMx5ngEOdk6WQMhwOEYLEqKWFyZnFS97LjduYXJkfPqC1FWJ 6XlJCalzYpZEevl5IBjSLzQGeUJQhcFkBwWHLklMfv31fboUUVPQAGBIa5sq MCiEWMSA0lA3lu0Lfsu/zD/QpWhRSwE3WnpJNR7dsK5D1Slt/Flx5nRatSvH CsyCEYcRvsBfuC5rfa04X55lbmfKMWWlrExYt1W2bqs0JSfRiMMmW6z47ME5 5fBYmbmJ67eIKmpLq3YBa0RYVSeq2gWaZN3W0he2FC9dsZgFvSSUyWECkRU0 17f0+RygZYrKM60czNlc1rLM6KptcsBMBhOjkS3kAfMHaCtjwf63D96+fYdi yGMAaJnm5paAwGBYpwp9XpoV00Q8M+lqzluPYPnQ5V4gRhRDakJ6FK1d8Geb es0HH2Zsd+ZY0/BS9uDZftKqnM17FEXlK3gCPniuU1Ymbnq1fNMrSqCM2Fw2 HnRBBiQJTAHR6EY8Zm5x0ouvyivrhJU7hdWQJ4Ah4so6SeVu8aY9svTCBAaH qKEFri7dL9xbUpG7eY9StG6lwMoE3DclO/rlvauX5izEGOggSUiihAa9deOj R9/T92BPSzx8+PBC46Xg4BAMpkrgiAqYnHyvhZ9m1z+QXVSPUlvYVzMma+0t u/xRxq4QvgsX4bIYzIBIv5LynPVbpLnCDGMTY4zJSF4et36raP0WYWpOPJvH wucMGbBIEDxXY2zOyREmb9otrYTSQzzQKmETbnxFnFG0hGtmxGACPchAEMwv xKdEmbVhq6hQvtzU0hjYT0CjVW+TJ6fNHyTJoClCJ0xrC0vrEydOUW7veNHT 03PxIrRD+h48FDVB2Dke8z/I2npPfq6vbnBY3ekQtihUPxY1XEyuqY9ThFp7 CsyMPXyc/YI8XT0dmEwMQVF7ZzvfYHffYA9HVzuMgQyqApwoDAbdwdk2MT1m 9eb86joJmSEDrXq3RFGdn1mQtOS5+eaWJuBPTc0F7t5O4JpuXo5MNgauZudo 4xfsOcPRklgG1m+SDIb6zc3Nt2yt7ejo1PeQTz8AMVK7bTuLxcZHE+EjRhmO UarnfgMYopY2adSm9o5StwyVUXn7dcWZVLc5SJ/fOZB6Qwb0ykDQgvyUs4wY QeE+5RuLoBjZKRqRJFW7pNW7JC+9WrZ6Y4GDixXJnSWlhGl90mlYRLdPjLi6 uX3//ff6Hu/pByBGfv/7PyQlLUVhqSrNCGXF2gc1Jm+8KzkLLJBeGWyjlbWT jNi2LujvqL4XnVrmFIkOEgQGLJAhOX3aQPZ/wLlhc1hBUT6KqvyNuyWjk0RS tVO4sU6i3Jjv6esEPC9gySAkJpLvMlBdMPgCJ6qpqWllZfXdu1Qcfhzo7e39 5I//Jz4hgclkgmeNQUf9TZ0Pxa25ITyllreNRIaRJQnu6bSBFzfEp34Tlrdk RkgSLDeCFUfJjoNtqWNYMmhOocucwmIdQ+y5VkTUy4jHDpvnp6wGJBldktSJ gK1SXSctrykMivQBwgc3ZpAZXMs4h5BE5whw5aV4S8YbUbMEXiQ6hnoJnDC4 2gMSUiAwO3nq9GTteWLwAAz57M9/iY2LxTCMKNdwYJtXB2f+T8GhXgUMg2jR MiOYJVJIkm7FpZ8kJ/9FrjksPQHaNfwn8eKa8MR10ckvCt5Md52L4uYrh28U sSCgfFNhtTaSCCFJdkOSBITPZLChacqiY1muc68WvHFdCK7cAG8hPPlt6Ul4 I/zu/xY1/FP0Xs3sVWYoHwoe4ALzTd49cowyXHXEvfv3E6GWQfFYOPR7F1n7 f5r1ygMFmOuxGTKEJLJWPIpC/GwfUqisuDystasVv/2+5HiO2wIUVrjRODxI krKNhUBQaCFJ1S4REDXKTfk+wa4MPKvMx9giryU3RCf7Sq/Jd+krk/6gV/H+ hYSqcDMPBgqFj7GJ6YmTp6j6+TFBDNFPP/3k5Q1PUoC7hdBoM7hmVcHZP5Wc 7C17n9AdWugxkkcMF8X0Stq7ZZeJ1XZE6xnWuqUwpP996fFV7tG4JKEbcdmh c2fh6kam4f9qqBvwAUASD38nuBKMRrNk8cv8U34Un1Ar2rqlLeS79C27wNdx /CXz1cKZiwQoXDbO45scPvyu9l0IKBC4efNmXkG+scAEGnrQqqPPtvJqXFrT ITkHrREpsYh70CbRmS1tvfK2Yfwhrwdvw7M/qpuSs1LfZBbCAPdnsRnAk5Vu WFn1inhUkgDDdZcQkEReXeTi7Yj7MXQHI/MNIVm/iE8B6dRvYBN3GZCB8Jc/ lZ7YNqfAAjPC3W3WvPnRzS2tlFmiHR0dHYXFRQwWk7D9wIDjyn3eV4UHemSX 4GjLBkkyJj3Gu3izF4+r3JFdqAzNtmAZw8J2lO7kaStatwKSRIt3Q5CkqsjJ 0wF3pREXjvXm8Jwb4jMkkgy7l7y1S9lyKrHSi2uLx08QeILh9h1UWF47Gk6e 4PP5eEaUqEmkWWMmFf4ZN8Sn1dDnBWOr0kXdjLHKW8vnFaq70sYdc0rceNZE aMPKwax4TVZVvVYXeJewuk4iXp83w9UWj4kgHjzb7VEFtyRnAUl6+kmieS/w dRSqP2a8muY8h8uAGofFYtXVv0JJEu14Yd06lhEbJ0lfDbq/wPmtaAWYOEJf qMdJEt251P9C1Sm79NbCskBTZ6Li0MzaOFeaumEXkdEbhSTALNkpypNn2Nhb EIEzP1On1xdIbuMkIWoYyCpy8CsoVN/mH6sOz7VkmeB1AoziUuGtW7f0PQ9P NQQCARGBJKq2gDRJcgz5MK22S9pM7B+iu0x4XLa0PZBdOp9QPd/GlyCJiRkv LW/J+q3CURgihq5NneiFLSXLcuIsLE0Jksy3nnUmaWOH7ALQj8Bm1lCRJO3W dld49p1FaxyMrIh4LIfHXb+h4gFlvo6OwaQXNAhoGB0p8Y39V/G7eBambaoZ QpDkobTpSsr2ZKdwFI+F8gScuNR5a14sHC13A0iyabe4bFP+7NhQnjEHzwQj 6c6z/7zy9S7ZJSCaeuWjkgQ6WYqW1rSXvfgOxNcGz0ipiCo60gZyLQd4jo0R VlVo1m15o0aUdUpJ0i1ruZr9eq5nDIYXJXKM2fMSQhUbVwGSVI7iAm+ql4rX r3T3d2YwMRhdoTOVPkk/i04CO6qbqFgYZrL256nbestUn6yojzL3wvB1whiG SaRU+aI2EGlRYmsg8BjbswTb5xTfh7UiqifAkL4mU31XdEzut5SFb7PG5jKD 53lLKlbgJBnBLIFBkjpJgTLDwsGMhq/os2eb74gouC+HlQzduLjQQhK1UvXF yteXOkZwMCZBErFYTJFECwBHmAjGZRph+AQ5G1m8Mk/8QNGsJoU4pkyGwNYD nY72Tmnj5vBcAb5JEcpEnbxmFJZlbaqXwVojog2RJOKK2pKMvHhjc7gJCZOG hpnPbFi0rkvaNMDt4R5W3wspIEn71wUHxL5LzFn4HiYYJhSL71EkGR1gkPgo 25ojYKFMnCSWgCQPnyBJ4FMva+9StOxbqPTg2qB4ms/YnJuRn1y5U0ooFzJJ gAICEqaselV0fCgH1izBwE6ay9zfp+3qkbaM2W21VAXcn3+XHH0papUjz5wg iVQmo0IlWsBDOe48GzeetREKB9wJJ8mTkSS9g7pA1a1suZyyJdEhhI0LNJYR I2ZJVNmmwqpdUugI15UO1TVS4eos/xAPFgumYNgIY41/2ncFx4YnIkewXWVw 58//CE+9vVDpxbfBayyR1JTUX375j76n4unFTMGM5zyi/I0d2Sgb6PcnTxL8 +qoeReu/Cg6tC0ozRqCdwGSi3gGuBcrl1XWKyqEkga5NnWyVONXeyRLDk7km KGdHZNEDySXtfR7UOzJVp/h849LNgQIHYhcvNoudl19IbU4yGhbaB7w4tzDM zJ2BwF3fgU1SP1/4QNn0xNQN/nS3q6XtnfLG/TFlDpgZrCBC6Obm/JScuMod 8so68dComqhyhyQtN55vCvMvKB3z5Tu8s3jNI2Bs96/y0EpIGHd9KG38bfrW EDNnYp9GcJ3FsfHUQuDRIPZJaEjdNN/Kh4EvqnIystgNSKJowjfAfFKSRKYC JOkua1Wl1S60DWAhTDz7hkTM85dW5OMaZ4h3U15TGJMYRdQasRHWUoewy6lb gcIiSDImJwFJHska38+oDTF3HtjMM2FJEkWS0bB/nviDrF2x1v4sSBKaFcP4 xaj8DuBLwiT7kJU1U0kSYn7b/lFwqCokyxrfOJGOIDa2Zs+tiK3cISPzpLpO mi/PmOnvimFw8YUxwl7rn/Lfq97uxVcl66DaSCTplyRA48TFJ1AkGQ1/zNj1 Xyv2ZrjM5jGg4WqEMGR+y66XvDcw4FMadB0gCbQnpa2d0gsXk6vDTZxg1Sod wTAkZK6fclPRhp2SAY2zvlaYkLaAZ2qEFzSjjkYW+xcpOyTn1TildVc3l9O2 AJIQUUQvL69XX91DOTij4Ybw9D8LDlcEZ9iy8YQXHXnOKfyTtJ1d0A58gjzB 506tVH2Vd0Dms8SCxcWjwIiNk/WyVXHPby+p2i2sBo7wTrHohezAcC8E6kaE gzITZoR+mFHXo2xXDwugDb9R/4u2TvG580nV/gIYmUdRTFgqorav0YKHitY7 pWeOxT3vYWxPFKwHmTkfilbiWWBVrw7VrZPFE7y1/So+ezx5Q5CJMyxtARqQ gXgEOheuztiwXbRxl3jDNnFyVoy1nSmMDtMRe5bZlqiCa0XHYJ0kqataqEiQ 5Ibw1MFFq72M7QiSSCUyqj5NC7rlcNvt/8reM89iFgoTZTRzBm+tf+qP0rM9 SpWG0pkikvSShAm0TPIPl3kvtWUKiHU5XGN2+IIARWXBxp0yZWV+UJQPisHC EyYdm2/mdTl9axdw2KWqXnmzthgamSQK1fXShto5pS48K4IkEpGUCstrQa8Y ngzybcG7QvcES4xPJIIznGf/Pf/gQ1nzk5EkQ4SJ7PJDcdOV5TsS7YPYdAZ0 h+l0Sxuz5MxFazYVZeTF2TpZEct0bFiCF/zT/qfwkBpugqEiqhPHJgnM3bT/ o+jd8oAMG7Yp3LoRg5KEIokW9Mja1Yq2X0QnX5sr8eLbEwu2wy08TyVV3oFr suAWE1PNkCHzCKslW29JTu+PLgs0cyMOakSZiIuXQ+aqpOAobyaXQew1EmDm cmnpi/fFjZrZGe3Xl4KH4vLf8vZnu0bzGbDMAENRiZjKAmtDtwLqlPvSC1cy di2wnoXgWyhbsUwlsxK/Lj4A/Q7plDvCQ4UJPMOiW3bpv4vfWR+U6cC2IErm WEYMt5lOAgs+IUYEmFGee8zX+YfgGUm6MxCSpK1H2vK71G2zzWYC5Qq+L4PB KBWWUiTRgi6FqhsfwG+LjhW6xfLpLBSlA+PE19Rxf3z5r3D5nqZOn0JdQ5gl cOVOy31F0ycZ9QWuMXyEheFLePGdp/t2+Q0ROB9dWH5bdJoon9PlFvAFrj1/ KWl4Y65ohpEpbpCgwSHBx9471tU97vOFnx0Aw7Ubluio7kou7I9ZHWLqhuFV jDyMlewQ9oe0nQ+lF3unOKpGZohaiv9G1tYjV92TXToZuz7Swp1NIzan6FsS zqajK1znfr1qfw+wmsYjRuDFFW1/Wrk3130Bj8kiCqG31G6lsjbaMTCSPbLW b4uPvxC03IrJJ9ZdOzBNK4Oz/2fVYXz6WsYMREyOJBm8ODCHVN8UHtkascrZ yBTt34UVzKybic2OOSW3RRfUcHslnfoz4D11KVrOJFfPEjhiuBfNYDB37NxF rfQcA6TA+ENFy/vp29JcZrPoMBXLoGP+fJeji9bdlpzDH8M2wqp8EiKlr1eg S81/XPFKiVesKYNHFGqjdGSZa+RH2bu7pIMZPR37Awye60XvvRSea4HxcKGE CEzNX39932OcZf9sgayy5ao74vMHYsr9BS4sOgPMCBthJc0IO7Os5hfFmR55 8/Cz86aUKoRX2ym9cClpc7S5L4fOBLLElmX6YvhKuAhLelktG8dyD8goRetH GTtTXedw8AorDpe/obL6zt27+p6Dpx1DVLYMnpH3VcGhdSGZ1gwTFF+MY8bk JTlFHE9a/x/x8W7FJY3y0amN1eNHf4Je/VByYu9csYexLfBHFtsFXFxW0y1t BiSBNQZa+0ASSnheT968P0bpwrVB8VUkxsaC4w0n9D0D0wCaT66s5b6y6Ur6 rtQZ4Vw6gzjqyAQ1irPzO7xQcb342CMFvsIXmrIjbGgzWcwZch0ZrIP9quBA id8SF5bVusDl/yw+2i3Dd4CUjnG7/uvgikna/E3RO8qAZSyETWxczOXy3nnn CGWQjImhMwIez+ZeRcvPwlPHE9ZH2weyUViZDPwdDh2bLfConyv6svBwl6wZ 90GGLwaffJIMeD0d0gsty2vX+qSdiau+r2wBToouhjRJSLY9kF+6kFSzyNYf gxYXnc/lLHsu9bPP/kJtPTEmhs4IEO84T+TNP4tOHE+sTLYPN0e50ClGgVhB fbkOm8NX/imr/o7obA/cWkSlHnFOJ4kwGjy5Lb1wNXvftbwjvcSOBMOYoF3X /Cg9XRWaY8MUEKt7ZtjaXr78225qFbAOGIEkoMFkWdOvwjOqlC2ZbvPNmTwU 36Ud2LIObNNs9/nHEiq/yn/3rvA8/jj3zxc+F+phRsvEedJLqEJpyyNp0yNZ 85DZH4skxIseSfNnOXtTXOdi8KgvGoPBiIqKvHr1r/oe/umBEcU7IZ/Bi9uy c1cydhR5LbIFDyC+hxRowBsN4LsVuie8F1fx/4ve7RRfgFkz2WW1tB1mY6X4 rjVwHxvN/Twfgy1DuzQ+eUX8Hq7rkavuiS8cXLzaz8KFWK/oO2tW++XLlOer I0Y3A9rAkwvc3g7Zuc9yXlsflDnTyJZJQ4kNDcH/zBn8YAu3Iu+4hrj114uO PZA2PZS2dMvwNCtgi6wdP0y8vVeuU92pjkrn8VinVrRdLzkm9VoCTwrGM0GR s6OoKiPdMeqkEFufSaET0S1r+3LVgfrZwlj7EFOMhxKHZ9GhQQuGPcrSS+yz pG6u6GzSpr/m7PtVcqarvLW7rA2u2oZU6b+yjKSPhtVGPgZPdJZFbfekje+n 18YQ6Uv8PIKw8LC7VHhEZ2jMxbBHFUZZe4ASkbX9UnLy0tLfrAvKWmQTZMEw wQ8sgifSAOHCRhjOXOsFdv6FM+Neisg7HLe2Pa32q1X7b4vOdivbesrbe8ra e0FTgqaCjgm0eNt6x1lGO05u9DET3Ovn0pO7o4o8eDbE9hrOLi5ba2upUjTd of2xHZgUdX8w6rrweGNSjdIvNcrK15xhTOxNRMfDKUw6yqYzTFGON29GkkPY Gr+U1+aKGxIqGpfWtKds+Sh9x58yX72as++rvIP/Kjhyo+T0I0Vzj7KlR9E8 XgKMo+F1s98WvlvqlWDO4sNjtBAkNS3j1q+/6nvgpxPGFO+D04fnd4D2uS9t vCY8diG5Ruy1JELgbmdkwkHRgY2/oe9ARwBb+KiRGca3ZZm4c61DzFxjbGel Oc0umhm/OjC9Omzl3mjFHzNf6RSfU8u0lR0+dhuUJMr2r/MPJttHMBEGfrow kpmVTVWPjAu6mAFDqaIiHJ9O8flvCt+5+NyLLwSnJzqG+Bk7OLLMzDEum47R yMCT+/DULQTjYCxjBseSaWzDNp3Btihwif5sxWsP5U1TwZBBYivb/5q3f56l H0wi42cELs/M6uykzh0YB8Y77P17/7apla29itYOyYVrhUe+WLmvNfXlvQuk Eu/EBaY+LkxLS5RvQjfiICzw/KKQNhiN8IxI8OM7Hl649o7wvI6FQ48lSVqA TfKXlW+EmXnhy34JkmR3UgUk44EukkSDJ+ohH8OtUKXqkeLiT6ITV1e91Z66 7Ujs8y+F5uZ7LI61D46w8PQ2drBjW/BRLgcIEwQDIoWJYiwEizb3uphY0yma kl2VyJLk87w3w8296TTiMHskYzklScaH8crwkcMU0FwBWqO5t6ylp7z1vvzi d4VH/5z1qmrZy2eTqo7Ert23UFk3V/hSRG5FSKbC/7kS73jlrMTDC5XXio90 4zbJpEuS/o7hNknB4XTnuRyMDfepxUlClaKND6PHMHVs/TPSgkf1YR5ZLe0r 3uhRtHYrW7vKWkB7qGzqEJ//T8mpa/lH/1/O2//MP3hXerYH7nExwsa8k9L6 SKJQXS9+rzIoy45rQcO9m8ysFdSy3/FhsmaEdBpOX0AeX2kFk3HQJyKaCsbt Zaqevh1iW6Fro2ierD6MyBNg8NwSnj4Yo/Q2dSRW/kZERrWpVNQGv7qjR94y VU2m0foPHYD/2tr3gam7e38DPLkvufjbtNq5Vt7EiUgoii5evJgSJuMA3PLU oBsscVR9VfJOmvNsJh1F8XKj8PBwKnejO+5JGw27dUoaO+VN/5AcFc1KskSN MXzjvtmzZ1OSRHfsnS/R3vZofTvxz09xE4MOvD5fsXNuSZJLuDnTmNjdMSIi 4saNG/oe+2kDXxNH0Hz6msMozZH0sdE+M5HPT1Xzxn/OMrb3Mra14QjYKKPv JA5r68rKSipaoiNQGko0RGvT5TMT+fxUNgShDTlDlDhwwcHB8eOPP9b38E8P 9B3EauCNlErqPxfY0dHpo9//Qd/DPz0wcOy25inLQw9c1uVjj/35KcRgP2gD vSFI4uzs/Ic/UCShQIGCgQOIO313Qf2/u1qqOw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output"], "Hi Wolfie"]}, { InterpretationBox[ PanelBox["\<\"Good day Birdnardo, howl are you?\"\>", Appearance->Image[CompressedData[" 1:eJztXQlcE1f+fwQEBBXCJaDWqwpY2+Jta7el2rX2drW72q3bVevValtbu1X/ u/+l2/67tNYbPDilWEWtckMCgQRQQfGg1laLByEkEBAQEQWU6/97MxDHCUeA JJOM7+szn8mQzLzM+873d7z35o1c+sm8FQKE0DpbeJm3ZP2Ln322ZON8R3jz 54/XfbDy4+XLXvn48+Url382fakl7BS1/cfbrQSmDdJGBB1CrVbLtJCfn891 vQi4BHAgICBg7ty57u7uqDtMnz59zpw5/v7+8C2uK05gQFRXV0dHR69duxZa vFtWdMuZbdu2gfhw/ZsI9IbLly8vXrzY1ta2j9zQhp+f3549e+rr67n+iQS9 R2xsLJgJHcXBTws6ao6jo+OGDRuIsJgXwLLADT5ixIiuWQGmBwyQXC7v9oC5 ubm6mKpVq1bBqQ3/+wj6CpFI1JkvCrTpu/MJNNi3bx94vB2eAk4NFdDTTyHQ P6D5wPfosO3A6IDp0fvpwH3tUK/gdMT6mCA6FBBwVsEEgONq0FODJfL19WWd GhwVEByDnpdAd0BwAX6jNj0CAgKM6SHA6bQDKCIppoD8/Hxvb29W04B7aWj1 6BDAB+1gCiSFZG45BFx8aAJtAeG2VmBlWLWCtyRVywkgdGU5ISApEKtyXS8M kJSFCxey2EuiHiMDGMIKK9auXWtqmU+QFMITrqDNEH9/f64r1TG0eUJCHiMA AhaWp2qyDKHB4gmA8MSgAIPCykiYOENoACuY0TFsk3jHcFi1ahWTIfCW6xrp CvBGmDwBqpuaB8UPQBTJZMjixYu5rlHPEBsby6z/hg0buK4R3wD3HdNZnT59 Otc16g1YSmgiATtvwLy85mvTWVSHbWJ09AW448zOWe0MrN9iRm6VKQPuNWbM C9vmfvexuiNJxr7vYF1SHthxViA/d+5crmtk3lCr1czIkTfiDD4Vk/lm6mKZ CLZt26a5ku7u7uZuaJhgDipYu3Yt19UxYzBjASAM19XRJ5hpE1BLMoK6d2Bd Rv4N8eLxLWA08F6QWcaU6+qYH0B+mS4rL1071m/U+3h+3iM6Olpz9cw0Ca8L QCE1P3PhwoVcV8fMwJxBY9Yp1q7BjIXBReG6OmYG5lhiXtoaDZi/lH/OueHA 7ODg/f3FnDFK3BLdsWfPHs11M7txIz0FGFN+B3EGAnNgAO8TCMzBVH5+flxX x2zA7P/ifScpBMKaHwsRMZ+6HgwKZvbgUchXM28Kfnvp+oJcLn90vFYazHif TLjQBczUwSNio5ljZsBp57o6ZoBH0JELCAjQ/GQeZw71CCZJeB//0mDO8qMH ViHyVOouwbxijyBJaP+E6xqZOghJuK6OGYA51ugRuWJMkpCZfbqA6ZM8IiPJ mSQhjqsueASjG2b3DeeP8zILMJNpvr6+XFfHGCDJtJ6C1ZfBdXWMARBMzU/m fV+VvsCc1/ko9GUwfy8nDxc1RzDH4URHR3NdHcOivr6e2aFJeoF1BDNNzftx OExH/RHxwfQCZqqEx0PlaTBn3/D+jtAjmL4r4vvwYOYcNN7bVv2C6fDzOCpk zc/SZYUmAg2YbgmP867MXCvvDavewUyp8XjkJ9PW8H7ItyHAzB7w8gKyHmXD b9fLQGC6/UAYrqujfzAnAj8ivVR6B78n3bOe9MWzX2dMMO81Ozs7PvVrMD1z Xuqk0XDo0CGm1ebN7QZuOVNGeOlxGQ2s5Xd5kzBhBjU8e2CgkcFy/pOTk7mu kX7AWgGHZFn7AqaM8CafBv4q84Ek5OlGfQFr4RLejCphLuAIbCG5kb6Alw/W Zi15wxsXixOwLiY/ZIS1Ri3JnvUR/JMR1gqkEP+SDt++gH8yor1GLXl0QB/B lBEeLEthRqsYmwt49jz56upq1hq1PKA952BeUnMf8AkMZzHkEZnabFDwSUYg vGUmzQhD9AV+yAiYGFaXE2DOnDlc14sP4IeMiEQiZjJEwxDShacX6FdGgGPQ LsacMgkCwpz3rWE7eUqAvqB3GZk2bZqlpaWVldWFCxf0UsMuAEHuhg0bWB4I oka/k4m9+gJrCdQ+ygjw7YknnmA21sKFCw20UKxMJmN22DFBBES/YA547ouM gD/ACjmZ8PPz27Nnj75cHQhemIP5mYD9PFi8GKOlBZfm5o5LSzP+q1EAMsL0 9HonI3BHM2f8dQ34JNzmPR0uCzYlOjoaqgdGpLMjww+BI5ulj4rJ0NTa1Nja 1IQJ0OOvU7Shv24A5vRRRrqgx+zZs1l2RxvQ4vB18Cj8/f3BTskYAK3wpwDx rHbAon0c8+v31zRrR2ipr2upudVYePXehXP3zp5qyMtpOJOLS14OvIWdjVcu N9+sbKm93drY2MH34ch6YgtLRnr04MEu6AFRhqaPFZS/M7dBL4BzmZNxgVse awWbGE0qRX12xu3QwKov1pT/5ZXS531VTw4rHulYPEqoHOsGr3hbU2DnGBfl OM+SKWNLnn1C/cqMisVvV326ombnd3WpiY3ya4zT6YEnvVtAPD8/XztbpU0P JiA+hTtdd5PULUA6gNJmk8yBxnr41m65e+feudO3g3dWLH+n9NknFB62cltU aIGL3ArBdtEAXBSe/VXjh6qeGKJ6gn59sKH08VB6uSnHuhaPdioePgg+WShA cmukcLMqmeZd9Y/VjUXX207dB7BkRJdpBb2gBwvQrN26Fh0Cqgqn7oUzwzGa H/IxGq8W1O7bc+Pv81XjPIEDmBXQsv1RkQNSuAgUrpYKVyv8CtvOFkVCpPCw wXwY59lxaaPNEJAdeFUM7gdfLHJEcnt0HaGSyY93Zst0R49kpAt6wP7epSPg jLT7ATXxb8ecOXP8KGj2gK9ilgOEGDYFXAuwBeo/TlM4C4AVhZaUSjhbUKzA lChyQh0UIImrFVaMzkjSVqgPeLvTvIIvYo65WMJb4CQ+fW/FRHcZgQbqzKkA evBgSJL+oWmU5uY6ScqNha8BE7AdsaHbnSIGNGiHxGCRxNkCWv8BE3QjCS6O 2O40Xv2dqk/PwyUKusgI0EM70U3o0Q3ajUudOPHGormqCaOwg+GAm6xTxeiy KMe4tnkgPSLJIFQ8bEDzjTJclV4pSbcy0gU9wBAQenQKqjmaykorP1paMunx 0hnj1S9NhcaC+7oX9KAFQTnaqackgQ25HVL5jmy9f6/XP6ULGQHHkrmUJ4se ZuY0GhkUQ+DmLXvTr2TyGPVL09QzJ6tnTYHQA5Sk1yQpHuGgK0lAqdp9Enk/ VPaGn6ZWPUVnMgL0gKCDOY2a0KNnoEKJO4ejVBNGqmc/U/ripFK/iaAkYC9A /HtPkqH2PSYJ5QJVrVulqVVPoS0jhB76ARXO3E04WjLVCwREQxLV+KF9IYnC w7Z3JLkdshPXqqmjfGyXYM2EhQCzM3r4+vry5kETRgLlst7LP1vyzDj1TAZJ Jo7qvbmBAMetn64hMNPc2KL6TAlVqx4rCfOhNIjqrCH00BvavFY1tjUvTGgj yawpJdO8HwQdvSCJi0Dp494dTzxBajQkwfrjatl4/aqmVrqD9QAoQg8DoWL5 X7GYgMUBksycXPrcUw+ar+ckgVflWDeaBt2RxJJOrRQNQKpxni137/ai8iwZ YWLEiBGEHnoA5SXWBH4P8S8YGiwmWE8mKNyt26JgaEG69IQnysedu3NLGCQB W2ODSmdOxvXRk4wAPcyvk91kQbkl9dnSh3zXmZOLh9ljkjhbqOwQXXoW4Ix0 1I0kAjqjW2iFKt55HdenhyTRlhFCD/2DTpVUVqhfmVH6gq/Gdy0e7QS+q3Ig ypk9I27dxzkv/0E5oCckeWygTiRxtaRJIrdEZSv+Wl57535dXY+qz5QRiHwJ PQwFiieVHy8rmebT5pa8NBUaUWWDpAveDP4hKiwsPDgyKnP+q6AncmcdfBXw Qof0150kchdBSX906tUXAnftzkhM7FHdNfTYtm2bWQ7wMxdQbsnt8F1tbonf xNLZ08u8Bp+fNDYsPCIyKDBy587IoCCgyvmpPm086ZYkg62VeMBAZyTxoElS xCBJzsvPhYZHRO3adae2lusrQqAFOlty9pQmW4Kj4MljfvrXhvDQsMjAwH27 dgFVwkNCDn/lX0T1tsjb+aBwQsUQyzghVXuBbSU4rq6WpT4epeM8S8d5PFw8 NaUEdMbVUgG65CJQ9Uen/SYDJ8O3by8rLW3F8makIdMEuqOl5lbZG36lzz9d OmtKxXNP/vzuvNCQUBAQYAhdIgN3hkREnnjNT90fKV0ESook14TodyG6KETn hChPiHId0QmqHHeyyB3jdsrLPdfLHV5Pe7mf8fI46+2R7+3xs7f7RS/3yz4e Bd4ev7tYXhWiQmdBiR3Kf2Z8eHhE6LZtapWqlZDEBEG7JR8tBbek9KWpN557 Kvmf69kkCQoKDw6O/ubrX10szzqibCFKc0TJjijBEcU5oFitkjLaVewzROzl KfbGRUQXLygeYiiw08sj0dkqyQGJhBbpdkj85IjI4ODQ7dsJSUwUVCa8Zucm 1eQx5TMnFb76fNTOHRG7d2sY0i4mgRHhEYdnTo+zQbFCQbwDZgiURK2SMAiJ RwglPkMkXh4Sb8+Oi5dHkrMVHCReaBE3AMU/5hi1Y3vIzp2EJCYKujs4OlI5 eUzF875nFy9gyUhbCQqKCA37ceMXiQPbydBZGYREwwYBSdK8PNK8PTsuFEkS KKbBARPc+0dt2RwSGEhIYqKglOROzCHVFK+qF3xT13/WMUkonuwLDo55elRi f5QgtOiCJCme9t2QxNsjyaWNJPCa6IAO/O//hAUHV5YxBqdphmT3Yv4XgX5B kaQu8Zh68phrs6Ye/O7biL17OyYJWJyIfQeXvptkgxKcBF2QJHmwTXck8XxA EqFFkh36ce2aqB+i6mpvt9eqnRg9HzxAoH9QzVEjTjzjO1Ly5iwsF7vYDskD Jdm794dN38W5948f2IFP0kYSBwQE6IIebJI4CYB10Yv+fOBg9H06J0bN8mu8 fkU9e7pq/NCawE14J7FBHIIiSdWZU9IJo8WL3o4ICdnXoYy0u68Qq8Y9PznV BiU6YfdVE9FAmBOvIYmTIG2su4TyPXQkyaFX/I7GxLbgmaSYIc1VlUpvdzzN xwaPyoYgHVeV8IQrUCSpPpeXNWFU/OplOIfWJUlCwyOS1qwstkdXnC1+E6J8 ITotRNmOKN0RpVB6goNi2B4zWDxuaGq7B4IjnfZCM+chc9MfHZnolZKc3GZl mpvVMyfJrVDxEDsgSdmrz+GdhCEcgrpzb10tOP70iPhPPgwLC48MCuyMJFAi 9uyJ2rr16mODlA6o2NlC2Z5rVTihQidUQKXXzjqi00PtT45ylj3ulu7lAVQR +wwR+QwRU4VizpAk137gvWA7BSQZgI4MF2ZlZkFNGpVF6llTgCGKwdZFTnjC YEMO3t+LQWsE+kG7f3gzNKiwP0r6aCUIBZ2N71RMggKBSGf+MEFlj3teHvTa OFtQc/EExS4CJZBHiIqp3sBrLoLfB/e76Nn/3LCBp0Y4Hh/tLBvjluHlkeza L34QinPEJQGLj8XF0D13vvUvGmyN5wi7Y4YUInR773Zcvz7PACXoJWiGNN6v WPJnaBfVABT7j7XdKgm2OBGRJ/84Q21BjVd0oMpAVGyHim2R0hoVgxdhj2d4 4b4eapowsEXp2FZo5hQ6Cwqc0CUhAoP1qxBvXAWaDcTTjak5xbYgIFClmqDN D+pJYHzQJr7xvvrl6XDDFrlaKRzRsY1fhHXtk+zeHblrV9ju3Wmb/nv6269P 7NhyYudWKCe3fZ8b8FXehk/PL1/06yvPX5kwqnCoffEAijP9kWIQJozc1RIr DwgO2CYh7hyk+wehgNlSOAsUbv0Ug/vJ7bCAqJ56rD5DhGtIGMIh6KDmk2XQ Igp3G7i7iwehmA2fd0GScAhtAgPDdu48EBoqEadKMqTpaZK2gv9lSKQyiSwT 9mckJ2dGH8j5PuD8ivcu+U26PtyhjTC2WHOAjQ/GpQip0QUDMZfwBGR7VDLV 6/bura33GnAliZXhHM3NSh8PEHY8/sdZAI5o7BefdWhuIoA2u3cfiog4GhUV e+BAekKCNDFRGh8vTWgv8ZoSB68ZiYkZKSIJMEeWCeyRHTmcs+m/55f/7dLM Kde83eWetnikAWWnsGvqbnNtrNvvfpNuffflvdMnQOPaqkcYwjkoJbkbexg8 gaJBSA5uA0LJy98LjdjHclyBIQfDwlJjY2XJyXSRJiVhGnRdgEg0ZxLiM1JS NISRxsVl/rj/+N5dJyk7BRtZUZGyuLjUFJHqZnUrTRGSZTUdUDypS47FI1qH Dypb8FpywP+F7d0buSuIyZAfQ0Kg0YEb3RMjMRFEJi0uji6w3b6fQZikpHSR KD01rc1OwYZIDOYpPS5OEnPsbk1NK064NjYTV8R0QLXF/SuXWyvKi8sr4o8d 20fZGuygUgU8kLgDBzJTUhgt3mmRxMcfT009k5l5NisrLzMzWyyW0KZHW2Rw oU0V3sb2KynpZFratd9+01StiZgb0wHFExD5E2JxRnw8uBygHrSPChvR4eG6 0IMup6TSqODg1cuXL1qw4JMPPjgcGQl7uv06fCATHN2UlM/WrJk8ceLUqVOX LFlCPzCE6IlJoaq8HAwE3M5gVsQxMfHR0XEHD6YcPQp7dPFAoKFPpKYufvdd 5iwYKyurT1evzk1Pl3TJE/oUz06bxppEc+TIkVaiJyYCKmFy+cKF1JgYmg80 Veiii4CATTktlX6wbBnduJYAgQBe6Lf/Xr/+VEZGx3YnMTEtPj5PJnv/vfdo Ugko9OvXD97Cq4qMQTIZQCucpNpRp7BF21ikpIDyDBgwAFpWYGGhkQJobngd 6ulJE68zGYEjPDZsGM0uzZdpnmzZsqWV8mO5vkIErbU1Nbo7HtoyAkLx3Vdf aVhBw4IC7IF2Dw0MBKe0w1OAWImOHRs0cCDT0MC3bGxsYOPzdetaCUm4Bq3k xYWFGlvTC5KArfly40b69mfyRIOwoKDOSAI7ISCCr/s+9dTI4cOdhEJLxhHo mZuEJKaAX86c6TVJ6FbeHxpqwWAFKIP74MEjhg/3Hjt21fvvgz3q+iDg3EKB jeSfftofEvL1v/71zttvf7h8OXtCX0sL8U+4wumsLAkV2vTO4mCeiMU7N21a sWQJaEJYYCC4KOLYWDrkgShYqoMc0R4RxMJAOZCmM1lZ8HpCIin49deqiop7 DQ3sShO2GBEN9fX4Tu+tT6LhyUmJ5ExmJrQsWBY4IJ29h/2dxTVdHAq+AvE4 zRyQONiGA57OzATFK7xy5dbNm3TNIToGS0S0xQiAa94XGWGqAd2y6VQGtY9H owudQsF1S0hIjY3NTknJSUsDEv6Sl0cn8GkQnhgQ1LUtLylJi43tO0kMWoB1 OenpQZs3z3vzzSkTJ4738Znw5JN/W7Ro+44dCoWilfDEYKAvrPzKFfGxY1Ld 8macFFAncGvpAEobdnZ2ly5daiU5fAOBIknBxYu9Dm2MU2RJSWBrXF1cmFlZ AZXUpR925O/v30oiZUMiPzfXlM0NGJqslJS46Gh7e3uco3tYRqyo5H9ISEgr 6eUxJM7n5JgySTIocwMOyQxqXao2DaFLe/fQ9et41S3ilhgIcGFzpNLe9doY VUxEoqP794PLqu2TzH3ttary8lZCEoOhqbHxeGoqPeaHczJ0zZNskQiC3+Ad Oz5etWrBvHkL58//YNkyiHfS4+MLC/CSW4QkBkLj/ftZYrHpk4TmCU7ZpaWd yczUlNyMDAjNCEkMClCSbHNQEiZVNGNo8TDaxERCEkOjoa5O1uecvC4KYKCD A7fFMTFFV/HiBYQkBsLtW7cM14J0yRaLIYZNYyTt9UsSOGzVjRtcX0g+A3fc GDK0yUxJObRvX1x0dJ5MlgcuRHo6cAZOR3f0aHrxNIXeA6TSpUp0ByL4VOBZ cX0h+Yzqyso0ffTudVgk1PjV1+fMEVhYzHnppY9WrtwaEHDkhx/gT+BwAmfy qF5jYE6ORALlFOwELslk8dHRqTqkbuADqTExF8+dw7+E2BqDwaAkoZOlMT/+ 6OjgoElr2NrYDB827A/PPvuXP/1pzYoV/16/ftu33+7euhVKwJdfrluzZvqU KZMmTMjofFgskySSuLhbVVVcX0We46YhSUKLySmpFAigSZZ22EnHQtDmzSAs XQ9EkSYng4xcyMvj+hLyH9VVVQYliTQxEY5/JjPz09WrofUtBQLNAGnL9n46 Jj083N2BUaeoJHDXGkKnYTsYsUagb1SWlxuh4wYPlpbJFsybh6hR9HjqBGPm hY21tauLi9eYMauWLhXFxOSkp2NfukuGwCtUu5Jk4w0M+tqqioqMNk7gZFra gvnztY2LtbX1vDffFMfEnM3KkiUnd6shGQkJwBC1UtlKGGJg0JdXKZcbhyR0 egTil6AtWyDS8XR3t7GxAUnpb2s7xNPz7bfeSjh0SPOxThnSTqFyasUTEtEY GjRJFNevG3PEEe70l0ggyAVH5XBkZFRw8E9RUbD/TFZWZndD40BkIC4+npZW S41uJRpiBNAXuejaNbFxh6XhjBmVvssWi4+npmaLRDhr2q2JofpozufmNlHD zwhDjIMHA1w5GrtI9+l0m6XHXgqVhqU7aFoJQ4wI+lIXFhTgUdAm2QVMT6YA DudKpZq5NgTGxAOSmOQoaM3Erqvtzz4iAmJ8aKIbUBIdn0NiTIbgbj6xuFqT cicM4Q6N1PBFkxrjijUkPj47NbXuzp1WIiCcg7r+VRUVEupJiXrgiT7Gikgh Aoo5Vlla0koYYiKgWqGirEyanJwWF9dru4OfvQkbKSkZ1BHoB//2lDP0IxnT EhLyzp5jVo+Ac9B3693a2lOZmeCfZFCJzZ4KSHqaJCMpKfNQtOzoT/jRvlIZ lHRxKvXI3zgpgy0P5oCz6BEfj5/pKstMP3jgyr6QhrjDTRU36PpxfIEIKGhU vejqVRnVBa9pTV00BBiS+9//XB03pHCo/fWRwoKJj19866W89WuzI0LTRWL8 IOjUtAz6SeNUzJIO1o3ygtqe4wdvqSfVH98T9Mu8lwuHOyjs0XWESv0mEIaY Jhrq6wsuXpSlpEBoLGlvyq7YAn+Ni70+2lnZD68soBiEiu2R0gaXIlfLgile 51f+/Xjw7gyJJDUhMS0mJkskOpEhBb8UHKHUo0czRCJJZlZ2eOivb8xUCPG3 8JIWLgL8uPuB6P7Fn3GdyExwU4JGUu41NICq5MpkabGxICzpnbEFZEGcmh0R JnezotdFKnKyoJe5wQ0txIvg4HZ3QpfGDb3006Gq27WN9+833qpurK+/VVn5 2+Xfpfujzi9ZWORmpbSmFq1grrLkiO79fBbXhpDE9MCMKapu3Lh84cIJiQTc WmAL3P5Mv0KamJAuEmXtj5J72OIFSpy0irMACCC3Rre/+WdrqbK17i4cs2zO s3eP/IiPXq6uOXqw2JpargKkg/lFB7w0UpOqmK4QNxeCoDswqdLc3AxsATN0 OiuLHn7cRhjwSJOTZWBuxropBtJKwmhoIV4kpdASVX2xBg5Se3h/8RiXyg// XrPju5sbPyl/53Xl+KF4f1RooRVSMDREAccZgJReg1uoVAmB6YOVrKi7e7dM pfr9l1+AMJkQyMTGihKTLk3zUdqxSUK3tWqcZ0t9HXyx9ocQ5RiX4iF2Fe8v KJnmrXzcufT5p5vK1PAn9R+n4aVd23kCG/BWPWsKNz+YoA/QTm2B63KrokJV WVW46E+KfuBRPGQyFK5WhQhVf7WhpeYWtHj11xtLn3vy1vdf3Vj0Vk3g92Vv zaxcvfjGO69Xf/OvO4d+wAt4tVsc2JBbofIFr+JzEIfETKH1PNWbH79fKHjQ ypq2BltzJzoSPlCz9Zua7QGgGJUr361Y8dfqrzaWTBhV/Z/1VZ9/2Hi14N6F 83gBr3YhaiPJ/Nn40IQk5o8W6vlCFUv/IrfUIokLbus7lI96N/GYwt2m7K0X G05mFo8SgmdSlxKncOtX9soM+CuQBAwT64vlc2fhExCS8ABUI95Y8Bpe7pmt JNjc3N61peVObfEIB9VTj6lfnKQc7VQnTgSSgE8CYU7RQFT95Rf10lQsREyf xBaBx8L1byPQJ0qfGYftBTPLQbe1NVLPeRY+0NJQXxO46fauzVXrVoFnUjJ5 zJ3DUZWrFtGZkMqVi9jWyhEp3Kwai/BzrkgIbN6gmq+5orz4sYFFg7RC4Hae 3E04Ch+7c3AfEKZi+TsQ75S+4Fv1yTI6fmksvIa9ESFi+TMgTXfj8LpIZFlP 80YLtYRfwSWsIQ+3ssa7gP3FIwbd/+X8/cu/Npw6AZ9XPTUcohvYALsDOyEu xqGNmxWYJ4bvalVogW5964/PQhb3NGtQDsm9/DPYOjBkREF1vmDmDEAgCNDc ZW+8oHFBQTrAS6G3mxRy8ElKpvvI6cWj7dpkBK9Eb4UqP1lGfYgoiTmDNjfl ZaADcnuqcYEqDqitxa2R0tu9au1yWkDwh4EnGgcDNjSt39LSkJN9c/1HJRNH gSsL/gnEztcRqgnajP9KSGLuoPQBnFK8VrgtAulQeNqWzhgPDmpdWpJGMR4C 0xHFVGFYk8bGe/lnayP3grzU7tvbSh7yzC80KRX12dJ7eTltvXIP/tCkU64D PkN8D35DmwbAjd6ZCcyWJqwhxMrwD9jlaHrI6yAgICAgICAgIDAlIIS4rkLr /wNyYhfr "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output"], "Good day Birdnardo, howl are you?"]}, { InterpretationBox[ PanelBox["\<\"Cool as can be\"\>", Appearance->Image[CompressedData[" 1:eJztfQdAVFe+98y9dwpTYOhNepEivVtBpQhoaAIi0pk+A2qiCCgmG8WGJNHE xFgSNWJXlDa4idnsJvl2s/sSd/f7krz93mbNxtRVo4KNMu+ceymXAYZBwJHx /vaEncHh3jPn/O6/n3NcisrShAiNRlvLBj/SCtfHrFlTuCFdAN4sV66ViJSl JUuUz5eKStdEFqHgl619/8HXagpPN6g5ojAifvjhhyvD8Pnnn+u7XxT0CcCB 2tralJQUGxsb2liIjIxMSEioqakBf6XvjlOYQty6dauhoaG8vBzM+JisGJMz 9fX1QPjo+ztRmDR8+eWXBQUFbDZ7gtwYjujo6H379t2/f1/fX5HC4+P8+fNA TegoHKKHQUeZIxAIKioqKMEyvQA0C3jAnZ2dtbMCqB6ggL755psxL/jpp5/q oqrEYjG49dR/PwoTRWtr62i2KKDNxI1PQIPDhw8Di3fEW4Bbgw5M0lehMPkA 0wdsjxHnDigdoHom/XbAfB1RXoHbUdrnKcSIAgQYq0AFAMN1Sm8NNFFgYKDG rYGhAgTOlN6Xgu4AzgWwG4fTo7a29klaCOB2wx0oSqQ8Dfj888+9vLw0pgaY l1MtPUYE4MNwZwqIFCpyq0eAwQdTMFyA6LdXQMto9Aq8pUK1egFwXTWMECBS gK+q735BAJGSnZ2twV7K63nCAAzRcCvKy8uftsgnECkUT/SF4QypqanRd6dG xnCeUC7PEwBwWDQs1aeWIQQ0eAJA8WRKARSKRkTiKWcIAcAKsncMXlP+ztRB LBaTGQLe6rtHugJYI2SeAKo/bRaUYQB4kWSGFBQU6LtH48P58+fJ/a+oqNB3 jwwN4LkjG6uRkZH67tHjQEMSPiUOu8GAPLzTV6drUB28ppTOZAE8cdPOWB0N Gt9lGplVTzPAs0b2ecHr6f70aaQjqYj9xKExpAagxzUc+ZSUFH33aHrjhx9+ IHuOBiOcgU1FZv40NbGeEtTX1w+MpI2NzXRXNGSQiwrKy8v13Z1pDLIvAAij 7+5MJshhEyAtqQrqx4PGMBpeiZcBPwJPDAYvkDWUqb67M/0AxC/ZZDVI007j O056Pb/Bo6GhYWD0pmkQXhcACTnwNbOzs/XdnWkG8gqaaR1i1Q6yLwxMFH13 Z5qBXEtskLpmAORvanjG+dSBnOAw+OeLvGKUMkt0x759+wbGbdrVjYwXQJka thM3RSAXBhh8AIFcTBUdHa3v7kwbkPNfBp8kBY7wwJcFHrEhpR6mFOTowbMQ ryY/FIZtpU8Wvvnmm2fHaiVA9vepBRe6gBw6eEZ0NLlmBhjt+u7ONMAzaMjV 1tYOfGUDjhxOIsgkMXj/lwB5lR9RWEWjdqXWCvKIPYMkIewTfffoaQdFEn13 ZxqAXGv0jIwYmSTUyj5dQLZJnpFKcjJJKMNVFzyD3g05faP37bymBcjBtMDA QH1350mACqaNFxq5DH1350kACMyBr2zwuarJAnld57OQyyB/X71sLjodQa7D aWho0Hd3phb3798nJzSpLLCOIIepDb4Oh2yoPyM22KSAHCox4FJ5AuTVNwb/ REwiyLYrzdDLg8lr0Axet04uyAa/AXuFGuuzdDmhicIAyGaJAcddybFWg1es kw5ySM2AKz/JusbgS76nAuTogUEOoMZWNoZtek0RyGY/IIy+uzP5IC8Efkay VJMOw150r7HTl4F9uycJ8rPG4XAMKa9BtswNUk4+MZw4cYKstQ3mcQNmOVmM GKTF9cSgcfyuwQRMyE6NgW0Y+IShYfw3Nzfru0eTA40TcKgo60RAFiMGE08D 9ip5QxJqd6OJQOPgEoOpKiEf4AjYQsVGJgKD3Fhb48gbgzGx9AKNwTQMMaJx Ri0VPZsgDE+MaJxACvxfKuE7ERieGBl+Ri21dcAEQRYjBnAsxTQ6xXi6wMD2 k79165bGGbUGQHu9gzyk073gEzBcgyHPyNLmKYUhiRHg3pKDZhRDJguGIUaA itFIOQEkJCTou1+GAMMQI62treRgyABDqBTepGByxQjgGJiXJ7lkEggQ8rrv AbZTuwRMFiZdjERERKAoimHY1atXJ6WHWgCc3IqKCg0LhIZXv1MLeycLGkeg TlCMAL75+vqSJys7O3uKDoq9cuUKOWFHBiVAJhfkgueJiBFgD2i4nGRER0fv 27dvskwd4LyQi/nJAL83gMOLnyoAMUK29B5PjIAnmrziTzvAJ8FjPt5yWaBT GhoaQPeAEhntyuCLgCtTNuqkY4JiRAs94uLiNPTOcIAZB38OLIqamhqgp66Q AGRFDQ7gzw53WIZfh8r7TxE0xMi4Nh7UQg/gZQzkWIHkH81smBSAe1HKZUrx eAeIf/7558OjVcPpQQbwT8GTrrtKGhNAdABKT9NgzjSChhjRZVnBY9BDA2Ba xzQtRgToKrj1YxgzFCaCcYkRLfQAv3+8cAS4I2F+gJ7U9CMhISEax8BvgK1C FQjpBbqLETBBoxkVgB4GUJJEYTToIkYAPYYHuil6PCMYU4xooQdQBBQ9ngVo ESPAsCQf5alBD8pofEYwmhgB9ABOB3kZNUWPZxbDxQhFj6cQPT09HR0dd+7c 1QX4pzrAn0zKrTVWwgIHczR6BAYGGsxGE9MIDx8+7OzsBPRQtV9etDg2NCwi MioqEiAiIjIichAR/Q0gKio0PGJBzKKm5hbwh/fu3QNXePDgwWP3gbwpDQ1P 1lD0eBoA5hTQ4/btO9u270xJTctYnhURORtF0RGNwxGBIGhoaMTyzOzMzOzU tPQX1lXcvHmrq6trvD3R2ACKoofe0YMDzOb6ig0KZZlYInN2cUNw0AEQFEFR BPwfaDQ6bPT+hr9FYKMh/Z+E/9/3t4iZuWVubl5lVfXNmzeJu+jYJQ0xQoaz szNFjycM8Jj/7qOPXtu7p6i4mMPhEIV8dBo+0XRcONDoLDpqwTRx4lp7Gc8I tXSPsQ+IdQxZaB8433pWlKVXiLmbr6mjE9eCh7JQGvwjOhQpkDHwB4KAyxYU FOzZs+fD3/3u0aNHY3ZpNDEC6EEl2Z8wwHx9/Mmnp8+cTUhKBPPIwDBIC6Rv Rhg0xJrJ8xXMiLHxy3ZZUO6Xtjksr36O8Ej8880pv2nPqG1+7qXziRtPxFe8 s2j1G/MlL4esFHslJM8IDbfw8OTbWDK4KCQLQRg6xsA4Rpy4+PjTp898/PEn QKlp6dhwMULRQy/o6upubm4NDgnjG5uwSI8tSkctmSaz+I7xNkEK36S3Fso/ ydz179Kjv0jO3BSfvSs6d0984b7sEmj3pBc7pY33JBc7JY23peduSs78KDrx 97y3GpNrdkcVC2cuXmDp7cazNsU4DKiVIFtYLBafLwgMCj1x8tQXX1wdjSpk MQI8X4oeegFQMZeaLgUEBdERbGA6gBwRMDiBJs6SWcknEiuv5r7xbdGRW8KT D6UXepUtamW7WtGulqvw1kZq4JftPQpVr1KlVrapZc33RI0/lZz6V/G7f8p+ 5c2Fyiy3BTO51maYERMhRAuNyWDZz3D08fF7a//bIyZiBuhRX19PFfg9eQB6 dHR0NjU1B4cEwscbtxyAyWGCGAULnMsDlp1KrvxbwVu/Ss+rFWDSVWpFW6+8 tYfUeokm62/424F/UsPWhv/tb8Hbn4Wn/rTyjQPxawu9Y2fxZvAQJgYsYDq9 T4m4uu59fS9wlvU9KhQG0Xnv3hv73lyRkxseEQmtUzoN/MeloyGmLs8HpwED 48tVBzpk53oUzWow+9JBDqiHtl5SG/mfZK09sjb4U9n2sLz1F+mZz3NePx2/ XuqT6GlkxQCOEQYtWuAHuXt6vLrnNYonTwnu33+w7839njO9UeilQo8Wo6G2 qHGqc8T+hWX/yD/YJWtRy9rVkja1VEMyjLtB2aJogX8OqaLqkbf3ytu65Je+ yHvr5dlFEZY+LIQFDVrcX3bzcN+zdy+lVvSOBw8fHjh4yN3dEw9mADuEbkTH Zpk4lvsu+yB9+6+S872AIdIW8OyrJapeWXsPUBngN49LEsgTRXOvHPAEUA5c UAXYopa0dJe1/Lv0+MFFa5IdIywxLnS0MWioAL0D7JOJhGcpTBDAiThy9KiL qysRvgBTw2eyo+1m7ZpT8nXhwXvy5l5pG1AuPaBBLdNGvO1TN5PVwNUk4BYt 3fKmG6KTTakvZ7nGmGM83J+CJoqjs/PbBw8QPOnt7dX3mD1bAMN++N13nFyd 6bjFCOSIGWa83GXupbTaHyXnoMOieF8tJ9oHU9/AXS4D/6hDfvHDzPqVbtHA QQYcISxZFzfXD3/3ob4H7JkDUPTg8QSDD+OgoKE0FMHm2/vvX1L+9+ID34ka vis5fk14/Jro+LdC2K5NaoPXBFcWNZDa8X8Lj10vOfqd8NiXxQf3xZdF2nlD uwSFLDEWmAA+375zG/hfd+92DAf4JWXiTi4AQ/a9+Za7hweNMBERhAZpgjhw LefZ+yY5By1zDF7qEJbkFJHkFJbc35KcQpMcH7MlOsGWRDRH+DMZtjDyZ5Kd QpIdQ5LhZ8Ii7fyseRYMGu4UI3QmixkQGLA4NnbR4thFi/Cfgy1ucWz8/AUx EomM4slkATDkzTff9PSciT+mUM3gQr0vQkG86G/0kd6OuyGkRvr9GHeh9b/V kvAlukzH++7nF3jnzh19j64hANghBw4c8PLyggzBs7EIDYZWNWeib3r6Z2lw 8h4HwOTBG4rQcRebmH96/13pGJ4qHEaR4VQYBUTFQnBIGEWSiQMw5NAh4O26 Eyl7IMdN2Wb+Fu4mTC6tX5RgGGZhbeYT4O7j78435QksjD18HP2C3V09Z7BY jMGJ0VGM0EeWA8YmHC9/15n+LiYWfDrGEFiYevg4zQrxcPNyYhsxCUqQmauF IdAJwkkSEhJOkWSCwBly2NnFhUYUeICZQnkZbjFbFwjdeXYD08HhccLn+q+p Ll5dVezmO8MnzLN0TfaGbZJcURrfhD+W5B8QQ4Ngs1mWVua2dhY2duZWNqYc Lgvc29PHcc3GYmVlnk+wG8JGfIN9SstWVNZKCuXLAS2HXmNEuTIC/AModTNR fHDlQ1c3Dxru7oIHj4ew4h1CLi578eOVr6Y4RLrxrM2YXIRG4/KYYXNnra4p Xru5NCjSKywmULg+d8MOSZEyw97dmmvKYXOYyMCkDX+uB/+przm4zMjITyyQ pa+SpK0oTp7pC2uWPH2d1taUrt5UFDrf19TeODQ6WPRCXtUOqXBNtpOnHV/A YRoRKT9SgQKhi4aJEfDTxMTE1s4+KXkpcHP0PczTGI8ePXrn3SM8ngkcaww1 ojMX2gQcj193U3TqrvjcX1e92ZqzfZnHHODnMJh0F0/75MzFywuSV5amrhSn LS9JTsuPX16YsEKyLFuYEhjpy+UbDeEIYXZqqBY6bmjQ6b4Bnms2l1bukGzY Llm/pTRsjh+CInaOVsuyYpcXJC4vTMoRgbukZ5UuS89PyCxIzBOn5pY85zbT Ab+eJkloJB02oGvS0tLe/+DK3/7+f7u7u/U90tMVgCHnzzeGhUcxGWyMRmfT GbPNfQ7ErPlZeKpH3qKWtaqV798raxL7JUNnGKFxuGxLG3NHd9tccWr5pqKY xChrRzP/SM+yzYVVO+XJWYus7S1ppGnq40k/WzRI4hfsAbixsU5cVQd4Uho2 zxeQhM1hWdqauXk7FCiWb9wpK6vOX7g0ytbRYlaIm7Iqv3KbJCDMm7BJtZME ABhRMpmMyu9MBIAh586dj4iMQhBo3bHpSJi5694Fsu+KG3pgrr+lVwqTd7fk 50U+CTAJi1cVgk8yjbD0vPi1LxVHzQtCULqdq5W8qqB6hywjN26Gk3W/Y0If FCk0TUlCuDK+wa7rthRX7xZvqBPjJPHBc7ywM0CtrJKlb9otW11TMGdRGIoh No6m0vW5FdvE/qFeo0gSuoauwzBUIpFQJHlsdHV1XbhwMSpyDixPRehsGjKL b183p/ha0bEuZTvM2RH5XFlbp7zpWMKGSCtvDDiqOANYfGZm4dLVNcI5i4JN zI28Q9xX15Ru2lWWkZ/g7u3AMWahTAwvcx6UHLShb8A/WtibJa1YWLEdMERS XSeq3CYKmeONoH2ei4kpN1+2fHP9mrLqonkJEQJL/swAl/JNJdW7ZBHRflwT NptjROLhoOzqvwu8O5AkJSVCiiSPB6CgL15qCguPIOqOmXTMg2u7KSTr6+JD QIbAoo6BzCzM8LZ3lDW9t2RDluv8eXa+wKxFOWjkotAVotRlOYuik8IT0mPS Vi3JKEjMKExckh49JzbM3ccVY2D9Fmo/NfCXKANxcLbzDHBJXrFww3ZZ1W7p hl2i6t2iyu2ixMx5ngEOdk6WQMhwOEYLEqKWFyZnFS97LjduYXJkfPqC1FWJ 6XlJCalzYpZEevl5IBjSLzQGeUJQhcFkBwWHLklMfv31fboUUVPQAGBIa5sq MCiEWMSA0lA3lu0Lfsu/zD/QpWhRSwE3WnpJNR7dsK5D1Slt/Flx5nRatSvH CsyCEYcRvsBfuC5rfa04X55lbmfKMWWlrExYt1W2bqs0JSfRiMMmW6z47ME5 5fBYmbmJ67eIKmpLq3YBa0RYVSeq2gWaZN3W0he2FC9dsZgFvSSUyWECkRU0 17f0+RygZYrKM60czNlc1rLM6KptcsBMBhOjkS3kAfMHaCtjwf63D96+fYdi yGMAaJnm5paAwGBYpwp9XpoV00Q8M+lqzluPYPnQ5V4gRhRDakJ6FK1d8Geb es0HH2Zsd+ZY0/BS9uDZftKqnM17FEXlK3gCPniuU1Ymbnq1fNMrSqCM2Fw2 HnRBBiQJTAHR6EY8Zm5x0ouvyivrhJU7hdWQJ4Ah4so6SeVu8aY9svTCBAaH qKEFri7dL9xbUpG7eY9StG6lwMoE3DclO/rlvauX5izEGOggSUiihAa9deOj R9/T92BPSzx8+PBC46Xg4BAMpkrgiAqYnHyvhZ9m1z+QXVSPUlvYVzMma+0t u/xRxq4QvgsX4bIYzIBIv5LynPVbpLnCDGMTY4zJSF4et36raP0WYWpOPJvH wucMGbBIEDxXY2zOyREmb9otrYTSQzzQKmETbnxFnFG0hGtmxGACPchAEMwv xKdEmbVhq6hQvtzU0hjYT0CjVW+TJ6fNHyTJoClCJ0xrC0vrEydOUW7veNHT 03PxIrRD+h48FDVB2Dke8z/I2npPfq6vbnBY3ekQtihUPxY1XEyuqY9ThFp7 CsyMPXyc/YI8XT0dmEwMQVF7ZzvfYHffYA9HVzuMgQyqApwoDAbdwdk2MT1m 9eb86joJmSEDrXq3RFGdn1mQtOS5+eaWJuBPTc0F7t5O4JpuXo5MNgauZudo 4xfsOcPRklgG1m+SDIb6zc3Nt2yt7ejo1PeQTz8AMVK7bTuLxcZHE+EjRhmO UarnfgMYopY2adSm9o5StwyVUXn7dcWZVLc5SJ/fOZB6Qwb0ykDQgvyUs4wY QeE+5RuLoBjZKRqRJFW7pNW7JC+9WrZ6Y4GDixXJnSWlhGl90mlYRLdPjLi6 uX3//ff6Hu/pByBGfv/7PyQlLUVhqSrNCGXF2gc1Jm+8KzkLLJBeGWyjlbWT jNi2LujvqL4XnVrmFIkOEgQGLJAhOX3aQPZ/wLlhc1hBUT6KqvyNuyWjk0RS tVO4sU6i3Jjv6esEPC9gySAkJpLvMlBdMPgCJ6qpqWllZfXdu1Qcfhzo7e39 5I//Jz4hgclkgmeNQUf9TZ0Pxa25ITyllreNRIaRJQnu6bSBFzfEp34Tlrdk RkgSLDeCFUfJjoNtqWNYMmhOocucwmIdQ+y5VkTUy4jHDpvnp6wGJBldktSJ gK1SXSctrykMivQBwgc3ZpAZXMs4h5BE5whw5aV4S8YbUbMEXiQ6hnoJnDC4 2gMSUiAwO3nq9GTteWLwAAz57M9/iY2LxTCMKNdwYJtXB2f+T8GhXgUMg2jR MiOYJVJIkm7FpZ8kJ/9FrjksPQHaNfwn8eKa8MR10ckvCt5Md52L4uYrh28U sSCgfFNhtTaSCCFJdkOSBITPZLChacqiY1muc68WvHFdCK7cAG8hPPlt6Ul4 I/zu/xY1/FP0Xs3sVWYoHwoe4ALzTd49cowyXHXEvfv3E6GWQfFYOPR7F1n7 f5r1ygMFmOuxGTKEJLJWPIpC/GwfUqisuDystasVv/2+5HiO2wIUVrjRODxI krKNhUBQaCFJ1S4REDXKTfk+wa4MPKvMx9giryU3RCf7Sq/Jd+krk/6gV/H+ hYSqcDMPBgqFj7GJ6YmTp6j6+TFBDNFPP/3k5Q1PUoC7hdBoM7hmVcHZP5Wc 7C17n9AdWugxkkcMF8X0Stq7ZZeJ1XZE6xnWuqUwpP996fFV7tG4JKEbcdmh c2fh6kam4f9qqBvwAUASD38nuBKMRrNk8cv8U34Un1Ar2rqlLeS79C27wNdx /CXz1cKZiwQoXDbO45scPvyu9l0IKBC4efNmXkG+scAEGnrQqqPPtvJqXFrT ITkHrREpsYh70CbRmS1tvfK2Yfwhrwdvw7M/qpuSs1LfZBbCAPdnsRnAk5Vu WFn1inhUkgDDdZcQkEReXeTi7Yj7MXQHI/MNIVm/iE8B6dRvYBN3GZCB8Jc/ lZ7YNqfAAjPC3W3WvPnRzS2tlFmiHR0dHYXFRQwWk7D9wIDjyn3eV4UHemSX 4GjLBkkyJj3Gu3izF4+r3JFdqAzNtmAZw8J2lO7kaStatwKSRIt3Q5CkqsjJ 0wF3pREXjvXm8Jwb4jMkkgy7l7y1S9lyKrHSi2uLx08QeILh9h1UWF47Gk6e 4PP5eEaUqEmkWWMmFf4ZN8Sn1dDnBWOr0kXdjLHKW8vnFaq70sYdc0rceNZE aMPKwax4TVZVvVYXeJewuk4iXp83w9UWj4kgHjzb7VEFtyRnAUl6+kmieS/w dRSqP2a8muY8h8uAGofFYtXVv0JJEu14Yd06lhEbJ0lfDbq/wPmtaAWYOEJf qMdJEt251P9C1Sm79NbCskBTZ6Li0MzaOFeaumEXkdEbhSTALNkpypNn2Nhb EIEzP1On1xdIbuMkIWoYyCpy8CsoVN/mH6sOz7VkmeB1AoziUuGtW7f0PQ9P NQQCARGBJKq2gDRJcgz5MK22S9pM7B+iu0x4XLa0PZBdOp9QPd/GlyCJiRkv LW/J+q3CURgihq5NneiFLSXLcuIsLE0Jksy3nnUmaWOH7ALQj8Bm1lCRJO3W dld49p1FaxyMrIh4LIfHXb+h4gFlvo6OwaQXNAhoGB0p8Y39V/G7eBambaoZ QpDkobTpSsr2ZKdwFI+F8gScuNR5a14sHC13A0iyabe4bFP+7NhQnjEHzwQj 6c6z/7zy9S7ZJSCaeuWjkgQ6WYqW1rSXvfgOxNcGz0ipiCo60gZyLQd4jo0R VlVo1m15o0aUdUpJ0i1ruZr9eq5nDIYXJXKM2fMSQhUbVwGSVI7iAm+ql4rX r3T3d2YwMRhdoTOVPkk/i04CO6qbqFgYZrL256nbestUn6yojzL3wvB1whiG SaRU+aI2EGlRYmsg8BjbswTb5xTfh7UiqifAkL4mU31XdEzut5SFb7PG5jKD 53lLKlbgJBnBLIFBkjpJgTLDwsGMhq/os2eb74gouC+HlQzduLjQQhK1UvXF yteXOkZwMCZBErFYTJFECwBHmAjGZRph+AQ5G1m8Mk/8QNGsJoU4pkyGwNYD nY72Tmnj5vBcAb5JEcpEnbxmFJZlbaqXwVojog2RJOKK2pKMvHhjc7gJCZOG hpnPbFi0rkvaNMDt4R5W3wspIEn71wUHxL5LzFn4HiYYJhSL71EkGR1gkPgo 25ojYKFMnCSWgCQPnyBJ4FMva+9StOxbqPTg2qB4ms/YnJuRn1y5U0ooFzJJ gAICEqaselV0fCgH1izBwE6ay9zfp+3qkbaM2W21VAXcn3+XHH0papUjz5wg iVQmo0IlWsBDOe48GzeetREKB9wJJ8mTkSS9g7pA1a1suZyyJdEhhI0LNJYR I2ZJVNmmwqpdUugI15UO1TVS4eos/xAPFgumYNgIY41/2ncFx4YnIkewXWVw 58//CE+9vVDpxbfBayyR1JTUX375j76n4unFTMGM5zyi/I0d2Sgb6PcnTxL8 +qoeReu/Cg6tC0ozRqCdwGSi3gGuBcrl1XWKyqEkga5NnWyVONXeyRLDk7km KGdHZNEDySXtfR7UOzJVp/h849LNgQIHYhcvNoudl19IbU4yGhbaB7w4tzDM zJ2BwF3fgU1SP1/4QNn0xNQN/nS3q6XtnfLG/TFlDpgZrCBC6Obm/JScuMod 8so68dComqhyhyQtN55vCvMvKB3z5Tu8s3jNI2Bs96/y0EpIGHd9KG38bfrW EDNnYp9GcJ3FsfHUQuDRIPZJaEjdNN/Kh4EvqnIystgNSKJowjfAfFKSRKYC JOkua1Wl1S60DWAhTDz7hkTM85dW5OMaZ4h3U15TGJMYRdQasRHWUoewy6lb gcIiSDImJwFJHska38+oDTF3HtjMM2FJEkWS0bB/nviDrF2x1v4sSBKaFcP4 xaj8DuBLwiT7kJU1U0kSYn7b/lFwqCokyxrfOJGOIDa2Zs+tiK3cISPzpLpO mi/PmOnvimFw8YUxwl7rn/Lfq97uxVcl66DaSCTplyRA48TFJ1AkGQ1/zNj1 Xyv2ZrjM5jGg4WqEMGR+y66XvDcw4FMadB0gCbQnpa2d0gsXk6vDTZxg1Sod wTAkZK6fclPRhp2SAY2zvlaYkLaAZ2qEFzSjjkYW+xcpOyTn1TildVc3l9O2 AJIQUUQvL69XX91DOTij4Ybw9D8LDlcEZ9iy8YQXHXnOKfyTtJ1d0A58gjzB 506tVH2Vd0Dms8SCxcWjwIiNk/WyVXHPby+p2i2sBo7wTrHohezAcC8E6kaE gzITZoR+mFHXo2xXDwugDb9R/4u2TvG580nV/gIYmUdRTFgqorav0YKHitY7 pWeOxT3vYWxPFKwHmTkfilbiWWBVrw7VrZPFE7y1/So+ezx5Q5CJMyxtARqQ gXgEOheuztiwXbRxl3jDNnFyVoy1nSmMDtMRe5bZlqiCa0XHYJ0kqataqEiQ 5Ibw1MFFq72M7QiSSCUyqj5NC7rlcNvt/8reM89iFgoTZTRzBm+tf+qP0rM9 SpWG0pkikvSShAm0TPIPl3kvtWUKiHU5XGN2+IIARWXBxp0yZWV+UJQPisHC EyYdm2/mdTl9axdw2KWqXnmzthgamSQK1fXShto5pS48K4IkEpGUCstrQa8Y ngzybcG7QvcES4xPJIIznGf/Pf/gQ1nzk5EkQ4SJ7PJDcdOV5TsS7YPYdAZ0 h+l0Sxuz5MxFazYVZeTF2TpZEct0bFiCF/zT/qfwkBpugqEiqhPHJgnM3bT/ o+jd8oAMG7Yp3LoRg5KEIokW9Mja1Yq2X0QnX5sr8eLbEwu2wy08TyVV3oFr suAWE1PNkCHzCKslW29JTu+PLgs0cyMOakSZiIuXQ+aqpOAobyaXQew1EmDm cmnpi/fFjZrZGe3Xl4KH4vLf8vZnu0bzGbDMAENRiZjKAmtDtwLqlPvSC1cy di2wnoXgWyhbsUwlsxK/Lj4A/Q7plDvCQ4UJPMOiW3bpv4vfWR+U6cC2IErm WEYMt5lOAgs+IUYEmFGee8zX+YfgGUm6MxCSpK1H2vK71G2zzWYC5Qq+L4PB KBWWUiTRgi6FqhsfwG+LjhW6xfLpLBSlA+PE19Rxf3z5r3D5nqZOn0JdQ5gl cOVOy31F0ycZ9QWuMXyEheFLePGdp/t2+Q0ROB9dWH5bdJoon9PlFvAFrj1/ KWl4Y65ohpEpbpCgwSHBx9471tU97vOFnx0Aw7Ubluio7kou7I9ZHWLqhuFV jDyMlewQ9oe0nQ+lF3unOKpGZohaiv9G1tYjV92TXToZuz7Swp1NIzan6FsS zqajK1znfr1qfw+wmsYjRuDFFW1/Wrk3130Bj8kiCqG31G6lsjbaMTCSPbLW b4uPvxC03IrJJ9ZdOzBNK4Oz/2fVYXz6WsYMREyOJBm8ODCHVN8UHtkascrZ yBTt34UVzKybic2OOSW3RRfUcHslnfoz4D11KVrOJFfPEjhiuBfNYDB37NxF rfQcA6TA+ENFy/vp29JcZrPoMBXLoGP+fJeji9bdlpzDH8M2wqp8EiKlr1eg S81/XPFKiVesKYNHFGqjdGSZa+RH2bu7pIMZPR37Awye60XvvRSea4HxcKGE CEzNX39932OcZf9sgayy5ao74vMHYsr9BS4sOgPMCBthJc0IO7Os5hfFmR55 8/Cz86aUKoRX2ym9cClpc7S5L4fOBLLElmX6YvhKuAhLelktG8dyD8goRetH GTtTXedw8AorDpe/obL6zt27+p6Dpx1DVLYMnpH3VcGhdSGZ1gwTFF+MY8bk JTlFHE9a/x/x8W7FJY3y0amN1eNHf4Je/VByYu9csYexLfBHFtsFXFxW0y1t BiSBNQZa+0ASSnheT968P0bpwrVB8VUkxsaC4w0n9D0D0wCaT66s5b6y6Ur6 rtQZ4Vw6gzjqyAQ1irPzO7xQcb342CMFvsIXmrIjbGgzWcwZch0ZrIP9quBA id8SF5bVusDl/yw+2i3Dd4CUjnG7/uvgikna/E3RO8qAZSyETWxczOXy3nnn CGWQjImhMwIez+ZeRcvPwlPHE9ZH2weyUViZDPwdDh2bLfConyv6svBwl6wZ 90GGLwaffJIMeD0d0gsty2vX+qSdiau+r2wBToouhjRJSLY9kF+6kFSzyNYf gxYXnc/lLHsu9bPP/kJtPTEmhs4IEO84T+TNP4tOHE+sTLYPN0e50ClGgVhB fbkOm8NX/imr/o7obA/cWkSlHnFOJ4kwGjy5Lb1wNXvftbwjvcSOBMOYoF3X /Cg9XRWaY8MUEKt7ZtjaXr78225qFbAOGIEkoMFkWdOvwjOqlC2ZbvPNmTwU 36Ud2LIObNNs9/nHEiq/yn/3rvA8/jj3zxc+F+phRsvEedJLqEJpyyNp0yNZ 85DZH4skxIseSfNnOXtTXOdi8KgvGoPBiIqKvHr1r/oe/umBEcU7IZ/Bi9uy c1cydhR5LbIFDyC+hxRowBsN4LsVuie8F1fx/4ve7RRfgFkz2WW1tB1mY6X4 rjVwHxvN/Twfgy1DuzQ+eUX8Hq7rkavuiS8cXLzaz8KFWK/oO2tW++XLlOer I0Y3A9rAkwvc3g7Zuc9yXlsflDnTyJZJQ4kNDcH/zBn8YAu3Iu+4hrj114uO PZA2PZS2dMvwNCtgi6wdP0y8vVeuU92pjkrn8VinVrRdLzkm9VoCTwrGM0GR s6OoKiPdMeqkEFufSaET0S1r+3LVgfrZwlj7EFOMhxKHZ9GhQQuGPcrSS+yz pG6u6GzSpr/m7PtVcqarvLW7rA2u2oZU6b+yjKSPhtVGPgZPdJZFbfekje+n 18YQ6Uv8PIKw8LC7VHhEZ2jMxbBHFUZZe4ASkbX9UnLy0tLfrAvKWmQTZMEw wQ8sgifSAOHCRhjOXOsFdv6FM+Neisg7HLe2Pa32q1X7b4vOdivbesrbe8ra e0FTgqaCjgm0eNt6x1lGO05u9DET3Ovn0pO7o4o8eDbE9hrOLi5ba2upUjTd of2xHZgUdX8w6rrweGNSjdIvNcrK15xhTOxNRMfDKUw6yqYzTFGON29GkkPY Gr+U1+aKGxIqGpfWtKds+Sh9x58yX72as++rvIP/Kjhyo+T0I0Vzj7KlR9E8 XgKMo+F1s98WvlvqlWDO4sNjtBAkNS3j1q+/6nvgpxPGFO+D04fnd4D2uS9t vCY8diG5Ruy1JELgbmdkwkHRgY2/oe9ARwBb+KiRGca3ZZm4c61DzFxjbGel Oc0umhm/OjC9Omzl3mjFHzNf6RSfU8u0lR0+dhuUJMr2r/MPJttHMBEGfrow kpmVTVWPjAu6mAFDqaIiHJ9O8flvCt+5+NyLLwSnJzqG+Bk7OLLMzDEum47R yMCT+/DULQTjYCxjBseSaWzDNp3Btihwif5sxWsP5U1TwZBBYivb/5q3f56l H0wi42cELs/M6uykzh0YB8Y77P17/7apla29itYOyYVrhUe+WLmvNfXlvQuk Eu/EBaY+LkxLS5RvQjfiICzw/KKQNhiN8IxI8OM7Hl649o7wvI6FQ48lSVqA TfKXlW+EmXnhy34JkmR3UgUk44EukkSDJ+ohH8OtUKXqkeLiT6ITV1e91Z66 7Ujs8y+F5uZ7LI61D46w8PQ2drBjW/BRLgcIEwQDIoWJYiwEizb3uphY0yma kl2VyJLk87w3w8296TTiMHskYzklScaH8crwkcMU0FwBWqO5t6ylp7z1vvzi d4VH/5z1qmrZy2eTqo7Ert23UFk3V/hSRG5FSKbC/7kS73jlrMTDC5XXio90 4zbJpEuS/o7hNknB4XTnuRyMDfepxUlClaKND6PHMHVs/TPSgkf1YR5ZLe0r 3uhRtHYrW7vKWkB7qGzqEJ//T8mpa/lH/1/O2//MP3hXerYH7nExwsa8k9L6 SKJQXS9+rzIoy45rQcO9m8ysFdSy3/FhsmaEdBpOX0AeX2kFk3HQJyKaCsbt Zaqevh1iW6Fro2ierD6MyBNg8NwSnj4Yo/Q2dSRW/kZERrWpVNQGv7qjR94y VU2m0foPHYD/2tr3gam7e38DPLkvufjbtNq5Vt7EiUgoii5evJgSJuMA3PLU oBsscVR9VfJOmvNsJh1F8XKj8PBwKnejO+5JGw27dUoaO+VN/5AcFc1KskSN MXzjvtmzZ1OSRHfsnS/R3vZofTvxz09xE4MOvD5fsXNuSZJLuDnTmNjdMSIi 4saNG/oe+2kDXxNH0Hz6msMozZH0sdE+M5HPT1Xzxn/OMrb3Mra14QjYKKPv JA5r68rKSipaoiNQGko0RGvT5TMT+fxUNgShDTlDlDhwwcHB8eOPP9b38E8P 9B3EauCNlErqPxfY0dHpo9//Qd/DPz0wcOy25inLQw9c1uVjj/35KcRgP2gD vSFI4uzs/Ic/UCShQIGCgQOIO313Qf2/u1qqOw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output"], "Cool as can be"]}, { InterpretationBox[ PanelBox["\<\"Huzzah!\"\>", Appearance->Image[CompressedData[" 1:eJztXQlcE1f+fwQEBBXCJaDWqwpY2+Jta7el2rX2drW72q3bVevValtbu1X/ u/+l2/67tNYbPDilWEWtckMCgQRQQfGg1laLByEkEBAQEQWU6/97MxDHCUeA JJOM7+szn8mQzLzM+873d7z35o1c+sm8FQKE0DpbeJm3ZP2Ln322ZON8R3jz 54/XfbDy4+XLXvn48+Url382fakl7BS1/cfbrQSmDdJGBB1CrVbLtJCfn891 vQi4BHAgICBg7ty57u7uqDtMnz59zpw5/v7+8C2uK05gQFRXV0dHR69duxZa vFtWdMuZbdu2gfhw/ZsI9IbLly8vXrzY1ta2j9zQhp+f3549e+rr67n+iQS9 R2xsLJgJHcXBTws6ao6jo+OGDRuIsJgXwLLADT5ixIiuWQGmBwyQXC7v9oC5 ubm6mKpVq1bBqQ3/+wj6CpFI1JkvCrTpu/MJNNi3bx94vB2eAk4NFdDTTyHQ P6D5wPfosO3A6IDp0fvpwH3tUK/gdMT6mCA6FBBwVsEEgONq0FODJfL19WWd GhwVEByDnpdAd0BwAX6jNj0CAgKM6SHA6bQDKCIppoD8/Hxvb29W04B7aWj1 6BDAB+1gCiSFZG45BFx8aAJtAeG2VmBlWLWCtyRVywkgdGU5ISApEKtyXS8M kJSFCxey2EuiHiMDGMIKK9auXWtqmU+QFMITrqDNEH9/f64r1TG0eUJCHiMA AhaWp2qyDKHB4gmA8MSgAIPCykiYOENoACuY0TFsk3jHcFi1ahWTIfCW6xrp CvBGmDwBqpuaB8UPQBTJZMjixYu5rlHPEBsby6z/hg0buK4R3wD3HdNZnT59 Otc16g1YSmgiATtvwLy85mvTWVSHbWJ09AW448zOWe0MrN9iRm6VKQPuNWbM C9vmfvexuiNJxr7vYF1SHthxViA/d+5crmtk3lCr1czIkTfiDD4Vk/lm6mKZ CLZt26a5ku7u7uZuaJhgDipYu3Yt19UxYzBjASAM19XRJ5hpE1BLMoK6d2Bd Rv4N8eLxLWA08F6QWcaU6+qYH0B+mS4rL1071m/U+3h+3iM6Olpz9cw0Ca8L QCE1P3PhwoVcV8fMwJxBY9Yp1q7BjIXBReG6OmYG5lhiXtoaDZi/lH/OueHA 7ODg/f3FnDFK3BLdsWfPHs11M7txIz0FGFN+B3EGAnNgAO8TCMzBVH5+flxX x2zA7P/ifScpBMKaHwsRMZ+6HgwKZvbgUchXM28Kfnvp+oJcLn90vFYazHif TLjQBczUwSNio5ljZsBp57o6ZoBH0JELCAjQ/GQeZw71CCZJeB//0mDO8qMH ViHyVOouwbxijyBJaP+E6xqZOghJuK6OGYA51ugRuWJMkpCZfbqA6ZM8IiPJ mSQhjqsueASjG2b3DeeP8zILMJNpvr6+XFfHGCDJtJ6C1ZfBdXWMARBMzU/m fV+VvsCc1/ko9GUwfy8nDxc1RzDH4URHR3NdHcOivr6e2aFJeoF1BDNNzftx OExH/RHxwfQCZqqEx0PlaTBn3/D+jtAjmL4r4vvwYOYcNN7bVv2C6fDzOCpk zc/SZYUmAg2YbgmP867MXCvvDavewUyp8XjkJ9PW8H7ItyHAzB7w8gKyHmXD b9fLQGC6/UAYrqujfzAnAj8ivVR6B78n3bOe9MWzX2dMMO81Ozs7PvVrMD1z Xuqk0XDo0CGm1ebN7QZuOVNGeOlxGQ2s5Xd5kzBhBjU8e2CgkcFy/pOTk7mu kX7AWgGHZFn7AqaM8CafBv4q84Ek5OlGfQFr4RLejCphLuAIbCG5kb6Alw/W Zi15wxsXixOwLiY/ZIS1Ri3JnvUR/JMR1gqkEP+SDt++gH8yor1GLXl0QB/B lBEeLEthRqsYmwt49jz56upq1hq1PKA952BeUnMf8AkMZzHkEZnabFDwSUYg vGUmzQhD9AV+yAiYGFaXE2DOnDlc14sP4IeMiEQiZjJEwxDShacX6FdGgGPQ LsacMgkCwpz3rWE7eUqAvqB3GZk2bZqlpaWVldWFCxf0UsMuAEHuhg0bWB4I oka/k4m9+gJrCdQ+ygjw7YknnmA21sKFCw20UKxMJmN22DFBBES/YA547ouM gD/ACjmZ8PPz27Nnj75cHQhemIP5mYD9PFi8GKOlBZfm5o5LSzP+q1EAMsL0 9HonI3BHM2f8dQ34JNzmPR0uCzYlOjoaqgdGpLMjww+BI5ulj4rJ0NTa1Nja 1IQJ0OOvU7Shv24A5vRRRrqgx+zZs1l2RxvQ4vB18Cj8/f3BTskYAK3wpwDx rHbAon0c8+v31zRrR2ipr2upudVYePXehXP3zp5qyMtpOJOLS14OvIWdjVcu N9+sbKm93drY2MH34ch6YgtLRnr04MEu6AFRhqaPFZS/M7dBL4BzmZNxgVse awWbGE0qRX12xu3QwKov1pT/5ZXS531VTw4rHulYPEqoHOsGr3hbU2DnGBfl OM+SKWNLnn1C/cqMisVvV326ombnd3WpiY3ya4zT6YEnvVtAPD8/XztbpU0P JiA+hTtdd5PULUA6gNJmk8yBxnr41m65e+feudO3g3dWLH+n9NknFB62cltU aIGL3ArBdtEAXBSe/VXjh6qeGKJ6gn59sKH08VB6uSnHuhaPdioePgg+WShA cmukcLMqmeZd9Y/VjUXX207dB7BkRJdpBb2gBwvQrN26Fh0Cqgqn7oUzwzGa H/IxGq8W1O7bc+Pv81XjPIEDmBXQsv1RkQNSuAgUrpYKVyv8CtvOFkVCpPCw wXwY59lxaaPNEJAdeFUM7gdfLHJEcnt0HaGSyY93Zst0R49kpAt6wP7epSPg jLT7ATXxb8ecOXP8KGj2gK9ilgOEGDYFXAuwBeo/TlM4C4AVhZaUSjhbUKzA lChyQh0UIImrFVaMzkjSVqgPeLvTvIIvYo65WMJb4CQ+fW/FRHcZgQbqzKkA evBgSJL+oWmU5uY6ScqNha8BE7AdsaHbnSIGNGiHxGCRxNkCWv8BE3QjCS6O 2O40Xv2dqk/PwyUKusgI0EM70U3o0Q3ajUudOPHGormqCaOwg+GAm6xTxeiy KMe4tnkgPSLJIFQ8bEDzjTJclV4pSbcy0gU9wBAQenQKqjmaykorP1paMunx 0hnj1S9NhcaC+7oX9KAFQTnaqackgQ25HVL5jmy9f6/XP6ULGQHHkrmUJ4se ZuY0GhkUQ+DmLXvTr2TyGPVL09QzJ6tnTYHQA5Sk1yQpHuGgK0lAqdp9Enk/ VPaGn6ZWPUVnMgL0gKCDOY2a0KNnoEKJO4ejVBNGqmc/U/ripFK/iaAkYC9A /HtPkqH2PSYJ5QJVrVulqVVPoS0jhB76ARXO3E04WjLVCwREQxLV+KF9IYnC w7Z3JLkdshPXqqmjfGyXYM2EhQCzM3r4+vry5kETRgLlst7LP1vyzDj1TAZJ Jo7qvbmBAMetn64hMNPc2KL6TAlVqx4rCfOhNIjqrCH00BvavFY1tjUvTGgj yawpJdO8HwQdvSCJi0Dp494dTzxBajQkwfrjatl4/aqmVrqD9QAoQg8DoWL5 X7GYgMUBksycXPrcUw+ar+ckgVflWDeaBt2RxJJOrRQNQKpxni137/ai8iwZ YWLEiBGEHnoA5SXWBH4P8S8YGiwmWE8mKNyt26JgaEG69IQnysedu3NLGCQB W2ODSmdOxvXRk4wAPcyvk91kQbkl9dnSh3zXmZOLh9ljkjhbqOwQXXoW4Ix0 1I0kAjqjW2iFKt55HdenhyTRlhFCD/2DTpVUVqhfmVH6gq/Gdy0e7QS+q3Ig ypk9I27dxzkv/0E5oCckeWygTiRxtaRJIrdEZSv+Wl57535dXY+qz5QRiHwJ PQwFiieVHy8rmebT5pa8NBUaUWWDpAveDP4hKiwsPDgyKnP+q6AncmcdfBXw Qof0150kchdBSX906tUXAnftzkhM7FHdNfTYtm2bWQ7wMxdQbsnt8F1tbonf xNLZ08u8Bp+fNDYsPCIyKDBy587IoCCgyvmpPm086ZYkg62VeMBAZyTxoElS xCBJzsvPhYZHRO3adae2lusrQqAFOlty9pQmW4Kj4MljfvrXhvDQsMjAwH27 dgFVwkNCDn/lX0T1tsjb+aBwQsUQyzghVXuBbSU4rq6WpT4epeM8S8d5PFw8 NaUEdMbVUgG65CJQ9Uen/SYDJ8O3by8rLW3F8makIdMEuqOl5lbZG36lzz9d OmtKxXNP/vzuvNCQUBAQYAhdIgN3hkREnnjNT90fKV0ESook14TodyG6KETn hChPiHId0QmqHHeyyB3jdsrLPdfLHV5Pe7mf8fI46+2R7+3xs7f7RS/3yz4e Bd4ev7tYXhWiQmdBiR3Kf2Z8eHhE6LZtapWqlZDEBEG7JR8tBbek9KWpN557 Kvmf69kkCQoKDw6O/ubrX10szzqibCFKc0TJjijBEcU5oFitkjLaVewzROzl KfbGRUQXLygeYiiw08sj0dkqyQGJhBbpdkj85IjI4ODQ7dsJSUwUVCa8Zucm 1eQx5TMnFb76fNTOHRG7d2sY0i4mgRHhEYdnTo+zQbFCQbwDZgiURK2SMAiJ RwglPkMkXh4Sb8+Oi5dHkrMVHCReaBE3AMU/5hi1Y3vIzp2EJCYKujs4OlI5 eUzF875nFy9gyUhbCQqKCA37ceMXiQPbydBZGYREwwYBSdK8PNK8PTsuFEkS KKbBARPc+0dt2RwSGEhIYqKglOROzCHVFK+qF3xT13/WMUkonuwLDo55elRi f5QgtOiCJCme9t2QxNsjyaWNJPCa6IAO/O//hAUHV5YxBqdphmT3Yv4XgX5B kaQu8Zh68phrs6Ye/O7biL17OyYJWJyIfQeXvptkgxKcBF2QJHmwTXck8XxA EqFFkh36ce2aqB+i6mpvt9eqnRg9HzxAoH9QzVEjTjzjO1Ly5iwsF7vYDskD Jdm794dN38W5948f2IFP0kYSBwQE6IIebJI4CYB10Yv+fOBg9H06J0bN8mu8 fkU9e7pq/NCawE14J7FBHIIiSdWZU9IJo8WL3o4ICdnXoYy0u68Qq8Y9PznV BiU6YfdVE9FAmBOvIYmTIG2su4TyPXQkyaFX/I7GxLbgmaSYIc1VlUpvdzzN xwaPyoYgHVeV8IQrUCSpPpeXNWFU/OplOIfWJUlCwyOS1qwstkdXnC1+E6J8 ITotRNmOKN0RpVB6goNi2B4zWDxuaGq7B4IjnfZCM+chc9MfHZnolZKc3GZl mpvVMyfJrVDxEDsgSdmrz+GdhCEcgrpzb10tOP70iPhPPgwLC48MCuyMJFAi 9uyJ2rr16mODlA6o2NlC2Z5rVTihQidUQKXXzjqi00PtT45ylj3ulu7lAVQR +wwR+QwRU4VizpAk137gvWA7BSQZgI4MF2ZlZkFNGpVF6llTgCGKwdZFTnjC YEMO3t+LQWsE+kG7f3gzNKiwP0r6aCUIBZ2N71RMggKBSGf+MEFlj3teHvTa OFtQc/EExS4CJZBHiIqp3sBrLoLfB/e76Nn/3LCBp0Y4Hh/tLBvjluHlkeza L34QinPEJQGLj8XF0D13vvUvGmyN5wi7Y4YUInR773Zcvz7PACXoJWiGNN6v WPJnaBfVABT7j7XdKgm2OBGRJ/84Q21BjVd0oMpAVGyHim2R0hoVgxdhj2d4 4b4eapowsEXp2FZo5hQ6Cwqc0CUhAoP1qxBvXAWaDcTTjak5xbYgIFClmqDN D+pJYHzQJr7xvvrl6XDDFrlaKRzRsY1fhHXtk+zeHblrV9ju3Wmb/nv6269P 7NhyYudWKCe3fZ8b8FXehk/PL1/06yvPX5kwqnCoffEAijP9kWIQJozc1RIr DwgO2CYh7hyk+wehgNlSOAsUbv0Ug/vJ7bCAqJ56rD5DhGtIGMIh6KDmk2XQ Igp3G7i7iwehmA2fd0GScAhtAgPDdu48EBoqEadKMqTpaZK2gv9lSKQyiSwT 9mckJ2dGH8j5PuD8ivcu+U26PtyhjTC2WHOAjQ/GpQip0QUDMZfwBGR7VDLV 6/bura33GnAliZXhHM3NSh8PEHY8/sdZAI5o7BefdWhuIoA2u3cfiog4GhUV e+BAekKCNDFRGh8vTWgv8ZoSB68ZiYkZKSIJMEeWCeyRHTmcs+m/55f/7dLM Kde83eWetnikAWWnsGvqbnNtrNvvfpNuffflvdMnQOPaqkcYwjkoJbkbexg8 gaJBSA5uA0LJy98LjdjHclyBIQfDwlJjY2XJyXSRJiVhGnRdgEg0ZxLiM1JS NISRxsVl/rj/+N5dJyk7BRtZUZGyuLjUFJHqZnUrTRGSZTUdUDypS47FI1qH Dypb8FpywP+F7d0buSuIyZAfQ0Kg0YEb3RMjMRFEJi0uji6w3b6fQZikpHSR KD01rc1OwYZIDOYpPS5OEnPsbk1NK064NjYTV8R0QLXF/SuXWyvKi8sr4o8d 20fZGuygUgU8kLgDBzJTUhgt3mmRxMcfT009k5l5NisrLzMzWyyW0KZHW2Rw oU0V3sb2KynpZFratd9+01StiZgb0wHFExD5E2JxRnw8uBygHrSPChvR4eG6 0IMup6TSqODg1cuXL1qw4JMPPjgcGQl7uv06fCATHN2UlM/WrJk8ceLUqVOX LFlCPzCE6IlJoaq8HAwE3M5gVsQxMfHR0XEHD6YcPQp7dPFAoKFPpKYufvdd 5iwYKyurT1evzk1Pl3TJE/oUz06bxppEc+TIkVaiJyYCKmFy+cKF1JgYmg80 Veiii4CATTktlX6wbBnduJYAgQBe6Lf/Xr/+VEZGx3YnMTEtPj5PJnv/vfdo Ugko9OvXD97Cq4qMQTIZQCucpNpRp7BF21ikpIDyDBgwAFpWYGGhkQJobngd 6ulJE68zGYEjPDZsGM0uzZdpnmzZsqWV8mO5vkIErbU1Nbo7HtoyAkLx3Vdf aVhBw4IC7IF2Dw0MBKe0w1OAWImOHRs0cCDT0MC3bGxsYOPzdetaCUm4Bq3k xYWFGlvTC5KArfly40b69mfyRIOwoKDOSAI7ISCCr/s+9dTI4cOdhEJLxhHo mZuEJKaAX86c6TVJ6FbeHxpqwWAFKIP74MEjhg/3Hjt21fvvgz3q+iDg3EKB jeSfftofEvL1v/71zttvf7h8OXtCX0sL8U+4wumsLAkV2vTO4mCeiMU7N21a sWQJaEJYYCC4KOLYWDrkgShYqoMc0R4RxMJAOZCmM1lZ8HpCIin49deqiop7 DQ3sShO2GBEN9fX4Tu+tT6LhyUmJ5ExmJrQsWBY4IJ29h/2dxTVdHAq+AvE4 zRyQONiGA57OzATFK7xy5dbNm3TNIToGS0S0xQiAa94XGWGqAd2y6VQGtY9H owudQsF1S0hIjY3NTknJSUsDEv6Sl0cn8GkQnhgQ1LUtLylJi43tO0kMWoB1 OenpQZs3z3vzzSkTJ4738Znw5JN/W7Ro+44dCoWilfDEYKAvrPzKFfGxY1Ld 8macFFAncGvpAEobdnZ2ly5daiU5fAOBIknBxYu9Dm2MU2RJSWBrXF1cmFlZ AZXUpR925O/v30oiZUMiPzfXlM0NGJqslJS46Gh7e3uco3tYRqyo5H9ISEgr 6eUxJM7n5JgySTIocwMOyQxqXao2DaFLe/fQ9et41S3ilhgIcGFzpNLe9doY VUxEoqP794PLqu2TzH3ttary8lZCEoOhqbHxeGoqPeaHczJ0zZNskQiC3+Ad Oz5etWrBvHkL58//YNkyiHfS4+MLC/CSW4QkBkLj/ftZYrHpk4TmCU7ZpaWd yczUlNyMDAjNCEkMClCSbHNQEiZVNGNo8TDaxERCEkOjoa5O1uecvC4KYKCD A7fFMTFFV/HiBYQkBsLtW7cM14J0yRaLIYZNYyTt9UsSOGzVjRtcX0g+A3fc GDK0yUxJObRvX1x0dJ5MlgcuRHo6cAZOR3f0aHrxNIXeA6TSpUp0ByL4VOBZ cX0h+Yzqyso0ffTudVgk1PjV1+fMEVhYzHnppY9WrtwaEHDkhx/gT+BwAmfy qF5jYE6ORALlFOwELslk8dHRqTqkbuADqTExF8+dw7+E2BqDwaAkoZOlMT/+ 6OjgoElr2NrYDB827A/PPvuXP/1pzYoV/16/ftu33+7euhVKwJdfrluzZvqU KZMmTMjofFgskySSuLhbVVVcX0We46YhSUKLySmpFAigSZZ22EnHQtDmzSAs XQ9EkSYng4xcyMvj+hLyH9VVVQYliTQxEY5/JjPz09WrofUtBQLNAGnL9n46 Jj083N2BUaeoJHDXGkKnYTsYsUagb1SWlxuh4wYPlpbJFsybh6hR9HjqBGPm hY21tauLi9eYMauWLhXFxOSkp2NfukuGwCtUu5Jk4w0M+tqqioqMNk7gZFra gvnztY2LtbX1vDffFMfEnM3KkiUnd6shGQkJwBC1UtlKGGJg0JdXKZcbhyR0 egTil6AtWyDS8XR3t7GxAUnpb2s7xNPz7bfeSjh0SPOxThnSTqFyasUTEtEY GjRJFNevG3PEEe70l0ggyAVH5XBkZFRw8E9RUbD/TFZWZndD40BkIC4+npZW S41uJRpiBNAXuejaNbFxh6XhjBmVvssWi4+npmaLRDhr2q2JofpozufmNlHD zwhDjIMHA1w5GrtI9+l0m6XHXgqVhqU7aFoJQ4wI+lIXFhTgUdAm2QVMT6YA DudKpZq5NgTGxAOSmOQoaM3Erqvtzz4iAmJ8aKIbUBIdn0NiTIbgbj6xuFqT cicM4Q6N1PBFkxrjijUkPj47NbXuzp1WIiCcg7r+VRUVEupJiXrgiT7Gikgh Aoo5Vlla0koYYiKgWqGirEyanJwWF9dru4OfvQkbKSkZ1BHoB//2lDP0IxnT EhLyzp5jVo+Ac9B3693a2lOZmeCfZFCJzZ4KSHqaJCMpKfNQtOzoT/jRvlIZ lHRxKvXI3zgpgy0P5oCz6BEfj5/pKstMP3jgyr6QhrjDTRU36PpxfIEIKGhU vejqVRnVBa9pTV00BBiS+9//XB03pHCo/fWRwoKJj19866W89WuzI0LTRWL8 IOjUtAz6SeNUzJIO1o3ygtqe4wdvqSfVH98T9Mu8lwuHOyjs0XWESv0mEIaY Jhrq6wsuXpSlpEBoLGlvyq7YAn+Ni70+2lnZD68soBiEiu2R0gaXIlfLgile 51f+/Xjw7gyJJDUhMS0mJkskOpEhBb8UHKHUo0czRCJJZlZ2eOivb8xUCPG3 8JIWLgL8uPuB6P7Fn3GdyExwU4JGUu41NICq5MpkabGxICzpnbEFZEGcmh0R JnezotdFKnKyoJe5wQ0txIvg4HZ3QpfGDb3006Gq27WN9+833qpurK+/VVn5 2+Xfpfujzi9ZWORmpbSmFq1grrLkiO79fBbXhpDE9MCMKapu3Lh84cIJiQTc WmAL3P5Mv0KamJAuEmXtj5J72OIFSpy0irMACCC3Rre/+WdrqbK17i4cs2zO s3eP/IiPXq6uOXqw2JpargKkg/lFB7w0UpOqmK4QNxeCoDswqdLc3AxsATN0 OiuLHn7cRhjwSJOTZWBuxropBtJKwmhoIV4kpdASVX2xBg5Se3h/8RiXyg// XrPju5sbPyl/53Xl+KF4f1RooRVSMDREAccZgJReg1uoVAmB6YOVrKi7e7dM pfr9l1+AMJkQyMTGihKTLk3zUdqxSUK3tWqcZ0t9HXyx9ocQ5RiX4iF2Fe8v KJnmrXzcufT5p5vK1PAn9R+n4aVd23kCG/BWPWsKNz+YoA/QTm2B63KrokJV WVW46E+KfuBRPGQyFK5WhQhVf7WhpeYWtHj11xtLn3vy1vdf3Vj0Vk3g92Vv zaxcvfjGO69Xf/OvO4d+wAt4tVsc2JBbofIFr+JzEIfETKH1PNWbH79fKHjQ ypq2BltzJzoSPlCz9Zua7QGgGJUr361Y8dfqrzaWTBhV/Z/1VZ9/2Hi14N6F 83gBr3YhaiPJ/Nn40IQk5o8W6vlCFUv/IrfUIokLbus7lI96N/GYwt2m7K0X G05mFo8SgmdSlxKncOtX9soM+CuQBAwT64vlc2fhExCS8ABUI95Y8Bpe7pmt JNjc3N61peVObfEIB9VTj6lfnKQc7VQnTgSSgE8CYU7RQFT95Rf10lQsREyf xBaBx8L1byPQJ0qfGYftBTPLQbe1NVLPeRY+0NJQXxO46fauzVXrVoFnUjJ5 zJ3DUZWrFtGZkMqVi9jWyhEp3Kwai/BzrkgIbN6gmq+5orz4sYFFg7RC4Hae 3E04Ch+7c3AfEKZi+TsQ75S+4Fv1yTI6fmksvIa9ESFi+TMgTXfj8LpIZFlP 80YLtYRfwSWsIQ+3ssa7gP3FIwbd/+X8/cu/Npw6AZ9XPTUcohvYALsDOyEu xqGNmxWYJ4bvalVogW5964/PQhb3NGtQDsm9/DPYOjBkREF1vmDmDEAgCNDc ZW+8oHFBQTrAS6G3mxRy8ElKpvvI6cWj7dpkBK9Eb4UqP1lGfYgoiTmDNjfl ZaADcnuqcYEqDqitxa2R0tu9au1yWkDwh4EnGgcDNjSt39LSkJN9c/1HJRNH gSsL/gnEztcRqgnajP9KSGLuoPQBnFK8VrgtAulQeNqWzhgPDmpdWpJGMR4C 0xHFVGFYk8bGe/lnayP3grzU7tvbSh7yzC80KRX12dJ7eTltvXIP/tCkU64D PkN8D35DmwbAjd6ZCcyWJqwhxMrwD9jlaHrI6yAgICAgICAgIDAlIIS4rkLr /wNyYhfr "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output"], "Huzzah!"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]], "Output", TaggingRules->{}, CellChangeTimes->{3.777382978402919*^9, 3.777383212678739*^9}, CellLabel->"Out[25]=", CellID->274426729] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Using Files and Directories", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.777383282034328*^9, 3.7773832850003242`*^9}, { 3.7773833627939987`*^9, 3.777383370487336*^9}}, CellID->593356076], Cell["Store some code and data in a package file:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7773832998041897`*^9, 3.777383340282875*^9}, { 3.777383374141506*^9, 3.777383429975431*^9}, {3.777383470605438*^9, 3.777383497078916*^9}, {3.777383751175166*^9, 3.777383752563189*^9}, { 3.777386083084599*^9, 3.777386083711768*^9}}, CellID->213749007], Cell[BoxData[{ RowBox[{ RowBox[{"bostondata", "=", RowBox[{"Normal", "@", RowBox[{ "ResourceData", "[", "\"\\"", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"BostonOldHomeCount", "[", "age_", "]"}], ":=", RowBox[{"Length", "[", RowBox[{"Select", "[", RowBox[{"bostondata", ",", RowBox[{ RowBox[{"#AGE", ">", "age"}], "&"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"DumpSave", "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"BostonOldHomeCount", ",", "bostondata"}], "}"}]}], "]"}], ";"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383519513702*^9, 3.777383564821252*^9}, { 3.777383759194744*^9, 3.777383772994676*^9}, {3.777384324495123*^9, 3.777384328322856*^9}, {3.777384360764206*^9, 3.7773844127681427`*^9}, { 3.77738445249573*^9, 3.777384475867535*^9}, {3.7773860087450533`*^9, 3.7773860191831503`*^9}, {3.77738605875007*^9, 3.7773860588699636`*^9}}, CellLabel->"In[22]:=", CellID->998833022], Cell["Create a paclet directory including that file:", "Text", TaggingRules->{}, CellChangeTimes->{{3.777386088058751*^9, 3.7773861158929663`*^9}}, CellID->844478343], Cell[BoxData[ RowBox[{ RowBox[{"dir", "=", RowBox[{"Pacletize", "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"File", "[", "\"\\"", "]"}], "}"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383729624803*^9, 3.7773837462868843`*^9}, { 3.777383778854944*^9, 3.777383810695393*^9}, 3.777384332023061*^9, { 3.7773843951078167`*^9, 3.7773843993093977`*^9}, {3.777384481090047*^9, 3.777384481447042*^9}, {3.777386026469995*^9, 3.777386026643517*^9}}, CellLabel->"In[25]:=", CellID->616856752], Cell["Clear the definitions and add the paclet directory:", "Text", TaggingRules->{}, CellChangeTimes->{{3.777386099021967*^9, 3.777386125984495*^9}}, CellID->733843260], Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{"bostondata", ",", "BostonOldHomeCount"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PacletManager`PacletDirectoryAdd", "[", "dir", "]"}], ";"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383813980206*^9, 3.7773838282126217`*^9}, 3.777383955742506*^9, {3.777384418820318*^9, 3.777384420603409*^9}, 3.7773861350808067`*^9}, CellID->273966388], Cell["Load the paclet context:", "Text", TaggingRules->{}, CellChangeTimes->{{3.77738614465228*^9, 3.77738614981251*^9}}, CellID->314055699], Cell[BoxData[ RowBox[{"<<", "BostonHouses`"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383848193329*^9, 3.777383851396628*^9}, { 3.7773843355779037`*^9, 3.777384336418738*^9}, 3.777384426405611*^9}, CellLabel->"In[28]:=", CellID->124812698], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BostonOldHomeCount", "[", "90", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383832647155*^9, 3.7773838385809317`*^9}, { 3.777384294153216*^9, 3.777384295129631*^9}, {3.77738443880293*^9, 3.77738444119147*^9}, {3.7773860687298*^9, 3.777386077048723*^9}}, CellLabel->"In[32]:=", CellID->917412592], Cell[BoxData["168"], "Output", TaggingRules->{}, CellChangeTimes->{ 3.7773838389813843`*^9, 3.777384257226203*^9, 3.777384295717389*^9, 3.7773843382281837`*^9, 3.7773844419175243`*^9, 3.777384487537466*^9, { 3.77738604482999*^9, 3.777386077598185*^9}}, CellLabel->"Out[32]=", CellID->622002061] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107563], Cell["Create a directory with many code files:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7773832998041897`*^9, 3.777383340282875*^9}, { 3.777383374141506*^9, 3.777383429975431*^9}, {3.777383470605438*^9, 3.777383497078916*^9}, {3.777383751175166*^9, 3.777383752563189*^9}, { 3.777386083084599*^9, 3.777386083711768*^9}, {3.777386338350515*^9, 3.7773863510314903`*^9}}, CellID->553221995], Cell[BoxData[ RowBox[{ RowBox[{"codedir", "=", RowBox[{"CreateDirectory", "[", "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7773864132368803`*^9, 3.7773864248513536`*^9}}, CellLabel->"In[45]:=", CellID->684642408], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"symb", "=", RowBox[{"Symbol", "[", "#", "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"symb", "[", "]"}], "=", RowBox[{"RandomReal", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"DumpSave", "[", RowBox[{ RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"codedir", ",", RowBox[{"#", "<>", "\"\<.mx\>\""}]}], "}"}], "]"}], ",", "symb"}], "]"}]}]}], "]"}], "&"}], "/@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383519513702*^9, 3.777383564821252*^9}, { 3.777383759194744*^9, 3.777383772994676*^9}, {3.777384324495123*^9, 3.777384328322856*^9}, {3.777384360764206*^9, 3.7773844127681427`*^9}, { 3.77738445249573*^9, 3.777384475867535*^9}, {3.7773860087450533`*^9, 3.7773860191831503`*^9}, {3.77738605875007*^9, 3.7773860588699636`*^9}, { 3.777386364525341*^9, 3.777386469375214*^9}}, CellLabel->"In[46]:=", CellID->787257208], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", "a", "}"}], ",", RowBox[{"{", "b", "}"}], ",", RowBox[{"{", "c", "}"}], ",", RowBox[{"{", "d", "}"}], ",", RowBox[{"{", "e", "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.77738647016998*^9, 3.777386826823833*^9}, CellLabel->"Out[46]=", CellID->950726235] }, Open ]], Cell["Create a paclet directory including those files:", "Text", TaggingRules->{}, CellChangeTimes->{{3.777386088058751*^9, 3.7773861158929663`*^9}, { 3.778518505852257*^9, 3.778518508330268*^9}}, CellID->291646162], Cell[BoxData[ RowBox[{ RowBox[{"dir", "=", RowBox[{"Pacletize", "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"File", "[", "codedir", "]"}], "}"}]}], "]"}]}], ";"}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.777383729624803*^9, 3.7773837462868843`*^9}, { 3.777383778854944*^9, 3.777383810695393*^9}, 3.777384332023061*^9, { 3.7773843951078167`*^9, 3.7773843993093977`*^9}, {3.777384481090047*^9, 3.777384481447042*^9}, {3.777386026469995*^9, 3.777386026643517*^9}, { 3.777386513385624*^9, 3.777386533156098*^9}, {3.777386817626464*^9, 3.77738682004005*^9}}, CellLabel->"In[47]:=", CellID->914160713], Cell["Clear the definitions and add the paclet directory:", "Text", TaggingRules->{}, CellChangeTimes->{{3.777386099021967*^9, 3.777386125984495*^9}}, CellID->733843261], Cell[BoxData[{ RowBox[{ RowBox[{"Clear", "[", RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "e"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PacletManager`PacletDirectoryAdd", "[", "dir", "]"}], ";"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383813980206*^9, 3.7773838282126217`*^9}, 3.777383955742506*^9, {3.777384418820318*^9, 3.777384420603409*^9}, 3.7773861350808067`*^9, {3.7773865444673*^9, 3.777386545935706*^9}}, CellLabel->"In[48]:=", CellID->655681343], Cell["Load the paclet context:", "Text", TaggingRules->{}, CellChangeTimes->{{3.77738614465228*^9, 3.77738614981251*^9}}, CellID->314055700], Cell[BoxData[ RowBox[{"<<", "LetterFuncs`"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383848193329*^9, 3.777383851396628*^9}, { 3.7773843355779037`*^9, 3.777384336418738*^9}, 3.777384426405611*^9, 3.777386550448412*^9, 3.777386823205881*^9}, CellLabel->"In[50]:=", CellID->296206139], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"a", "[", "]"}], ",", RowBox[{"b", "[", "]"}], ",", RowBox[{"c", "[", "]"}], ",", RowBox[{"d", "[", "]"}], ",", RowBox[{"e", "[", "]"}]}], "}"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.777383832647155*^9, 3.7773838385809317`*^9}, { 3.777384294153216*^9, 3.777384295129631*^9}, {3.77738443880293*^9, 3.77738444119147*^9}, {3.7773860687298*^9, 3.777386077048723*^9}, { 3.777386552753504*^9, 3.77738657006635*^9}}, CellLabel->"In[52]:=", CellID->856095057], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.9846952847239556`", ",", "0.9789644809844518`", ",", "0.8007965566015791`", ",", "0.3998866127195113`", ",", "0.6128706172983651`"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.7773838389813843`*^9, 3.777384257226203*^9, 3.777384295717389*^9, 3.7773843382281837`*^9, 3.7773844419175243`*^9, 3.777384487537466*^9, { 3.77738604482999*^9, 3.777386077598185*^9}, {3.777386556693636*^9, 3.7773865705334177`*^9}, {3.777386831477035*^9, 3.777386836306312*^9}}, CellLabel->"Out[52]=", CellID->614527227] }, Open ]] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Properties and Relations", "Subsection", TaggingRules->{}, CellChangeTimes->{{3.7773822051532183`*^9, 3.777382211135805*^9}}, CellID->232113220], Cell["The created paclet directory contains several files:", "Text", TaggingRules->{}, CellChangeTimes->{{3.745241679660694*^9, 3.7452417019502354`*^9}, { 3.777380534416491*^9, 3.777380542689528*^9}, {3.7773822287879267`*^9, 3.777382265444848*^9}}, CellID->529271888], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"TwiceSquared", "[", "x_", "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{"2", "x"}], ")"}], "^", "2"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"dir", "=", RowBox[{"Pacletize", "[", RowBox[{"\"\\"", ",", RowBox[{"{", "\"\\"", "}"}], ",", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"FileNames", "[", RowBox[{"\"\<*\>\"", ",", "dir", ",", "Infinity"}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{ 3.70999648737139*^9, {3.74524128350716*^9, 3.745241371154924*^9}, { 3.7773822697574987`*^9, 3.777382291256868*^9}, {3.777388372833696*^9, 3.7773883850535994`*^9}, {3.778518917310543*^9, 3.7785189357664585`*^9}}, CellID->307914580], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"mypaclets/basedir/TwiceSquared\"\>", ",", "\<\"mypaclets/basedir/TwiceSquared/Kernel\"\>", ",", "\<\"mypaclets/basedir/TwiceSquared/Kernel/TwiceSquaredDump.mx\"\>", ",", "\<\"mypaclets/basedir/TwiceSquared/Kernel/TwiceSquaredLoad.m\"\>", ",", "\<\"mypaclets/basedir/TwiceSquared/Kernel/TwiceSquared.m\"\>", ",", "\<\"mypaclets/basedir/TwiceSquared/PacletInfo.m\"\>"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.745241378023611*^9, 3.745241403587167*^9}, 3.777380544868847*^9, 3.777381936640635*^9, 3.777381976909101*^9, 3.777382052984634*^9, 3.777382190559763*^9, 3.777382294427896*^9, 3.7773883856135902`*^9}, CellLabel->"Out[99]=", CellID->598430893] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Source & Additional Information", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source & Additional Information"}, CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[TextData[{ "Contributed By", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoContributedBy"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Contributed By"}, DefaultNewCellStyle->"Text", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell["Bob Sandheinrich", "Text", CellID->177008439] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Keywords", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoKeywords"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Keywords"}, DefaultNewCellStyle->"Item", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell["Paclet", "Item", CellID->948365685], Cell["Code", "Item", CellID->687929316], Cell["Package", "Item", CellID->100224568] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Categories"}, DefaultNewCellStyle->"Item", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "3D Visualization"}], "\" \"", "\"3D Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Accessibility"}], "\" \"", "\"Accessibility\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Accessing External Services & APIs"}], "\" \"", "\"Accessing External Services & APIs\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Associations"}], "\" \"", "\"Associations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Astronomical Computation & Data"}], "\" \"", "\"Astronomical Computation & Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Background & Scheduled Tasks"}], "\" \"", "\"Background & Scheduled Tasks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Calculus"}], "\" \"", "\"Calculus\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Calling External Programs"}], "\" \"", "\"Calling External Programs\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Functions & Deployment"}], "\" \"", "\"Cloud Functions & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Code as Data"}], "\" \"", "\"Code as Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Color Processing"}], "\" \"", "\"Color Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computational Geometry"}], "\" \"", "\"Computational Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computation on Graphs"}], "\" \"", "\"Computation on Graphs\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computer Vision"}], "\" \"", "\"Computer Vision\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Control Objects"}], "\" \"", "\"Control Objects\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Core Language & Structure"}], "\" \"", "\"Core Language & Structure\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Creating Form Interfaces & Apps"}], "\" \"", "\"Creating Form Interfaces & Apps\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cryptography"}], "\" \"", "\"Cryptography\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cultural Data"}], "\" \"", "\"Cultural Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Structures"}], "\" \"", "\"Data Structures\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Transforms and Smoothing"}], "\" \"", "\"Data Transforms and Smoothing\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Visualization"}], "\" \"", "\"Data Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Date & Time"}], "\" \"", "\"Date & Time\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Decorations"}], "\" \"", "\"Decorations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Differential Geometry"}], "\" \"", "\"Differential Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Dimension Reduction"}], "\" \"", "\"Dimension Reduction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Discrete Mathematics"}], "\" \"", "\"Discrete Mathematics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Dynamic Interactivity Language"}], "\" \"", "\"Dynamic Interactivity Language\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Error Handling"}], "\" \"", "\"Error Handling\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Expressions"}], "\" \"", "\"Expressions\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Interfaces & Connections"}], "\" \"", "\"External Interfaces & Connections\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Language Interfaces"}], "\" \"", "\"External Language Interfaces\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "File Operations"}], "\" \"", "\"File Operations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Front End Utilities"}], "\" \"", "\"Front End Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Functional Programming"}], "\" \"", "\"Functional Programming\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Function Visualization"}], "\" \"", "\"Function Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Games"}], "\" \"", "\"Games\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data and Entities"}], "\" \"", "\"Geographic Data and Entities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data & Computation"}], "\" \"", "\"Geographic Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Visualization"}], "\" \"", "\"Geographic Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometric Region Properties"}], "\" \"", "\"Geometric Region Properties\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometric Transforms"}], "\" \"", "\"Geometric Transforms\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometry"}], "\" \"", "\"Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Construction & Representation"}], "\" \"", "\"Graph Construction & Representation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Properties & Measurements"}], "\" \"", "\"Graph Properties & Measurements\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Visualization"}], "\" \"", "\"Graph Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Handling Arrays of Data"}], "\" \"", "\"Handling Arrays of Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Higher Mathematical Computation"}], "\" \"", "\"Higher Mathematical Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Image Filtering & Neighborhood Processing"}], "\" \"", "\"Image Filtering & Neighborhood Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Image Processing & Analysis"}], "\" \"", "\"Image Processing & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Importing and Exporting"}], "\" \"", "\"Importing and Exporting\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Interactive Manipulation"}], "\" \"", "\"Interactive Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Iterated Maps & Fractals"}], "\" \"", "\"Iterated Maps & Fractals\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Just For Fun"}], "\" \"", "\"Just For Fun\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Knowledge Representation & Natural Language"}], "\" \"", "\"Knowledge Representation & Natural Language\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Layout & Tables"}], "\" \"", "\"Layout & Tables\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Life Sciences & Medicine: Data & Computation"}], "\" \"", "\"Life Sciences & Medicine: Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Linguistic Data"}], "\" \"", "\"Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "List Manipulation"}], "\" \"", "\"List Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Logic & Boolean Algebra"}], "\" \"", "\"Logic & Boolean Algebra\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Low-Level Notebook Programming"}], "\" \"", "\"Low-Level Notebook Programming\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Machine Learning"}], "\" \"", "\"Machine Learning\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Maps & Cartography"}], "\" \"", "\"Maps & Cartography\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Mathematical Functions"}], "\" \"", "\"Mathematical Functions\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Matrices and Linear Algebra"}], "\" \"", "\"Matrices and Linear Algebra\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Molecular Structure & Computation"}], "\" \"", "\"Molecular Structure & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Natural Language Processing"}], "\" \"", "\"Natural Language Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Neural Networks"}], "\" \"", "\"Neural Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Basics"}], "\" \"", "\"Notebook Basics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Document Generation"}], "\" \"", "\"Notebook Document Generation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Documents & Presentation"}], "\" \"", "\"Notebook Documents & Presentation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Formatting & Styling"}], "\" \"", "\"Notebook Formatting & Styling\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Number Theory"}], "\" \"", "\"Number Theory\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Numeric Approximation"}], "\" \"", "\"Numeric Approximation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Optimization"}], "\" \"", "\"Optimization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Computing"}], "\" \"", "\"Parallel Computing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["Persistent Storage", {False, "Persistent Storage"}], "\" \"", "\"Persistent Storage\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Physics & Chemistry: Data and Computation"}], "\" \"", "\"Physics & Chemistry: Data and Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Plane Geometry"}], "\" \"", "\"Plane Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Polynomial Algebra"}], "\" \"", "\"Polynomial Algebra\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Precollege Education"}], "\" \"", "\"Precollege Education\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Presentations with the Wolfram System"}], "\" \"", "\"Presentations with the Wolfram System\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Probability & Statistics"}], "\" \"", "\"Probability & Statistics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ "Programming Utilities", {False, "Programming Utilities"}], "\" \"", "\"Programming Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Random Stuff"}], "\" \"", "\"Random Stuff\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Real & Complex Analysis"}], "\" \"", "\"Real & Complex Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Recreational Math"}], "\" \"", "\"Recreational Math\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Repository Tools"}], "\" \"", "\"Repository Tools\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "RepositoryTools"}], "\" \"", "\"RepositoryTools\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Rules & Patterns"}], "\" \"", "\"Rules & Patterns\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Scientific and Medical Data & Computation"}], "\" \"", "\"Scientific and Medical Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Scientific Data Analysis"}], "\" \"", "\"Scientific Data Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Segmentation Analysis"}], "\" \"", "\"Segmentation Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sequence Analysis"}], "\" \"", "\"Sequence Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Shortcuts and Idioms"}], "\" \"", "\"Shortcuts and Idioms\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Signal Processing"}], "\" \"", "\"Signal Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Social, Cultural & Linguistic Data"}], "\" \"", "\"Social, Cultural & Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Social Data"}], "\" \"", "\"Social Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Solid Geometry"}], "\" \"", "\"Solid Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sound & Video"}], "\" \"", "\"Sound & Video\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Statistical Data Analysis"}], "\" \"", "\"Statistical Data Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "String Manipulation"}], "\" \"", "\"String Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Strings & Text"}], "\" \"", "\"Strings & Text\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Symbolic & Numeric Computation"}], "\" \"", "\"Symbolic & Numeric Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "System Operation & Setup", {False, "System Operation & Setup"}], "\" \"", "\"System Operation & Setup\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Text Analysis"}], "\" \"", "\"Text Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Text Manipulation"}], "\" \"", "\"Text Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Theorem Proving"}], "\" \"", "\"Theorem Proving\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Time-Related Computation"}], "\" \"", "\"Time-Related Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Time Series Processing"}], "\" \"", "\"Time Series Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Topology"}], "\" \"", "\"Topology\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Tuning & Debugging"}], "\" \"", "\"Tuning & Debugging\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Units & Quantities"}], "\" \"", "\"Units & Quantities\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "User Interface Construction"}], "\" \"", "\"User Interface Construction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Viewers and Annotation"}], "\" \"", "\"Viewers and Annotation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Visualization & Graphics"}], "\" \"", "\"Visualization & Graphics\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Weather Data"}], "\" \"", "\"Weather Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Web Operations"}], "\" \"", "\"Web Operations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram Physics Project"}], "\" \"", "\"Wolfram Physics Project\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram System Setup"}], "\" \"", "\"Wolfram System Setup\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["Working with Paclets", {False, "Working with Paclets"}], "\" \"", "\"Working with Paclets\""}, "RowDefault"], StripOnInput->False, FontSize->12], "\<\"\"\>"} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxVkE9LA0EMxUHauiviQRQ8zqm3/RBLa6Eg7NIonqfbdDt0/jHJIPPtzSCInhLIL++\ 9pG86WAIXi7AaMsfMHdxuLjhd8XRe0OLNEMPjiImkQc8KOCQ9IzyPKcxJO2f8rD7YWMMGCV6gCOfUE\ DFpNsGrtQLkHOHpM6Rrhb8MX9SoJ4tMYr4XnKjtMwcnG1MHjUjLOhe422jGOSRRllhDrIJ0vvmJVes\ hW6Tm9WRYH6Vb7rQl/B20WxSTP5N6W7DZ+f+GD3vPmGIStjpA2/sC+Ugoz7g/\ IIWcJnwvEaHZZT9V5hu58m5A"}, CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->558015110] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Symbols", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedSymbols"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Related Symbols"}, DefaultNewCellStyle->"Item", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell["Get", "Item", CellID->268859946], Cell["Needs", "Item", CellID->430117283], Cell["DumpSave", "Item", CellID->701077602] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Resource Objects", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedResourceObjects"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Related Resource Objects"}, DefaultNewCellStyle->"Item", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell["TraceLoading", "Item", CellID->822234168], Cell["CreatePackageEventHandler", "Item", CellID->584805615], Cell["DefinitionData", "Item", CellID->128372319] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Source/Reference Citation", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSourceReferenceCitation"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source/Reference Citation"}, DefaultNewCellStyle->"Text", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], 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->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Links", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoLinks"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Links"}, DefaultNewCellStyle->"Item", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], 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->{"DefaultContent", "TabNext"}, CellID->132505746] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Tests", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"VerificationTests", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "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 ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "VerificationTest", "SymbolsRefLink", ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"], BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, { "Link"}]], ButtonData -> "paclet:ref/VerificationTest", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " expressions for including additional options."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoVerificationTests"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "VerificationTests"}, DefaultNewCellStyle->"Input", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MyFunction", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellTags->"DefaultContent", CellLabel->"In[3]:=", CellID->946203791], Cell[BoxData[ RowBox[{"x", " ", "y"}]], "Output", CellTags->"DefaultContent", CellLabel->"Out[3]=", CellID->168370258] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Compatibility", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Compatibility", Cell[ BoxData[ FrameBox[ Cell[ "Specify any known compatibilities for your resource to ensure it is \ discoverable on the correct platforms.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibility"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Compatibility"}, CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[TextData[{ "Wolfram Language Version", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityWolframLanguageVersionRequired", Cell[ BoxData[ FrameBox[ Cell[ "Enter required Wolfram Language Version (e.g. 12.1+).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> { "SectionMoreInfoCompatibilityWolframLanguageVersionRequired"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{ "TemplateGroupName" -> "CompatibilityWolframLanguageVersionRequired"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{ "CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell["12.3+", "Text", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Operating System", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityOperatingSystem", Cell[ BoxData[ FrameBox[ Cell[ "Select all operating systems where your resource is expected to \ function properly.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityOperatingSystem"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityOperatingSystem"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Windows", {False, "Windows"}], "\" \"", "\"Windows\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["MacOSX", {False, "MacOSX"}], "\" \"", "\"Mac\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Unix", {False, "Unix"}], "\" \"", "\"Unix\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxNkNuKwkAMhsEerLDsE/gKfQipCoJLF7PL7m0PUQenM8Mkg87bmwot3iX5/\ 3w5bIoSMuCoEfI6sAtcwrK6YnfD/pxQelTEsPxTprd3gvyr6Wr4h/\ TXqIc0HhgHmmznBaWnIKDZPgWzkkj/\ BJmLL9iELL69deg5wrqyg2tYtUorjrUUJTEXiCRDZcnasbLmxX6fTsWuV9y0EmX7RhPOwmqLGt+\ V8VKrw2CoSkr4PBhG77xYRjCsNiZCaAnlIx8nJBt8hz/RIRT7YLrR8wRtF2wJ"}, CellTags->{ "CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Required Features", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityFeatures", Cell[ BoxData[ FrameBox[ Cell[ TextData[{"Choose any other features that are ", Cell[ BoxData[ StyleBox[ StyleBox["required", "TI"], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " in order to use your resource."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityFeatures"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityFeatures"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebooks"}], "\" \"", "\"Notebooks\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Kernels"}], "\" \"", "\"Parallel Kernels\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Access"}], "\" \"", "\"Cloud Access\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxlUM1qwzAMHmuzJlDKLrv3BfIQIVugrKyl2gs4jsJMFdtY8sFvP2eDkLHb96cPSU1ZQw\ GSCOHpEsVHqWHXfqG+4zA+8PZsOCvFSXDicfPLx0fe3mKeqD6cYO/cnVdwcZ+vKigipOM7BovE/\ 5Ulu2/JxeHYaI3Mf1kN5TU4j0ESvLRu8kpMb8hI6lBJDJgTu4sX4+\ xP33pDLt8GI6rPqOgUMS5G9YqEa2c+21GcLLebGg4nKxh8yJG5GKrGJog9Y37G/\ obsYtD4mTxC2UWr58w3NfBx2Q=="}, CellTags->{ "CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Environments", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityEvaluationEnvironment", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Select all evaluation environments where your resource is expected \ to be compatible. See ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "$EvaluationEnvironment", "SymbolsRefLink", ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"], BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, { "Link"}]], ButtonData -> "paclet:ref/$EvaluationEnvironment", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " for more details."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityEvaluationEnvironment"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityEvaluationEnvironment"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Session", {False, "Session"}], "\" \"", TemplateBox[{"\"Session\"", "\"Local or cloud interactive session\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Script", {False, "Script"}], "\" \"", TemplateBox[{"\"Script\"", "\"Script run in batch mode\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Subkernel", {False, "Subkernel"}], "\" \"", TemplateBox[{"\"Subkernel\"", "\"Parallel or grid subkernel\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["WebEvaluation", {False, "WebEvaluation"}], "\" \"", TemplateBox[{ "\"WebEvaluation\"", "\"Cloud evaluation initiated by an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["WebAPI", {False, "WebAPI"}], "\" \"", TemplateBox[{"\"WebAPI\"", "\"API called through an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Scheduled", {False, "Scheduled"}], "\" \"", TemplateBox[{"\"Scheduled\"", "\"Scheduled task\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["BatchJob", {False, "BatchJob"}], "\" \"", TemplateBox[{"\"BatchJob\"", "\"Remote batch job\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], "\<\"\"\>", "\<\"\"\>"} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxdUdFqwzAMhK1tEtj2EXvPR3RpChmDlmqw58RRialjG0su5O/\ nlMTJ9mRJd9yd5H2awxZ4UAi7k2frOYek6FDcsL0mtPmSxJAAEkmjYQfCScuQgW9u6DQqeP3BprzXy\ tf8YIR2f64CQ3TYeoUtpB81i+7TNMGpYuxp1r0+0eYSKIv+XERkNpzeOF8FWMqI/\ sv0t120p6jTu9KO0ZcyonGb9V7p2RmLjgd4L0xvg08jleRhcS31XTqje9TjgU92nNEouj4EpWUruW5\ CtT3WijAC2QEVrpHxl4zyvabiOYe3SjM66wLlsXG210M4C2Ewe7kgGe8Efg82xD96LUbOL+VQrkA=\ "}, CellTags->{ "CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Cloud Support", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityCloudSupport", Cell[ BoxData[ FrameBox[ Cell[ "Specify whether your resource is expected to work in the public \ cloud.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityCloudSupport"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityCloudSupport"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[True, {False, True}], "\" \"", "\"Supported in cloud\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxNjkEKwkAMRVGqVhAX7tx5gR5Cq0JBqBgvUNsUB6eTYZIsentnQMVdyH/vJ/\ u8gBnIaBHmtYpXKWBRPrF9YddPOLsYFs7uQTFyleDA320/\ 5eym0duAek9BsNsZt2stafc18msgj0FG2JY0+EbMw1gjY5mgjxbv1V4MOU6N/\ 82cnzojzSNOs3NjGX/B8ogW/5P0NFkdHJeTAtaVEww+RCQVw+\ JAZLFxBaxuyKShxfvoEfKzujYRb6FXWpA="}, CellTags->{ "CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Author Notes", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Author Notes", Cell[ BoxData[ FrameBox[ Cell[ "This section, when used, will appear near the bottom of the \ published resource. Content displayed in this section can include background, \ possible improvements, additional information and/or implementation details \ that are otherwise beyond the scope of the function documentation.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoAuthorNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Author Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], 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->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Submission Notes", Cell[BoxData[ PaneSelectorBox[{True-> 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, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSubmissionNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Submission Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], 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->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"Pacletize | Definition Notebook", TaggingRules->{"CompatibilityTest" -> HoldComplete[ BinaryDeserialize[ BaseDecode[ "OEM6eJzVWVtT20YUrjEQBhxaMulMkyc98EAyadJpO9NL2iauDcQdIMCa9JW1dGQ0rHeV3RWg\ X9a/17MrydhGciTbTFNPJsja1XfOnut3LH9JPWqJQSgi7u3ehBKUCgT3a2rlJApA+/nLS2qp4+P/\ 9Sb38M/K7seIMrW5/QGkWT+KBj2Q0refnbdmB6EDOMGLRiuSErj+QFkE/\ hfq0e4VXlFtnhIaekJc4q7lg0Bp1ejSfj/g/dOIgSKNU1Aiki504xDIcptqimouv+\ cuFGq58icT7qXZlgButwTXcKOPqb7w60UnPwLwFNnJ5JFYaRi0WIBqn7fBD3gwqu757SOOUSp7LG+\ rWj6KGEPFXt5dTAWcQh9VBYma+kE/ktY0w+O+KavUKYRCBVrIOAFMcFQKVLf+\ q6m1PRqwSKJnaurhMXUZ6A5XmjJGvinS0F+\ dxdgzmbXRFWOeWSdaYjz8JQIjr35IQ3uGiLvmSX8lkUyeFBrXKkeVCeuNBIuELNDmNmFCt2qkdk6Wf\ v195MbS63WrPMavIs/KKv/\ cXy6wUp2AkbfeFtfcJoFSv5RFzS7eRxrdCJ5JqHX0NKMuNDGuFgi7YZKuDYzG4CHuxjvBPHQkBiZXf\ 5QFPpbBFQKeXyVlYV8CfpPqwRlXaTnIsUa7KjoNQ+DeGb+\ g3GPgtYAxNdUwi5IwxUb4tbKVXITFipcikK0uDPAAGoy4fSmicH5QzN1Gk5krLAdXGNBft3BTX8gA1\ LetC3Ave+IGb2/e3jbSSSNbs982UR6NmLb5zXWOpuTL7BaBJDdzXV26mg0doS674iz08Dqt+\ 8VeXgD4mIPreONBlgJr+0z0KDu/MC1t1KLqp7Ji90G/\ CzwPeFKIyqfrHuVu3LoQgQvtgDLRH1WskSomNXZJ7K9YlCm/\ zFOd4uqWXTU9icDHCPDU5FFqAeZlAk+\ wXQzPOy5gBCxrKStdGdnUnrNKVGl22UUWdCkNUd9XVYH3quRYSmUmpY5ZKLPnEVwP7Zlr4yRB1GFVl\ bcjBQfQp27c6XMhk+qU+VotG2/kJ9/rspJycCcSb1oazilmWo1dUqsH+\ KQtjHtV7dYHnZWxcYkLSyVMiQ3UHLAuUgXqPtQtzEak0JY1r5rdnbbJS6ufetDBmt3HSF3rcCss/\ oSR60OtCw6eApeue9mJ1LAz3IHt3Vp7KH5EZk3tVm6DlAseuJQdSxECWsvyuVl1HlE0f4hYSotho6m\ UcAPLvU9Us3Juh6m2JEb144GJobWmJSNdsRg4GyZkk1igQ9DUM/\ NBOoGRtVagkwHkSbLj1Sn4IE10O9nSbXVZjFdGhE6olUxPwxkqGUGXD9Dmd0bPL+zn+\ VucCeYZVqZMEhX4/fNClGqEvhrONAb/YyESDoGXtA/ERYdU4+1nhZhJt8uLg0TYzET+3kROZ/\ YlrVeGz88E9Zmx+OP5vVCB1t+HtFl4/k6hHpPEvjht/ydMfqZqgQDffbJeTVLn1tzOtQz+\ VSHMfVD2YqXHzDMzUX9RiD8fM6+KW5aK/1bOHv8tAZ9Lyc+Idv9ceA7iShpi/ZnMkHl49+\ uS7SqXbc+s6ox0uzPlN/bsx3HMtiicFDuddi8UdpH0ex7nlCTdtbHf2yfeAuUz8R/sZ+etcc9oqyP/\ 1LoXgXJ4qqpjqBiVytHC6YHj2i7iOb4UA4c6HK5BOmmHeeEogf8G4Pi4KcIocAY0NkjOtZCIpBy4CT\ F2wHvptIUTi8i5DtSFgdYydmikxQAPizZgseMKjrgaw8/RYwrhboqrgxC39hhk0t/cTg/\ 1dHpYy6aH8TlCbaLrk2YjJJVx4TBiHTj5bmz4CqLgfdhDgg6L1CGioG9x+\ xY6tG9AO9zDs2EcDuvRetMalxpasHaEJNB0BOvNVRIPeoKRp8nbn0PKEUyeJ9+Snkce5811pZ/+\ KouXDOV2vNqeXMp9D7QyIujZnSeKiMG4/\ WyabbVsUI30dbWyR5mC4Y6npzAQV7A7CHW8e0ORJGTUV01ufdzMGR2GbTwVmCj3d8A9cd0NNHoiRcl\ 98fkvn3IKDA=="]]], "CreationTimestamp" -> 3.859028886743884`16.33905301865297*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}, "DefaultContentMethod" -> "Legacy"}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.859028886799996`16.339053018659282*^9, "VersionInformation" -> {"ResourceVersion" -> "1.0.0"}, "TemplateVersion" -> "1.6.3", "StatusMessage" -> "", "SubmissionReviewData" -> {"Review" -> False}}, CreateCellID->True, FrontEndVersion->"13.0 for Linux x86 (64-bit) (November 22, 2021)", StyleDefinitions->Notebook[{ Cell[ StyleData[StyleDefinitions -> "Default.nb"]], Cell[ StyleData[All, "Working"], DockedCells -> { Cell[ BoxData[ TemplateBox[{}, "MainGridTemplate"]], "DockedCell", CellMargins -> {{-10, -10}, {-8, -8}}, CellFrame -> 0, Background -> RGBColor[0.921569, 0.341176, 0.105882], CellTags -> {"MainDockedCell"}, CacheGraphics -> False], Cell[ BoxData[ TemplateBox[{}, "ToolsGridTemplate"]], "DockedCell", TaggingRules -> {"Tools" -> True}, CellTags -> {"ToolbarDockedCell"}, CellFrameMargins -> {{0, 0}, {2, 2}}, CellFrame -> {{0, 0}, {1, 0}}, CacheGraphics -> False, CellOpen -> Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]]]}, PrivateNotebookOptions -> { "FileOutlineCache" -> False, "SafeFileOpen" -> "IgnoreCache"}, CellLabelAutoDelete -> False, CodeAssistOptions -> {"AutoDetectHyperlinks" -> False}, AutoQuoteCharacters -> {}], Cell["Hint Styles", "Section"], 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["Template Boxes", "Section"], Cell[ StyleData["MoreInfoOpenerIconTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> GraphicsBox[{ Thickness[0.09090909090909091], 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:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], 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:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.627441, 0.627441, 0.627441, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic], True -> GraphicsBox[{ Thickness[0.09090909090909091], 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:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], 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:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "]]}, { 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:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.999985, 0.999985, 0.999985, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["MoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], "\"Click for more information\""}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["InlineMoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], #4}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], 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[{RSNB`clickTime$$ = 0., RSNB`timeout$$ = 3.}, TagBox[ GridBox[{{#, TagBox[ ButtonBox[ DynamicBox[ ToBoxes[ Refresh[ If[AbsoluteTime[] - RSNB`clickTime$$ > RSNB`timeout$$, RawBoxes[ TemplateBox[{ PaneSelectorBox[{False -> GraphicsBox[{ GrayLevel[0.65], 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], True -> GraphicsBox[{ RGBColor[0.988235, 0.419608, 0.203922], 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]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], "\"Click to copy to the clipboard\""}, "PrettyTooltipTemplate"]], RawBoxes[ TemplateBox[{ GraphicsBox[{ RGBColor[0, NCache[2/3, 0.6666666666666666], 0], 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], "\"Copied\""}, "PrettyTooltipTemplate"]]], UpdateInterval -> 1, TrackedSymbols :> {RSNB`clickTime$$}], StandardForm], Evaluator -> "System"], ButtonFunction :> (RSNB`clickTime$$ = AbsoluteTime[]; CopyToClipboard[ BinaryDeserialize[ BaseDecode[#2], Defer]]), 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[ RSNB`$$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 -> (StyleBox[ TagBox[ GridBox[{{ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Template Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection automatically using appropriate \ documentation styles\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2790153672590285854; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Template Input"; DefinitionNotebookClient`TemplateInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 2790153672590285854]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Literal Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection as literal Wolfram Language code\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4138174468017918531; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Literal Input"; DefinitionNotebookClient`LiteralInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 4138174468017918531]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Insert Delimiter\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert example delimiter\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1887802176716758884; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Insert Delimiter"; DefinitionNotebookClient`DelimiterInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 1887802176716758884]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Subscripted Variable\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert subscripted variable placeholder\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3787878858871814623; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Subscripted Variable"; DefinitionNotebookClient`SubscriptInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 3787878858871814623]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], ActionMenuBox[ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ TemplateBox[{ "\"Tables\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\ \[FilledDownTriangle]\""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Table functions\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert table with two columns\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5800166344906378520; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with two columns"; DefinitionNotebookClient`TableInsert[2]]]], DefinitionNotebookClient`ButtonCodeID[ 5800166344906378520]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Insert table with three columns\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 533841403879783297; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with three columns"; DefinitionNotebookClient`TableInsert[3]]]], DefinitionNotebookClient`ButtonCodeID[ 533841403879783297]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Add a row to the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4413051590217973467; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Add a row to the selected table"; DefinitionNotebookClient`TableRowInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 4413051590217973467]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Sort the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 9150037060110806081; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Sort the selected table"; DefinitionNotebookClient`TableSort[]]]], DefinitionNotebookClient`ButtonCodeID[ 9150037060110806081]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Merge selected tables\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2347719643166780208; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Merge selected tables"; DefinitionNotebookClient`TableMerge[]]]], DefinitionNotebookClient`ButtonCodeID[ 2347719643166780208]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ActionMenuBox[ FrameBox[ ButtonBox[ StyleBox[ TemplateBox[{ "\"Cells\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\[FilledDownTriangle]\ \""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert comment for reviewer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2572781756330727330; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Insert comment for reviewer"; DefinitionNotebookClient`CommentInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 2572781756330727330]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as comments\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3646530685697756512; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as comments"; DefinitionNotebookClient`CommentToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 3646530685697756512]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as excluded\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1866935765212102190; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as excluded"; DefinitionNotebookClient`ExclusionToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 1866935765212102190]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { GrayLevel[0.9]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> {1 -> GrayLevel[0.9]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.5}, 5}, "Rows" -> {{Automatic}}}, FrameStyle -> GrayLevel[0.75]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], Cell[ StyleData["MainGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ 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], AspectRatio -> Automatic, Background -> RGBColor[0.988235, 0.419608, 0.203922], ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], StyleBox[ TagBox[ GridBox[{{ StyleBox[ "\"Function Resource\"", FontFamily -> "Source Sans Pro", 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 -> RGBColor[1., 1., 1.]}, "Rows" -> {{None}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], FontSize -> 24, FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", TemplateBox[{ StyleBox[ TemplateBox[{ "\"Function Repository\"", "\" \[RightGuillemet] \""}, "RowDefault"], "Text", FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False], "https://resources.wolframcloud.com/FunctionRepository"}, "HyperlinkURL"]}, { TemplateBox[{ TemplateBox[{ "\"Open Sample\"", "\"View a completed sample definition notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4393071033038384034; DefinitionNotebookClient`$ClickedButton = "Open Sample"; DefinitionNotebookClient`ViewExampleNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[4393071033038384034]]& , "\"View a completed sample definition notebook\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ "\"Style Guidelines\"", "\"View general guidelines for authoring resource \ functions\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5906117565281445171; DefinitionNotebookClient`$ClickedButton = "Style Guidelines"; DefinitionNotebookClient`ViewStyleGuidelines[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[5906117565281445171]]& , "\"View general guidelines for authoring resource functions\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{"\"Tools\"", PaneSelectorBox[{False -> GraphicsBox[{ RGBColor[1., 1., 1.], AbsoluteThickness[1.], LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], LineBox[{{5, 2.5}, {5, 7.5}}], LineBox[{{2.5, 5}, {7.5, 5}}]}, ImageSize -> 9, PlotRangePadding -> 1.5], True -> GraphicsBox[{ RGBColor[1., 1., 1.], AbsoluteThickness[1.], LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], LineBox[{{2.5, 5}, {7.5, 5}}]}, ImageSize -> 9, PlotRangePadding -> 1.5]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]], BaselinePosition -> Scaled[0]]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.35}}}], "Grid"], "\"Toggle documentation toolbar\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5074018684552945401; DefinitionNotebookClient`$ClickedButton = "Tools"; DefinitionNotebookClient`ToggleToolbar[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[5074018684552945401]]& , "\"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"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 7891204313296928191; DefinitionNotebookClient`$ClickedButton = "Check"; DefinitionNotebookClient`CheckDefinitionNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[7891204313296928191]]& , "\"Check notebook for potential errors\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{"\"Preview\"", "\"Generate a preview notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4299709568580201021; DefinitionNotebookClient`$ClickedButton = "Preview"; DefinitionNotebookClient`PreviewResource[ ButtonNotebook[], "Notebook"], DefinitionNotebookClient`ButtonCodeID[4299709568580201021]]& , "\"Generate a preview notebook\"", True}, "OrangeButtonTemplate"], ActionMenuBox[ TemplateBox[{ TemplateBox[{"\"Deploy\"", TemplateBox[{5}, "Spacer1"], "\"\[FilledDownTriangle]\""}, "RowDefault"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1898445052439169298; Null, DefinitionNotebookClient`ButtonCodeID[1898445052439169298]]& , "\"\"", True}, "OrangeButtonTemplate"], { "\"Locally on this computer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 8714502586816766511; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Locally on this computer"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "Local"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8714502586816766511]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"For my cloud account\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1389539917011878958; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "For my cloud account"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPrivate"]]]]], DefinitionNotebookClient`ButtonCodeID[ 1389539917011878958]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Publicly in the cloud\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5593410685219912767; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Publicly in the cloud"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPublic"]]]]], DefinitionNotebookClient`ButtonCodeID[ 5593410685219912767]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"In this session only (without documentation)\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 8586347731213964380; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "In this session only (without documentation)"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "KernelSession"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8586347731213964380]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ItemBox[ StyleBox[ DynamicBox[ ToBoxes[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}, ""], StandardForm], 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.06349], 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[1., 1., 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.]]}, 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"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3196298050911436087; DefinitionNotebookClient`$ClickedButton = "SubmitUpdate"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepositoryUpdate[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3196298050911436087]]& , "\"Submit changes to update your resource submission\"", True}, "OrangeButtonTemplate"]], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349], 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[1., 1., 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.]]}, 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"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3704832848557640569; DefinitionNotebookClient`$ClickedButton = "Submit"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepository[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3704832848557640569]]& , "\"Submit your function to the Wolfram Function \ Repository\"", True}, "OrangeButtonTemplate"]]], StandardForm], Evaluator -> "System", SingleEvaluation -> True]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {-1 -> Right}, "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 -> 0.25}}, FrameStyle -> RGBColor[0.988235, 0.419608, 0.203922]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], 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, AspectRatio -> Automatic, Background -> None, 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 -> (FrameBox[ ButtonBox[ StyleBox[#, "Text", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Condensed", FontSize -> 13, FontColor -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], GrayLevel[1], RGBColor[0.9568627450980391, 0.8019607843137255, 0.75]], Evaluator -> "System"], StripOnInput -> False], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[]}, If[#4, CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]]; With[{RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3145484069433207908; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ #2[]]]], DefinitionNotebookClient`ButtonCodeID[3145484069433207908]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; Null], FrameMargins -> {{5, 5}, {0, 0}}, Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8CJZ47CsMQUA2qYY8cOe/Zsl82ZQBGQFF gOLEGPI8UOymHTtE1xUkE+BsoCxQDR5DgLJotuNCyOagGQJ3A0EEVInVEKB/ iTQBguDhg2wIZkjiR0D1EI2Q1AiJTbSQxI8gKiHxzgAGlBtCFZdQMUyoFTtU SSfUSrFUyTvUysVULE9IQlQ0BD8gprQHAOYEDp4= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoY8DpK86ikKQUA2qYacdhZaZ8CxXJsNGQFF gOLEGHLfX3yHOTeadmQElAWqwWMIUBaPdmSEbA6aIRA3rMCrfQXMPVgNAfqX SGdAEDx8kA3BDEn8CKgeohGSGiGxSZIJEASJdwYwoNwQqriEimFCrdihSjqh VoqlSt6hVi6mYnlCEqKiIfgBMaU9AAiH5q8= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8zTb72JMMQUA2qYZ8Wdr69/1LNF8DRYDi xBjyvsz115UjEPFvL589PbgNgoBsiCBQFqgGjyFAWYjIpwe3D2YFLNdmQ0ZA EaA4RAGyOWiGQNzw/ubllQY8aCZAEFAcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+y IZCQxPQFJgKqgYQzRCMkNUJiExKSBE2AIEg4Q+KdAQwoN4QqLqFimFArdqiS TqiVYqmSd6iVi6lYnpCEqGgIfkBMaQ8AIISqgg== "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> RGBColor[0.921569, 0.341176, 0.105882], Method -> "Queued", ImageSize -> {All, 23}, Evaluator -> Automatic], FrameStyle -> Directive[ RGBColor[0.921569, 0.341176, 0.105882], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False]& )}], Cell[ StyleData["SuggestionGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ FrameBox[ AdjustmentBox[ TagBox[ GridBox[{{ TemplateBox[{#2, #3, {16., 16.}, {{1., 17.}, {1., 17.}}}, "SuggestionIconTemplate"], PaneBox[#, ImageSizeAction -> "ShrinkToFit", BaselinePosition -> Baseline, ImageSize -> Full], RowBox[{ 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.5], " "}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {Automatic, Automatic, Fit}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], BoxMargins -> {{0.25, -0.5}, {0.15, -0.15}}], RoundingRadius -> {13, 75}, Background -> #4, FrameStyle -> None, FrameMargins -> {{0, 8}, {0, 0}}, ImageMargins -> {{0, 0}, {5, 5}}, StripOnInput -> False], "Text", FontColor -> #5, FontSize -> 14, FontFamily -> "Source Sans Pro", 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["FormEditValuesButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TemplateBox[{ TagBox[ PaneBox[ PaneSelectorBox[{False -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWHlMVEcYf28XlGM5VlcRapRDDFK0sBaLBWVXUDxTKpe4JgvoQlALAsvV hHIoV4KK6wGiQlUqoqDcKKysDSZtPZJWTTzaxGrV2mqrNtqKB3Qnz8+Zd6Cv tn90vkgyv+/4zc58M9/3dEtIXZoooSgqw8r8Z2l8tjo9PT43wtE8iUrJSE5K 0a1akKLXJenSAxKkZlD58h9y+X+M8Z7a/I3G7V/lHQgKp2kGmzw9rcrQb+j/ ZItPIGBvNywsVVGVJ01DWAqbpBYUFZ1hGsTYvssRqTLHt4nvoIgvbP6ZjM+I Nt9PzUePPdbvcvX+ZwzTQ9vv8yMh6R04fFNY0/ciOkM8wzjXY4+F47xJgiPF cqRuY3kOlnUGLFq4khsv53NPv8zd7NXs/lYsR+158Gm9l1Tu7IYwmq7oJaMd uWMnR7jMMXLd/isYt7UXx4F9Rjtj1NmNXPPsCKyh6S9+AHzUOHEcpR3gMWM+ iQdHrq1kZFkmidvYQS633399ZBf31G21F/ZdLmmvPo0zVcyalCFg33Qr78Ce 7+qv5jdOm8W3e39u9yN+npR3ieHQ5ArlWGwW28pBIXwfilvFcESnC2eyMoS0 ii8UstncZ2XDjiaROihGjbMcyWVJLBP0N2ELC8vm229icHFPKKo+Y3zK3Jj6 q2lV3gFvZpk4BfSqKHwfFC4fLNDml3cVt2IGO7m+5sRzfoSNxglemGVV8dZT yRXqaKeJ5V1gkWIALX5bk8r5u+3x3qEbwvuN3kJ1DN9j5mLQdz60skXIeM9X PoPMnWYzdD4cjoGRMC3XRyI5+CNolyQhJK4A5mWdXGs7Ofs3HP+z9nz16fbf Scz41Muf67c8B7Q7z6L5RiPMAxZxbfU1OFbDtVDNSGtmnb4qQz/W1F1ElYsc 8rG9A6BF8x1fw2zhSnbddHHHJ115kl3rJNI1mzBL6HI2x9SglrugQzHzG7Ft RQ95IglF+DfwqylNb2gRugnWMnNteFWLj/+FsNlLyd3tfoTrTPWZV+vUcBnQ cHbre8HoTzy3ljGYxzT2Cep3MespaibRtZWwGy9vnPmkmXPgjy1fgte7Mxlk fhwZa/8V+9EQTZuPzwg4HBSA1J4XZqCotB1gExTO58hrYOoYM5RzcCcAHHIn QKpPD8eBzx12GHP0PAlfjXPI3C8J7JXlSNjt9vuSYVrKkjbwUs4R2quCwxLU mFJTZpCoaQjXuPqrgPmqhBhs7XH1lTsxmP889su24lOEZuzEyJE7ZJ3Gu23o Z9bDHvitrb2A0Um+NedwxKO/IGzrKZhn15FnRFHeAdh2zSZuXxscCXtpGorR kxqpRWx2zxPQsTk8/bgrxe+MaWj9UXw/be11pZih5VduxzPCqu03kiPFALPM 3VyOCV5kv9P3ovJk6rbkipI2du3n39AwLegO3UBzn0CYH3vMfzHUMeyM4Mu6 7Vwfiqr6BrRxBWhO0/suAxK5jm8fpoX7LszAz4bJStAanylcGCwiFbD9V2ja xk4ZosmNTsc+Xv51F4Xit9yduwJbqaJ0JYEfoT4xaw9YFDaBVuaId93cVb58 MxPLsL/UIlSz2URmft3FGL2tA7YI1UAONF7HOeWnxhb6XULrJFnQsLHz+XDW x6ooZQjcOD4DKXsvkfnu6i1kYxpaVcw/H/5QRQl7L0lk27HfLJCtp8Rw6EqF fDe08F+54MjaC0jX8aDpFtglV4jhCAoH+44HzPvdfFuTy63xMGwd5GMpKq8B fNTRpNZj2vw4RvznkfhoZ7A/fBO9AdzTEhrM70HiNBGj1jJcRY3PJvmSHod+ Ao3Yr2j8HVXeNXMx7Cr7K7HmHOzFZGXWHpytjmPEcXx2kIzWcG15juOYqUHk dz+S2OwRVmFa3DkhaboljgF1R9wc6R3A/RJIz5PWe1wsNlssB0XFZgllI8Qe TrOhxcJSPAfqIjabhOLkNYSvFsL3XlqsG67qv264eqcYuv4gI9V/bz+Kptcf IbETz4ualXP+zf/+WMuWJO08i2J1P0qrYjJTIl2WyXx5NV6PK1C88/bR/7vx N3kqZvY= "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}], True -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWG1MU1cY7m1vS4GWttBLy0dLWyhl5aultrT0C2QzM5rMIWgyluDHkMwf YgBF9gc1cWpijDNuRNFsv2Rmuqmb/NjIYIFkG2qyAYnAljidODfdmItu+AHs Xi6n59x7D3LH9mPnRJLzvB/Pue95z3nfat3UWLVFKpFImpX0n6qNrRVNTRvb 1mrpRc225tcbttW/tnJbS31DfZN/k4wGS+b/MSb/jxFvt7QX95R86TytXyMh WEztye1w97v7c97SBAG2tEHIqRpXX/ksnPlnCVIiMTWXz0DMN5rZSGqX4l+u t+wp+wn1z05Lu7ZCiIYfOjoTnf+MQfd8aFLoiZmRR4FbeEl02tQsnkFpCT/E +1lsUtViOezHOJYzhZdSVqVt5vvLe0/ldpzk7mbZN2I5vEPAJnjPdlBpnQOJ 4s9Qb2V3SB0Dk9rM7b4xiJNJ4jigjSINiaAV3TO1FjEgSr+PWRjFcRR+AiyS X0RxqjrnCDtNO1Bcpga5HJp8tud4m/2Yd9g3WvixZxBmqpg96SqBfmDCeXrZ t6XjzjOaMEbvhfADYZ4UdYvhMLfhcsy8k6sl1+PvQ8EFMRymJnwm6ypRLcse nI7rc1kC1xshk+sVRmkcn8V2AGvfi1jKy24vxhBvs+71XI4+Zm9M6XhuR5J/ cZaE54CcqoH3IS49eaWlvai74AJkIHWOE9GnQg/FPQl5kMW6zz2QfSh1nTKr qBto2I8CKXxbbQeF0VYVB27i4828hanrhRYpq4E8dF+WOBcFe8xmZv5OcxhC 9xdiYKexjm9DSP0/AGl6A4NYdoN14SW+NqnjfkPkT++QZzD0G4pFH6u9fDvz LiD1XGHWxT1gnbKKr+s4AX35rxtqpfHsPrXl7n4o8Y4wlQsditTIIyBl1iVf gVXaZm7djLfBk3b1cWsdIcs5DFkMr3A5NKHg3RgH7dN5BsmUT9ETse6F34Cp pkTBedxNkKno2hCrxZG/GIyq4mTKA1hnPJdj+6wVMEiYlzg6PX8mT2UqFlMV cU/Q0cnuJ/8ciuYcAdGYv3H0SbPnIByuL4BVUoBFjBtQX74xeQrwZmmHZwQ4 5PrYmQ7hGSSS3HeADt0XCTicXWwdY4duOewEAIfCEMu/wYU44LmDCEOOyFTG VphDdL+EiZU0DkQ7NEks0FIWXgRWuuW4WOV/QDCNqSTJh6Lls7DGlY4DTFuO YyCTYPVVGFgseQX3Zct6Yy6mxyFSdget0zDa7n52P9wB31rvMERVLs9VxOPP DOYeAOu8d9Ezor/Qj0TwML+vpapBLOlvb0ElBGlujUzF7iCHQ+Xm7xS+M3RN /AjeTzLJth8yBH/hdzxSZfBXlMN+NHZfTvI5EvLQfic67eqzH8s+VHiRW/uF N9RYB2SBm8xaEwTr8EPhi5G6npsRwml/m29Dv4FfA6llNxs+3yhAMrcL9Y11 4L7jGYTZoC6JffmTuHQWy2wEmG+MvvRqXaW5zdSE2Hi9Izj/wbuGV6EWVWN7 U/8S0yc6TsXux1kgJbUw6nRXOf9m2g5Ae4I01Lp60cz3jphaSA3UMNSCHPDf gDmlrYAajk7cPlEWZsjUmjL9y1SNrhLcOCEDOn3X0HxPdOJ0ymet+4TnIxxU Dd46fQtXj/tmgekeEMNh24+zLTgvfOWoau8wIwv9HpgAetmHxHDo1wB92nbu /S67bW7j13gwSI0ila6+XcAmdR0qVRUZN7AzeQWKK9KAfuAW8wbwTws32O9h pjILojIVrKLRJyoXahH4EUjE/oqGv6OKulNWg6hyfyV6roJYqEscp2C2yilx HM73UW/+6+ZdckoTQn/3M9PcKlUa62DnNBerCXEMTHfEz5HII9gvxbCp4D0+ Zm4Vy0H3kjtx2Qh8LyShs1UunoPpIly9OD/OroytONx3La1+oar/rJHotB8N /4F6Kv1Onkz3hx+iWPRp/jm6Y/gX//sjU6U3eK4wvsIPcjvYzCRkph3sLy// DcvuuIyle//vxt/PCE6d "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], ImageSize -> {Automatic, 15}, ImageSizeAction -> "ResizeToFit"], MouseAppearanceTag["LinkHand"]], "\"Edit values\""}, "PrettyTooltipTemplate"]& )}], Cell["Documentation", "Section"], Cell["Usage", "Subsection"], Cell[ StyleData["UsageInputs", StyleDefinitions -> StyleData["Input"]], CellMargins -> {{66, 10}, {0, 8}}, StyleKeyMapping -> {"Tab" -> "UsageDescription"}, Evaluatable -> False, CellEventActions -> {"ReturnKeyDown" :> With[{RSNB`nb$ = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[RSNB`nb$, Cell["", "UsageDescription"], All]; SelectionMove[RSNB`nb$, Before, CellContents]], {"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[{RSNB`nb$ = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[RSNB`nb$, Cell[ BoxData[""], "UsageInputs", FontFamily -> "Source Sans Pro"], All]; SelectionMove[RSNB`nb$, Before, CellContents]], {"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["Details & Options", "Subsection"], Cell[ StyleData["Notes", StyleDefinitions -> StyleData["Item"]], CellDingbat -> StyleBox["\[FilledVerySmallSquare]", FontColor -> GrayLevel[0.6]], CellMargins -> {{66, 24}, {9, 7}}, ReturnCreatesNewCell -> False, 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["Examples", "Subsection"], 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.906]], 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["ExampleImage"], PageWidth :> 650, CellMargins -> {{66, 66}, {16, 5}}, Evaluatable -> False, ShowCellLabel -> False, MenuSortingValue -> 10000, RasterBoxOptions -> {ImageEditMode -> False}], Cell["Links", "Section"], Cell[ StyleData["Link"], FontFamily -> "Source Sans Pro", FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.855, 0.396, 0.145], RGBColor[0.02, 0.286, 0.651]]]], Cell[ StyleData["StringTypeLink", StyleDefinitions -> StyleData["Link"]], FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.969, 0.467, 0.], GrayLevel[0.467]]]], Cell[ StyleData["CharactersRefLink"], ShowSpecialCharacters -> False], Cell["Annotation", "Section"], Cell[ StyleData["Excluded"], CellBracketOptions -> { "Color" -> RGBColor[0.9, 0.4, 0.4], "Thickness" -> 2}, GeneratedCellStyles -> { "Graphics" -> {"Graphics", "Excluded"}, "Message" -> {"Message", "MSG", "Excluded"}, "Output" -> {"Output", "Excluded"}, "Print" -> {"Print", "Excluded"}, "PrintTemporary" -> {"PrintTemporary", "Excluded"}}, CellFrameMargins -> 4, CellFrameLabels -> {{None, Cell[ BoxData[ TemplateBox[{ StyleBox[ "\"excluded\"", "ExcludedCellLabel", StripOnInput -> False], "\"Excluded cells will not appear anywhere in the published \ resource except for the definition notebook\""}, "PrettyTooltipTemplate"]], "ExcludedCellLabel"]}, {None, None}}, StyleMenuListing -> None, Background -> RGBColor[1, 0.95, 0.95]], Cell[ StyleData["ExcludedCellLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontFamily -> "Source Sans Pro", FontSize -> 9, FontWeight -> Plain, FontSlant -> Italic, FontColor -> RGBColor[0.9, 0.4, 0.4, 0.5], Background -> None], Cell[ StyleData["Comment", StyleDefinitions -> StyleData["Text"]], CellFrame -> {{3, 0}, {0, 0}}, CellMargins -> {{66, 0}, {1, 0}}, CellElementSpacings -> {"ClosedCellHeight" -> 0}, GeneratedCellStyles -> { "Graphics" -> {"Graphics", "Comment"}, "Message" -> {"Message", "MSG", "Comment"}, "Output" -> {"Output", "Comment"}, "Print" -> {"Print", "Comment"}, "PrintTemporary" -> {"PrintTemporary", "Comment"}}, CellFrameColor -> RGBColor[0.880722, 0.611041, 0.142051], CellFrameLabelMargins -> {{0, 10}, {0, 0}}, FontColor -> GrayLevel[0.25], Background -> RGBColor[0.982, 0.942, 0.871]], Cell[ StyleData["AuthorComment", StyleDefinitions -> StyleData["Comment"]], GeneratedCellStyles -> { "Graphics" -> {"Graphics", "AuthorComment"}, "Message" -> {"Message", "MSG", "AuthorComment"}, "Output" -> {"Output", "AuthorComment"}, "Print" -> {"Print", "AuthorComment"}, "PrintTemporary" -> {"PrintTemporary", "AuthorComment"}}, CellFrameColor -> RGBColor[0.368417, 0.506779, 0.709798], Background -> RGBColor[0.905, 0.926, 0.956]], Cell[ StyleData["ReviewerComment", StyleDefinitions -> StyleData["Comment"]], GeneratedCellStyles -> { "Graphics" -> {"Graphics", "ReviewerComment"}, "Message" -> {"Message", "MSG", "ReviewerComment"}, "Output" -> {"Output", "ReviewerComment"}, "Print" -> {"Print", "ReviewerComment"}, "PrintTemporary" -> {"PrintTemporary", "ReviewerComment"}}, CellFrameColor -> RGBColor[0.560181, 0.691569, 0.194885], Background -> RGBColor[0.934, 0.954, 0.879]], Cell[ StyleData["CommentLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontSlant -> "Italic", FontColor -> GrayLevel[0.5]], Cell["Special Input", "Section"], Cell[ StyleData["FormObjectCell"], CellMargins -> {{66, 66}, {16, 5}}], Cell[ StyleData["LocalFileInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued", ButtonFunction :> With[{RSNB`file = SystemDialogInput["FileOpen"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { None, None}}], Cell[ StyleData["LocalDirectoryInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued", ButtonFunction :> With[{RSNB`file = SystemDialogInput["Directory"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { None, None}}], Cell["Misc", "Section"], Cell[ StyleData["Item"], DefaultNewCellStyle -> "Item"], Cell[ StyleData["ButtonText"], FontFamily -> "Sans Serif", FontSize -> 11, FontWeight -> Bold, FontColor -> RGBColor[0.459, 0.459, 0.459]], Cell[ StyleData["InlineFormula"], HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, LanguageCategory -> "Formula", AutoSpacing -> True, ScriptLevel -> 1, SingleLetterItalics -> False, SpanMaxSize -> 1, StyleMenuListing -> None, FontFamily -> "Source Sans Pro", FontSize -> 1. Inherited, ButtonBoxOptions -> {Appearance -> {Automatic, None}}, FractionBoxOptions -> {BaseStyle -> {SpanMaxSize -> Automatic}}, GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["DockedCell"], CellFrameColor -> GrayLevel[0.75], Background -> GrayLevel[0.9]]}, Visible -> False, FrontEndVersion -> "13.0 for Linux x86 (64-bit) (November 22, 2021)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Name"->{ Cell[625, 23, 92, 2, 70, "Title",ExpressionUUID->"d7a4cc5e-76a6-4527-9162-f30f2a17fe4b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->499247539]}, "TemplateCell"->{ Cell[625, 23, 92, 2, 70, "Title",ExpressionUUID->"d7a4cc5e-76a6-4527-9162-f30f2a17fe4b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->499247539], Cell[720, 27, 159, 4, 70, "Text",ExpressionUUID->"f02ddce4-2387-4c8e-8e8f-e74d36b68f15", CellTags->{"Description", "TemplateCell"}, CellID->764855655]}, "Title"->{ Cell[625, 23, 92, 2, 70, "Title",ExpressionUUID->"d7a4cc5e-76a6-4527-9162-f30f2a17fe4b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->499247539]}, "Description"->{ Cell[720, 27, 159, 4, 70, "Text",ExpressionUUID->"f02ddce4-2387-4c8e-8e8f-e74d36b68f15", CellTags->{"Description", "TemplateCell"}, CellID->764855655]}, "Definition"->{ Cell[904, 35, 1206, 29, 70, "Section",ExpressionUUID->"c691b2c5-e6f2-49d0-a951-845fe66ad771", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "Function"->{ Cell[904, 35, 1206, 29, 70, "Section",ExpressionUUID->"c691b2c5-e6f2-49d0-a951-845fe66ad771", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "TemplateCellGroup"->{ Cell[904, 35, 1206, 29, 70, "Section",ExpressionUUID->"c691b2c5-e6f2-49d0-a951-845fe66ad771", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[17173, 432, 1980, 50, 70, "Subsection",ExpressionUUID->"988bf90d-5267-425a-bce7-d39f522c2a35", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[20043, 522, 1429, 32, 70, "Subsection",ExpressionUUID->"8f258926-e9cd-469d-a319-4f1809c62a67", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[27451, 759, 7029, 152, 70, "Section",ExpressionUUID->"cc5f08b2-18ec-4fd5-80b6-14e08b8a554a", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[136445, 2950, 1026, 26, 70, "Subsection",ExpressionUUID->"b79b1994-1e45-43f9-a59b-2102da4d9533", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[137563, 2984, 996, 26, 70, "Subsection",ExpressionUUID->"eb3df970-7beb-4935-8bd9-52c7409d22ae", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[138730, 3024, 221, 6, 70, "Subsection",ExpressionUUID->"6c228a71-da39-49f6-b9ea-76a613727362", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[167741, 4011, 980, 26, 70, "Subsection",ExpressionUUID->"91268370-d344-4707-bf61-404ebd8cc488", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[168891, 4051, 1039, 26, 70, "Subsection",ExpressionUUID->"3a30c835-c45b-4d81-8434-d73b34f948b4", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[170135, 4091, 1084, 26, 70, "Subsection",ExpressionUUID->"550ee6af-acb7-4b15-97e1-0e4bf32d6ef9", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[171775, 4132, 923, 26, 70, "Subsection",ExpressionUUID->"df4cbdb4-5f18-4dcf-a9a5-4d956efd1015", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[173243, 4173, 1874, 45, 70, "Subsection",ExpressionUUID->"02b7835c-af83-4357-af42-723dce567c39", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[175474, 4239, 955, 25, 70, "Subsection",ExpressionUUID->"fbca6474-5368-4c9e-b8dc-5d0496bf9e2d", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[176454, 4268, 1174, 31, 70, "Subsubsection",ExpressionUUID->"f761c1e7-0302-44e8-a39e-0e45dda752d2", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[177757, 4308, 1113, 29, 70, "Subsubsection",ExpressionUUID->"58b0fc4c-fd2a-4376-bf6c-9a796a0d777b", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[180231, 4384, 1280, 33, 70, "Subsubsection",ExpressionUUID->"ecc47248-9f08-444e-80ad-fce6192c9ff5", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[182916, 4465, 1913, 46, 70, "Subsubsection",ExpressionUUID->"e4b5259c-e7fc-4f95-9b84-9095322c927d", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[187765, 4601, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f1f292b1-b703-407a-845a-db67df3428fb", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[189838, 4665, 1155, 28, 70, "Section",ExpressionUUID->"7e69baa2-8a37-4668-b1af-dfa80d555e13", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[191562, 4708, 1033, 26, 70, "Section",ExpressionUUID->"809e1410-4252-4389-be7d-7ea6a7c9be1e", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]}, "ResourceInitialization"->{ Cell[2573, 81, 4560, 104, 70, "Input",ExpressionUUID->"925a9387-e480-4e05-9617-f2c26985c565", CellTags->"ResourceInitialization", CellID->282491367], Cell[7136, 187, 1533, 31, 70, "Input",ExpressionUUID->"60e228f5-14af-42ee-94da-7f22b52a73f6", CellTags->"ResourceInitialization", CellID->690280731], Cell[10071, 259, 2024, 46, 70, "Input",ExpressionUUID->"0758559a-13d4-4dc7-939e-ffe69202315a", CellTags->"ResourceInitialization", CellID->950696188], Cell[12098, 307, 2292, 44, 70, "Input",ExpressionUUID->"2a904319-d523-49ac-b8ee-ceba83947c25", CellTags->"ResourceInitialization", CellID->876532920], Cell[15012, 373, 1904, 45, 70, "Input",ExpressionUUID->"06d0ddbc-3dda-4e6b-99b3-6027a355f28b", CellTags->"ResourceInitialization", CellID->566817827]}, "Documentation"->{ Cell[16953, 423, 195, 5, 70, "Section",ExpressionUUID->"6117592a-e5d5-4993-b6a0-e570f0bf1e3d", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307]}, "TemplateSection"->{ Cell[16953, 423, 195, 5, 70, "Section",ExpressionUUID->"6117592a-e5d5-4993-b6a0-e570f0bf1e3d", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[136171, 2941, 249, 5, 70, "Section",ExpressionUUID->"6a2d03a3-0aa2-412a-a6c3-b2cd6d49e8c6", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Usage"->{ Cell[17173, 432, 1980, 50, 70, "Subsection",ExpressionUUID->"988bf90d-5267-425a-bce7-d39f522c2a35", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310]}, "Details & Options"->{ Cell[20043, 522, 1429, 32, 70, "Subsection",ExpressionUUID->"8f258926-e9cd-469d-a319-4f1809c62a67", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Notes"->{ Cell[20043, 522, 1429, 32, 70, "Subsection",ExpressionUUID->"8f258926-e9cd-469d-a319-4f1809c62a67", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Examples"->{ Cell[27451, 759, 7029, 152, 70, "Section",ExpressionUUID->"cc5f08b2-18ec-4fd5-80b6-14e08b8a554a", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011]}, "Source & Additional Information"->{ Cell[136171, 2941, 249, 5, 70, "Section",ExpressionUUID->"6a2d03a3-0aa2-412a-a6c3-b2cd6d49e8c6", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Contributed By"->{ Cell[136445, 2950, 1026, 26, 70, "Subsection",ExpressionUUID->"b79b1994-1e45-43f9-a59b-2102da4d9533", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "ContributorInformation"->{ Cell[136445, 2950, 1026, 26, 70, "Subsection",ExpressionUUID->"b79b1994-1e45-43f9-a59b-2102da4d9533", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "Keywords"->{ Cell[137563, 2984, 996, 26, 70, "Subsection",ExpressionUUID->"eb3df970-7beb-4935-8bd9-52c7409d22ae", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425]}, "Categories"->{ Cell[138730, 3024, 221, 6, 70, "Subsection",ExpressionUUID->"6c228a71-da39-49f6-b9ea-76a613727362", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[138954, 3032, 28750, 974, 70, "Output",ExpressionUUID->"efc13ccd-93b9-4db4-b1ed-d8ec62b87938", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->558015110]}, "Categories-Checkboxes"->{ Cell[138954, 3032, 28750, 974, 70, "Output",ExpressionUUID->"efc13ccd-93b9-4db4-b1ed-d8ec62b87938", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->558015110]}, "CheckboxCell"->{ Cell[138954, 3032, 28750, 974, 70, "Output",ExpressionUUID->"efc13ccd-93b9-4db4-b1ed-d8ec62b87938", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->558015110], Cell[178873, 4339, 1321, 40, 70, "Output",ExpressionUUID->"1ac893fd-9f19-4f56-8eef-597f29dac549", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524], Cell[181514, 4419, 1365, 41, 70, "Output",ExpressionUUID->"1e0f8be3-e678-4321-a10d-f505cfc60e7b", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059], Cell[184832, 4513, 2896, 83, 70, "Output",ExpressionUUID->"7263e64a-233d-4d1d-b740-bc6513ca0256", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308], Cell[188839, 4630, 938, 28, 70, "Output",ExpressionUUID->"6e915de3-0260-4e4f-b597-0173aefd0cf2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Related Symbols"->{ Cell[167741, 4011, 980, 26, 70, "Subsection",ExpressionUUID->"91268370-d344-4707-bf61-404ebd8cc488", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169]}, "Related Resource Objects"->{ Cell[168891, 4051, 1039, 26, 70, "Subsection",ExpressionUUID->"3a30c835-c45b-4d81-8434-d73b34f948b4", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472]}, "Source/Reference Citation"->{ Cell[170135, 4091, 1084, 26, 70, "Subsection",ExpressionUUID->"550ee6af-acb7-4b15-97e1-0e4bf32d6ef9", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552]}, "DefaultContent"->{ Cell[171222, 4119, 516, 8, 70, "Text",ExpressionUUID->"e64d3d00-eaa3-4477-b7cf-623f775413be", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[172701, 4160, 505, 8, 70, "Item",ExpressionUUID->"3b4df505-1a9f-4ccd-a922-4b681ce2eb25", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746], Cell[175142, 4222, 158, 5, 70, "Input",ExpressionUUID->"184641d1-2bbb-4bb1-9f45-656d290487aa", CellTags->"DefaultContent", CellID->946203791], Cell[175303, 4229, 122, 4, 70, "Output",ExpressionUUID->"2f9dbdbe-990e-4f56-ba8e-7143a1dbcd51", CellTags->"DefaultContent", CellID->168370258], Cell[177631, 4301, 89, 2, 70, "Text",ExpressionUUID->"08ccdc12-529d-4c37-bb1c-f89fa0e1ee46", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768], Cell[190996, 4695, 529, 8, 70, "Text",ExpressionUUID->"8e40e473-70f2-4668-8c5e-30b747289546", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[192598, 4736, 515, 8, 70, "Text",ExpressionUUID->"d01dc0ce-34a6-49a7-87fa-02dd1e826d84", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "TabNext"->{ Cell[171222, 4119, 516, 8, 70, "Text",ExpressionUUID->"e64d3d00-eaa3-4477-b7cf-623f775413be", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[172701, 4160, 505, 8, 70, "Item",ExpressionUUID->"3b4df505-1a9f-4ccd-a922-4b681ce2eb25", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746], Cell[190996, 4695, 529, 8, 70, "Text",ExpressionUUID->"8e40e473-70f2-4668-8c5e-30b747289546", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[192598, 4736, 515, 8, 70, "Text",ExpressionUUID->"d01dc0ce-34a6-49a7-87fa-02dd1e826d84", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Links"->{ Cell[171775, 4132, 923, 26, 70, "Subsection",ExpressionUUID->"df4cbdb4-5f18-4dcf-a9a5-4d956efd1015", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773]}, "Tests"->{ Cell[173243, 4173, 1874, 45, 70, "Subsection",ExpressionUUID->"02b7835c-af83-4357-af42-723dce567c39", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "VerificationTests"->{ Cell[173243, 4173, 1874, 45, 70, "Subsection",ExpressionUUID->"02b7835c-af83-4357-af42-723dce567c39", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "Compatibility"->{ Cell[175474, 4239, 955, 25, 70, "Subsection",ExpressionUUID->"fbca6474-5368-4c9e-b8dc-5d0496bf9e2d", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822]}, "CompatibilityWolframLanguageVersionRequired"->{ Cell[176454, 4268, 1174, 31, 70, "Subsubsection",ExpressionUUID->"f761c1e7-0302-44e8-a39e-0e45dda752d2", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "Wolfram Language Version"->{ Cell[176454, 4268, 1174, 31, 70, "Subsubsection",ExpressionUUID->"f761c1e7-0302-44e8-a39e-0e45dda752d2", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "ScrapeDefault"->{ Cell[177631, 4301, 89, 2, 70, "Text",ExpressionUUID->"08ccdc12-529d-4c37-bb1c-f89fa0e1ee46", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768]}, "CompatibilityOperatingSystem"->{ Cell[177757, 4308, 1113, 29, 70, "Subsubsection",ExpressionUUID->"58b0fc4c-fd2a-4376-bf6c-9a796a0d777b", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[178873, 4339, 1321, 40, 70, "Output",ExpressionUUID->"1ac893fd-9f19-4f56-8eef-597f29dac549", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "Operating System"->{ Cell[177757, 4308, 1113, 29, 70, "Subsubsection",ExpressionUUID->"58b0fc4c-fd2a-4376-bf6c-9a796a0d777b", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406]}, "CompatibilityOperatingSystem-Checkboxes"->{ Cell[178873, 4339, 1321, 40, 70, "Output",ExpressionUUID->"1ac893fd-9f19-4f56-8eef-597f29dac549", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "CompatibilityFeatures"->{ Cell[180231, 4384, 1280, 33, 70, "Subsubsection",ExpressionUUID->"ecc47248-9f08-444e-80ad-fce6192c9ff5", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[181514, 4419, 1365, 41, 70, "Output",ExpressionUUID->"1e0f8be3-e678-4321-a10d-f505cfc60e7b", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "Required Features"->{ Cell[180231, 4384, 1280, 33, 70, "Subsubsection",ExpressionUUID->"ecc47248-9f08-444e-80ad-fce6192c9ff5", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156]}, "CompatibilityFeatures-Checkboxes"->{ Cell[181514, 4419, 1365, 41, 70, "Output",ExpressionUUID->"1e0f8be3-e678-4321-a10d-f505cfc60e7b", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "CompatibilityEvaluationEnvironment"->{ Cell[182916, 4465, 1913, 46, 70, "Subsubsection",ExpressionUUID->"e4b5259c-e7fc-4f95-9b84-9095322c927d", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[184832, 4513, 2896, 83, 70, "Output",ExpressionUUID->"7263e64a-233d-4d1d-b740-bc6513ca0256", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Environments"->{ Cell[182916, 4465, 1913, 46, 70, "Subsubsection",ExpressionUUID->"e4b5259c-e7fc-4f95-9b84-9095322c927d", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563]}, "CompatibilityEvaluationEnvironment-Checkboxes"->{ Cell[184832, 4513, 2896, 83, 70, "Output",ExpressionUUID->"7263e64a-233d-4d1d-b740-bc6513ca0256", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Cloud Support"->{ Cell[187765, 4601, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f1f292b1-b703-407a-845a-db67df3428fb", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371]}, "CompatibilityCloudSupport"->{ Cell[187765, 4601, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f1f292b1-b703-407a-845a-db67df3428fb", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[188839, 4630, 938, 28, 70, "Output",ExpressionUUID->"6e915de3-0260-4e4f-b597-0173aefd0cf2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "CompatibilityCloudSupport-Checkboxes"->{ Cell[188839, 4630, 938, 28, 70, "Output",ExpressionUUID->"6e915de3-0260-4e4f-b597-0173aefd0cf2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Author Notes"->{ Cell[189838, 4665, 1155, 28, 70, "Section",ExpressionUUID->"7e69baa2-8a37-4668-b1af-dfa80d555e13", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591]}, "Submission Notes"->{ Cell[191562, 4708, 1033, 26, 70, "Section",ExpressionUUID->"809e1410-4252-4389-be7d-7ea6a7c9be1e", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 316520, 7087}, {"TemplateCell", 316702, 7091}, {"Title", 317037, 7098}, {"Description", 317218, 7102}, {"Definition", 317396, 7106}, {"Function", 317592, 7110}, {"TemplateCellGroup", 317797, 7114}, {"ResourceInitialization", 321660, 7175}, {"Documentation", 322474, 7191}, {"TemplateSection", 322668, 7195}, {"Usage", 323043, 7202}, {"Details & Options", 323238, 7206}, {"Notes", 323442, 7210}, {"Examples", 323649, 7214}, {"Source & Additional Information", 323859, 7218}, {"Contributed By", 324072, 7222}, {"ContributorInformation", 324308, 7226}, {"Keywords", 324530, 7230}, {"Categories", 324722, 7234}, {"Categories-Checkboxes", 325121, 7241}, {"CheckboxCell", 325336, 7245}, {"Related Symbols", 326459, 7261}, {"Related Resource Objects", 326672, 7265}, {"Source/Reference Citation", 326896, 7269}, {"DefaultContent", 327110, 7273}, {"TabNext", 328248, 7295}, {"Links", 328913, 7308}, {"Tests", 329097, 7312}, {"VerificationTests", 329315, 7316}, {"Compatibility", 329529, 7320}, {"CompatibilityWolframLanguageVersionRequired", 329759, 7324}, {"Wolfram Language Version", 330032, 7328}, {"ScrapeDefault", 330294, 7332}, {"CompatibilityOperatingSystem", 330498, 7336}, {"Operating System", 330968, 7343}, {"CompatibilityOperatingSystem-Checkboxes", 331233, 7347}, {"CompatibilityFeatures", 331490, 7351}, {"Required Features", 331942, 7358}, {"CompatibilityFeatures-Checkboxes", 332194, 7362}, {"CompatibilityEvaluationEnvironment", 332451, 7366}, {"Environments", 332931, 7373}, {"CompatibilityEvaluationEnvironment-Checkboxes", 333204, 7377}, {"Cloud Support", 333465, 7381}, {"CompatibilityCloudSupport", 333710, 7385}, {"CompatibilityCloudSupport-Checkboxes", 334188, 7392}, {"Author Notes", 334430, 7396}, {"Submission Notes", 334630, 7400} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[625, 23, 92, 2, 70, "Title",ExpressionUUID->"d7a4cc5e-76a6-4527-9162-f30f2a17fe4b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->499247539], Cell[720, 27, 159, 4, 70, "Text",ExpressionUUID->"f02ddce4-2387-4c8e-8e8f-e74d36b68f15", CellTags->{"Description", "TemplateCell"}, CellID->764855655], Cell[CellGroupData[{ Cell[904, 35, 1206, 29, 70, "Section",ExpressionUUID->"c691b2c5-e6f2-49d0-a951-845fe66ad771", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[2113, 66, 277, 7, 70, "Input",ExpressionUUID->"56693232-0a2c-4790-a622-7b8b5e10c950", CellID->668446852], Cell[2393, 75, 177, 4, 70, "Input",ExpressionUUID->"d38df2b1-523e-46c7-a622-3d1ddf592fbb", CellID->280628223], Cell[2573, 81, 4560, 104, 70, "Input",ExpressionUUID->"925a9387-e480-4e05-9617-f2c26985c565", CellTags->"ResourceInitialization", CellID->282491367], Cell[7136, 187, 1533, 31, 70, "Input",ExpressionUUID->"60e228f5-14af-42ee-94da-7f22b52a73f6", CellTags->"ResourceInitialization", CellID->690280731], Cell[8672, 220, 1396, 37, 70, "Input",ExpressionUUID->"79c71eeb-448d-42fe-bd09-9d6a03e23f84", CellID->880393172], Cell[10071, 259, 2024, 46, 70, "Input",ExpressionUUID->"0758559a-13d4-4dc7-939e-ffe69202315a", CellTags->"ResourceInitialization", CellID->950696188], Cell[12098, 307, 2292, 44, 70, "Input",ExpressionUUID->"2a904319-d523-49ac-b8ee-ceba83947c25", CellTags->"ResourceInitialization", CellID->876532920], Cell[14393, 353, 616, 18, 70, "Input",ExpressionUUID->"405ed1bc-cb19-4b8d-9082-93f630a8cf31", CellID->321760415], Cell[15012, 373, 1904, 45, 70, "Input",ExpressionUUID->"06d0ddbc-3dda-4e6b-99b3-6027a355f28b", CellTags->"ResourceInitialization", CellID->566817827] }, Open ]], Cell[CellGroupData[{ Cell[16953, 423, 195, 5, 70, "Section",ExpressionUUID->"6117592a-e5d5-4993-b6a0-e570f0bf1e3d", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[17173, 432, 1980, 50, 70, "Subsection",ExpressionUUID->"988bf90d-5267-425a-bce7-d39f522c2a35", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[19178, 486, 192, 6, 70, "UsageInputs",ExpressionUUID->"b95a0854-80b3-4f1d-80a4-eef90e40b8cb", CellID->186923959], Cell[19373, 494, 249, 7, 70, "UsageDescription",ExpressionUUID->"1488f816-0ec6-430e-a274-bf8cc94b2095", CellID->665382925] }, Open ]], Cell[CellGroupData[{ Cell[19659, 506, 239, 7, 70, "UsageInputs",ExpressionUUID->"1c174266-f21b-4c0a-9256-120a24418331", CellID->930144124], Cell[19901, 515, 93, 1, 70, "UsageDescription",ExpressionUUID->"e66bbb2a-a98c-403e-ab2b-644c7996a0b0", CellID->944621484] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[20043, 522, 1429, 32, 70, "Subsection",ExpressionUUID->"8f258926-e9cd-469d-a319-4f1809c62a67", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[21475, 556, 198, 7, 70, "Notes",ExpressionUUID->"1b038a60-ca23-4852-a727-5a171c6c9696", CellID->812110324], Cell[21676, 565, 1036, 25, 70, "TableNotes",ExpressionUUID->"293d2626-86aa-4ceb-97d0-d7a5cba5c12a", CellID->653643784], Cell[22715, 592, 574, 19, 70, "Notes",ExpressionUUID->"31eab670-5913-4da1-b7fd-82dff9f73a24", CellID->520133638], Cell[23292, 613, 805, 26, 70, "Notes",ExpressionUUID->"80b088ba-1260-436f-9a13-4adb5dccc669", CellID->900747704], Cell[24100, 641, 339, 9, 70, "Notes",ExpressionUUID->"0a100bb3-1a0a-48f3-87f0-9020e90226d1", CellID->80866489], Cell[24442, 652, 133, 4, 70, "Notes",ExpressionUUID->"735fd51e-d3d4-499e-87ee-01a179c658dd", CellID->878802679], Cell[24578, 658, 1300, 42, 70, "Notes",ExpressionUUID->"3bb0da4e-44fb-4efc-baf2-ddf26fd87a39", CellID->730608011], Cell[25881, 702, 392, 11, 70, "Notes",ExpressionUUID->"2cc5c386-021d-4307-92c7-f883058bec2e", CellID->301089530], Cell[26276, 715, 254, 8, 70, "Notes",ExpressionUUID->"dbfe1209-1885-407b-8b51-c71a0152b58f", CellID->451744676], Cell[26533, 725, 869, 28, 70, "Notes",ExpressionUUID->"dc7aa972-0c91-4957-aad7-45ef8348f188", CellID->987277148] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[27451, 759, 7029, 152, 70, "Section",ExpressionUUID->"cc5f08b2-18ec-4fd5-80b6-14e08b8a554a", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell[34505, 915, 75, 2, 70, "Subsection",ExpressionUUID->"6a07700d-c0ef-4ee3-8e94-37f924c60627", CellID->904125756], Cell[34583, 919, 204, 4, 70, "Text",ExpressionUUID->"1cf8174e-4a28-4181-87ee-0230d3ca30da", CellID->801711908], Cell[CellGroupData[{ Cell[34812, 927, 487, 14, 70, "Input",ExpressionUUID->"527b671f-6ede-4c55-9617-bba35fd89bc9", CellID->178879662], Cell[35302, 943, 376, 7, 70, "Output",ExpressionUUID->"f43f35c3-cdf6-4f92-8a3e-eaa77aefbc9a", CellID->822538247] }, Open ]], Cell[35693, 953, 293, 7, 70, "Text",ExpressionUUID->"560ef5a0-27c1-4047-a0ad-f4de6144e46c", CellID->920771703], Cell[35989, 962, 408, 11, 70, "Input",ExpressionUUID->"32559745-db11-489d-8f7a-3981d42a2df2", CellID->156059635], Cell[36400, 975, 168, 3, 70, "Text",ExpressionUUID->"c04d94bd-8162-4b1f-83b7-18da000f0295", CellID->962375779], Cell[CellGroupData[{ Cell[36593, 982, 220, 6, 70, "Input",ExpressionUUID->"e0f29364-8fdf-4c73-8c17-3b93735921bd", CellID->776368567], Cell[36816, 990, 203, 5, 70, "Output",ExpressionUUID->"1368e44b-aa46-4a62-be5d-65099b9c1f54", CellID->787043786] }, Open ]], Cell[CellGroupData[{ Cell[37056, 1000, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"80bbc408-090f-4f87-aa7f-f2f59a242857", CellID->14107562], Cell[37202, 1006, 167, 3, 70, "Text",ExpressionUUID->"ad0c2d82-5567-4f11-a710-5ac3ebaa08a8", CellID->663371195], Cell[CellGroupData[{ Cell[37394, 1013, 694, 18, 70, "Input",ExpressionUUID->"45607201-97f7-4b41-9dc0-99362b5ca108", CellID->424200290], Cell[38091, 1033, 235, 5, 70, "Output",ExpressionUUID->"a01894cc-9f14-42fc-b0b2-85d5d0b72dea", CellID->247639312] }, Open ]], Cell[38341, 1041, 269, 7, 70, "Input",ExpressionUUID->"0a409b79-4605-4da2-8068-bf37772440b2", CellID->370965682], Cell[38613, 1050, 308, 11, 70, "Text",ExpressionUUID->"27f4a067-6cd8-4044-8d2e-0aa8ab359199", CellID->43553815], Cell[CellGroupData[{ Cell[38946, 1065, 570, 14, 70, "Input",ExpressionUUID->"fb42c072-cad2-42b5-960c-2f859026a8c7", CellID->622132759], Cell[39519, 1081, 9639, 165, 70, "Output",ExpressionUUID->"1121b86d-b6dd-4f33-aaab-4ba73f7a2eab", CellID->864556407] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[49219, 1253, 66, 2, 70, "Subsection",ExpressionUUID->"b3dccc73-45ea-487b-97f5-d72f63d5685f", CellID->204653245], Cell[CellGroupData[{ Cell[49310, 1259, 170, 4, 70, "Subsubsection",ExpressionUUID->"9888fa6b-24d1-4cc9-af9a-7bf690aca0ea", CellID->658866374], Cell[49483, 1265, 255, 6, 70, "Text",ExpressionUUID->"791fac5d-af74-4d87-bdff-5576c1f6db19", CellID->134506778], Cell[49741, 1273, 1548, 40, 70, "Input",ExpressionUUID->"37880aa3-757f-4a5f-9eed-3ae6170b6223", CellID->432131019], Cell[51292, 1315, 224, 4, 70, "Text",ExpressionUUID->"ee1e9978-3fa8-4144-8ecf-86e28e3ad131", CellID->650684479], Cell[CellGroupData[{ Cell[51541, 1323, 423, 11, 70, "Input",ExpressionUUID->"8bdbfe47-3956-4164-9804-38f0326ee5a8", CellID->559764671], Cell[51967, 1336, 510, 9, 70, "Output",ExpressionUUID->"d3438d6d-b44b-41dc-a04b-7c22449c14c2", CellID->289748026] }, Open ]], Cell[52492, 1348, 268, 5, 70, "Text",ExpressionUUID->"5ead139a-a58d-43fe-bb1f-8127c24864a5", CellID->500063577], Cell[52763, 1355, 603, 14, 70, "Input",ExpressionUUID->"8e970f10-5ba1-404d-88c0-e509ca34aade", CellID->448930252], Cell[53369, 1371, 161, 3, 70, "Text",ExpressionUUID->"17f54b4f-db55-487f-9400-5fe15f53454a", CellID->610026481], Cell[53533, 1376, 465, 10, 70, "Input",ExpressionUUID->"79c74627-1238-4cab-bd32-d6ab007952bb", CellID->464089587], Cell[54001, 1388, 139, 3, 70, "Text",ExpressionUUID->"908a7836-2857-4115-8afe-d0f28f988287", CellID->995858436], Cell[CellGroupData[{ Cell[54165, 1395, 230, 6, 70, "Input",ExpressionUUID->"157901fd-2b23-4e3d-8aac-f2c842e93818", CellID->967593365], Cell[54398, 1403, 15653, 264, 70, "Output",ExpressionUUID->"15cff074-ddfa-474f-9dc3-ded911fada2e", CellID->589987228] }, Open ]], Cell[CellGroupData[{ Cell[70088, 1672, 504, 12, 70, "Input",ExpressionUUID->"b1f10783-37ad-4c47-a734-a94e765faacb", CellID->747922812], Cell[70595, 1686, 53508, 898, 70, "Output",ExpressionUUID->"6e25dfd8-619b-4ca5-956c-8572a6572ae8", CellID->274426729] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[124152, 2590, 210, 4, 70, "Subsubsection",ExpressionUUID->"14f82bf8-90d5-4752-b886-7036514861c6", CellID->593356076], Cell[124365, 2596, 359, 6, 70, "Text",ExpressionUUID->"8b9abd9e-266f-4cd7-989b-8cdd030e1e48", CellID->213749007], Cell[124727, 2604, 1096, 29, 70, "Input",ExpressionUUID->"e538ae56-eee9-4571-9746-5b7f887fc0a9", CellID->998833022], Cell[125826, 2635, 169, 3, 70, "Text",ExpressionUUID->"af1c7f78-3c86-4cff-90e8-e5e39cb81f81", CellID->844478343], Cell[125998, 2640, 588, 14, 70, "Input",ExpressionUUID->"0c41e55c-962c-4918-98f5-36705f5b2d8d", CellID->616856752], Cell[126589, 2656, 172, 3, 70, "Text",ExpressionUUID->"4e7cf20e-c573-4a29-bc0b-a5ed08bbc588", CellID->733843260], Cell[126764, 2661, 447, 12, 70, "Input",ExpressionUUID->"2fa83fea-4056-46bb-ba66-7993fbe070ec", CellID->273966388], Cell[127214, 2675, 143, 3, 70, "Text",ExpressionUUID->"0e02b70a-915b-4600-845b-30d03b765deb", CellID->314055699], Cell[127360, 2680, 260, 6, 70, "Input",ExpressionUUID->"36069d35-b44e-44e3-89c0-3a09ab5098fc", CellID->124812698], Cell[CellGroupData[{ Cell[127645, 2690, 343, 7, 70, "Input",ExpressionUUID->"88edaa68-6a25-49c1-9a1e-77081af0d081", CellID->917412592], Cell[127991, 2699, 307, 7, 70, "Output",ExpressionUUID->"03a026f1-0391-407e-a423-d25eb78feb0c", CellID->622002061] }, Open ]], Cell[CellGroupData[{ Cell[128335, 2711, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"39e82cd9-f8a9-4af0-a564-9f13f4961fa5", CellID->14107563], Cell[128481, 2717, 407, 7, 70, "Text",ExpressionUUID->"eb778dfb-6d48-48ab-9bff-680d88dc713d", CellID->553221995], Cell[128891, 2726, 244, 7, 70, "Input",ExpressionUUID->"96f73eb0-ef25-412a-a903-667764320884", CellID->684642408], Cell[CellGroupData[{ Cell[129160, 2737, 1217, 31, 70, "Input",ExpressionUUID->"0d496864-9c8b-4557-b3f0-cbfd7aa5bb99", CellID->787257208], Cell[130380, 2770, 349, 11, 70, "Output",ExpressionUUID->"60507559-02b9-4072-bf76-a25953a158d4", CellID->950726235] }, Open ]], Cell[130744, 2784, 220, 4, 70, "Text",ExpressionUUID->"2ba51e06-77dd-48eb-bc1e-a3d181965f73", CellID->291646162], Cell[130967, 2790, 670, 16, 70, "Input",ExpressionUUID->"f7b1a2f4-eb8a-477a-a008-3b29720f0f73", CellID->914160713], Cell[131640, 2808, 172, 3, 70, "Text",ExpressionUUID->"ab1a8674-d9ff-47de-a22e-ba46566bd154", CellID->733843261], Cell[131815, 2813, 519, 13, 70, "Input",ExpressionUUID->"49b2a16c-cb23-4e8e-a244-776b8683988e", CellID->655681343], Cell[132337, 2828, 143, 3, 70, "Text",ExpressionUUID->"63670c91-ba6e-4804-8eca-58f210fdb87f", CellID->314055700], Cell[132483, 2833, 307, 7, 70, "Input",ExpressionUUID->"11ce8f2c-bd6f-4a7b-943a-a7bb8a698ff8", CellID->296206139], Cell[CellGroupData[{ Cell[132815, 2844, 541, 14, 70, "Input",ExpressionUUID->"065c6dbe-96f0-422b-9edd-e47ecda834c8", CellID->856095057], Cell[133359, 2860, 579, 13, 70, "Output",ExpressionUUID->"7bdf5ddd-db41-48b9-9281-f1cfd059cde5", CellID->614527227] }, Open ]] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[134011, 2881, 153, 3, 70, "Subsection",ExpressionUUID->"89f2d4a9-8244-49d4-9ee6-72050eab61f8", CellID->232113220], Cell[134167, 2886, 275, 5, 70, "Text",ExpressionUUID->"0d35e74d-022b-4895-9ed4-050aceefa45d", CellID->529271888], Cell[CellGroupData[{ Cell[134467, 2895, 890, 22, 70, "Input",ExpressionUUID->"e8f00dde-ba31-434b-9749-67eb44b679fa", CellID->307914580], Cell[135360, 2919, 750, 15, 70, "Output",ExpressionUUID->"8de84759-4949-4bc4-858b-48bf48a38527", CellID->598430893] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[136171, 2941, 249, 5, 70, "Section",ExpressionUUID->"6a2d03a3-0aa2-412a-a6c3-b2cd6d49e8c6", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[136445, 2950, 1026, 26, 70, "Subsection",ExpressionUUID->"b79b1994-1e45-43f9-a59b-2102da4d9533", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[137474, 2978, 52, 1, 70, "Text",ExpressionUUID->"1248653b-3c76-43d2-9576-57430a0be55a", CellID->177008439] }, Open ]], Cell[CellGroupData[{ Cell[137563, 2984, 996, 26, 70, "Subsection",ExpressionUUID->"eb3df970-7beb-4935-8bd9-52c7409d22ae", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[138562, 3012, 42, 1, 70, "Item",ExpressionUUID->"6039e94a-cb77-4dee-9e5b-86a107d36e50", CellID->948365685], Cell[138607, 3015, 40, 1, 70, "Item",ExpressionUUID->"c66e12f5-a2a5-493e-b2b1-f31eebd74bf0", CellID->687929316], Cell[138650, 3018, 43, 1, 70, "Item",ExpressionUUID->"b1c5dc4c-97f9-454e-8ac9-20ad3d36045a", CellID->100224568] }, Open ]], Cell[CellGroupData[{ Cell[138730, 3024, 221, 6, 70, "Subsection",ExpressionUUID->"6c228a71-da39-49f6-b9ea-76a613727362", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[138954, 3032, 28750, 974, 70, "Output",ExpressionUUID->"efc13ccd-93b9-4db4-b1ed-d8ec62b87938", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->558015110] }, Open ]], Cell[CellGroupData[{ Cell[167741, 4011, 980, 26, 70, "Subsection",ExpressionUUID->"91268370-d344-4707-bf61-404ebd8cc488", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[168724, 4039, 39, 1, 70, "Item",ExpressionUUID->"408935f2-10d9-4df8-b7ca-5b60751a29b6", CellID->268859946], Cell[168766, 4042, 41, 1, 70, "Item",ExpressionUUID->"edd2c22a-1643-42be-8ff5-a1f30a1f986b", CellID->430117283], Cell[168810, 4045, 44, 1, 70, "Item",ExpressionUUID->"860f83df-de17-4986-95f9-ddb6a521c6f8", CellID->701077602] }, Open ]], Cell[CellGroupData[{ Cell[168891, 4051, 1039, 26, 70, "Subsection",ExpressionUUID->"3a30c835-c45b-4d81-8434-d73b34f948b4", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[169933, 4079, 48, 1, 70, "Item",ExpressionUUID->"b1bcccd1-2270-443f-a883-802913ce2cc8", CellID->822234168], Cell[169984, 4082, 61, 1, 70, "Item",ExpressionUUID->"06f50628-2882-41d5-95b8-73e56668d6f4", CellID->584805615], Cell[170048, 4085, 50, 1, 70, "Item",ExpressionUUID->"93259395-42e9-40f9-b2da-ec46e139c906", CellID->128372319] }, Open ]], Cell[CellGroupData[{ Cell[170135, 4091, 1084, 26, 70, "Subsection",ExpressionUUID->"550ee6af-acb7-4b15-97e1-0e4bf32d6ef9", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[171222, 4119, 516, 8, 70, "Text",ExpressionUUID->"e64d3d00-eaa3-4477-b7cf-623f775413be", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[171775, 4132, 923, 26, 70, "Subsection",ExpressionUUID->"df4cbdb4-5f18-4dcf-a9a5-4d956efd1015", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[172701, 4160, 505, 8, 70, "Item",ExpressionUUID->"3b4df505-1a9f-4ccd-a922-4b681ce2eb25", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746] }, Open ]], Cell[CellGroupData[{ Cell[173243, 4173, 1874, 45, 70, "Subsection",ExpressionUUID->"02b7835c-af83-4357-af42-723dce567c39", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[175142, 4222, 158, 5, 70, "Input",ExpressionUUID->"184641d1-2bbb-4bb1-9f45-656d290487aa", CellTags->"DefaultContent", CellID->946203791], Cell[175303, 4229, 122, 4, 70, "Output",ExpressionUUID->"2f9dbdbe-990e-4f56-ba8e-7143a1dbcd51", CellTags->"DefaultContent", CellID->168370258] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[175474, 4239, 955, 25, 70, "Subsection",ExpressionUUID->"fbca6474-5368-4c9e-b8dc-5d0496bf9e2d", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[176454, 4268, 1174, 31, 70, "Subsubsection",ExpressionUUID->"f761c1e7-0302-44e8-a39e-0e45dda752d2", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[177631, 4301, 89, 2, 70, "Text",ExpressionUUID->"08ccdc12-529d-4c37-bb1c-f89fa0e1ee46", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[177757, 4308, 1113, 29, 70, "Subsubsection",ExpressionUUID->"58b0fc4c-fd2a-4376-bf6c-9a796a0d777b", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[178873, 4339, 1321, 40, 70, "Output",ExpressionUUID->"1ac893fd-9f19-4f56-8eef-597f29dac549", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524] }, Closed]], Cell[CellGroupData[{ Cell[180231, 4384, 1280, 33, 70, "Subsubsection",ExpressionUUID->"ecc47248-9f08-444e-80ad-fce6192c9ff5", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[181514, 4419, 1365, 41, 70, "Output",ExpressionUUID->"1e0f8be3-e678-4321-a10d-f505cfc60e7b", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059] }, Closed]], Cell[CellGroupData[{ Cell[182916, 4465, 1913, 46, 70, "Subsubsection",ExpressionUUID->"e4b5259c-e7fc-4f95-9b84-9095322c927d", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[184832, 4513, 2896, 83, 70, "Output",ExpressionUUID->"7263e64a-233d-4d1d-b740-bc6513ca0256", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308] }, Closed]], Cell[CellGroupData[{ Cell[187765, 4601, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f1f292b1-b703-407a-845a-db67df3428fb", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[188839, 4630, 938, 28, 70, "Output",ExpressionUUID->"6e915de3-0260-4e4f-b597-0173aefd0cf2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[189838, 4665, 1155, 28, 70, "Section",ExpressionUUID->"7e69baa2-8a37-4668-b1af-dfa80d555e13", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[190996, 4695, 529, 8, 70, "Text",ExpressionUUID->"8e40e473-70f2-4668-8c5e-30b747289546", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[191562, 4708, 1033, 26, 70, "Section",ExpressionUUID->"809e1410-4252-4389-be7d-7ea6a7c9be1e", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell[192598, 4736, 515, 8, 70, "Text",ExpressionUUID->"d01dc0ce-34a6-49a7-87fa-02dd1e826d84", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)