(* 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[ 250763, 5406] NotebookOptionsPosition[ 97005, 2478] NotebookOutlinePosition[ 239748, 5176] CellTagsIndexPosition[ 237911, 5125] WindowTitle->NFourierTransform | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["NFourierTransform", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->587836148], Cell["Find a numerical approximation for a Fourier transform", "Text", CellTags->{"Description", "TemplateCell"}, CellID->795328378], 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[{ RowBox[{"HoldPattern", "[", RowBox[{"Options", "[", "NFourierTransform", "]"}], "]"}], " ", "^:=", " ", RowBox[{"Replace", "[", RowBox[{ RowBox[{"ToExpression", "[", RowBox[{ "\"\\"", ",", " ", "InputForm", ",", " ", "HoldComplete"}], "]"}], ",", " ", RowBox[{ RowBox[{"HoldComplete", "[", "sym_", "]"}], " ", ":>", " ", RowBox[{"Options", "[", "sym", "]"}]}]}], "]"}]}], "\n", " "}], "\n", RowBox[{ RowBox[{ RowBox[{"HoldPattern", "[", RowBox[{"SetOptions", "[", RowBox[{"NFourierTransform", ",", " ", "opts___"}], "]"}], "]"}], " ", "^:=", " ", RowBox[{"Replace", "[", RowBox[{ RowBox[{"ToExpression", "[", RowBox[{ "\"\\"", ",", " ", "InputForm", ",", " ", "HoldComplete"}], "]"}], ",", " ", RowBox[{ RowBox[{"HoldComplete", "[", "sym_", "]"}], " ", ":>", " ", RowBox[{"SetOptions", "[", RowBox[{"sym", ",", " ", "opts"}], "]"}]}]}], "]"}]}], "\n", " "}], "\n", RowBox[{ RowBox[{"NFourierTransform", "[", "args___", "]"}], " ", ":=", " ", RowBox[{"(", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "$ContextPath", "}"}], ",", " ", RowBox[{"Needs", "[", "\"\\"", "]"}]}], "]"}], ";", " ", RowBox[{ RowBox[{"Symbol", "[", "\"\\"", "]"}], " ", "@@", " ", RowBox[{"HoldComplete", "[", "args", "]"}]}]}], ")"}]}]}], "Input", InitializationCell->True, CellID->825232356] }, 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[{ RowBox[{ RowBox[{ RowBox[{"NFourierTransform", "["}], StyleBox["expr", "TI"]}], ",", StyleBox["t", "TI"], ",", StyleBox["\[Omega]", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->954931336], Cell[TextData[{ "gives a numerical approximation to the Fourier transform of ", Cell[BoxData[ StyleBox["expr", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " evaluated at the numerical value ", Cell[BoxData[ StyleBox["\[Omega]", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], ", where ", Cell[BoxData[ StyleBox["expr", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " is a function of ", Cell[BoxData[ StyleBox["t", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->951849241] }, 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 numerical approximation to the Fourier transform of ", StyleBox["expr", "TI"], " is by default defined to be ", Cell[BoxData[ FormBox[ RowBox[{ SqrtBox[ FractionBox["1", RowBox[{"2", StyleBox["\[Pi]", "TR"]}]]], RowBox[{ SubsuperscriptBox["\[Integral]", RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], RowBox[{ StyleBox["expr", "TI"], SuperscriptBox[ StyleBox["\[ExponentialE]", "TR"], RowBox[{ StyleBox["\[ImaginaryI]", "TR"], StyleBox["\[Omega]", "TI"], StyleBox["t", "TI"]}]], RowBox[{"\[DifferentialD]", StyleBox["t", "TI"]}]}]}]}], TraditionalForm]]], "." }], "Notes", Editable->True, Deletable->True, CellTags->"Nothing", CellID->391586244], Cell[TextData[{ "Different choices for the definition of the Fourier transform can be \ specified using the option ", Cell[BoxData[ TemplateBox[{"FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle->{"InlineFormula"}]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", Editable->True, Deletable->True, CellTags->"Nothing", CellID->829070809], Cell[TextData[{ "With the setting ", Cell[BoxData[ RowBox[{ TemplateBox[{"FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle->{"InlineFormula"}], "->", RowBox[{"{", RowBox[{ StyleBox["a", "TI"], ",", StyleBox["b", "TI"]}], "}"}]}]], "InlineFormula", FontFamily->"Source Sans Pro"], ", the Fourier transform computed by ", Cell[BoxData["NFourierTransform"], "InlineFormula", FontFamily->"Source Sans Pro"], " is ", Cell[BoxData[ FormBox[ RowBox[{ SqrtBox[ FractionBox[ RowBox[{"|", StyleBox["b", "TI"], "|"}], SuperscriptBox[ RowBox[{"(", RowBox[{"2", StyleBox["\[Pi]", "TR"]}], ")"}], RowBox[{"\[AliasDelimiter]", RowBox[{"-", StyleBox["a", "TI"]}]}]]]], RowBox[{ SubsuperscriptBox["\[Integral]", RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], RowBox[{ StyleBox["expr", "TI"], SuperscriptBox[ StyleBox["\[ExponentialE]", "TR"], RowBox[{ StyleBox["\[ImaginaryI]", "TR"], StyleBox["b", "TI"], StyleBox["\[Omega]", "TI"], StyleBox["t", "TI"]}]], RowBox[{"\[DifferentialD]", StyleBox["t", "TI"]}]}]}]}], TraditionalForm]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", Editable->True, Deletable->True, CellTags->"Nothing", CellID->727753881], Cell[TextData[{ "The parameter ", Cell[BoxData[ StyleBox["b", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " in the setting ", Cell[BoxData[ RowBox[{ TemplateBox[{"FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle->{"InlineFormula"}], "->", RowBox[{"{", RowBox[{ StyleBox["a", "TI"], ",", StyleBox["b", "TI"]}], "}"}]}]], "InlineFormula", FontFamily->"Source Sans Pro"], " must be numeric." }], "Notes", Editable->True, Deletable->True, GeneratedCell->True, CellAutoOverwrite->True, CellTags->"Nothing", CellID->562206102], Cell[TextData[{ "In addition to the option ", Cell[BoxData[ TemplateBox[{"FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle->{"InlineFormula"}]], "InlineFormula", FontFamily->"Source Sans Pro"], ", ", Cell[BoxData["NFourierTransform"], "InlineFormula", FontFamily->"Source Sans Pro"], " can also accept the options available to ", Cell[BoxData[ TemplateBox[{"NIntegrate", "paclet:ref/NIntegrate"}, "RefLink", BaseStyle->{"InlineFormula"}]], "InlineFormula", FontFamily->"Source Sans Pro"], ". These options are passed directly to ", Cell[BoxData[ TemplateBox[{"NIntegrate", "paclet:ref/NIntegrate"}, "RefLink", BaseStyle->{"InlineFormula"}]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", Editable->True, Deletable->True, GeneratedCell->True, CellAutoOverwrite->True, CellTags->"Nothing", CellID->620257138] }, 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", CellID->462042388], Cell["Numerical Fourier transform for a box function:", "Text", CellID->770877839], Cell[BoxData[ RowBox[{ RowBox[{"f", "[", "t_", "]"}], ":=", RowBox[{ RowBox[{"UnitStep", "[", RowBox[{"1", "-", "t"}], "]"}], " ", RowBox[{"UnitStep", "[", RowBox[{"t", "+", "1"}], "]"}]}]}]], "Input", CellLabel->"In[66]:=", CellID->723707931], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"NFourierTransform", "[", RowBox[{ RowBox[{"f", "[", "t", "]"}], ",", "t", ",", " ", "\[Omega]"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"\[Omega]", ",", " ", RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", " ", RowBox[{"PlotRange", " ", "\[Rule]", " ", "All"}]}], "]"}]], "Input", CellLabel->"In[67]:=", CellID->588752189], Cell[BoxData[ GraphicsBox[{{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwUV3k4lU8bJhKyb9n3c+zLQSI0k4qSLYSUpEQhyb5lT35ClK2SfafiWI9k xh6VhKQoW1ki2bKl+s7313vd1zzzPPfMc8+8c0tcvG5xeRcNDQ3dbhqa/39v zpis/Punjv9NPxt4U5gHpoP5fo3sqONJrWtnlBPzgCnH2Eb9ljqeuCB2qs83 D4hre/65vqqO20y13Ub080Br3D3G8Wl1fG4P/wupwVygIHZ2b9OUOt6pbeco rMsFKdVSbBnj6vjpL6bDHhm54PJoDbf5J3XsnpW4OXImFzAqfxDFb9SxtpRc HhzMATdasyUye9SxGufILeGqHPDJ+op0QJc6ticZRR9PyAHlYVtyqi3qmHyN MyD1SA4wfSe0P6dGHXNXt+UbmWeDFJ8LJ8MfqeM/+86LxBZkgj+McqbnMtTx dqDAmN+JTOD8eNlcK1Udr8RPHCL9eAQOdEZaLyWq46Q74hG8pEfg075CxwuR 6jiD6ZbrRtkDIP58zh9eVcd70jhzpFzTQDmtdwHNAXVsluq8zu+YCLQsyxge qKtjdeu+QUWbBNBZMHGFpKqOWa+c3Uo4GQ/GDc2VLsqp48bpnzTOKnGAL1Gp rk1IHft9j3ev/noLRArOdsXQqOOGrhUmf/EgYKtuP8/So4b79vXv8113QtPR KSaFnWpYvTH9waeMq8h76NUzvTY1TL8vHHXoeKDEwIM+Hk1q2Efi8qhCizdq Q/v+vH2qhv/oxKUdZ7iJlI372e7fV8Orb6UiH1Buo92XDdUE7NWwb3rrrr1d Kaj/PMlm/owadu7dgJcMU1GWrVDIC2s17D9+poejKxVpGv/scDRXw0mcAS+t 29OQs3r6mbIjanhH4fvnndoM9JJ2JlxHXg0Xqlse1bqRiVJ+9xWyyqjh1Jf8 5iFfM9GFX409Y1JqmFh6JaHd+jHamk3kiRZRwwPVFeamWllIvk+z5DWHGpZV 8mxrWcxG8Vkxb+03SDgq4IJ14r1cZJvhuaayRsLnMgs7tNtykfQ9O4FdyyTM nCv9Vn81F724pXyp6DsJWw/SHrt8Kg8tug+tL34m4dzpIyzk3fmo0RkLtXwi 4Y3SKT8OUj6KuVAG738g4SzZJN2ms/lIzCo07sA7Ej61fFRp7Wk+Mtchioa3 k/BciJtdlXEBEt7PccSihYT7I21kDbwK0Kzytot0MzWe9lm+QHoBipDsrXpZ T8IFARyvfb8UIDKT3zHOchJu3UlLHrxUiELpLrhOFZNw8p/p46pRhcjoz4m7 tQUkfLPqVuOL3EI0uSTy8UwWCUsTnn9xGS1E3MMd7nnJJMwVNWX1zrAIYYXc 2OhEEuZru/iA/0IRcg8LKXC+Q8LhmaY7if5FqJOoPip/i4SfV8fdoC8oQt5B bJsskSRsKJ4JaSlFSLx3jvtnKAlfO1lfLPumCAX55pysDqDi6z+YV1eKkEx3 sEuqLwkz9j2hSaEvRoPCNlH+XiRM7zoScZa3GEV4qmWfuU7Cofw1WccJxUi5 nfW5jjsJv7hmdt1OoxiN7JsbErlKwma8ZdxJ+sUo1q195d9lEp5drKyeNStG k1zB8u0OJNzheuXpP5didNfZ2qDoHAlfHqGLaPIqRrqNpIuxZ6j9OLMfPAgp RnOsrKGu1iRcmnhAO/VWMUpznH1gbEnCX9i9up4lFKMjtW21yuYkfCsk0mg2 pRgtMWa/4zAhYbpTxxQOPSpGj88F/Vg5QcJi1798qswpRkaVp5neG5Cw6dmW flBYjDboSIT6IyTspkRJ+V5SjApsWA4/gCR8SHOprLK8GJ0qnzkXrEfCD202 ipOfFKO/f1sD7A+ScBP7G2LC02JUbpGVAg6QML/W1548KrYtCqyU0CBhb195 2E+N371t9ZqORMJFdmw6QhXFiGyiOvtNiYQl9G4F3CwtRg65e+lfypNwbCNH 8yaVD8uvabEyGRK+9LPtY3xuMaIcb9WJlybh5vPH87Qzi5Fz5mMbDwkS9oqb XP+bWoy4lwK8zUVJmKDjh0YTixE+YnVXTYiEnwTELfTHFKNr6SrlPPwkrKhm 4j9xsxgJzjN3rfNQ15ea5sjoU4y6Dk1PDnOScAXPQq3h1WLkc6/lbyMbCTuL Rt3Oti9GEtOZgo/3knB92JEV9lPFqFc7QDOMkYRtAroFHxwpRsEJlhaOu0k4 MMRFWWd/MZKdUPY4souEBQtkLq1T9REZ+61wz44qZrMcUKdQ9aQyilvmNlWx UNUNlxaq3kZVMj+/+qWKT0VkzE+NFSHNDxa8ST9V8efoKZ/A+iI0Ja9M8lpQ xYzNsTY/cotQUiiTidWcKs6IqDt2804R+k7A0fxTqrh1f5zD6tkilB74KGd7 TBW/Ilx4+km/CB1949c0OkqN5xU0G5ctQlk+Sms5Q6r4xjMhxRMrhcii7eEl uR5VHL57tqUwqBBJD3790tVJ5fs9eOSdTSFa/6ps59ymikPiOVp+qxeiBwxt 5vlNqlhZ3rneZK4AjZ+Y1xN5poqNOc6dZjtOPe92+ynPy6l8LW+EG4sUoCi3 MA27ElW88dNR8/5yPiImcCuk56ri7ucFoTA9H13r0+HnTFHFw3+6co9/yEOH Jm7df5akislXRlY3C/IQx8pbNtMEVYwiiNfRjTxUw+20+06MKp4O345OY8xD 29bxK/SBqvht4SxToUIuiv08+nrTXhWPr/n3Gt3LQnaLxOPpdqrY7a/OJReu LKT4z7Ntv40q9mk2ZNxIeozeiu9u9DJXxXWPV35H/ZeJ+JyUihf0VTEfeMMw e+Uhyv9+M2JcRhVXLe4GVd9SUfBPPfekKRUsWn9LWJQuFmU6HpiFn1Ww/dHn a69fx6CmAVWn5SEV6n3kkC2Segv9rZc6Z9Gjgnueb/r2S0ShyHAmY54qFTzJ ss8650wIiuN8r5ARqoL9XW6U/DG5gB6qu89nC6jg4OE3n2NjwsHzwssu5twq uMNE59HRdxFgdJ/DFA2rCna5dAa+F4oCojunRhxpVDDFXeTn4cpbIK/9wCup GWVsoCnKNjEYB0pP05UX1yjj5yd69bfD74EG/4euz8yUceLtJZPp45lA0ulG 4fBxZXzbRaqqZj4TJJgfH6fVV8apz0sPBCU8Bhfl1k9baShj3eEHt169yQJ7 R04d3uJXxnz+dRE2OTng/CEm/iOTSlj3yj+2a2t54KX8uIX7iBI2sKw1aNfJ B2r76hNSB5XwLI+GyNnIfLBnyYlutlMJ35RYj9BmLQCVuXgxvpyKXUU7bQQK Ad3ugI4hHyWsJcm+KstYDDyWTWloPJTw0zeeIxOHi8HwZ4KOnIsSTpQX9igM KgYVdQOVwWeU8LGb2XFwrhhYX1HJFD+khONShlN8GksAtmL4cOKAEn7+4X2E 6kIJkD/8mdNblZp/JJx9XLgU/BO4c7tDUgnvZWw1ZQ8uBSWvpr1c9yjh5bmr KZflywBXw4sn92mU8NS+j96+lmXgZkHKbNOWIs4y63voFFwGLG7qn2dfUMQn fDQ9PnSVgaarAg+0vinizZ59SdYLZYBovTTg+EURB+QVfC1nLwe/lbNO1PQp 4jdG5ul9FuXAWcg3+nO3Im6dcnvzyKsc9O0xRgxtiljKyGVaI7kcFIxvaZyp VcRnE5/vvOwpB2xv+q5HPlXEojyGWvhbOQikFJeVFyvih3amAzf/lQPTe6fF /z5QxP43GjWOqVSAIDX2E4b3FbEWZ2D5zNEKUNT/8kZSvCJWSzngfvpMBej3 inz48ZYiPjceTpvgXgH+cum2SYYp4lmt9F0JoRVAvvrXvFuAIk4J/I/b6m4F sLZ8xlN7g4rfGn4bz6oAkatX9P66Uvkv1e9Xe1IBntyXdDZ0UsSxb1++NWis AMPqo4lJ9lR+3bfuiHRWAPrB1PqP1op48JScaW1fBVD1MRuXNFfEvNwqzKyf KsA5HiYm9xOKeFf8ZSQ1WQFia1pJtfpULPkvaHO2AtRYhdj91VHE7WV5NnGL FWB8bX+U4X5FPOMWfHN4pQKwpP4sT1JWxAOJxyUnf1UArf2lgx9lFHE9o/t/ RRsVwOn9xT+SEoq45NcmHWGzAiT5ChPdBRXxh8stS+eo4028Q6a13Ip47dGl JhPq/Nnau/5/WRRxdpP1xPpyBeCxPpFjyKCIRxbWZ2x+VAC4vqs76Z8C7h1P cvacqQBuaU3LHzcV8P0P7rRwvAKkafoJSq0oYLvdH107P1SA1iGVI+7zCjjG Vf0SXW8FWPSbc6v9qoDT+FYb1lsrgOC+/JS/nxWwz4fK4zl1FcCg/twLww8K +K+Fyp9/JRXAy4ZvOqlPAb+9c/Et78MK0JP+3wGpNgXczPJh41JABVg/cOSC e5MCPpeudjvzcgWQHN6Jra1VwFEmkUV3TlH1wO/5ybBEAW/ouBckEqh6aJCj S85VwKoMicr5rFQ92E4pfHqogLuPUrKvr5UDuQfWN90TFPC/DBZFteZyYKXN UVQbo4D3v75zWS63HIR/7O79G0bFu9pbP0WWg2EBPfFkLwWcJ8Da5qFfDmIf SrXV2ijg4af/bXmRy0DNwc/zf80V8K9PT5gt7pSB8U9pPMeNFPA3ka6rKxfL gJYQs/MnXWp9k/a6YLYyMPtoifGfhAIu+9cpP2hdCnh0y0jHhRTwUa+T0+OE UgBHL9kl81Dz8YaXUVZLQIbwh3KpPQrYPelw3fs7JcDw8QvT4wvyWPNb7suZ J8VgKWF0h35aHt94S5YN8i8GD0N/l7WMyWMR+vUhFlgMFhy09+gMyGPFMy7V 2r1F4J5kLVJqlMe+GoebJ74Ugi/FFarcsfLYJXEMsQ3kg9iMV1/eRshjukvf vMIT8gHpv+/x8cHymFZQzJrTMB9Eu8rO7b4ujz959jY+qM8D8koFuZun5fG0 5m3nmMRc4Ed+xPVFSh47/xPuW1LIAuL5jfihiDzeEThu/C/mMei+/9HDZp88 pqyId2WOZwJh332v+pjl8UnanzqP7j4CrQfuR7Uty2Gih46u4ecMwPYibq0E yeH5SFrtdN37oKgrcMj7rByePaXzKGwsBDxQ8ztSaiWH706saC6EBYL4x16V X0zkcL1h9OpFET/g5e0WdwLK4cZUh1+7czyAnpj9ITGCHO689N+505HaYNAP FvUsyuJqwPS1QT4I7SLu8ZOIpOJDAVJvglLQryS6KetgWXymU+BqjU0qmv39 zyzeRxa/ltLdLa6RhnrfbcptOMvi9HLHX2fn09GDm98/vz4pi8+SLN8aWzxC qu/fHAvglcUmsROqhTs56Hx0Cu/bEhnMnB1N1FGnvr/A+p6APBncm123VyGu GIHfNtvimTLYcarp/bnxYiTuJTTmdVcGryZGyvvHlaBJh7wSPj8ZLNwAE8Xe lyJnnUqd80dksGTY5df8hyvQ0Dqn8h49GRwc4uDiHVeBDMne4pWaMljrW8TG UH8FkpU7sHuXvAzuYjR5Un7hCfrO19xbyCGDhy6wSql6PkUeK68cf3wm4mst DLyrSpXoyxMlq7QPRFxVtqAlZ1SJzK7eNQDviHjxs6zCq8uVSHXcQiG5nYiX sNhP40eVaOXNxzWNciI2buPWlfxXiS7+pzPzuYCI1/YxbSbxVaGBo48/xmQR 8d2EtcULSlWo5vmF5uFkIn6sCYrFzlQhv9KZ2yEBRJx49zFxo6QKTTudCCJ4 EfEtI9kg0+dVyEa83L3XjYj3xMe8+vO6Cmmle5wSdyDiOynbGhcWq1CJRd+R blsi/sFirc/5twoJsKlpelkQ8ewJeS0+VjLajv4l2H6MiMkL1kz8cmTkCm1Y rwEiPskyycStSUYjvxv+8WpT1/vskt55fTIyrhdcaVYjYg/zdx2bJmTU5BXy 1UWRiB2u2r2asCUjReUvQxxEIu6f9g7hv0RGj+dAN0WMiDkcp1gz3cmIrTD3 +UUBKl/JnkY3XzIKvUD3dC83ES+vPmuPuUlGlW8NEwdZiDjgRdLqy2gymjwU 7/GYgYi5gpDquTtkxPO0z9SZhojB2sInkExGBiK8KirbBCw+PmztnUZGAfFn 2DdXCfi/cjv29YdkVPb78U/8g4AHhVx9u7LIaNR18u1/MwTc1CBDM5NL5fOJ WGkxQcD5dN8UrQrICJ5wSxIaIWCvYMUwtiIy8mp45vl1kIAN3LvDeYvJqEBm zfxJLwF7xL1tuULFQ2laJL+XBEx3Jm94DxUzMtzkBK0EzHF2x3GlkIwO+rYs 72ki4EPs6zSy1PzuX3f399UScF0ti0MJtX6WpRH5wTMCHhiTVfSm8utrTbx3 sZSANboLRGOp/HepDXgp5BOwZpDF6nQqGWnk7rNcyyTgX+SIa3eTyMiZ45z6 izQCls/ebRMRR0YZYTncMUkEzGhxMLwpiox6Fr+umsYR8DFmZgxDyGjHXm5w XzQBP9RbWWX1ISPlN9dqxm8S8LAbI420Gxld0CWnlPoT8FzD395IRzK6V77u 43WDgFdMZC3kbcho/b+w/fSXCfhyS/ZZS0hGslttvG/OU/mZff42qE5GdlcY 11NtCTinSkMxm0hGyCC5TsaYur/o2SE2ZjJaqX2ftnSMgGt+2x+t3q5C0gRB fwog4LwYGJj7vQrF0uUfOKlOwK7KA0p2L6tQo9fMPh4lAo43+itMqKtCCxMK m6NEAj6vZiN4ML8KmeOaBg9BAhY8unHlSHAVilTZyjjAQ8DzjRMOWs7U85Sl F0jDRsD79utXBphXIf6bndr3aAk4vf/o6qhkFRrXHm6snZXGKtdPpkNUibhK hR+FTkrjAzL2KLOgEh3ldww2HJXGLx6uCh//rxKVrM/pfHwrjRWlLs8kmlci z+rfTTt10pjLPc3ny5NniEZJDB25JY2jZPoHTtx+gkL4Dp+/FSqNZTK7JpQ0 n6CNfxf/dPpLY47tl6t3pyrQYn+RjpGrNG7eVi4a1q5AIwHKDeZm0jjU9EJ7 92AZqmvXq7IXkMbJzYxy7zqLkdpTB/NsLmk84nXz0a/zxehJesTP8b3SWC3n pljPryJU4Nqh5PRXCtPzzmjfEytC9zhMylynpHBl7zMnZqcCdO3cuXz/J1L4 lM1At2JNDpo9FqpPKZLCjPbewyTtHOSkkjOxnS2Fw18UOloGZSO7XV/FQu9J 4QFV0h6m6MfoeIlbZrS/FOZf7nX8FPYASa8FpSYflsJrPBSLDxLJ6NOdB7fL 30viulN9pICqo2CgQ7ziwltJ7BA3eXzI8yx4/a+4j7dbEt/+7cdVdsIZNHvX CYQ3SWKDvz8iwAtvkHd2oNwqXxL3/SczpBwVCVwVWPv+eEpi1u8DhMhfyeB3 Tzi/OYsktjnr0N9VkgvW6Bn1djNIYo3LbP8tkPLA4qG7jo3/JHDwimVPU2Me GCc/LpNelcAFTYdPG73KB+0PG3W3Pkpgd7mg85EzhSDede1CXrEElvcI03y6 pwwIM18pXdOXwInVHy93jFeC882v4yV1JXDpwuJ6o1gVyPUieZrvp+Jg1i3B 81WAOLKtWSEjgfs7f11j/VgFVCoS2i+xSOBRg7b3F7vIwOvCSnHybglsdm35 rgVtNajhsbmD/orjfucLV+4frAZaN8UthJbF8WLrWcJOWTXQN60e638vjheG 2YZ4ompA9C7+Npq34lhxce6yVn0N6KoLKVJ+KY5fcuYwpH6vAcZiBtfiGsWx cA/4+sO0FlgvDW8fzhbHFq+VHHpZ60BGgd6X6xni+Ayf+kNXnTowYpvX8jhZ HAt6KTnLXakDF1rcYreixPGpRYN1OlQHrt77y1t1RRzP6RdFTTnWgwqDS1tf HMUx+V5NjlFsPVjc7hplOSuOQ4YmctGTeuB1KTn/iok4XiU43O/+VQ9q9q3H pBmI47Rpu8Yz/A1g45Wdazug1rvBor6o3QBCNKRJ4mriuLtLa0YwqAE0z8by mCqI45k8ppynGQ2A9vGPjWBp6nhBYKFeXQOI2V3f/IFPHD/pCF0/utgAXlKE 8nZziGOZ3bNMFEYKYPYIv6XOJI6v3BvYEpOkANEn9zNEN8TwkysJV5tPUUA+ r71D0JwYTmM/92/ZhQJkQ4nEoRExzCU1/ZjjJgVUTP9cIPWK4aV7IVf5kymA ZEapTsBiuEGjNWlPAQXU1UcGzZHF8FZPp/FoLQUcFDc+fKxQDMvWSkykdFLA 0eUvvTv/ieETL4KHyr5SQPeZklTbEDHssHBwjX6FAkxbb5yr8RDDCz50Trp/ KWBAXkeKw1EM51emZZsxNQLb+/Tf3Syp9TSHFPS4G8Hn328qu46JYRva0Qw6 4UZw0SndX0pLDFupcUXmSjWC6dcXDoXJi2EWH6NEXvlG4LZffveIsBiO2hi8 fl6lEXjtphT7sYvhv0l0dq7qjSDovaER1y4x3H0qLsVSsxFEFg4tPFkTxXRD kfQCWo0gzvfy3RMzolhzlP4hhYrvHVsjffsoSvXr2uYaVPyQN2ow/LUo9k29 phRLnZ/3jdNfGIlit2npIzXU/GW1OQINVaI4wVHhaT21PvmWSpNlgSgmyhen JVP5NZ5uPv8zTRT3tMmpHpZupP4aTWjv/CeKc5cwpYO6vp5fI/nEEFHcqbAn VJSnEfR3uBq0eojiVy/UB4yYG8Gn1K1Ze0dRPOcmL2T0jwImL8fe2bIUxXdw XJvQKgXM7d+nnGogihkXmo+hbxSwtLuoT1VbFKfrMctofKCAzfca3q8VRPGm WvpmYBcF0BS18V4RFcXvRW/ZJNVRAKOfRQMdpygWdvq14EftN4fBhF02nSge MOD3UKLqgZ/P88/BdRHcYa6dWR1C1U9dgr7XiAjObPE+rGxOAaoxwt9Ye0Ww iipfgKQWBWhZl98uxSL4Zc6XT99EKeD4+svX44Ui2OSptsKn2QbgoklvY+Yp gvu5Oz8GezQAD4b7W98viuA70Rp/540bgN+QRGbMaRHsO/82S1Geqn8/MPHi IBWfuf5dfKIeFNUFuSnuFsHdbYW3p2A9eBrDxPZyQxin7AxxfuOtB3XWGZWX vgvjvYpj8c/n6kDneu2vh2+FMW/O3/DvCXXgm+ZyGNNDYSzx5/vZqy9rwQJD uGRhvDCe21RkU0ipBWtDbB0wTBiLHxuy7D5fC+j9FZkDnISxwAyNfc5SDZCu d0mZVhbG6Hzrf6MMNeDSgS8lbW1C+EFjDN/w3yrgXHLA2qBeCJd0vul6+aIK uAok03WXCeG9Abr+74KrgOfvI+d7k4VwBH2/FulXJQhBpdwfHYRwPo3aWXLj M5Bi6Bu6+FsQn91+zNHCVA46bVisBDQEMeOxt6crQnNA98vLtJkygljm97EC rZRs8FobPRUVEsTa9/Ny42SzQL+QF5P0LkEs3/Bv5tmJR2Bs7EOzcp8Anly7 AvdfTwWbLvlyR90F8NlJIc+gvEggH3Dwn0cBP67qT2DQ0kpC+LOp/FQaP+4x +Pch7F8ysj5y6bTNf/x43Gs+8mfXfRTJFl8OPPjxwFfj9j9n09HHgs82HFr8 OG3eSGwgMQvFvguvrHq1Dx9tVucLuF2EpuW7HNdW+HDS+shdKer7KyRpJP7K Nz4szy50dukHGXGt/6wf/cCH3wXdueXqUI0OtfCzdTTx4fdyNUYWh2tQqo1r Y2oMHx6YDnY8T1OHjkazch8Q5MMJbj92PjpTUO5ny/bAw7x4z2SSZX8lQmpf 1bYHNXjxhubEOC09Ru3fOVVVZXnxzVRnM2UVjKY33j6aZuPF16MK9hyMxkie y9jbcpQHF94hyUzJtqDn/AqlT9/y4GtMFwbGzFuQsRjzGFMbD+5T/9LlENCC PBRfGuFSHvyJluA10dGCyAZHJZX8efCw1+D9artWdMREyjbWlQf/BgqH7oW2 okHLXYlT9jz47IqV5tfcVrR+AW89OMqDe2j7dT9NtyKdYN13DFw8OEiG23n4 aht6HSG05+JuHuz7L19N6L82dD52W/fFJjceruyebSluQ+GpDSXeY9xYWD3s vvpUG2p/phE+XsGN75DaeH0s2tHpOu46nRxu/Jkx0TTPvR1NN63Mp93nxmoH FtoIMe2IsafSxiSIG7PynDhJqG9HD/ruJpRc48Z3bc99fNzbjuQ/eLTROXJj 8pWTmU7f2pHJV0WVRkNufEVDdfw9Rwf68n3vZV4dblymJ7wdQuhAnsvfH3oq c+Pnp34GuWl3oHt/SxhkeLlxazmBld+hA0ntjtWNZOTGSuInh/o9O1DNXhev z7+5sOT8lm9vRAca4id8uT/Jha/Y/R6MyO1ALmL0PD/fc2GT6UZ3zcoOtEmY OmHUzYVjWrbvEJo70H+KrWGFTVyY982jUpNXHUhQPbeWppILG2+NwicfOlC5 dvj82XwurBZ69Z3+VAfShQ4S9WlcWHzTeYxlsQO9MThkwxXHhSOuRK0ybXag 8yYiCdducuFFAbpHWrSd6KflTutLTy7s7NLrks7UicLtRjalnLgwnXPYkjRn J+J0bFQOs+HCQ57X+8b2daI8lwdOn4y4sG1ae3GnSCdS9wh4uP8QF16bDhUa luxE7T42fUkkLuxVcOs9l0wnsg7WZFiQ5sJBp2qifeU70UwEr64hPxeez5kZ /avYiZhvPvt5n5kLE4b3FXUpdyLlgBP54zuc+MKFaGKiSiey8J6yVvrJiRvy 51+ZU7Gfx03moAlOfLLk4F42avzDq/uaOwc4cbp99oV2hU7U7FR1g7uTE5+o emjmJduJJh1OEi40cOIeV65LfNKdiOHst+GKMk78+fVFpWeinUjeOix+K5MT B+5cP67D34lMTwlAg7ucWEGx/jSFoxN5GVev3ovgxGZ3HP7KMHaiVEOT4jFv Thy9abR6628HatCfsVN05sR3/Ig/3q12oFG9CLZAW0786mJQBfNsB6LRFmrt MOLEAtcat5RHOpC0Rq0vlx4nfmF2ulDvTQc6rmIm56DCiW8Ytt/eT+23u/zc aLkEJ5YzehjB+5SqH3GRo8cYOLHv5Vzn/+I60LBQ/UbyJgcusf+rI+TfgXb4 TpV/+c6B/3uh+SfpYgc6wnqLK+AtB9Y44uQtrdmBnBnFOttbOPDnxXunoWgH iqOjBHLWcGDzGPlQ3d0dqH9rYbwsgwPfJcme7X/bji5OWz377MiBtZxfazrY tKOYicWL8lYc+IfP511XNNtR2Wgsn78BB2Ynkq+e5GlHK/1NNzkUOPBhTrFP 2a/b0K6wExkxs+z41bNFGi+VNmTke/Of2Bt2fLwvQ0x/dxtKdqtyplSx4/Zb fVfnPrYicVuB/QtB7PgKm5d/U1grAqS5d6dY2fEBmjm96y9aUIyMiPb8MhtW v/b90Op/LahX5FRO9BAbfschcNLkdAs6z0zxqM9mw0ahdsVRsxiFTMXuFVFj wxsFNt47NBg1psoem7VmxTeufU8oX3uOGM/OXKLVZcUeB+cdNd2eI2vxokhB CVZ89ckkMX6sEa2USWHjeRacuWVp9LiFguSwqE5VGAtOOt1gFuxWjzK+85CC SvbiNI1vz+9Q/fH0swGz+wl7MR8L00xgeRXS8L3nUeG1F8/1N2uY/qlEb/+x V3zR3Yt1EmKnnPY/Qwy8e2WOvGPG8lcUX5wNLEW+gFaEZZsJSxJXJDXCHqJW eqxDGGPCpMSVvWdM0hFHT6jdoXYm7Gp1/WE3dwqqsNpJ90xkwhmJbXG3ue+g r1c3uN5LMuGRUT6fJ4VCyCLlB2PWSUY8e8oqr1koE6jOfVxTecyAZeNml05c qAM+S0py+6IZcMbr+aFjp+pBw0aE/V9XBoyZovv9jjSAwwzyna+1GPDuEJV5 Z4VGYCEVlH51cDfW23F6tJupGfjaU2343t144k5yVtHvVtD4zi6ML4gOc1zf lXIGvAJHG0eY/ljT4LWpUMuAY0PgaVmhdpcODe4uq3VSSR4C/I+uX00Wp44n iyuMjQ6BoQ2GeycH/6FPn1xdJXw+AEKwNcfj7b/olKflg53cYdAa8YsFGv5B F+LjX7ttfQI7ieoMMeNbSDNSb0A0bgz0Xe+6LFi2hcQ7cY35uzGQb36246n3 FhJ9yLIsxjIOjLiioj8wbKH7evs8ii3GwYPU/l1ySpuo0x3a//08DjQzb/x7 FbiO3rHNqNP/mACepc82OblXUcnG8i7H6SmgyuYRpT++gvxT/yxJ7/oKlr0U 2byfrCDusX30NSJfgZduqdSg4QoSCT/IRbL6Cnzf5pmmhSwjjUvRZ1Obv4LV 7won9r/+icwtXbZDY78Bn5qS82nOP9EvScpAec43sH6T4LNB8xNd/K5x+GHD N7DJIZZN2b+IJvRf5VJmvoEdTa5fetkLSNt023BVfxowRG3mGHjNIU6efRc+ L0yD28a+dcUsc8j/PwWmrzQzgJFv5RVj8SyKqrbkKeCZAcyl8+s9IzNo84dw kKnODGB/+8XY7Ng00v7s8g/cmgFJGWcvVo59Q+FH3sjtTp8BXBeH/TmDviGX tRvq4SUzgOfXu7yBp1+RXNmYflrPDOAX6ti04Z9CfZUphgf2zoIHXw+zUciT KNjnyukcwVkg+LRZStBkEjm3uCg2yc0CkcMNpqMREyhr8dJrZsNZcKTX+kTL 0Biq0R+y3r45CwwczX2i9o6h3ev7pJfiZsHxtRPZx+AXVN1F4UtLnwXGgnq/ uktHEUPSfr3lZ7PA2lkqtz/kIzox0P9sdHQWxN3wjr1XO4xeP/3ByT8zC16E tF23WPyAJG29s+iXZ4H0/UuH+h2GUHOOucUS3Rywzaom3Mt4j1ZDpvf+ZJkD d0rpWC3eDaK8dGeeLN45sILyR97pD6DieQcjFuIcIL5abU0O7kfKK4H8r5Tm wJmhI2Wnat4h0cutftr75wBemAp4R+hD8aL82tJH5sDsTxcs+aIXndk+ZZxz Yg6YMTDezVN+g05n8pq+MpsDourHFfM4e1B5c9NdpbNz4NaJ2W2JqJeoJCE4 wenCHFhwiO3OXetEvf+F/DpxeQ5Y+slmSDh3oBKLk+Wfr86BxviXzrkf2lAD NkkR85gDEvlX9kucaEW3H7ens3vNgVgKI31uI0Ybpq+znvjOgS/ZpwoP2zaj J772KVsBc+DJ62T9wzrPUWGoyeXV4DkQvPVuDIo2oNcyZjSPQufACSLXTUhb iz5trJxeCp8D+ywtBOHXKiRdWmy7GjkHXv2Tvh6W+ARF3G7cyY+eA1fOFJaG WhUjsxYbrV0xc4C+mvD1pmAu8i+Po2O7PQeggLHeNk5FUZt6tl1UvJTxwGn5 QSSiTOqoKcfOgZBdKR0GWlfB4RPKd/WpWPnhpS4ezbvABmd50FPxF4Gqxb3s mcA3Zf2dN3W+pfpwU8zhApCOQ5uSqPXqPtpE3g4uA0EfHNTP3poDrHheqt2u EkyM5eoNRM0BcL88pt2/GixKKX7djJgDN5zd5tpT6oD/ajvpddgcyNNWMO6o ooDAM5zqJjfnwCDL/NOO3iZwuz1lPThoDjCMl3F2ziNwOq8y3tZ/DmSe2X/w UnQLMF3M3zPlPQf2H0l1m+JqA6eq44KFPOdAr+KvzEu57SAw3P4vrfscoKGp /XepuQt4uawlf7w4Bx7M8ZC+GneD8kcrH3rs54DagM9Fp5Ee4Jlplu5qOwec ijQ6nDbfgCqxVZo64znw527K+teYt8Dllc5PRwPq/utu3yfH9YG76NuXJkCN J9p1qAn0g4Rn98+Hk+aAqhDzF6/xfiAZfPTwnBx1PnvjOrl4AFBWnvTQSs6B tC0BWXXN9+DSY4Y7+pxzoOv1xzh1y2Hg7eCjxbgwC64EfOo6q/ARmEhTpHkn ZgGj9Ah9NN0nwDWv79XxfhYYBY+GDlaPAL5gsyuczbPgtdyYly/PGGC+jnsc qOfX/f3Ys8cLY6C006ExKWQWxEDP9YsXx0FjclKDi8cskFnwVL9zcAK8UG1z YjpFrXfE68nI90lwIDQkk8g1C7QerLz6aT0FlM2YOe7TUuv/9PpO1zYFpHat DZUszYDSh94yio++gl2PhxT738yA78s+uSEnp8HoseV9ctEzwD3HP1WkYg5U oxRO24lpoLu+UU3i/w6GeXPdUl5NAxbjgP5j0d9BiqmHSWTtNHiyEcDucW4e 9N8I/esTOw0WTYP+a2b5AZ7qc453yk+DhtDm5meaS6DmnrFKqeM3cFCphWye vgomVybG5B5Pgf2DQ2nN3auAXimpcSqc+r8IXghS3FkF81o0nu5OU4DYve8I o+MakGKx/bMgPwW4L3sMIPlfIC6Z9UNT7SRYyBRaU25eB0df3CUqtk2AbBa/ /azftkDqT95LKtFjYJcf76iTAA2sEO9U6V8aAnYXyvobNGhgzknXjr6CIUA2 At0s5jQQDA1FddkOgYtiV+tqYmjgkaI3fwrwe9D6simJfo0GMgk/MLNKGgRR Qk7HCnppYbLnaJE0qR/Qt5CfTkXRQYHPL6pTmV+Bc+WGhQey6SCD0eMmin8P qEkdfXSnkQ4Oxtl6H/7WDZxcGf5TX6aDwmePO/zX8hJ0cNtdijpPD0+e6jW1 DesEMc60/FLau6GhcOzRHq5WsIfFPOLiIgPsuDSkw2dfDWxl7LAm0x7YNj4X rORIBmX6Tv+YpfdA287rPMi5CpgGBtysPkMdb7z7vHvhKUibzgmk79gDS6WP HoswLwbEluUbRY8Yoe3zLIexK8kgYPR3ZVAdI2QzFeBgabkDejZ2L5m+Y4Rf HI2lrzZHAw9lQY8NBiboP3p18+hdN1D3SN/1uBcTHIw5/eukVDQ65nf/4vfj zJBRFR+gG85FacmPc5svMcM/CRHeNy/ko9mK4vF7ocxwPocR030rQPFTz8/r 1DDDRcY8HpHJYjRo/tUuXmwv1H9KO/6t/AlyUthvqby+F072ELSf6NagOgNw bxcnC2x44XGVbbwGMV488W5IgQXmBmtGmEbUoooMe7MwRxY4brBF4/SiDq3t jjnZ95oFen6yM68RoqCo8aEjXvmscCj0WF7B9RfoC+XktYAmVrioF7lSOPMC HbyP00Lfs8KB03KmjfbNaOlY2VzcHjYYd36+VuAoQufLb97Nd2OD6z8Id/pD qO/h6JWG0mg2+OZ3qgB/FUa8510mnz1mg/S9Blcvf8XoNcep/U1v2aBJttcs 3/EWdNBPemRQnR1mV/8UGqRrRWlmD+hHjNmhyfw3HWvVVrQsy6Y8cZkdbpv5 04yfbUUlIxvhP9LZYVXp3W/Mla2I7/ArIsMOO+QLqktoNW5DWqzisjHMHLDx zReumBttaDrwky7TPg6o820NW6S2IX1LM2d2VQ5ooD8+wPipDW3t1qYIXeSA ViUun5apfqTIa/VNlgcH9LJbCWP0bUdWY08mJYI5YJH0+lWF5HZU2SDJIpvC AYWNA9kzOtvRecJn8fIcDhg0aDU6OdaO9t5L36/8hAMOkCw5dDfbkbMbi4NG JwecWdTnFiZ2IJ7hTu/6fg545/gu6QKdDtR6NCL24BgH5I30FNMz70AioutV cJMDHjHweFTg14F64io72+g5IdgHEnxiO1DAhuuIAScn7CGoGts+6ECDfWP0 JvKc0KZy0/J8QweK1Hso0KfJCR+P3tCN7OxAqmVWypZHOOGmji7pxUAH+sLH fmTIjBNud9lzcIx3oDtR3TZnznHCP9pBL4LnO5DWUpT76BVOmGXWLUG73oGm zx2KcPDlhDVzLIq5/zpQSvdm6mQEJ2RluN13jupX9TWryy4ncsLzKT8Z91P9 7FLeNTT7kBMOEV0H5al+PotddtCtmBNeDw0+AKh+3jhkcnaxmspv9a+ON9XP b81m/rmBOeGD50LLXcROVHTahuvXa05YyHzQ7RDVz1u1csoEfOSEzdybbR+o fn6Xymud3984IdO0qGAq1Z9XPooxD13hhFay6cn+VP/+ijtmhp2GC15T4JH8 P56+cys0l5ULdm4pKwRQ42npb/GqC3FBnAb3h1DzCYdEV7TLckE6gu/baLlO dGAt6oi1JhXTNt69T+hEFu5Rn2aOcMHCknKuMvFOdO1r5I3AU1zQzTPqd7dg J4o9F8m414EL7tuze22NuxPlD0ZkZ7pzwaCXbhWKLJ2o2ThCUzmICzKO24x4 0XWij+3hb9BtLiim+1yve6sDremGO51K5YLlFp1ppJ8diL027PdkHhd8Vz/4 7MlUB5JXCrvnU8kFS26fsQUfOtAFkVCc/ooLHmhLri573oGCU2/ayH3kgn/O LUrGVnSgNNabi43TXNDccf5hZGYHev0nWPgLLTdkETtjPxTYgWZ8g6uvs3PD qhjme+ouHWjXYpARrQg37Oatya+1pPb/S2CAtBY3FOmV8FCV70CW1oHsdce4 4dxJaV0lng7k0RtQZGjJDRneeXLa/GlHBc3+g64e3JBL3F3j4Jt2xJHtq1pV wA0p7gdFgy61I4V9vl36ZG54Pmu9XdCwHRnc9Tk/iLjh8ghTzZZcOwoJ847f +MQNo88sOAb/aEOzDjdm9Th5YEKiVOEbtzZEN+wZ9laUB85UMvLnnGhDouae fI6KPLBwzU2+jdiGrOD1o9GGPHA3/Wwu/VgrwuLXcnpu8sDIXv2eesNWNJLh fuDcHR4oeDOD1UK8Fa1zuPf+yOCBl8uqVMw3W5AirdsORw0PNPgR8z2iqAVl TFyxtfnOA/G+8B6aHYyu5zlxfLXmhRXXo4iHhRBKDHyQmXiJF8YlH1KsaWlG T817ZbU9eeEF9yNW9i7NaPHvgcOJ//HCk5nDsxcrXyD3s3u9tJp4YWVF/8Mq 7SbkykMeiJfggyjI15dXiYKcY/6l7V/gg5fb7USHa8jovOtDkdsR/LDl8UpX 9dsU9PsjU+9yAj+sm+pXqFa8jzJOBIaee8gPa0vZ9+XGJaN3srZjpGp+uNV9 xIrmfjw6OsObO/qVHzY4O2yoWIYhOadkabXjAnCWu/T8MyNv0DlA8z7TSgDe bcNJ9RGB4OIRz1t7HAVgFr9uVm1VGMiUNJseDRSAdR6fbk//uQXYJlhKbpcL wB9JiS4dLMlgzT5W4TObIFyed5vSaskESW82RgyFBGGPxIkWPaUsoKTnEk+W EYS9e+60dKZlA2dhgx+3oSCUpQj7iZBywcdPdM/UvAQhz5c3aR0L+aDZJkwt 9r0gbBNZnksXLwVnuxapTx9BuIuboHkJl4JNzfP37RcF4YoXDMg/XwZIfHpr anuEoETbp6kbaeWgYHC79rOWEOwsFzs1sPIE/HfKT1s9UwhOyGPZQqUqcO+1 vHtFqRC8mlJImPGtApmGY1mEeiEYo9QlI/KiClTqHafn7xeC81rPDeyPk8Gw nODbnT3CMJQ8ybh1qhpMUh8zfrzCUH/5wFJhcjVYEIvS+CkpDMtUzkKtvmpA w7fwYEJPGHY672plMKoBsruanTq9hSHTWbNqCdVaoHbTKx1ECEMVq++Lb51r ge4msachkRqvmKRum1kLzBfvqpSXCkOGoJ9iK3RU3/DJcfvumDDcczjFVqmj DoSf5lNi+iEM/T2yrBJW6kBcX49D5DYV67joIdF6kNWp3uHDKwJxJgmleteD TvLupDMnRWDE+y+t22wNoE+psbXfVgSePpHO+EGtAXwq8fh10lkEsv4hOIaf bgCLWR/sDkWIQOndawNa6Q1gUyA+oT5RBDqMb1oY1jWAXakQq2aKwMcx5k8l BhsA351SglS9CHwpHGyuzUIB4gznbTPbqZjh+kU/IgXIR3Dd4e0Xgb8Dvk2H Ago45B+8tOeHCNz8xX515RoFHF9RkYrYFoEc7CLp9lEUYHHt6+ntPaLw1urx jJR0Crh8yeT5gqQoPGtk9te5iQI8vtAuXlYVheuO9hu73lBAwJk68TE9Ubgt OzzvNkoBkYOulrYnRaEFX9nRvO8UEG8mFvPOVhRqVm/6FW1QQFrPQIORsyi8 eZGPPpCuEeQci51v8xaFC8+9AwXZGkEZ1hXVi6DWC0zyvLOvEdToLJvXJYrC 71vzia/FGkFzXWGUSqYotLP9desLsRG8JNnVlZSKQoLAb65WxUbQX8E2J1Ev ChOuCf7zJzWCUZk2oUftovA6u7IY7f5GMJ3nb8rTLwqba5oszx9oBEsiihEJ Y6KQRWQmNkmrEWxnjFcz/BCFZxpO12VQMT1P6nTYtigMmSOM+VPjuRZD2bj2 iMGrfn/9Haj5JF5e0SzgFoNnDkafMlBrBKp5Fuc1xcWgEn+vrZJyIzgUohvz UlEM3p90ieKVawQm1sSndtpiUO31kbf/JBvBOVWOoYVjYpDpQbn+D6FG4Mq8 /SfUQgyeTiYtfOFuBIFfpwicDmJQ/EDu5HvmRhDb/MYk300MWjT/PDpA0wjS Mup99weIQb/jigeHf1FAoVfu465oMVjw9frytzkKqDG+03EmmcrX6k3uH2p/ Wom+P+Yfi8GvqTBO/C0FvKNx4A0tE4Pr6lnLZpgCFmvULue1icEfHSDsYzYF /EkUTtDoE4Mqhr1nNBMpgOUqQ23nqBissKYIFQZTgJzIJ/r5X2LwGpcRZ7Ml BWT+dkw7RCsOvTIN97sdooD8Weuy23vEoe2wooSqLAWQW2G/AI84lO42jdiz 1QAoz/ZPXxQUh4Mni8VExhsAzpTfLhcXh/YLmx/NOxvAWz8eyUNK4nDI4NoR gaQGsCA/e+OigThkPrbaYy/QANb2fb5VbiwO73G7bN3fqge/6fsfrFmIwzmr I+rrw/WAeex5S4yDOOSoatUxSK0HMvfvcpYHiEPRjBF+I/p6oBweTVgLFYdh J34s8n6pA5rXArX1bonDziVTC5H6OnDU8JLj22RxeElFZ2nauQ5c/K1ZtVom DoX59elzXtSCq7MKHbpV4pDi6pwRmVwLPN+Lf7xVLw6NXh3Or3KqBWHPmGn5 26nr3Rlc+cNYCzIvfTHX/SwOraPc7BJP1IAPr24tRbNLwBu005P3K8gg5dDj Y6f5JOCHk4tsjTfIwKKq5iFBRALW0I7bamuSQW/a1NFOeQn4YxftRzPqfdnp ePjBHgMJ2LbnadT+9kpQt7FzOC5EAr7L+J3jef0JSJPyuX93TgJqvw+c7HhQ AKzS7sw6LEnA9qP29/fuKQBcTPl6qhsSsGT0rM+wdz5IXHw300cvCd9xnFWX Ms4DMRQVXS5xSSi9vsMUuJQN/Mzmv6ZYS8K4Eo6d5dg0cDr4oubDNkk4JbpW Wd9+DaQ95mHY6JaEdNYzxc/5LoMh1Pnesk8SCrL9bbg3Ygv4JgMKK4ck4Vzc zZT0U4dAT4GpluUXSeg+qW7yXNUIpRE/H3WdkoS3fEAU+GCHPhy/y9M1Jwk7 k4LGtf9cRrYJq9Xh65JQjEa1SzTGG9llR5Nc5KSgu0YkX1BUHHrYoknbriIF Q5bvZHomx6ORqdk+cU0pWPzjDe33zER0TtbE85O+FPW+r8tjtU5G9lW8z0zO ScHqEySPJqtUdKGtSFHjrhRsfC7Pf5rxMcr5ZruTlCoF1w5MGR7YeIwm9ux9 /eORFGzXgslmX7PQRePrbsUlUlDjTDmMOJeDLr0/UCbYSuUjw1T8ipCHnGde ytD+koK6oOh30O1CVMQUvGH/WwrS/flLGFosRDMKSl2NtNKwiefpBOfpInTF M9nZh00afj6tISkqWoyubp0pnJGRhjn/HT6olleC3PfOS/baSUOFi82HGq6X o/nARvq9jtIwL5akz9Vajlxn/5s2dJGGSWf8tRW5K5BLh2xZi7c05HpasDe9 qgJdDHMm1cZLw2eacrYsY0/QxI/93Cv3pKEWE2qQk3mKLpzb/Uv5gTQ8b/3a Z/3aU3Reu6ChpFAaZgcdqEzbeIrOrE6AzGZp6NgU8qdl+xkadqyS+NguDask Cvt5hCuRdV84Hd8raUjp/lwjcLASWT0R67r7QRo6qxW95/apROYu9qZRS9JQ lsvKsX6sEr19r6iK16Wh6fV+84nNSmR6dIfzz4403LQKuWTDWYVOSjx678dE gJaN+/8RYBUyGBk+5ypJgA6qb+dhahXqOFFyqFiWAKMNOHJQSRU62uAv/lWZ AK0LFI/efl6FDqfyfbXXIcD8id9Hl75UIUw33fHwMAFKUexkkn9WoUNetcUf DAkw4O4cfdC/KqRrZuV2yooAQaUJo5QIGT1/IWWSaEeAhi4p3yflyeig4qry qwsEaPphFn4/QEYND1s5GF0IsHkjYVvrKBkdYLq3cvQaAc4fuMf61oyM6vwd ByO8CVBP5LVfhR0ZaUyr1jUHEmBm4ZD2OycyUmt7G6gVQ4BM+bF/lvzIqIqU fdY3ngD5SvllFkLJSDXHQ498jwCdMw/vKMeQ0VO2Q2I/MwgQx2rmUeLJSOkm K61iNgHuuA8ejb9HRhXzo5NXCgnwId1jvuJ0MpK3q2gvLCfAxVNV5syZZFT6 MrhosooAj/59pVaXTUayB07GijUQ4G93HbryPDIqLhR0PddMgLKFI2xzBWRE 5Pl+8kE7ATL/YS/1LCKjwkiK0lAPAXolNinoF5OR9HIsO/c7AqzxBhv2VJzv YLts9oEAjd5c9Wqnxkv2ygzEfybAe0kBzH6FZJSju1HTPUWA22Ks6t75ZCRW 3pnG8J0AuZ8QnJtyyMgqu4HSs0TdH2mfz/+ofOPul40mblD7bftzxDODjNDt zH8Wfwnwp68rH8d9MloLTpTct5sIwy7YGn2h7oe8Z/ixkb1E2JPbrDd6i4wc nLyuZHMR4TaDLGKm7meKrdOdSwJEaD6XVujqS0Y9xtZPZcSJ0ETav2/HjYxo Dh9/N08kwgbKXZlWRzLav//g2jMlIhySWnv43JrKX0T0oJYOEVr7cmHTQ2Q0 xMlhv3OYCDuU5oK+q5LRXoZd4fg4EXoPEpyaJcnIb/Fbx3FrIhzruarITU/t z+SHWRZ7IqT4hFmlrVahiaHuve8uEaHGwC9d68kqZIyenDpzgwgTbmdpJr+o QpHV2T4iAUSoTEfuZSurQvXFyekToUTYatCu0UvVv2SS7+er8dR4zP5qn1sV so12oVG+T4Se/1FeFFhVoYSAM1IrD4hw6qMwXaBeFdq8oHc1qJgIifY8dn9Y qtAb0u5fca1EOFJzMj47vxLtIm7sM+smwu8F5fuTb1ciLcG5g9x9RFhuJJIw 5FqJ8na9CX/0mQjjT6KViyqVKGAghaVikwg3NAnOlx2fIWlfaek3yjIw81XX uVsKT5DdVT7D5P0ykHVBQzV2rALdtWd0Pa0rAxUDW1Wv3atA28cWnn0+IQNf FpMWf6yVoz6+Gp1FJxlY7N0/r/ekDAU3HLFkfyQDl2qNNfsXi5Haub4lh1wZ aChKyuJ/UIy+/zuXWFksA0mWjC9z9YuRnaFf96kaGVh6u1jvzv0idHCoBKS8 kYElTodeSikVos1VVkUBGlnIzGCW06qfh/xUhumlLstCjZSPKaeIGUh5wCnP 200W5jq1jcfapaNpv2XQfkMWjqu9G4eJaeh0M3Pw5VBZmHkwz9FyLQVpmOgt F6fLQt0/c7LfniejVde8z4o9srC5aYU+KywGeRa512mqyMH/GDUdUgfswJe3 QqlsmnIwvkg05qKlEzDZ6vGe1pWDw70+tCZabkDeWI6UZiQH32vL7ngF+oCv y9/Kf12Wg6oPPXNqGCOAjZ5Dbk2mHCxaH+/nPfm/Gq48Hsr9++MqLZOEFslW IvPMmOeZ0WK5fU4uuaVFIkTaqCyRFkvdXKUskWQt62BmnpgnSptQn0RKC24K lS0iUpElUvL1x+/353m9z/4+r9d5nX9ODKrcpxgSnWMAl7pOavzouYCMYu+5 uuUZwHGW93eL8lik1KG+SLXIAG5tmuey0iUOPY1oTDpSZwCsoIK7N4IT0epX W6L5M9jQJBK1vApORcy4jNeMOWyw2XhP9unKNKSuf21d+3w2DP/OX6Tal4ZG gxQV4payIVlH906kYwYq1Hp26huwwXW3SdiCKCFa6mURcC2ADWdzm/40Uc9B CQmD9hHBbIi//L6x+EAOkrufbbTrLBsK1JSOkbdyUIuS7MDseDas8FOf27de hC7dvuftm8+G7l15jJeHGLHkVu4x7GTDsbdqtzQO0ehuwB9bu3rZINtyVJia R6N9X2r+yhhgg798Vfy3Dho9aDywVFGGAEU/3jeNrVfQkYKU7i8LCQh+2aW7 dkku0l66/41YhwAtTYuYLXa56HmK4OmOZQRYWbL19M/kIr2w59IXywm42Nn3 m92Wi966/Pa5akNAoZ6rqW9kHgp/+XSnuwMBsslB6eJrecjo72QbDVcCFvzW fJtan4diBCT/vBcB84dWPynXlCLT3F+LLQ8T4D13eewgSFG3ZpXKeCABSok3 drbulqI1M/YMe4cRMHZ7d9vHTCn6+q9hl+55AgKmq6n/cU+KUobH6pviCagN 9DzU0ChFQ23xRRuyCHDgblmUy2JQ1rZdufJXCNhDCn3Fugza9JyTUppPgGjj WL2jKYOu3Hl0glNKgDAxNKjDjUH23DjvDw8JSC7w1y0OYJBcjuuOtCoCvh8a frg2kkEFC4hNdrUEZO4oJiMvM8glZmQ1q4GAmp4XDqeuMGi6fAWvopmA93dD SN5tBt0OitX+5wMBW6zdy+IeMmhPn8sco14Ccqes02JeMGi2u4Hc528E/LzJ OXiigUGlb4cHckYJWOdj1iTTxqADNg87nCcICGyplJp9ZNDcyphXKlM50P6H kQHvC4Memjo/esbiwEq7nwWN3xjke13/dqgKB4hNl3ONhxm0SH9IYrqQA68C z5y3HWFQVdqD5EFtDhjW6rxfMsogf+XzEVJ9DvRnFq3Mn8SXRDgF7TXkgEqN O39g0r52fKmn+nIOLLusGNI/wKCTRwa215ly4HixbXPuVwaxe+5bR5lzwIQV rKrVw6AG1yizv9Zx4HRC0LhNO4POvHLg/tzMgU/TSk/CWwZR63U1b2zjgNwj 44ivtQxqwf2KXjs4kLvCTsOlkkFRy+9NLHbjAP/Bk/Xnihm0ShrZ/9aTA5pz MonjVxnUqb3tfZwfB4xH5nVzMhkUl7T45fpADlRfSbyVc4FBiNX3UO5fDlwN j6tvDWbQ51MlN4rPcmB8V2hKuzeDLA/aJbLjOdBAJEWusWTQ0bgSGd/LHFi3 htDWpBgkurPY+0YmB57UWPR/VZ/kX+6buRnDgR1H4mwPf5Uivr5jfkghB9Im 9ML166Vo9was9qiIA3NaWo3rS6XoQdL5/o2POLBBsa9iabgU9ZUMOcc948D1 /BeRVZ5SpPne+XH9fxwoEd8Te2+UopMEO2NnCwd8Pa217syWIpMHldZ+Ixyg B58XnIvIQx6d3Du3xjlwaL/bmW1ueejSjMTFY39woXjvbRYP5aERu70/Titx 4cVy28hZA7noZs+EJMGAC3aeI4JbG3KRoYqxXJEzFwSp1l5+DTTasUp48Ndu LnRZCMOGRDSK3qHwBg5w4WP2HkLsR6Ne+nVB1VEujH+oWHdpGo2umB3e8e48 F3rnFbQpcCVoyT5p0W/MBY1p4hrKVoRso5R1/6rkQlyja1aBigidvhZ0Ifw5 F6rcdj88/SoHtY1Z7VN6M+nfNLpAYJeDMi58UFk8wIVTP4ZDWJP304K7Gr6W uoawSynmw0xtIfq9l1afQxiC7z92eYQoE31QpJ40UYbwk7eybIFCJrrmZqFz FBnCw5t+JWlV6chKyasue7shdJrtnaFjnor89xetlLloCHnbYVWLQhJ6PXer TMm4IbSOixRaTMJQ8YMmJkyeB/VrpINRDWeQ0Gufk+1MHqju9J3SeSQUeZcF FfYs4MHw5vWljdIQJH9Q6LbAiAdT/tj6hLXcHxlVfHlyzJMHLcVbWi8fLV0d dzjiItnAA8VNGl52WWfx2HOmKKKZB5UTls2Zb8PwHv3/Wts6eGDQ8qspQjkC C5rUDC/28+CmqJw7Jfgc/pRt3zkqT0I5s/z9PvMLOJr18ZSTJglBy/gT4aYJ +IFxUOJZHRJ0vqi+DXiagIf2zcy9rkuCb/aLE66OidiljFc7nSCh4aw46+eh JMz1D9QsXkkCb6qxek/CJVzdOr1k4RYSLPP/1XLKScNys9Kq19qRoJdsP9VL Kx2vMDFsP+xAwo2lgV/1U9JxRoLt9Gc7SKj8chJfjMrAvutSHU54kiBdpFnT aCjEIn+uF32QhPoFU65v3S/EjTk4uO4QCS3OZg0qmUIMvzvERAAJv7+r7Hdh ZWGlG5yhd6EkvJRbk/SuOQtbtN1XmBZOgvi3vvtGpWwcOGuLutE5Eu4uXmr8 fU02btt/zDw6loS5Fft8urKz8fVF92PN0kl4/77WZa5zDu5aZyM6ICRBSTP1 gEp4Dl4Y0H4nIYeEkLZVdmaFOfj0f1NbP+eS0Jxov2P6VBG2DdvMTb9Nwq81 9freOSIscepfd/cuCUe/zGjreCzCPzgX970uJSF1/qtVZ3tFWFj3MnNW+WQ/ ZVJKgBTjQcmRUoNKEvI7bAcct4jx2uOqbyyrSHjQoduR5CfGX7S3KQfXkLDN J8gjpECMYei7YcpLEl73HNjMfiHGCY+TrW+/JmE1aR/7vUeMTXzenPn6brJe m2c6g9oSHFHiMuLaTYJTdJqTxxkJbooZVznRO1lvLbtQOVWCeXsyyOSvk3xa G5q/uSbB9dPaPGqGSLgue3hh6RsJNmgKCesdIWHU1uRUw2cJ/qdAJ0fhJwmD uudcFCckeMm2vU1IlgKX8i+sF9o09jeQ/+EsT8H4xB1LO5LGT3+J5gYqUGAt 8C8eXk1jjVpLfsIMCsKfZfGvb6DxoZyuTddmUWDv6Rgc5kTjCv9wr+dKFOTH b/c/5k7j+euXRXSrUGDHmvHr5CEae2pUieTnU7Dt4/4fmcdpfL/fo0x7IQV9 fynvfhdKY+WKGS1mGhQcLF5jSEbT2D1ZOuaoTUFyUKVbRjyNizw3zD+2ZBJX nTJHL4XGrNVfBBf1KCibGLB6nEnjnXNibK4aUKBbpqx/WkTjwg+GB6s4FERX +77adoXGU4tqIjt5FGhppQRbSmnsFHVIIiuYzOdglsumqzRmXOeUa6ygYAmh lO+XT2MZfmGrsTEFbfpdxQWT8tYpW3/Zm1FQ2x1XN21SljQOLjiMKPh8o8/m JEPjMWnC8hjzSf2Nxgmz8mi88d/ltnmWFKzymq5QLKGx0Lbep/JvCma/3qwe mk3joaUBUe3WFFiZW1t7pNP47x/zr/zeRMGCD6fUDibTOPV5UcVCWwqMrtxV uhBL46+ZTu9X2FOwnddfXhNBY/MjY+O2jhRoHret5oXQOHFt6kJfZwrweqO6 An8ad6uZrYxypaDxT4VgG28aX3hw8lC5GwVhdaLU73Y0bo/XPN+6n4LSmvjz 41Y0XrEf5/70pMD/9ZUly0xo3DRLtkPgRwHVLB/Xq05j8n3WxOajFPhpNSwL m0nj0Jvmi7wDKEj6WNNmNSbBbOcz9qKTFGyd1xVm8VqCnfxuK8ufmuT3umdz FZ6c5/Dumr1nKOBX+d20y5Xgzhsb1i+JomDFR5/9IUESrPo0WCE0hoKFn6Zo 6e6SYPO2axXtFylgFRor1llKsJA1F2VfomCHwaISR0UJrl5s9Us2jYIh4r6Y /02Mx1cF3d2dSUFaVpGOZp0Yb3dvFuhIKGhx2J5AJojx3PviZcIbFLxkHPuO zhRji1cNnRO3KZh4bZXH+ijChz9Nz9lZPImzWf9UlIkm7ykfDa0yCojgfQ5p R0X4nO8K5YxqCpQFJmF6tTlYRufxz9QeCjzSg1LO78rGvJU/in5+piDj3Wpd fV42dt1I+Dv3U7C2+bGH/HgWLgm60L9wZHJe7S8uTUjKwv4vHTovy/NhYFXK u81lQtwb2l2drMWHzayZa1T70nF91/TseHs+DK98tCJzOBFX2kWm3XXkg/JI 9EyfgER8++G05FZnPqx2Vg2LH03ASRkK0cQePjjIBDR/H43H9tum+Jf78GEo b752wcBF/OqRzPrBcD6UTu2p+ZAWhV+KRr7ZFk/GXxpinUEeww+VAz4H3uND T4b1/Kszj+DCkO9dGQ/4EJM5L+ZO1yEc5zL87lMlHyrNKnr1TTzwFtXBR6fr +DBmhC60Gdng2tCvlws/8+GJVX2baqcHqt7TuUZZSzC5z2a6pH8LQ+/l6dHE xQLwVCmTHZgVgYYkBwrU9AQgt2lsz61lkUitt3eRDlcAjiPOp+ycopDbkYER nqkAjpgTz2LEF9BY6MTVjQ4CmGaaZxPbF49m6ZW5/bddAIod7WvNfRKQ9pPT 6vauAjjzyG3e094EZMmaGuniLgDLEx++WHQkotgElpvXEQHE539u21SejPTE agsjLwigyiXYYtlfqcjY6l0tK14AK0pC391jUtGGnrTw2CQBLFf5MNqgmob8 uNrDyekCMDU1lYtoS0Olt/RqJVIBzD5RY7fTPQPVOHSHsQsE8HNgbarwYQZq /5H7Z36hAA46pn610MxECqu50lt3BRD0p3YkXZuJbCsFYRWPBbBVTd37TqwQ uR8YNvv7mQCy6oo1rxcJUeCMO4PPqgWwsVjwZ3WrEKVvMtld91oANfKxId5E FuquB7P2DgHUBnd0zy7KQmOBcoPuHwWgxu48+rMxC81Sr8jt+SSARdZJ8ydG sxB/p9X8b98EcP4jv2bdimxkKTu9+uiwALanaF+K2ZqNHHOenhkdFUCyan1r l2828rSMNv3nlwAGfb3Tt0Rlo//7Dwj//x/wf/EZZ24= "]]}, Annotation[#, "Charting`Private`Tag$51362#1"]& ]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, Charting`ScaledFrameTicks[{Identity, Identity}]}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], ImagePadding->All, ImageSize->Automatic, ImageSizeRaw->{225, 145}, Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{All, All}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.761062762719208*^9}, ImageSize->{229, 145}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, GraphicsBoxOptions->{ImageSize->{225, Automatic}}, CellLabel->"Out[67]=", CellID->534588557] }, Open ]], Cell["Compare with the answer from symbolic evaluation:", "Text", CellID->755621723], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NFourierTransform", "[", RowBox[{ RowBox[{"f", "[", "t", "]"}], ",", " ", "t", ",", " ", "0.7"}], "]"}]], "Input", CellLabel->"In[68]:=", CellID->542472397], Cell[BoxData["0.7343019234901191`"], "Output", CellChangeTimes->{3.7610627647003937`*^9}, ImageSize->{167, 17}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellLabel->"Out[68]=", CellID->145078495] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FourierTransform", "[", RowBox[{ RowBox[{"f", "[", "t", "]"}], ",", " ", "t", ",", " ", "\[Omega]"}], "]"}]], "Input", CellLabel->"In[69]:=", CellID->367106623], Cell[BoxData[ FractionBox[ RowBox[{ SqrtBox[ FractionBox["2", "\[Pi]"]], " ", RowBox[{"Sin", "[", "\[Omega]", "]"}]}], "\[Omega]"]], "Output", CellChangeTimes->{3.761062769424737*^9}, ImageSize->{82, 56}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellLabel->"Out[69]=", CellID->392832460] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"%", "/.", RowBox[{"{", RowBox[{"\[Omega]", " ", "\[Rule]", " ", "0.7"}], "}"}]}]], "Input", CellLabel->"In[70]:=", CellID->41127719], Cell[BoxData["0.7343019234901184`"], "Output", CellChangeTimes->{3.761062770836155*^9}, ImageSize->{62, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellLabel->"Out[70]=", CellID->49840791] }, Open ]] }, Open ]] }, 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["Wolfram Research", "Text", CellID->475868307] }, 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["fourier series", "Item", CellID->57949820], Cell["fourier transform", "Item", CellID->700578815], Cell["numerical approximation", "Item", CellID->834285438], Cell["inverse fourier ", "Item", CellID->975585731] }, 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, "Array Manipulation"}], "\" \"", "\"Array Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "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, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Engineering Data & Computation", { False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "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, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "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, "Geometry"}], "\" \"", "\"Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "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, "Images"}], "\" \"", "\"Images\""}, "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, "Machine Learning"}], "\" \"", "\"Machine Learning\""}, "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, "Programming Utilities"}], "\" \"", "\"Programming Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Repository Tools"}], "\" \"", "\"Repository Tools\""}, "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, "Social, Cultural & Linguistic Data"}], "\" \"", "\"Social, Cultural & Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sound & Video"}], "\" \"", "\"Sound & Video\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Strings & Text"}], "\" \"", "\"Strings & Text\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Symbolic & Numeric Computation", { False, "Symbolic & Numeric Computation"}], "\" \"", "\"Symbolic & Numeric Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "System Operation & Setup"}], "\" \"", "\"System Operation & Setup\""}, "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, "User Interface Construction"}], "\" \"", "\"User Interface Construction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Visualization & Graphics"}], "\" \"", "\"Visualization & Graphics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram Physics Project"}], "\" \"", "\"Wolfram Physics Project\""}, "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" -> "OEM6eJxVj81qwzAQhKEkrV1KHiH41JsfwjgJBEJTsn0BWZm6ovpDuzro7SNDW9LTLjOzfDtD09\ OapFjQ4zlLzNLT0/gF/Y3r5wOvToaFtns/Gw8k4+dup0R1r90YXA0rMcHTloqbgjW66m/Z1Zy+\ 9yvhKHDM7ZAluKrpnpr3FCKSFHoelWAOyYAr+xyXE/5lL/\ OSLbjZX42oqW7rg7KMP6PdweLeWQoEm53/D9wcvSDFhJ+\ n28EXyhOjNn65gENOGh8lgppD9nrJ3ACv3WOy"}, CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->749054513] }, 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["FourierTransform", "Item", CellID->647865902], Cell["InverseFourier", "Item", CellID->984490958] }, 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["NInverseFourierTransform", "Item", CellID->796146636], Cell["NFourierSinTransform", "Item", CellID->790620883], Cell["NFourierCosTransform", "Item", CellID->114862104], Cell["NInverseFourierSinTransform", "Item", CellID->56615782], Cell["NInverseFourierCosTransform", "Item", CellID->270890062] }, 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[TextData[ButtonBox["Tutorial: Fourier Series Package", BaseStyle->"Hyperlink", ButtonData->{ URL["https://reference.wolfram.com/language/FourierSeries/tutorial/\ FourierSeries"], None}, ButtonNote-> "https://reference.wolfram.com/language/FourierSeries/tutorial/\ FourierSeries"]], "Item", CellID->975727952], Cell[TextData[ButtonBox["Guide: Fourier Series Package", BaseStyle->"Hyperlink", ButtonData->{ URL["https://reference.wolfram.com/language/FourierSeries/guide/\ FourierSeriesPackage"], None}, ButtonNote-> "https://reference.wolfram.com/language/FourierSeries/guide/\ FourierSeriesPackage"]], "Item", CellID->999656826] }, 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[BoxData[ Marketplace`Private`getTemplateTests[ "Function", <| "Name" -> "NFourierTransform", "UUID" -> "1f1e9d62-a2a7-4f24-b9ff-2d3ec1929624", "ResourceType" -> "Function", "Version" -> "1.0.0", "Description" -> "Find a numerical approximation for a Fourier transform", "Keywords" -> { "fourier series", "fourier transform", "numerical approximation", "inverse fourier "}, "Attributes" -> {}, "AutoUpdate" -> Automatic, "LatestUpdate" -> DateObject[{2019, 4, 3}, "Day", "Gregorian", -5.], "ShortName" -> "NFourierTransform", "AlternativeNames" -> {}, "AutoCopyExampleNotebook" -> True, "Categories" -> { "Symbolic & Numeric Computation", "Engineering Data & Computation"}, "ContributedBy" -> "Wolfram Research", "DefinitionNotebook" -> "marketplacestorage/resources/1f1/1f1e9d62-a2a7-4f24-b9ff-2d3ec1929624/\ DefinitionNotebook/original.nb", "Details" -> "", "Discoverable" -> Automatic, "DisplayedSourceFields" -> {}, "Documentation" -> <|"Usage" -> {<|"Usage" -> BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{ StyleBox[ RowBox[{ StyleBox["ResourceFunction", "ResourceFunctionSymbol"], "[", StyleBox["\"NFourierTransform\"", "ResourceFunctionName"], "]"}], "ResourceFunctionHandle"], "["}], StyleBox["expr", "TI"]}], ",", StyleBox["t", "TI"], ",", StyleBox["\[Omega]", "TI"]}], "]"}]], "Description" -> TextData[{ "gives a numerical approximation to the Fourier transform of ", Cell[ BoxData[ StyleBox["expr", "TI"]], "InlineFormula", FontFamily -> "Source Sans Pro"], " evaluated at the numerical value ", Cell[ BoxData[ StyleBox["\[Omega]", "TI"]], "InlineFormula", FontFamily -> "Source Sans Pro"], ", where ", Cell[ BoxData[ StyleBox["expr", "TI"]], "InlineFormula", FontFamily -> "Source Sans Pro"], " is a function of ", Cell[ BoxData[ StyleBox["t", "TI"]], "InlineFormula", FontFamily -> "Source Sans Pro"], "."}]|>}, "Notes" -> { Cell[ TextData[{ "The numerical approximation to the Fourier transform of ", StyleBox["expr", "TI"], " is by default defined to be ", Cell[ BoxData[ FormBox[ RowBox[{ SqrtBox[ FractionBox["1", RowBox[{"2", StyleBox["\[Pi]", "TR"]}]]], RowBox[{ SubsuperscriptBox["\[Integral]", RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], RowBox[{ StyleBox["expr", "TI"], SuperscriptBox[ StyleBox["\[ExponentialE]", "TR"], RowBox[{ StyleBox["\[ImaginaryI]", "TR"], StyleBox["\[Omega]", "TI"], StyleBox["t", "TI"]}]], RowBox[{"\[DifferentialD]", StyleBox["t", "TI"]}]}]}]}], TraditionalForm]]], "."}], "Notes", Editable -> True, Deletable -> True, CellTags -> {"Nothing"}, CellID -> 25822], Cell[ TextData[{ "Different choices for the definition of the Fourier transform can \ be specified using the option ", Cell[ BoxData[ TemplateBox[{"FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle -> {"InlineFormula"}]], "InlineFormula", FontFamily -> "Source Sans Pro"], "."}], "Notes", Editable -> True, Deletable -> True, CellTags -> {"Nothing"}, CellID -> 6879], Cell[ TextData[{"With the setting ", Cell[ BoxData[ RowBox[{ TemplateBox[{ "FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle -> {"InlineFormula"}], "->", RowBox[{"{", RowBox[{ StyleBox["a", "TI"], ",", StyleBox["b", "TI"]}], "}"}]}]], "InlineFormula", FontFamily -> "Source Sans Pro"], ", the Fourier transform computed by ", Cell[ BoxData[ StyleBox[ RowBox[{ StyleBox["ResourceFunction", "ResourceFunctionSymbol"], "[", StyleBox["\"NFourierTransform\"", "ResourceFunctionName"], "]"}], "ResourceFunctionHandle"]], "InlineFormula", FontFamily -> "Source Sans Pro"], " is ", Cell[ BoxData[ FormBox[ RowBox[{ SqrtBox[ FractionBox[ RowBox[{"|", StyleBox["b", "TI"], "|"}], SuperscriptBox[ RowBox[{"(", RowBox[{"2", StyleBox["\[Pi]", "TR"]}], ")"}], RowBox[{"\[AliasDelimiter]", RowBox[{"-", StyleBox["a", "TI"]}]}]]]], RowBox[{ SubsuperscriptBox["\[Integral]", RowBox[{"-", "\[Infinity]"}], "\[Infinity]"], RowBox[{ StyleBox["expr", "TI"], SuperscriptBox[ StyleBox["\[ExponentialE]", "TR"], RowBox[{ StyleBox["\[ImaginaryI]", "TR"], StyleBox["b", "TI"], StyleBox["\[Omega]", "TI"], StyleBox["t", "TI"]}]], RowBox[{"\[DifferentialD]", StyleBox["t", "TI"]}]}]}]}], TraditionalForm]], "InlineFormula", FontFamily -> "Source Sans Pro"], "."}], "Notes", Editable -> True, Deletable -> True, CellTags -> {"Nothing"}, CellID -> 32301], Cell[ TextData[{"The parameter ", Cell[ BoxData[ StyleBox["b", "TI"]], "InlineFormula", FontFamily -> "Source Sans Pro"], " in the setting ", Cell[ BoxData[ RowBox[{ TemplateBox[{ "FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle -> {"InlineFormula"}], "->", RowBox[{"{", RowBox[{ StyleBox["a", "TI"], ",", StyleBox["b", "TI"]}], "}"}]}]], "InlineFormula", FontFamily -> "Source Sans Pro"], " must be numeric."}], "Notes", Editable -> True, Deletable -> True, GeneratedCell -> True, CellAutoOverwrite -> True, CellTags -> {"Nothing"}, CellID -> 15812], Cell[ TextData[{"In addition to the option ", Cell[ BoxData[ TemplateBox[{"FourierParameters", "paclet:ref/FourierParameters"}, "RefLink", BaseStyle -> {"InlineFormula"}]], "InlineFormula", FontFamily -> "Source Sans Pro"], ", ", Cell[ BoxData[ StyleBox[ RowBox[{ StyleBox["ResourceFunction", "ResourceFunctionSymbol"], "[", StyleBox["\"NFourierTransform\"", "ResourceFunctionName"], "]"}], "ResourceFunctionHandle"]], "InlineFormula", FontFamily -> "Source Sans Pro"], " can also accept the options available to ", Cell[ BoxData[ TemplateBox[{"NIntegrate", "paclet:ref/NIntegrate"}, "RefLink", BaseStyle -> {"InlineFormula"}]], "InlineFormula", FontFamily -> "Source Sans Pro"], ". These options are passed directly to ", Cell[ BoxData[ TemplateBox[{"NIntegrate", "paclet:ref/NIntegrate"}, "RefLink", BaseStyle -> {"InlineFormula"}]], "InlineFormula", FontFamily -> "Source Sans Pro"], "."}], "Notes", Editable -> True, Deletable -> True, GeneratedCell -> True, CellAutoOverwrite -> True, CellTags -> {"Nothing"}, CellID -> 5676]}|>, "ExampleNotebook" -> CloudObject[ "https://www.wolframcloud.com/obj/resourcesystem/marketplacestorage/\ resources/1f1/1f1e9d62-a2a7-4f24-b9ff-2d3ec1929624/NFourierTransform-examples.\ nb"], "ExternalLinks" -> { Hyperlink[ "Tutorial: Fourier Series Package", "https://reference.wolfram.com/language/FourierSeries/tutorial/\ FourierSeries"], Hyperlink[ "Guide: Fourier Series Package", "https://reference.wolfram.com/language/FourierSeries/guide/\ FourierSeriesPackage"]}, "OriginalUUID" -> "43fc4878-4157-4aca-8ca4-732ca5dc7542", "Originator" -> Missing["NoInput"], "PermissionsGroups" -> {}, "PricingInformation" -> 0, "Public" -> True, "PublisherUUID" -> "1ca97c83-1e23-4ef8-a6ef-83680a155d35", "RelatedSymbols" -> {"FourierTransform", "InverseFourier"}, "ReleaseDate" -> DateObject[{2019, 4, 3}, "Day", "Gregorian", -5.], "SeeAlso" -> { "NInverseFourierTransform", "NFourierSinTransform", "NFourierCosTransform", "NInverseFourierSinTransform", "NInverseFourierCosTransform"}, "SourceMetadata" -> <||>, "StoredElements" -> {Automatic}, "SubmissionID" -> "2159", "SubmissionUUID" -> "be049600-8b75-421a-96f3-7788728e5ff3", "Submitter" -> "bakshee@wolfram.com", "SymbolName" -> "FunctionRepository`$3f5ded7140d44a27aea2ffa5fc22fa04`NFourierTransform", "VersionHistory" -> <| "1.0.0" -> <| "Timestamp" -> DateObject[{2019, 4, 3, 10, 54, 4.592429`7.414617438806922}, "Instant", "Gregorian", -5.], "Approver" -> "pacoj@wolfram.com", "SubmissionID" -> "2159", "Submitter" -> "bakshee@wolfram.com", "SubmissionUUID" -> "be049600-8b75-421a-96f3-7788728e5ff3", "OriginalUUID" -> "43fc4878-4157-4aca-8ca4-732ca5dc7542"|>|>, "WolframLanguageVersionRequired" -> "11.3", "VerificationTests" -> Missing["NotFound"]|>, Missing[]]], "Input", CellID->246922128] }, 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->"NFourierTransform | 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.854121648636999`16.33850040744462*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}, "DefaultContentMethod" -> "Legacy"}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.854121648682901`16.338500407449793*^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[633, 23, 100, 2, 70, "Title",ExpressionUUID->"77fd57e9-0cbe-4118-9169-23cff8f69486", CellTags->{"Name", "TemplateCell", "Title"}, CellID->587836148]}, "TemplateCell"->{ Cell[633, 23, 100, 2, 70, "Title",ExpressionUUID->"77fd57e9-0cbe-4118-9169-23cff8f69486", CellTags->{"Name", "TemplateCell", "Title"}, CellID->587836148], Cell[736, 27, 134, 2, 70, "Text",ExpressionUUID->"f894d185-ab40-4cfb-b212-c20b055b6c4c", CellTags->{"Description", "TemplateCell"}, CellID->795328378]}, "Title"->{ Cell[633, 23, 100, 2, 70, "Title",ExpressionUUID->"77fd57e9-0cbe-4118-9169-23cff8f69486", CellTags->{"Name", "TemplateCell", "Title"}, CellID->587836148]}, "Description"->{ Cell[736, 27, 134, 2, 70, "Text",ExpressionUUID->"f894d185-ab40-4cfb-b212-c20b055b6c4c", CellTags->{"Description", "TemplateCell"}, CellID->795328378]}, "Definition"->{ Cell[895, 33, 1206, 29, 70, "Section",ExpressionUUID->"cf9e0a25-6020-43d1-a87a-b0e8dd4dde53", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "Function"->{ Cell[895, 33, 1206, 29, 70, "Section",ExpressionUUID->"cf9e0a25-6020-43d1-a87a-b0e8dd4dde53", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "TemplateCellGroup"->{ Cell[895, 33, 1206, 29, 70, "Section",ExpressionUUID->"cf9e0a25-6020-43d1-a87a-b0e8dd4dde53", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[4006, 124, 1980, 50, 70, "Subsection",ExpressionUUID->"656c70b2-44e2-41ea-9877-912a21fea11f", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[6901, 214, 1429, 32, 70, "Subsection",ExpressionUUID->"8bfe0618-40a9-4294-a560-f700c8108a35", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[12510, 406, 7029, 152, 70, "Section",ExpressionUUID->"9f2f214a-4065-4648-9ac0-395022d5c83b", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[51191, 1173, 1026, 26, 70, "Subsection",ExpressionUUID->"a70621cb-2dd7-4492-8a97-5985ef14800a", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[52309, 1207, 996, 26, 70, "Subsection",ExpressionUUID->"5a62a781-fc79-4cf7-b17f-7d48c9b2ea0b", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[53567, 1250, 221, 6, 70, "Subsection",ExpressionUUID->"f634bf97-7e87-48e2-85ad-d7c38e294dcf", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[61351, 1511, 980, 26, 70, "Subsection",ExpressionUUID->"742bc8a4-7a6f-45a3-b119-00c2c47f65fa", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[62476, 1548, 1039, 26, 70, "Subsection",ExpressionUUID->"9faf199e-f9c7-4409-8664-db45310a8a3a", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[63864, 1594, 1084, 26, 70, "Subsection",ExpressionUUID->"adca206c-e569-43fe-9e74-e8fc4b3554ff", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[65504, 1635, 923, 26, 70, "Subsection",ExpressionUUID->"91a2c5a3-0ca7-4078-bb63-ad15f7cd4371", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[67119, 1686, 1874, 45, 70, "Subsection",ExpressionUUID->"d9c01711-18c3-4087-a9a7-ad8769d86d75", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[79338, 1969, 955, 25, 70, "Subsection",ExpressionUUID->"c865bec9-546d-484f-9a27-63371c7e3af0", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[80318, 1998, 1174, 31, 70, "Subsubsection",ExpressionUUID->"28e7cec9-38eb-4ef4-a0e9-39d04937c403", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[81621, 2038, 1113, 29, 70, "Subsubsection",ExpressionUUID->"a00bfe49-491a-44eb-922c-9a97ff68a3cf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[84095, 2114, 1280, 33, 70, "Subsubsection",ExpressionUUID->"1b4fbdc6-2bd3-40ff-9dec-aaed14e33f79", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[86780, 2195, 1913, 46, 70, "Subsubsection",ExpressionUUID->"a990187a-6f42-40dc-8428-e9a9e45ba393", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[91629, 2331, 1071, 27, 70, "Subsubsection",ExpressionUUID->"a281a3da-c98d-4900-82f9-83bb288faec6", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[93702, 2395, 1155, 28, 70, "Section",ExpressionUUID->"de96849f-29f2-477a-9e01-1ecbdac2bde7", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[95426, 2438, 1033, 26, 70, "Section",ExpressionUUID->"f81acd61-f7c1-49ac-984a-9cc15120ace1", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]}, "Documentation"->{ Cell[3786, 115, 195, 5, 70, "Section",ExpressionUUID->"d7453d4e-59c9-4dda-a2c5-fc15675e8449", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307]}, "TemplateSection"->{ Cell[3786, 115, 195, 5, 70, "Section",ExpressionUUID->"d7453d4e-59c9-4dda-a2c5-fc15675e8449", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[50917, 1164, 249, 5, 70, "Section",ExpressionUUID->"f79ae39b-c582-4ba9-ab75-e9f31b9d4ad1", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Usage"->{ Cell[4006, 124, 1980, 50, 70, "Subsection",ExpressionUUID->"656c70b2-44e2-41ea-9877-912a21fea11f", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310]}, "Details & Options"->{ Cell[6901, 214, 1429, 32, 70, "Subsection",ExpressionUUID->"8bfe0618-40a9-4294-a560-f700c8108a35", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Notes"->{ Cell[6901, 214, 1429, 32, 70, "Subsection",ExpressionUUID->"8bfe0618-40a9-4294-a560-f700c8108a35", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Nothing"->{ Cell[8333, 248, 795, 29, 70, "Notes",ExpressionUUID->"b3373ebe-234a-4493-8ea4-ade90ebfd1da", CellTags->"Nothing", CellID->391586244], Cell[9131, 279, 397, 13, 70, "Notes",ExpressionUUID->"814bb243-c013-4b84-9b5f-7e855f73fbc5", CellTags->"Nothing", CellID->829070809], Cell[9531, 294, 1418, 50, 70, "Notes",ExpressionUUID->"79044d77-c316-43d5-8bbd-cfb090f7cf3f", CellTags->"Nothing", CellID->727753881], Cell[10952, 346, 608, 23, 70, "Notes",ExpressionUUID->"ff4097ec-96fa-4d00-9674-ed729a4e467f", CellTags->"Nothing", CellID->562206102], Cell[11563, 371, 898, 29, 70, "Notes",ExpressionUUID->"468cba5c-4a9c-45aa-b5e6-ffd80240a78e", CellTags->"Nothing", CellID->620257138]}, "Examples"->{ Cell[12510, 406, 7029, 152, 70, "Section",ExpressionUUID->"9f2f214a-4065-4648-9ac0-395022d5c83b", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011]}, "Source & Additional Information"->{ Cell[50917, 1164, 249, 5, 70, "Section",ExpressionUUID->"f79ae39b-c582-4ba9-ab75-e9f31b9d4ad1", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Contributed By"->{ Cell[51191, 1173, 1026, 26, 70, "Subsection",ExpressionUUID->"a70621cb-2dd7-4492-8a97-5985ef14800a", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "ContributorInformation"->{ Cell[51191, 1173, 1026, 26, 70, "Subsection",ExpressionUUID->"a70621cb-2dd7-4492-8a97-5985ef14800a", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "Keywords"->{ Cell[52309, 1207, 996, 26, 70, "Subsection",ExpressionUUID->"5a62a781-fc79-4cf7-b17f-7d48c9b2ea0b", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425]}, "Categories"->{ Cell[53567, 1250, 221, 6, 70, "Subsection",ExpressionUUID->"f634bf97-7e87-48e2-85ad-d7c38e294dcf", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[53791, 1258, 7523, 248, 70, "Output",ExpressionUUID->"be9a13f3-1063-48bf-8377-d4e327ff73c1", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->749054513]}, "Categories-Checkboxes"->{ Cell[53791, 1258, 7523, 248, 70, "Output",ExpressionUUID->"be9a13f3-1063-48bf-8377-d4e327ff73c1", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->749054513]}, "CheckboxCell"->{ Cell[53791, 1258, 7523, 248, 70, "Output",ExpressionUUID->"be9a13f3-1063-48bf-8377-d4e327ff73c1", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->749054513], Cell[82737, 2069, 1321, 40, 70, "Output",ExpressionUUID->"78271066-2530-40cb-92c8-19b6770a3493", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524], Cell[85378, 2149, 1365, 41, 70, "Output",ExpressionUUID->"b370dee9-95d1-4ec9-9913-13dba8d09e3f", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059], Cell[88696, 2243, 2896, 83, 70, "Output",ExpressionUUID->"616e45ec-ca9e-4aa6-9295-32658b7a7be8", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308], Cell[92703, 2360, 938, 28, 70, "Output",ExpressionUUID->"900d5856-770e-4c71-81ec-044b3bd1df83", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Related Symbols"->{ Cell[61351, 1511, 980, 26, 70, "Subsection",ExpressionUUID->"742bc8a4-7a6f-45a3-b119-00c2c47f65fa", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169]}, "Related Resource Objects"->{ Cell[62476, 1548, 1039, 26, 70, "Subsection",ExpressionUUID->"9faf199e-f9c7-4409-8664-db45310a8a3a", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472]}, "Source/Reference Citation"->{ Cell[63864, 1594, 1084, 26, 70, "Subsection",ExpressionUUID->"adca206c-e569-43fe-9e74-e8fc4b3554ff", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552]}, "DefaultContent"->{ Cell[64951, 1622, 516, 8, 70, "Text",ExpressionUUID->"fc9509dc-546d-4fe1-b7d0-1965554a0996", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[81495, 2031, 89, 2, 70, "Text",ExpressionUUID->"e7d4407b-d413-402d-9680-8eb0ce9305ff", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768], Cell[94860, 2425, 529, 8, 70, "Text",ExpressionUUID->"819ea506-59d8-408b-a819-5ecfe20311fa", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[96462, 2466, 515, 8, 70, "Text",ExpressionUUID->"286e21ff-349b-4de5-ad49-b32ee3e2f04c", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "TabNext"->{ Cell[64951, 1622, 516, 8, 70, "Text",ExpressionUUID->"fc9509dc-546d-4fe1-b7d0-1965554a0996", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[94860, 2425, 529, 8, 70, "Text",ExpressionUUID->"819ea506-59d8-408b-a819-5ecfe20311fa", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[96462, 2466, 515, 8, 70, "Text",ExpressionUUID->"286e21ff-349b-4de5-ad49-b32ee3e2f04c", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Links"->{ Cell[65504, 1635, 923, 26, 70, "Subsection",ExpressionUUID->"91a2c5a3-0ca7-4078-bb63-ad15f7cd4371", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773]}, "Tests"->{ Cell[67119, 1686, 1874, 45, 70, "Subsection",ExpressionUUID->"d9c01711-18c3-4087-a9a7-ad8769d86d75", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "VerificationTests"->{ Cell[67119, 1686, 1874, 45, 70, "Subsection",ExpressionUUID->"d9c01711-18c3-4087-a9a7-ad8769d86d75", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "Compatibility"->{ Cell[79338, 1969, 955, 25, 70, "Subsection",ExpressionUUID->"c865bec9-546d-484f-9a27-63371c7e3af0", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822]}, "CompatibilityWolframLanguageVersionRequired"->{ Cell[80318, 1998, 1174, 31, 70, "Subsubsection",ExpressionUUID->"28e7cec9-38eb-4ef4-a0e9-39d04937c403", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "Wolfram Language Version"->{ Cell[80318, 1998, 1174, 31, 70, "Subsubsection",ExpressionUUID->"28e7cec9-38eb-4ef4-a0e9-39d04937c403", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "ScrapeDefault"->{ Cell[81495, 2031, 89, 2, 70, "Text",ExpressionUUID->"e7d4407b-d413-402d-9680-8eb0ce9305ff", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768]}, "CompatibilityOperatingSystem"->{ Cell[81621, 2038, 1113, 29, 70, "Subsubsection",ExpressionUUID->"a00bfe49-491a-44eb-922c-9a97ff68a3cf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[82737, 2069, 1321, 40, 70, "Output",ExpressionUUID->"78271066-2530-40cb-92c8-19b6770a3493", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "Operating System"->{ Cell[81621, 2038, 1113, 29, 70, "Subsubsection",ExpressionUUID->"a00bfe49-491a-44eb-922c-9a97ff68a3cf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406]}, "CompatibilityOperatingSystem-Checkboxes"->{ Cell[82737, 2069, 1321, 40, 70, "Output",ExpressionUUID->"78271066-2530-40cb-92c8-19b6770a3493", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "CompatibilityFeatures"->{ Cell[84095, 2114, 1280, 33, 70, "Subsubsection",ExpressionUUID->"1b4fbdc6-2bd3-40ff-9dec-aaed14e33f79", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[85378, 2149, 1365, 41, 70, "Output",ExpressionUUID->"b370dee9-95d1-4ec9-9913-13dba8d09e3f", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "Required Features"->{ Cell[84095, 2114, 1280, 33, 70, "Subsubsection",ExpressionUUID->"1b4fbdc6-2bd3-40ff-9dec-aaed14e33f79", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156]}, "CompatibilityFeatures-Checkboxes"->{ Cell[85378, 2149, 1365, 41, 70, "Output",ExpressionUUID->"b370dee9-95d1-4ec9-9913-13dba8d09e3f", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "CompatibilityEvaluationEnvironment"->{ Cell[86780, 2195, 1913, 46, 70, "Subsubsection",ExpressionUUID->"a990187a-6f42-40dc-8428-e9a9e45ba393", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[88696, 2243, 2896, 83, 70, "Output",ExpressionUUID->"616e45ec-ca9e-4aa6-9295-32658b7a7be8", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Environments"->{ Cell[86780, 2195, 1913, 46, 70, "Subsubsection",ExpressionUUID->"a990187a-6f42-40dc-8428-e9a9e45ba393", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563]}, "CompatibilityEvaluationEnvironment-Checkboxes"->{ Cell[88696, 2243, 2896, 83, 70, "Output",ExpressionUUID->"616e45ec-ca9e-4aa6-9295-32658b7a7be8", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Cloud Support"->{ Cell[91629, 2331, 1071, 27, 70, "Subsubsection",ExpressionUUID->"a281a3da-c98d-4900-82f9-83bb288faec6", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371]}, "CompatibilityCloudSupport"->{ Cell[91629, 2331, 1071, 27, 70, "Subsubsection",ExpressionUUID->"a281a3da-c98d-4900-82f9-83bb288faec6", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[92703, 2360, 938, 28, 70, "Output",ExpressionUUID->"900d5856-770e-4c71-81ec-044b3bd1df83", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "CompatibilityCloudSupport-Checkboxes"->{ Cell[92703, 2360, 938, 28, 70, "Output",ExpressionUUID->"900d5856-770e-4c71-81ec-044b3bd1df83", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Author Notes"->{ Cell[93702, 2395, 1155, 28, 70, "Section",ExpressionUUID->"de96849f-29f2-477a-9e01-1ecbdac2bde7", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591]}, "Submission Notes"->{ Cell[95426, 2438, 1033, 26, 70, "Section",ExpressionUUID->"f81acd61-f7c1-49ac-984a-9cc15120ace1", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 220392, 4817}, {"TemplateCell", 220575, 4821}, {"Title", 220911, 4828}, {"Description", 221093, 4832}, {"Definition", 221271, 4836}, {"Function", 221467, 4840}, {"TemplateCellGroup", 221672, 4844}, {"Documentation", 225508, 4905}, {"TemplateSection", 225701, 4909}, {"Usage", 226074, 4916}, {"Details & Options", 226268, 4920}, {"Notes", 226471, 4924}, {"Nothing", 226676, 4928}, {"Examples", 227405, 4944}, {"Source & Additional Information", 227615, 4948}, {"Contributed By", 227827, 4952}, {"ContributorInformation", 228062, 4956}, {"Keywords", 228283, 4960}, {"Categories", 228474, 4964}, {"Categories-Checkboxes", 228870, 4971}, {"CheckboxCell", 229083, 4975}, {"Related Symbols", 230200, 4991}, {"Related Resource Objects", 230412, 4995}, {"Source/Reference Citation", 230635, 4999}, {"DefaultContent", 230848, 5003}, {"TabNext", 231516, 5016}, {"Links", 232015, 5026}, {"Tests", 232198, 5030}, {"VerificationTests", 232415, 5034}, {"Compatibility", 232628, 5038}, {"CompatibilityWolframLanguageVersionRequired", 232857, 5042}, {"Wolfram Language Version", 233129, 5046}, {"ScrapeDefault", 233390, 5050}, {"CompatibilityOperatingSystem", 233593, 5054}, {"Operating System", 234061, 5061}, {"CompatibilityOperatingSystem-Checkboxes", 234325, 5065}, {"CompatibilityFeatures", 234581, 5069}, {"Required Features", 235031, 5076}, {"CompatibilityFeatures-Checkboxes", 235282, 5080}, {"CompatibilityEvaluationEnvironment", 235538, 5084}, {"Environments", 236016, 5091}, {"CompatibilityEvaluationEnvironment-Checkboxes", 236288, 5095}, {"Cloud Support", 236548, 5099}, {"CompatibilityCloudSupport", 236792, 5103}, {"CompatibilityCloudSupport-Checkboxes", 237268, 5110}, {"Author Notes", 237509, 5114}, {"Submission Notes", 237708, 5118} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[633, 23, 100, 2, 70, "Title",ExpressionUUID->"77fd57e9-0cbe-4118-9169-23cff8f69486", CellTags->{"Name", "TemplateCell", "Title"}, CellID->587836148], Cell[736, 27, 134, 2, 70, "Text",ExpressionUUID->"f894d185-ab40-4cfb-b212-c20b055b6c4c", CellTags->{"Description", "TemplateCell"}, CellID->795328378], Cell[CellGroupData[{ Cell[895, 33, 1206, 29, 70, "Section",ExpressionUUID->"cf9e0a25-6020-43d1-a87a-b0e8dd4dde53", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[2104, 64, 1645, 46, 70, "Input",ExpressionUUID->"3e0c3882-1acc-4465-9682-cf11946e541c", InitializationCell->True, CellID->825232356] }, Open ]], Cell[CellGroupData[{ Cell[3786, 115, 195, 5, 70, "Section",ExpressionUUID->"d7453d4e-59c9-4dda-a2c5-fc15675e8449", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[4006, 124, 1980, 50, 70, "Subsection",ExpressionUUID->"656c70b2-44e2-41ea-9877-912a21fea11f", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[6011, 178, 261, 9, 70, "UsageInputs",ExpressionUUID->"41b5b35c-bf8a-45c2-ad71-676a9cbd06b3", CellID->954931336], Cell[6275, 189, 577, 19, 70, "UsageDescription",ExpressionUUID->"73fcbd3b-c9b8-4714-bbed-9622764893ec", CellID->951849241] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[6901, 214, 1429, 32, 70, "Subsection",ExpressionUUID->"8bfe0618-40a9-4294-a560-f700c8108a35", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[8333, 248, 795, 29, 70, "Notes",ExpressionUUID->"b3373ebe-234a-4493-8ea4-ade90ebfd1da", CellTags->"Nothing", CellID->391586244], Cell[9131, 279, 397, 13, 70, "Notes",ExpressionUUID->"814bb243-c013-4b84-9b5f-7e855f73fbc5", CellTags->"Nothing", CellID->829070809], Cell[9531, 294, 1418, 50, 70, "Notes",ExpressionUUID->"79044d77-c316-43d5-8bbd-cfb090f7cf3f", CellTags->"Nothing", CellID->727753881], Cell[10952, 346, 608, 23, 70, "Notes",ExpressionUUID->"ff4097ec-96fa-4d00-9674-ed729a4e467f", CellTags->"Nothing", CellID->562206102], Cell[11563, 371, 898, 29, 70, "Notes",ExpressionUUID->"468cba5c-4a9c-45aa-b5e6-ffd80240a78e", CellTags->"Nothing", CellID->620257138] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[12510, 406, 7029, 152, 70, "Section",ExpressionUUID->"9f2f214a-4065-4648-9ac0-395022d5c83b", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell[19564, 562, 56, 1, 70, "Subsection",ExpressionUUID->"120c3edc-5813-4d26-b5fe-6ce249bb074b", CellID->462042388], Cell[19623, 565, 83, 1, 70, "Text",ExpressionUUID->"d17502e3-8f7d-43c8-bf08-2fe868e4f05e", CellID->770877839], Cell[19709, 568, 268, 9, 70, "Input",ExpressionUUID->"795bdb04-7f68-4b45-a479-052573f7351a", CellID->723707931], Cell[CellGroupData[{ Cell[20002, 581, 415, 12, 70, "Input",ExpressionUUID->"af2ddd82-594c-4300-a8f0-e2aac617d6b6", CellID->588752189], Cell[20420, 595, 28908, 498, 70, "Output",ExpressionUUID->"7d6c8b5f-96bc-4c12-9fd0-5b4b17dfa0b1", CellID->534588557] }, Open ]], Cell[49343, 1096, 85, 1, 70, "Text",ExpressionUUID->"1c894056-7ddc-4560-ac8e-3a56a87f86e9", CellID->755621723], Cell[CellGroupData[{ Cell[49453, 1101, 191, 6, 70, "Input",ExpressionUUID->"79a13385-6b30-428e-a375-3721fa886911", CellID->542472397], Cell[49647, 1109, 222, 6, 70, "Output",ExpressionUUID->"35a6208a-e67b-4361-8fb7-3b165d9aa542", CellID->145078495] }, Open ]], Cell[CellGroupData[{ Cell[49906, 1120, 195, 6, 70, "Input",ExpressionUUID->"0daa61ba-ee0e-47f3-8059-26c17376e3a2", CellID->367106623], Cell[50104, 1128, 329, 11, 70, "Output",ExpressionUUID->"cceb4545-40a4-497c-8577-4b7a7d730257", CellID->392832460] }, Open ]], Cell[CellGroupData[{ Cell[50470, 1144, 165, 5, 70, "Input",ExpressionUUID->"12b6a4f5-bb73-43f5-a08c-27af0a103aab", CellID->41127719], Cell[50638, 1151, 218, 6, 70, "Output",ExpressionUUID->"17498322-4052-401a-b6cd-7b3c5a288d89", CellID->49840791] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[50917, 1164, 249, 5, 70, "Section",ExpressionUUID->"f79ae39b-c582-4ba9-ab75-e9f31b9d4ad1", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[51191, 1173, 1026, 26, 70, "Subsection",ExpressionUUID->"a70621cb-2dd7-4492-8a97-5985ef14800a", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[52220, 1201, 52, 1, 70, "Text",ExpressionUUID->"54f42da4-14c0-45a8-95b8-956e46c0ab06", CellID->475868307] }, Open ]], Cell[CellGroupData[{ Cell[52309, 1207, 996, 26, 70, "Subsection",ExpressionUUID->"5a62a781-fc79-4cf7-b17f-7d48c9b2ea0b", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[53308, 1235, 49, 1, 70, "Item",ExpressionUUID->"9c87aaa7-5b03-4e8f-b737-6b37e50f89fa", CellID->57949820], Cell[53360, 1238, 53, 1, 70, "Item",ExpressionUUID->"ab67b303-5984-467c-a4a9-9fb0b8ff3262", CellID->700578815], Cell[53416, 1241, 59, 1, 70, "Item",ExpressionUUID->"5646045a-c954-4753-9751-11ff97addd91", CellID->834285438], Cell[53478, 1244, 52, 1, 70, "Item",ExpressionUUID->"4d3be393-37dc-4b47-87c8-15a1e9d869d7", CellID->975585731] }, Open ]], Cell[CellGroupData[{ Cell[53567, 1250, 221, 6, 70, "Subsection",ExpressionUUID->"f634bf97-7e87-48e2-85ad-d7c38e294dcf", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[53791, 1258, 7523, 248, 70, "Output",ExpressionUUID->"be9a13f3-1063-48bf-8377-d4e327ff73c1", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->749054513] }, Open ]], Cell[CellGroupData[{ Cell[61351, 1511, 980, 26, 70, "Subsection",ExpressionUUID->"742bc8a4-7a6f-45a3-b119-00c2c47f65fa", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[62334, 1539, 52, 1, 70, "Item",ExpressionUUID->"c836378b-a103-45ad-8ea2-344f1fba09a8", CellID->647865902], Cell[62389, 1542, 50, 1, 70, "Item",ExpressionUUID->"8242aa23-fcaf-452e-8c50-40f3f696da82", CellID->984490958] }, Open ]], Cell[CellGroupData[{ Cell[62476, 1548, 1039, 26, 70, "Subsection",ExpressionUUID->"9faf199e-f9c7-4409-8664-db45310a8a3a", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[63518, 1576, 60, 1, 70, "Item",ExpressionUUID->"44348fed-ea0a-43a1-8396-424783a50f57", CellID->796146636], Cell[63581, 1579, 56, 1, 70, "Item",ExpressionUUID->"2e6c7d6f-5e20-4f32-a370-35688bdabd1d", CellID->790620883], Cell[63640, 1582, 56, 1, 70, "Item",ExpressionUUID->"3392c440-387f-4b8e-a53d-851787567453", CellID->114862104], Cell[63699, 1585, 62, 1, 70, "Item",ExpressionUUID->"612d7cb1-556b-4657-828d-e75ae752c1e8", CellID->56615782], Cell[63764, 1588, 63, 1, 70, "Item",ExpressionUUID->"3e4c0dae-f6f8-42c3-9501-f6b7f09071f0", CellID->270890062] }, Open ]], Cell[CellGroupData[{ Cell[63864, 1594, 1084, 26, 70, "Subsection",ExpressionUUID->"adca206c-e569-43fe-9e74-e8fc4b3554ff", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[64951, 1622, 516, 8, 70, "Text",ExpressionUUID->"fc9509dc-546d-4fe1-b7d0-1965554a0996", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[65504, 1635, 923, 26, 70, "Subsection",ExpressionUUID->"91a2c5a3-0ca7-4078-bb63-ad15f7cd4371", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[66430, 1663, 322, 8, 70, "Item",ExpressionUUID->"f4514b62-c1c8-49e9-b1c9-62703cacb1ea", CellID->975727952], Cell[66755, 1673, 327, 8, 70, "Item",ExpressionUUID->"a89f8ec7-9083-474d-8163-a53d9384db76", CellID->999656826] }, Open ]], Cell[CellGroupData[{ Cell[67119, 1686, 1874, 45, 70, "Subsection",ExpressionUUID->"d9c01711-18c3-4087-a9a7-ad8769d86d75", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[68996, 1733, 10305, 231, 70, "Input",ExpressionUUID->"68f879e5-2b74-479e-bf24-b72a4cab9dd1", CellID->246922128] }, Open ]], Cell[CellGroupData[{ Cell[79338, 1969, 955, 25, 70, "Subsection",ExpressionUUID->"c865bec9-546d-484f-9a27-63371c7e3af0", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[80318, 1998, 1174, 31, 70, "Subsubsection",ExpressionUUID->"28e7cec9-38eb-4ef4-a0e9-39d04937c403", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[81495, 2031, 89, 2, 70, "Text",ExpressionUUID->"e7d4407b-d413-402d-9680-8eb0ce9305ff", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[81621, 2038, 1113, 29, 70, "Subsubsection",ExpressionUUID->"a00bfe49-491a-44eb-922c-9a97ff68a3cf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[82737, 2069, 1321, 40, 70, "Output",ExpressionUUID->"78271066-2530-40cb-92c8-19b6770a3493", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524] }, Closed]], Cell[CellGroupData[{ Cell[84095, 2114, 1280, 33, 70, "Subsubsection",ExpressionUUID->"1b4fbdc6-2bd3-40ff-9dec-aaed14e33f79", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[85378, 2149, 1365, 41, 70, "Output",ExpressionUUID->"b370dee9-95d1-4ec9-9913-13dba8d09e3f", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059] }, Closed]], Cell[CellGroupData[{ Cell[86780, 2195, 1913, 46, 70, "Subsubsection",ExpressionUUID->"a990187a-6f42-40dc-8428-e9a9e45ba393", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[88696, 2243, 2896, 83, 70, "Output",ExpressionUUID->"616e45ec-ca9e-4aa6-9295-32658b7a7be8", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308] }, Closed]], Cell[CellGroupData[{ Cell[91629, 2331, 1071, 27, 70, "Subsubsection",ExpressionUUID->"a281a3da-c98d-4900-82f9-83bb288faec6", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[92703, 2360, 938, 28, 70, "Output",ExpressionUUID->"900d5856-770e-4c71-81ec-044b3bd1df83", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[93702, 2395, 1155, 28, 70, "Section",ExpressionUUID->"de96849f-29f2-477a-9e01-1ecbdac2bde7", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[94860, 2425, 529, 8, 70, "Text",ExpressionUUID->"819ea506-59d8-408b-a819-5ecfe20311fa", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[95426, 2438, 1033, 26, 70, "Section",ExpressionUUID->"f81acd61-f7c1-49ac-984a-9cc15120ace1", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell[96462, 2466, 515, 8, 70, "Text",ExpressionUUID->"286e21ff-349b-4de5-ad49-b32ee3e2f04c", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)