(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.1' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 307942, 6927] NotebookOptionsPosition[ 151142, 3949] NotebookOutlinePosition[ 292561, 6604] CellTagsIndexPosition[ 290752, 6554] WindowTitle->SmootherStep | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["SmootherStep", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->588243223], Cell["An improved sigmoidal interpolation function", "Text", CellTags->{"Description", "TemplateCell"}, CellID->359655847], 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[{"SmootherStep", "[", "x_", "]"}], ":=", TagBox[GridBox[{ {"\[Piecewise]", GridBox[{ {"0", RowBox[{"x", "<", "0"}]}, {"1", RowBox[{"x", ">", "1"}]}, { RowBox[{ RowBox[{"6", SuperscriptBox["x", "5"]}], "-", RowBox[{"15", SuperscriptBox["x", "4"]}], "+", RowBox[{"10", SuperscriptBox["x", "3"]}]}], "True"} }, AllowedDimensions->{2, Automatic}, Editable->True, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.84]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}, Selectable->True]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.35]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "Piecewise", DeleteWithContents->True, Editable->False, SelectWithContents->True, Selectable->False, StripWrapperBoxes->True]}]], "Input", CellChangeTimes->{{3.7741073589137993`*^9, 3.774107444088447*^9}, { 3.7741075676327953`*^9, 3.7741075696068993`*^9}, {3.7741076223470697`*^9, 3.774107743962056*^9}, {3.774263677922024*^9, 3.77426368611758*^9}}, CellLabel->"In[78]:=", CellID->537706402], Cell[BoxData[ RowBox[{ RowBox[{"SmootherStep", "[", RowBox[{"x_", ",", RowBox[{"{", RowBox[{"min_", ",", "max_"}], "}"}]}], "]"}], ":=", RowBox[{"SmootherStep", "[", RowBox[{"Rescale", "[", RowBox[{"x", ",", RowBox[{"{", RowBox[{"min", ",", "max"}], "}"}]}], "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.7741073589137993`*^9, 3.774107444088447*^9}, { 3.7741075676327953`*^9, 3.7741075696068993`*^9}, {3.7741076223470697`*^9, 3.774107743962056*^9}, {3.774260702188736*^9, 3.774260768540349*^9}, { 3.774261168913493*^9, 3.774261169474077*^9}, {3.7742636880915956`*^9, 3.774263690146699*^9}}, CellLabel->"In[79]:=", CellID->714793740] }, 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[{"SmootherStep", "[", StyleBox["x", "TI"], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->173731633], Cell[TextData[{ "returns a sigmoidal, Hermite interpolation between ", Cell[BoxData[ RowBox[{"[", RowBox[{"0", ",", "1"}], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " for ", StyleBox["x ", "TI"], "on ", Cell[BoxData[ RowBox[{"[", RowBox[{"0", ",", "1"}], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->737453494] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SmootherStep", "[", RowBox[{ StyleBox["x", "TI"], ",", RowBox[{"{", RowBox[{ StyleBox["min", "TI"], ",", StyleBox["max", "TI"]}], "}"}]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->762892197], Cell[TextData[{ "returns a sigmoidal, Hermite interpolation between ", Cell[BoxData[ RowBox[{"[", RowBox[{"0", ",", "1"}], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " for ", StyleBox["x ", "TI"], "on ", Cell[BoxData[ RowBox[{"[", RowBox[{ StyleBox["min", "TI"], ",", StyleBox["max", "TI"]}], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->293204228] }, 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[{ Cell[BoxData["SmootherStep"], "InlineFormula", FontFamily->"Source Sans Pro"], " is an interpolation function commonly used in computer graphics." }], "Notes", CellTags->"TabNext", CellID->832587311], Cell[TextData[{ Cell[BoxData[ RowBox[{"SmootherStep", "[", StyleBox["x", "TI"], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " clamps to 0 or 1 for ", StyleBox["x ", "TI"], "less than or greater than 0 or 1, respectively." }], "Notes", CellTags->"TabNext", CellID->838930226], Cell[TextData[{ "The original Perlin smoothstep is not second-order continuous at either ", Cell[BoxData[ RowBox[{ StyleBox["x", "TI"], "=", "0"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " or ", Cell[BoxData[ RowBox[{ StyleBox["x", "TI"], "=", "1"}]], "InlineFormula", FontFamily->"Source Sans Pro"], ". This creates discontinuities. ", Cell[BoxData["SmootherStep"], "InlineFormula", FontFamily->"Source Sans Pro"], " solves this problem." }], "Notes", CellID->234955554] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Examples", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Examples", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Demonstrate the function\[CloseCurlyQuote]s usage, starting with \ the most basic use case and describing each example in a preceding text cell.\ \n\nWithin a group, individual examples can be delimited by inserting page \ breaks between them (either using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"[Right-click]\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Insert Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], " between cells or through the menu using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"Insert\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], ").\n\nExamples should be grouped into Subsection and \ Subsubsection cells similarly to existing documentation pages. Here are some \ typical Subsection names and the types of examples they normally contain:\n \ ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Basic Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "most basic function usage\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Scope: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "input and display conventions, standard computational attributes \ (e.g. threading over lists)\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Options: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "available options and parameters for the function\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Applications: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "standard industry or academic applications\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Properties and Relations: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "how the function relates to other functions\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Possible Issues: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "limitations or unexpected behavior a user might experience\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Neat Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "particularly interesting, unconventional, or otherwise unique \ usage"}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Examples"}, CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", TaggingRules->{}, CellID->904125756], Cell["\<\ The function is sigmoidal, and inputs less than 0.5 underestimate the input:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.774260655317911*^9, 3.774260656690168*^9}, { 3.774261438937078*^9, 3.774261475714766*^9}, {3.774286951068597*^9, 3.7742869721077003`*^9}, {3.7779118372245884`*^9, 3.777911845040851*^9}}, CellID->540922061], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SmootherStep", "[", "0.1", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77426064022145*^9, 3.774260651875537*^9}, { 3.7742637046742363`*^9, 3.774263704727504*^9}}, CellLabel->"In[3]:=", CellID->511777899], Cell[BoxData["0.008560000000000002`"], "Output", TaggingRules->{}, CellChangeTimes->{{3.774260646407734*^9, 3.774260652305112*^9}, 3.774263742657358*^9}, CellLabel->"Out[3]=", CellID->989713502] }, Open ]], Cell["Values greater than 0.5 do the opposite:", "Text", TaggingRules->{}, CellChangeTimes->{{3.77426147861977*^9, 3.77426149017122*^9}, { 3.774286975910081*^9, 3.7742869829077806`*^9}, 3.85937467804134*^9}, CellID->803313474], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SmootherStep", "[", "0.7", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.774261492266367*^9, 3.774261496100004*^9}, { 3.774263745276676*^9, 3.7742637454142733`*^9}}, CellLabel->"In[4]:=", CellID->878365628], Cell[BoxData["0.8369200000000001`"], "Output", TaggingRules->{}, CellChangeTimes->{3.7742614966260653`*^9, 3.774263746376515*^9}, CellLabel->"Out[4]=", CellID->692887730] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107562], Cell["Plot the function:", "Text", TaggingRules->{}, CellChangeTimes->{{3.774261509837041*^9, 3.7742615186455307`*^9}, { 3.7742869933728266`*^9, 3.774286994766966*^9}}, CellID->787187369], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"SmootherStep", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77426152012261*^9, 3.77426153049361*^9}, { 3.7742637487092533`*^9, 3.77426374883224*^9}}, CellLabel->"In[5]:=", CellID->666044047], Cell[BoxData[ GraphicsBox[{{{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" 1:eJxTTMoPSmViYGBQBGIQfTRO8f7//+/3M0CB2jdTn7IfCH5Hr9fONx8QfJ89 xZNvPkTwL0kec998GMF/cCVrQ1o7gv/Ha0vjWT4E38TcXWW27Ds432G/4P1F Qm/gfP0Fy+cFab2C86csXNYxzfsFnD8tyOuFm8szOL8qZqfP/PgncP5v0bNq KUGP4PxP7z219/o9gPOnu6pk1ty+A+c3c/1LCz9xA843bczLa/p1Bc6/bLHx 1FX7i3B+6PwqFZaMU3D+BIMDx/7cOgTnVzMY1vuFb4XzpftWCQiLToXz912J L3dTnQLnJ0iL3qs0nQznL1lRv/pB6EQ4P6JtZU+Mbjec//XB7/eqiRVwft3v C12fF5bA+Wxiy1QPPiqA8/WmLdi240QSQv20qTeWTwmD86+1H/t1IcIfzgcA kYKZ+g== "]], LineBox[CompressedData[" 1:eJwV1nk8VOsfB3BcqWyRXdZWlSQtROYzlhZxhYSILPklW7hu1pBs3UhCyVKS 0mJLklDZCoUGJUqyjpkxM8eSuES/c/86r/fr+33OOc/3PN/nPKquZ63c+Xh4 eFbw8vD8d+2OfztPszuCG0oBMgtvDCnhzsL6KHEF3eCfYvrLSIrnVtfl+ds8 cZ7OM+79Pp2ivvDVg7/bD+c2GDRHqxVQ8gcE2vekB8Lif57gV31GUXi7Y+cZ 62DIr/NQjfauo6Q+PpGRJREOISWJ+viX7yiCKfGLbZ2RyD1eeEXHv4tioHd8 B0/LBXiM6tNaFL5SfhVx3W4+uAiBbx2rtx8aolSqxFzXSoiFZJH+L9PFMUpg qlzL+9Px2Cl1sJ/VyKVoCpQsnDp4CbtsxGOEHaYp7GBjjaWNlzHvd3B2YHqW UjDe63xDIAkX5wRu2eosUlydzqZq0q9AcuagztBNXiR78A2PuF6Fh6iyybM5 frBV/wx/YpUCR8UudcqrFTj89YZUhOE1PHU8XigyIYwHaUPFh7VSYa6tKdfd IgYB822HZNam4fPpkjEzWwmcWh48OCyeDnYxTWnTOmnU19aHlvJehwyjMEBB Uw4RO+2KTAZv4ErWBMSFVdDHzjsg3ZGBD1t3TR/4pQrd+5zvQ7U3oRchNHJq 9XpknNQJKSnNRKW7THrNkY34KXtxdXhuFhQL4kNznqnBurPt8aGr2TieobRg vX8ryi7L7peKykH1613+Gjwa8FkqCio+eRv3qvO0dy/twKhDeMLLTbnwPxJV rZ67E2mVqp/u3s7FfPlglYH9bkz5e/v6Jd+BYAxv1H65vbjTLl5tszwPel4G HgHKerDY+ny5fmQeSl8Jrd5L1UfxCO+dlWfvQvB+hzcfi4pzUhSa5ORd0ER0 m07AEJQDob+V/8pHpNVaOu2eEdoKphz3BN2DkpBhyT8FB5DWo5Fk8O892N+/ /fqq0SGcWOlVYxZ2H3JGiS47pkzA9hyWd4ssAB+vUVZ1wp8oz1I+7Mv7ABvG nyg5+x9BeKtDSMjFB3BU7o8VfG4BIY2Pn5PjH6IqvwnJnVbYMtmYVpP8GHSf MDRdssWUKm9jk3gh3u6+NWjWZYcqK/3pztRC2Ee2WlLV7GFS/sySeaMIuQHL hBRnTkBsdDLqh1wxrFMfVDj4OKFHSqP0d1Yxmq8wZ8omT8Ij6L6odG4JDgVo qT1MdoGs9eQtMfFSuAw/SDt3yhXh3sl7pK1KsTuyY8VduME457276sdSoHn1 3JmV7uhaMmrU7nmCPYS88ze2B/bIDDnoy5XBUV3kVsfPM8jcHjVtaF+GJF7V S/XLveDqXLPWvK8M3z2cNtEpPpiq23Xh1MBTHOfbx1Ti84fNl05ZT9VyKEke +iGW74+qKb/Ss67loLLs/nhvEoDodUXfQ0fKMXE2NLoq9y+Ix26gpDCe4XnZ ycmQ8+cQmNPw6frmClwPmL5+mxKEnmcuPtmeFeBMSA92/BGMXHpOdgG7Auqb 3uiczwyB5iHphZcTz9FAUzxP+zccR4SWV7LmXkBM0KEo0yga1yuFjmTtrkIF Q6fuzsto9LuL0U0DqlBWcvfSnb0X4VsrJ1k0XoVcMbvs69oxSPxb3e9sfzXi 6i5N55vGofm7pdqPhpew7bY8VNj9D8SSbF7n87xCVCdfSqz/ZdjqOtgc038F 6RK74QuiiaCnnYqpqHiF9QXZRhzzJPAfDhoIfvga6wMF3tCYyVCxN2+NaKpF vYDt6cHGa2gspcl8Hq1FYzoRTaxLhcfyo27b+etQb+jdqRKTipJy2/nv1DrY jIJv8mAaKKtc1Ayq6tDDFb7t+i0dJxr/ivmjqB4rny012FJv4qbGzX0J1xqR ei3cad25XBjq1tWeedoIOQ3LM6avcsHezzQ2/diIz73+rtuW3wHVce+fotJv MPxrIEcl6w4Yl3sd026+QV6Uu3b7+zzoMOUic3PfYl5cTzDZ4h6Gfhj8EV33 Fg53Bfwj8u8hkccz3m3oLapPBLepk300IFOVvHF9E9Lh6NKUfx8JB+xzCwua QM1d7zDP/wA9dzPrKoubcd63nBrDfITokvr9mR+a0f4wbXu4yWOoV7Nawiaa UaqhI73n0WOyzrqdFK0WHP4senDCpxBqvF+HGp+1QNtISuvCUhGCndbwd9S8 gy5vtqdEXilk5LIPMN+1wjqquqFbsxxV1xQTdoy3QsBRynvUqxwnhG+3hAi1 wX1rV41lQTnyft8xEzRrw/8kI9YbKT+DOr3AamtbG47O7g+Ll6gA9elTJ58P 7SiS2LwlXqQSz+67V8+doaHXav5c3YEaxLlt7FMIpWFIPr3XMakGdipjv6j/ 0GBr+qzb+mMN5m96UC49IvN/R4hYub0ENcmrTm6cBpnsZmps7Cu8+8u/Sde7 A4flh/455lOLfur5rnDfTkgo1LOOD9eDkSdTfvl8J5wUtC+eWdmAKf6ytMzE TpRtDlvI2d6A5S30Y5WPOvFepWDb3+EN0LS06Jmmd2IXr8pCr0wjol3WffM8 2QWm72Ty6WNvsCG6hW5n8RH6+T5FvawmeDdIze/S6sY97ZX1ecFtqKWf2i15 8AukDG4FGUd+whE7xdN3pfvhvVLreq53H0IaedfGMgfwyjj5X3r5ILZto8mb TQxhn81JKTW3USzt6xL1+jiC4F3ikeaxDERWtPbk9I2Q33GK9SuFAR7Nt3m0 kREwbpncz7vFAO+6F3v2zIygZr6rr+s5A/wrbzvxSo+C+lN5eSuTAaFPnsU3 bEcxIjXqv9KMCVkfPvPGL6OQjRlY9F7Jwk36gszs0Cho9S2LhCQL8s4zg5vH RxHM4M56qLCw5ijj7+SFUWRfbinfp82C0t72HHsFOuYcOk08T7GwYVkmZ8KR jl/qzmOfaljQytmRpDhIh+zk4pqn7uPYEXBBYAuTjkNbTN6Vnx2H5sGOyD2T dDDKDrU9DhmHxqRfwBHeMeRyKitCksaxZX+p7QXVMTzgFXdJKx/HWo7G2lGX MczZrMl/zcOGuL7688KhMZy4qPX07VU2xFaHa75gjaF04Fzq6ZtsiI69f/hm agyJhjPyi3fYEE7xyu7nY8Au+/EqgadsrBh9dEFsHWk52w3JH9ngSdpsFujG gDDfx7lQKQ4m+jYO6o0wIGtR9O3eFQ4SY9yqXo4zcPVgGcU+nYNN6rmpmGbg UMO2EP5sDpzC5A4Y8THxw9grSPchB61ywo8PqzAxJxkRr97AQYHNZODxE0ww Yvsfqc1wYLi0zfyrGxM90Q2+ugsc9N/z3OToxYSHcsEKQ14uea4Z7nUOZaJ2 j3mtlggX0andFI8MJvz6ey0y13PhRKteEfSRCeom1ZZoSy7mg+YG574yYXcu 32LKhot05d3VocNMVO7b/Nr2BBetvsU+EVNMlBY72vGf5kJX5E5nrBgLwTO6 ZSNhXEgdjstOM2NBbfNT3sa7ZH6DhWZZIwseWpuuiLO5eNhTYdvdykKUQZ9R zgQXcRyFyPmPLFCjhZMVZ7igyjDbDEdZ8BMNXFxY5KLc84JX17JxUPNz6Zqr CGSLl93/cYB0Gd+LqO0EQjbKtsseGYeKlWG73U4CNnoRM/tsx1Haa0PfoE1A zP2wcezpcTCauJTbFAIxlUODUgnjmDjIDl71JwHvkxKK2i3jyHhEreKcJmAS GGLs0DEOtaxAPnkvAhsvffeK7B1HwuJ0n54vgYGyx1VNTDJ/W7S/cyABawFj OztBNnpovvoaUQR2rHkUGb6ajTnBDL0VFwmIaooV5MqT6yRdRLUnlkDz8b4Z xhY2nBdEPhy/TGBfUWBqiCkZr6pcGE0nIFf/pSrnKBsPBjOD/DII/OymDtU5 sFHbOKIzmUmglEdkh6A3G37zYS8/3Saw3vpee2YiGX8TulP9IQGhhU8ra9rI 8UJ/BcpXkfMdUks59omNCVudk9xqAkstYbJEH5mfaXm56iWBiQzVTWvZZPxm 8We9OgLde3yMEwQ56DFtzxhuImChVPtedTUHfjTV0dAWAi3LJI5Wy3EQZarW LfieQM3HSheuGgc6JTu/SLYTyAvgj7Q+SObLK/d1dhFQsLcV4JpzcHWz5GvN TwTSDR4lxdtw4Kx340l8N4EEMYvsKncOVP6c+aXSS8C3OOuFSgwHA2KxL/j6 CTDSudSqyxzYaV/K3/KdgMt5g+ajqRxomqSLmw2Q9Tcb647L48Cj16wobIjA XpbWD3Ythzwf115LphMo64gNi2smn895sit2jID6ix4+FRo5/ie9M5BBQCkh Qvzodw5ozleMDFkE+De+03ixyEEzL73yBodAhIhihdUyLjwCt/x24hKY/XFW ny3MRWloZ4MKQYDVIGWmrMDFRGGNUNoEAZqLy5lYXS400yT+1psmcNikfELJ kIsM/eLEHtINmsuDK024oH3pKvT7QaDid2HcuB0XA7b65tdmCGiO/RaJdeYi uC1les1PAg/brdKVPLhQib3GzCWdnTN31zKIC7GCdeI5swSkY023jkdwMSfT elpyjkCy962ymDguEuYtjseTjtYzrnuezgVjINHO+V8Cp3uT+xXLyT4rdxkY mCfI/9heqZRqLvwCZMJ3L5D9c3LIlL+BvJ9/XUAc6QOju16wOriQ/UOhRvEX AYpaP+HYy8WDrJJdp0jv9orf2DFAzj9v8WgB6fWTvanPCS5qVRhd6xbJ77/r 4rsts+T7010dHElLBKnz3loi6/fZ+nMqacGqT9riAgSiVMMdmkjzLUb4xogQ oBZULMySnofavVlJMi7J17phicBkdMdXTwWyD8bDBixID6xYb2K5lazbObFN t0n3mLZFNmqR4yeXRdeT/nDlXIW2LkHW73vAMOm3HcqcRwbk+E/2ony/CbyS bFmnZELm1xw7o0S6wjbAPsWC7Avb9gwd0sWZa1L47cj7Kw4/sSB9/1tjU9BJ ArmjnS3/I52j4rvE+h+B2t+/ZkJJp7nJ7HYi94lcyqBpEunE+7VeHX+T+5Cg ymAO6RjmmTzj8+R8fELfF5IOV5fofR5Dvo9ap0oV6cCzNau2JpLPe7159g1p rzL3A7dSyXh8/ikaadcZ0fPiWWS8Ji6yl7S9TuXTmDwyfmm30yBpqzAX1iy5 D4ipaMswSJu8ElT1ekL2cZ1WHYc0lbfctr+SrEfnRMAUaR1jxyuWteS6Zdgb /SStGS/wppHs+9pvYSb/klZ7V7Kg/YGcz5fI7AXSKiLHtR6TfXvVs/zoImkZ C74zSmSfXr2UELdEWjT18e2UUdLliWa/SQt0W3fzk33E82/Ay/+8JLskHEyu +1r+VZP/2cm87v1mcp1SL5gv/Of/A29RW8c= "]], LineBox[CompressedData[" 1:eJxTTMoPSmViYGAQA2IQfTFCXuo18wd7BjD4YP/KWI3/Dg+Cf8L+9MsVWgj+ Mu+CI6UeCL6F/2zBcycR/NNBx+LUvD/C+fVrt31rsvkE56dsuBKs6fQZzr/B 1ruu2uwLnC94VuALs9pXOL/G+tC/q5rf4PzSv7zsITLf4fwF6e1XpJV/wPkT HM/0SKr+hPP58lc7HRb9Befvc9mxd5vUbzj/b268WRjfHzifkf3STO2/CL6Z R9EhL4Z/cP6vO2teiH5C8PWOyb3hqvwP5yevn/D+/38EHwDTSnRo "]]}, Annotation[#, "Charting`Private`Tag$11633#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, 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->{{-1, 2}, {0., 1.}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{3.7742615309258623`*^9, 3.774263750375895*^9}, CellLabel->"Out[5]=", CellID->777255173] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Scope", "Subsection", TaggingRules->{}, CellID->204653245], Cell[TextData[{ "The single-argument form of ", Cell[BoxData["SmootherStep"], "InlineFormula", FontFamily->"Source Sans Pro"], " passes through the point ", Cell[BoxData[ RowBox[{"{", RowBox[{"0.5", ",", "0.5"}], "}"}]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.774262049418632*^9, 3.774262053636499*^9}, { 3.774287001448634*^9, 3.774287040782567*^9}, 3.859374611871223*^9}, CellID->624875659], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SmootherStep", "[", "0.5", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.774262056788917*^9, 3.7742620640432997`*^9}, { 3.774263753285589*^9, 3.774263753436499*^9}}, CellLabel->"In[6]:=", CellID->884859976], Cell[BoxData["0.5`"], "Output", TaggingRules->{}, CellChangeTimes->{{3.7742620615426817`*^9, 3.774262065303808*^9}, 3.774263754381802*^9}, CellLabel->"Out[6]=", CellID->34711034] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107563], Cell["Specify an input domain by giving a second argument:", "Text", TaggingRules->{}, CellChangeTimes->{{3.774262069410379*^9, 3.774262116874716*^9}, { 3.7742870486563544`*^9, 3.774287061030592*^9}}, CellID->192434427], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"SmootherStep", "[", RowBox[{"x", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7742620917886877`*^9, 3.774262120285919*^9}, { 3.774263757111319*^9, 3.774263757248855*^9}}, CellLabel->"In[7]:=", CellID->514021828], Cell[BoxData[ GraphicsBox[{{{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" 1:eJxTTMoPSmViYGCQBmIQrWcv9ur////7GaAg/6dyx89fCP6GzYZqn78i+EYa vknPXiP45oItt85cR/AdHn88NXM9gh/Ufna1cTyCX36+JTd93z84/8oV7lcH E//C+bIH8kXMZf7A+Vuzj7Dy3/0F5yf0GH642fQTzv8xqbpjv/0POH8x3z3J GQ+/wflzvAyLLnd+hfObchIrND2/wPnVzKvKi95+gvMTG86rXFvxEc6fuvfp jDlZH+D8uIpZdeapCL6GsX/KpXgEf9eKHfocoQj+vcndx4rtEXz1LMMvXiII /geVZzef8iH4O+/P2t/AieAfPK1ZYcmK4AMA1JmD1g== "]], LineBox[CompressedData[" 1:eJwt2Hk0Ft8fB3CVShLytSUK2UJIhcTzkYgKkTWybxGKLGVfi5JsSak8ZUkR spNcJElZk112Hs8yo5Ks9ZvO+f0153Xue2Y+93Nn7pwzIg6XzzlvZGJiOrKB ienfMeRiAcedXzia+pZzuExTglR7b6igfxZHK/x7SfX77UkG27WvsY/g6Dvz RcWIX9dJY+GFJ7S6ceS6rXM+a+cdks8iH0fgBxz5S+xIJrtlkJg9IgaLanG0 LlhSayX8nJQ2Ts2Zfo2jL0W0ZP/tJaT95ibeu5/jyGbtr9FcSg2p9vNbNaNH ODqy5lvhXdVIMtCUZLmZhKOJzi86tb4fSWOViV9qb+DIiB5aIdjVSfI5sPLk RxCO0vhF67hLvpKYsxzdpbxx9PJOIEeP1xApjb/tiI0LjozNA/kusY2TpBKU NqRa4UjVLVqmcWyK9GYT+fNHQxyxrmggAfU5ksH1bel/tXHEdshBnk8aI41h Po5HjuEoXzjGRqr/O8nHaVjukgKOHpoFtMjQF0jMg9orZHEccQyq2543XSKl nS163yuAI7fOoH3zfGskqff8SWycRP9i9+vwCDJBjWrkBc3NOOKnBZ7aa70R 9ItpktdWMNQjL9gp18UMY+KmP1/hGHpvstPIMnAr+GTU1U1OYejRtoYNFZas kHYjyfRsB4b8ipqbnjpxgtTainBME4Y65Wt0Ph7gghpvJ3pNNYYc5fZw5fJy g95sW+V8IYY2bfn7TE2YF0YvKEdJZGOoke5rlXiGH3y6yQYXHmDovi1LWNYD AWDWZRVITsDQrju8hwO2C4HUoZHi9WsYyp7WK5SXF4GavJPBh7wwtFtVTaeK LAp6e4p13BwxJIxXzApJiIH3tqhvPfoYOsUonfH3kgTmMPoL1hMYOiGRpuyk uB/SFkz9NFQwVMUq5SfKJgM1o1JsBaIYUnpXGf93ozwEq2149ZAfQzVvTTtY QhVA/cGAfhw7hur8xc0mow9C/blbd11WGEjJQJrpXMkhiCxyUDCdZ6B60gUF 3YHDoMV2rOvEDAM9ORSxZLxdCT68p3GJdDMQj72+uFeSCsSKNpVytDDQ0eKY +eHpo3A67JHJn7cMtFK6KCx68hi0q+inDb1goIYJezVMmgQ9+YW70iIY6AXv 3ICVtiaksdysiQ5goHC3yspIkRNg7mxrddWTgXzcN+cbMmvB4B7Ox4bnGYjs 6dWj/k0bxpO8hbcfZCCHN/r3h6ZPwTPsVMOyBAOJavKq1SyfBqczog4UQQYa tz5i+YtbDyjMX7LesxDzSY1uHbA3ACzgsGT4GB0NWm4sGM83guIethavXjpq WpSSDTA5B94Hpy9af6aja/MaTlwbjGGBeu+lahUdmRdkfIh2MYFV698Hft2l owM6GmKRjuZQW9PRPhlDR7uczG54HbCAUL68y91BdGTrOsooW7WAjV0Wr4tc 6ejjaXvm6zmWwKJVc9gd6Mj6wRWuNTkbaCUnf7U4QkdGS0lvegVtIX7d3V9H ho4oLA6nCrfaAUfl7ioxPjp6ddyoWneDPfBKhxwbxWhottrc/fxOR9jHqaFp 8oSGNM6+0hB54QoJCuOB7ik0NH+lN0fQ9CIsGUaWhsfSUEkeFq/A7Aafk5rE XvnQkK7GfqnqS+7g+9+prVt0aKjw+UQxZucJ3w5RQVCNhtLyAkLPSniBrsnt a4oHaejYZ/2oRcwLhO61zdnspiHniqJKXu0r0Mx77nMlTkWx0Y6mHgveoKD8 k7l9ior0v/JnRTr5wEPzVPWpASrSU+0dMer1gcvpvYWcTVQkReEpF0dXgV/A KsktnYpeCFI16Dl+4C7kZLb7OBUt8TrKKbZehx71zXcPKlFRwSl84w7zQCDZ 5H7QkaEiB5M+i4/TgfBfJkXFl4eK/L0FROZZgqFW2HN329wcqmF3uKziEgrs Yv5joclzSNFJtOwCioBrWny77t2cQ+y+Xuv2PJEw4VRllB88h54pr59z94iE ypyVxj6XOSRkQfKOFYoCO8mwHIVjc0h0xFGRPz4aSqRj3ScmKejpaX0lz4yb sLfLrlpmgII0TYRU1ZliIT7gKItfOwV96dDP4XWJBecmas7WagoiFwoZzR2O A34b/XHZBArqPpP6W2L0FoQkcVkEqFDQTk+f5PcuCUBVpuXWH6CgR6IJu+8N J4DZt3e/tu2jIBeWOBRkfBcUZPxSHu2gIBFXsyZd0USYaOprb5iYRR9x4Vsr u5JAd+mRNtudWVQS4/zfPrEUKH/il2oaOYtIxszN311TQFTbYPJJwCyK9OPd fK4gBVaT/oYfdJhFaiwbb7copUKhjEOtmfIseiCTrnL/3D3gtpU89HR8Bq38 9ghmzr0Po+9fCyspzSAecVgm1T2CYONlLRXZGRRxOdmcieMx8I9ruKmKziDD aaNkXbvHYLjW8ZrEPoNkBxTcvJifQL0ipqkzM43idwpy8hhnAjlT2tkibRrZ hVsvrzI/BYfrWS8CF6cQTyv5xlM8C/5sobUF06cQU9jJ2QzhbHiYqvgjdGIK bUn/YDFslA3dRQ2qUe1T6EddepF8eTacmBn9dDt3Cn2ej5kWCcsBMWNB7JHZ FMKEbM8dF34O07L3FFHFJPI42NrRdP8lSIfmYJT8ScRvEFcR1fsSvDrKX3I9 nUSrCyJf0njyYcm7V9Tl9iSyVH7ZU52aD6yVfP/tsJtEITymCz/TCkDh+MOf ltsmUUVHhxHkF0KQaWbZotUESkvxI7+Mew07Q18oyW0YR81Cb2errlTAjQqp Fs7fY6ggZslv+H4FrGDPz/+kj6Fs6qkUMVQBE7a5wVX9Y4ju2+Eqyl4JJcez GjWLxxDeI0n98qoSzm1+bGBuO4YeNhiEbVuoAsldIm1MQaMo0DVaPjnjDcgq 4bI5P4dRfS9T7suX9eAiFxZWPTKM8shulLKmesiU4Ohu+zCMJO7/dv7yrR64 +OQDFjOG0TJNbUHvvwb4/durQUdrGFWpZMYcDGmAxmrMlJo6hMrikqKqTRrB Qh0LlVcaRA5rA5lxXE0QpcXorL7WhxYXfvns+vABeEwKE8/zdaPoKR2vyr4O KFl8z9Ei1opmVmJoVO4eyBmavjMXXYfOn+Cj7aX2g7WRYNmQYzYilfKj749G oJo16GujH7HuQaJBT/aNw5GJDXsiLBAw+xS2bsqahH3zb5ZVGz+CWon3Q/2x aTiVNdBmYNENPSfvb/q4jwLa+lybfpX3QezGVp28fVRIsN/2ffljH2jc+hPx TJoK/X5Mo39G+kDqtcFy+kEquD/Bali29INufFFaIBB5vNVH0Kwf5ks3GXFa EfmkqIkTi/0gRmb+HpVE5HsXGpKVBoGyxbM7ZJUKd237whUqh4HlR+wnk3c0 uEFXg5nPw6CRPynd+ZEGodefrWdMDEOwWc69k5008ErxDNzKPgImUxw3xEZo YPBhk+83pxFgUzAhZy/SgF1ewTWe6xuU/fBXLpOiQ8KfWH2K5yhQngyizXF0 uHEb2/4kahT4sVjT0QQ6hPKbtBo/GAW9jKym0lQ6eCnu1UFNo6CWxymtT6aD ZKml8KcdY5DO5Isfr6TD1tn5Xc+cxsC30shecYoOHwyEdhhyjcPU67VmSVUG cMuN8/oIjsMSqAtsBAbY7cgRTpUYh6pEs699Jxiw8kn2cL/qOASrL4T76TNA 9pSalZ3jODBNDGZet2NA4gmrF1fKxiF+SupBdgwDLFUeaCeZTQDZdUkh6jMD cvmsz5baTUBtWW3jx04G/FwUPv/VfQJMnn0v2f6VAfHleR67wiaAuy2xMGKE AUixKuXp8wngP9LMpYQxQOxA3/jrpQmI1Zh9XM+OAUOEJ7T74STYrV7hsdHD QCXoqXdD9iTUPz20589ZDCJ7DjgXF04CE0tyzQNjDHhvntRLaJyE8PUdxe8s MSDRAwROUych/eWFRxMXMbhbMVjRcHQK8nLrV/SiMTh4howX908BWdOgsL8S g+Bs2cnMiSmwUMx0pddg0Lxe1ZtAnwImNuqn1bcYWBZ3vfVgmgYN7msPdjQR 9+fZFC8lNQ0Xh8uc1zsw+DLqLEUOmAapVeE37LMY+PnK2N/lnYH+ogNbN3Dh wMuK15qJzECiN3fuO24cqjJL+PfIzkDeC0erCD4c1lqPdhYcn4GLZN2dmCAO kSK60OoxA1XY/GS8JA4J7U5Cm9/NQEutAMvEMRwUnKSuf26bAfKQL5s5CYeu ZVpPSj9x/Sar0x80cOAWvxovis2AhXho8ANtHB4GRazCrlkYqzjzl/ksDrlS TwYCL8+CCje5bsUOB906+yOagbNQ37Z8W8wRhzlj8aRtMbPQEpJZe8oZB9mw At30h8T5wdLGN9xwKPlaU1n+fhaYNCG3xRuHusi+e/O7KZAeSov0jcChb5jz nEsLBcIH+vzDHuNw+rZzv283BTrP2x5hysSh9miNTdQwBVoOXT8dQsaBnOZ4 iTxPgTGuq9EeWThcNKyIHuSfgzGH3Xf2vsBh5Z1VpYHbHBgm7iseLMXBw6dY 3foqYeYfeqLlOHwT3tx0KWQOVAR3XHWpwKExpLAzNmkOhAceXJyqwuG28gZq Y/UcKFRZWVS+xUEwP1dQmZUKCuke5rXNRH/Prz7T5qYCJ/eIZPsHnHiuDPeb 7KFCZxy1ergFhymn5SPeilQotqw8ON+Kw6s9emfzLakgPGo2MN+OAyn5e8Te fCJfccf5Qi8OxRonWeTKqRBLcdql1oeDKP4wQQ1RIa954jN/Pw5b9LQyzn8h nC984uMADh2b75elEPuOisHOsS0jONhdV5vdqkeDJYe4W0sTOEg7tXzFzGgw 3/x2rWoSh58GJk1f7WnQv/GYiv8UDjfEPJ5mBdAg/WydyOw0DgUdGVaQRQPh yRDbLAoO/jWSpyUKaWBRb1J7eg4HyClV2VFNA877Lzhxwt2Bn3iG2mmgknuj Uo6Gw7L4aof/Cg0M23/n3GIQ/eS8WWe9mQ55Zp4uAhgO8atcr7Q46dC5VGjw nLBwl/QtLgk6GPrZFFXhOJwMttQqNKJDeFejXc13HDhdZxTvXaBDv34J++Ef OAwY+YgEu9KBP3OIN5+wh+StP6dC6EDxLD+b9BOH5O7qquk8OszbXxCAXzhc eKv9/HMpHa5wlRtmExbP67pXWkcHjbghnq2LxPsUMucT0UOMx4W7vif8TWrX ASEmBizVPpwRX8Ih77+c3czbGVBclWp0jbD3HwVWGg8D6klCkS2EmXt0Z6tk GHBx2/hZh2Wi32HXnpqYE+Ozxk7BKzgsuDEnHnNgwJW17Ia3hN+aJIaKejJA of2a0DphQ+k8q/lIwv6fGH6rOAjwHD7dd4cBYxt/XCkiPPkXqdSlM8Cwnsox S9j/ax9PfCEDYguZkeEaDhr1jsxXq4m8Bs+3SMLb8vEf55sY0N/Wq1RK+FH4 1k7JQaL+zMJS9nUc3sko33q3GYMr2QHFrwnbyJtkfefAoFiNzNFDeEnRu3av AAadke/5fhGWVc3HguQwEL6RpHboDw7N6i1bX6pgoGDC4WJI2O74tHC/JgYa i8rnPAin6u41PmyOAdkpOp5MWE5PzcPBHgPD5YrZKsItZ8/HJF7CIPz3672d hNfNUirpYRgwlV/SWCWcblncKXCLyIO3EsdfHBRt2uZ0U4n7t3/eJ0rYxXmr YE4eUe+c3V8twkxuYke+lGBgd5d/1YTwQ4/jBhuIfXfsstg2J8KHr9i4yn/A oL7RVMGHcPvVoHDrLmJ+PdEBYYQvBqQ/uD2EwTxr0vRtwhuDykuqp4nxSbuI +4SVI/EpnhUMElm32RQQ7o5h+3OCGYd5RldBOWGPuP18PuxEHdmgXUd4y52T CmR+HMKNLsg1EyYnOp5qFyV84ujlNsKqqeEOa7KEv2PsPYR77j8OklYmrvf3 EfcgYa+MmlSL4zgkarrfHCXMktn36sYZHMbqor2mCD97ttBcZkrkX4l0UQir 5e4cm7Al1iEspIJOuPeF3DKnO+GhIfF5wldeneECX+I5ybkp8ZMw6+uLMp6h xPh6N/pFOLssRisjlqhfi2/5N2FS1TPrj8lEfbvLB5YJD7xB/r8fEXl3brdV wr5o+K74c6Ie6+zCNcLs75bzjF8TeY+h1+uE85p5GyPeEO+thXLgH8KarYeG it4TeXl1jr+Eh9sMF0Y6iPqNr1/7Z/8uzx1sg8R3yT/s7T9zfr0loUrsS+GP qdP//LL/OVwk9okxSevlf/7//zOo78n488//AynHOUk= "]], LineBox[{{1.0012755102040816`, 1.}, {1.01773539459152, 1.}, { 1.0567217732879404`, 1.}, {1.0957081519843606`, 1.}, { 1.1802851297394454`, 1.}, {1.2592214298975912`, 1.}, { 1.3447619504179815`, 1.}, {1.4287434259944938`, 1.}, { 1.507084223974067, 1.}, {1.5920292423158844`, 1.}, { 1.6713335830607627`, 1.}, {1.749078878861763, 1.}, { 1.8334283950250079`, 1.}, {1.9121372335913134`, 1.}, { 1.9560685759793301`, 1.}, {1.999999918367347, 1.}}]}, Annotation[#, "Charting`Private`Tag$12281#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, 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->{{-2, 2}, {0., 1.}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{3.774262120633688*^9, 3.774263758332158*^9}, CellLabel->"Out[7]=", CellID->905898871] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Applications", "Subsection", TaggingRules->{}, CellID->605265931], Cell["\<\ Smoothly interpolate with more gradual changes at the start and stop of the \ interpolation domain:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.774262136686507*^9, 3.7742621449442463`*^9}, { 3.774262193435515*^9, 3.77426220956537*^9}}, CellID->436661374], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", RowBox[{ RowBox[{"ResourceFunction", "[", "\"\\"", "]"}], "[", "x", "]"}], ",", RowBox[{"SmootherStep", "[", "x", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.774262705229677*^9, 3.774262738327345*^9}, { 3.774263762512957*^9, 3.7742637626425333`*^9}, {3.7742870840078893`*^9, 3.7742871426667547`*^9}}, CellLabel->"In[83]:=", CellID->83808608], Cell[BoxData[ GraphicsBox[{{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJxFxW0w03EcAPCNdZRrjMr9adxE5SlOUlKpuMhDneHk8nRCWk/InXR1WrdJ nua6nZTnh5R2jGyuMnHsdDnPo1GzMUtj83RndnRZ9cL39+JzH0r8XWqiHg6H C/7n/wGJypGu+fAz2xN8LFJkmLv39kcrS8paMV84cED8vhwLgyMStB3PsQR4 yuWpTwGWDlftvZydizFgumHroWcYG74SWc1dWa2DjXT0KD8rLmwXsqTsyePB GYOe3iVrH2FzHkmKx3fCbXKf/qFT3XA3rdwyUi2ENQdPGzfe/gLrbXBMLO36 YA9dXFtoUz/cz3Af7HUYgq2LVBsNS8OwSiuTjruOwnUL7X3EQhFMJL9ZVijG 4Pwb/KQq22/w+lmOIjlLDKe7CXn7eiZgWZMwb4TyHf5NGyu1f/ADdjxnsJXU LoH9aijXW8ylcAY51mYmSgY7qcONxMHTsJnxiqFwE03oLOUeKJuBb7q3T+4M lMOci/FVn9fRGpWFyVzxLMwP9dNn+yrgLH9mJW8OTZkKmKhl/oRPHmewMbc5 OMpqaAMvQmv6CuQp9F9wCSEmnWqrhM2k/Bo9IXrHI3qYZ+o8jGuI4cpNF+C0 V9wC0250h2OOIemOCiYFpDk9IaphifOwKFOAbq7wtlXELMLRXA8SeQv9mFlN l7xbghuV5FJi0DKcU86Mk15CJ1AX7ZpC0PsFgubgCHQu62pvfjw62ePl6q5M tA1jj79BPXrrxMPd4rfoycXZ0XoOuiiiNfpCC1rnQL3HFKAlI6wKfRH6Q7b2 mmgczfaKta+dQAe+PsI7L0V/uj/wlT6PLnY+xgpRo1PlZWGUZfThoFuyrjU0 AT9WV6RFT/O9aHGbaAGt1sX1D/qFtZFGp0P/BaO4ekM= "]]}, Annotation[#, "Charting`Private`Tag$211095#1"]& ], TagBox[ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwV0wdYjt0fB/AkStIS3iJJQzT0ppLWtxAtedvCmxYlqVSkaNGwSkjSpqXx aGioUNL4G9FUpPU0NJ7nOeVtkMb/dl/XfZ3rc933uc7v/M73iDt4mJ1kZ2Nj G6DeP6PhyZHm6lFLbSHlzz3KVz5rcuwT8ewVVsZmzr6r6eSu9q6UuMRnwvux pCYva8Eq0h7cJBniK22C7uouLbphnbZRY0dRkrAFmmXbj+1ktGhL3hLNWBKz wZ6MgjjP293a84aOD+ylbVHeZ/3Z9eCQ9lhoW619rD2ezAWXLU0xtK2dZl/e FXbCGVoJTWLkh3btPpGyN4mn0PZvx/rrjFltRQmtgimx06g+M2kcF7Ggnchu ly2VdgbKX7/XJH5bBi76lcdW0u4I4k65lKOzAhV9LY1vLDxxVCX0zCjhguc/ TobHY8/B0SCAdmiMB907I/ZFCvug0PuRgWyfIGJS/qqWOnYeellnSycPrYMh X47mq8QLSMvjY9/VvwGlrA8qRMwPE6seneG9KAo3W9uiCHt/aMlomH3U2oKt H4nClrRLWJY28/NAiziiaIIyptKBSFlzgE13lxT0RNPTR52D8HbK2P3FkjQC 6+P5X1sEY/XjGyHdPTJQVpWLtIkNwXmt6CKOdjmkrjscfkM4FNxL4QsGTUq4 1Pig1qoiFGImN7Km2JRhFdbHLnEsDF9ZvBhWVwHP9LmgysRw3N3Etz/u3W5c bIu5yBC7jq0MPg5eGy2Y3+oufV59HeE3916sb9WGwn7p6VD7G3ig4j73TVYH g8/Kzomm3YTeuePcmS91YXrvq6uJdBQOVyRm+v2lBzkjiWyRhijEuJ38mzan B67lbt+HnW/jQGnboYv9B3CifLGwyiIaD27a7W15oY9126MVjsTeQWgKDIJz jBHC9WzbdeEY+GtaS9wuMMOOg3euFXnGwMArSXzMzBwtYR6jXQ0xaG4+xZiY NYfkcrlchQv3EWgUys5maIn6hXSFtpZYcHf8YK7nPQKe/2JVxG49xOjLgeyX 62xR8vf5WP2Bh0h8HRKfSLeFraf57Dn1eNAGs96IFZ1APpOvvHYkHlIDB85e y7OD2cg1TVe9ROSZDZ7Rd3RAXLf/vpLFZDRt2TL/ke8UdDfZpPdYpiC/tKZx 381TGDu6ewUXLQU8HbmTK7mcsZnh50iTT8WsZYuW7woXeJxWlWL7loqwtCm9 X3yuEHTKf5Kh9hgs5cJVJo7uOGLzKH9iMh27ZvjY3rL5gHRZcD8WyYD2MO/v okM+CLflOmm+LwNmGmHOsgk+eOboIVIak4FqSwmlht3nweuuFXZpdyaMhZS7 snwvoO7Kl6MrA7KgOi86NCvgB6U8gZWbuHKgFle3UbogEG8V6uwaFXNAr5K8 8JQ3CHaFFysDbXJgYmUpV3M2CJGlvZ79OTk4zFWZXrc+GCPVtK7MQ7no1KW/ bfoSjOR2g8K/7+XhS2uYy6DbFaxeCjl+cHM+BELn4nLqwxB32tpW7kA+5C7L mnsvhEGyTc5OwD0fCnN8NwOUw6Gd3eHY9TIfl+S99KzSwlGeHVtSplCA3T8F UjaERoBpznhh9LEAilbe5Z9Mr8PyyYP33muKoDFlK1MrGgkpU9bIm5vFiP72 39mHFXchEnRQ3flRMVYl2u1b1n8X/LTUm9xlxTj3KmIskvMe5rjMFUzpxZD+ bRW9zvIemqrLvHvUSvBjQcW1e/Ie/BVDFn8OlWDqQlenvtJ9fOQTElLQKYNb Jqvg6McH8P24B3FT5ei4eL3u3bkk8CqUDL3lqoBo3C5O9uQkpEcq3vq9qQJ6 9hYvrd8lodl42xdbvQpoFH5xt5VIhux7IW+p2AokRQhod35ORm8DySzaXYmE lUISL8RTcfB1Bm+j/wvIqevQUx4+woZigZ5ly6rgqrHzWGNJOkrp+z580qyB 4Pkqbxu1PNS4Jm20YdTiwuP2O4P6RZiW1uKjnW3AvMbqRzOxpWD/lcu/Ueod ci8lbCinVUJ1ya7U/OkH9LpXTpucqsaHUOWP9Ts+YUUeO/8ewTcQix7/lc1q AvxdEtUk6jE+29vTrtiCHzxH5Tsl3yJ9rPIdb1Qr2NRqlHlufQCvaBYZHGyD yIYfu+6wN+HW6ZJTqZKfsWk0NzvzaTNmdHIHXYI6sKlku9XkzVb4KNUWr3/T iXnnqw2cFu3ofVp7s1n8K5KHlKt+G3Xgt2tbwnb/LtQu2s1+3PsFsrqci6cq v2Fg84ixr2gXDj4Wdy7c0IOoVtGdLpLd8BU9sbX/eC9SVfvmbFb3Qo5hubrj UB8Eh9tnX/n0YS3fBFftXB+iPl9/RfPtB0dVQr5EYj+GojvPirnQcUa58ssq IzroaizLCNcB5Bo4pL6aocPPQNFR+OQgpsdF+IdjBxDF5nt5j9EQSswPLo/Z PwiZXwM+SxhGkH5YSvHwIGjjU18Vxb5DvNuwMy1sCMyFv1v3T32H+u7QGGGl YYx2NNdptI3g+OZPv5a1DsO+RjY6IWkU0+8i6Z4h32HY+D6ryn0McRy2PmaS I6iKeReZLDOOtT0lj9lrR3B/p/xdnfZxrAgIsdhzbhTVM7VyY6EMsGXb5tMF x1DfvltXQZQJr/j8SMGaMfDv2nI4qpiJl7LXuATcxxGbY+rnp86CgKGX3BVe BpJ59OIvZLOQ+ppvtboAA1YjsTv35LKguIc2OrmWsseZ8rk8FkxkRjLthRlQ vZSb7V/Awo2VtuK6kgyUuk9Mny1jgeONwXo2dQaGh9u4ttaxMKMhzhZ4koEo eV2vV70sfJNvavV7Qa2X4iFVKUCQMi4QsLyKgRwbq6diawkcss2lI18z8L+A OZ2rQgSjkh0XU+sZCBwqvXJwA8HMxh7RhiYGYo+ledVuIhDgZjgLDTEgtN3p y+1tBAeGOeefrmGiJuDwmTOaBAXJkBy0ZUKhcPP3HY4E//n/x2lvz4T6li/x hk4EqtZZ492OTAgGbLE6fZKgko/vWYcLE4lqSfQ0Z4L64B7d915MBO/VNVnj RtDlEHCiKJwJtvmGg4U+BCu3VcYHP2Ui+atXsGYYgcFyj8CFAiZW2hp+0Awn uNW71cH/GRO890aENSOoeuNubPd5zoSZYXX57usEm1Ydfe5cw8R+v08rJSIJ lMZ/tpt8ZkJ517Knb2MI/s1XFRBdZGJs3IJpmUZQevQnbxMbCzo8ThsM0gl4 V1bwXF3OQm2uA59GBkH1cS2uUS4WWG57XTZmEWzl3r9UvJaF+Q1/lTXmEAw7 mTKNt1PzBQPu/ywkcBdxe3vZggXVxyrPT1ZR+62Tb9hpzYIkfVheqZpA7Byp pduwwFa/zXWBclODV7X+CRZkAt1Uomuoes/7lQm5smDRFMmfVUcw+yk8Iy+I BZ+F6IyH7wmCwx6FfMthIT3sES36M8EaX05DexqVg37xiB0dBPEuZwWH81lw 8jExeEP5mdGeNFLMgnowI3yyk6pXoLmWvYqFxDWL/TpdBEbJbFzbW1lwaAtj 5vQSdN4+1URrZ4ERYaqxq4/AKeRDnFIntd/gd+4VlAOd4rZrdrMQH8ERXtdP 5WGHotHh7yxovz7q+XGAYH3Ziajzv1lwrUzmzv1OkPakzmpugYXh8vpE8REC xXhZsSA2Auk1SQIPKBsEzOZfW0H1aTrmceAoweV9t5sT+AgUcryP64wT0D+9 EqqRoL77/F4RxSLweC3ZfUCaoKUwOu8H5fmiGxnvZQh6zNqVrAjBulgr1XZ5 6n8OWrfwBIH+cZb1yG4CL/YjWfcmCWgjogm8xgQ+6rl9/0wRXEsKs+sxIXgS 4fAjj7KTGVPqqSnBh2P8DzmnqTy9eFFwyJrAgr4//TnlG7eP1d9yIJBzrc9Z NUtwav+bm8epnNdODB8/Snnvrx2mci4EW+6MPMqm/Mthruv9WYJwl9CBfT8J XFQfTnL7EfzwbtVy/kWwf5yt7OslgovvCoPyKIululzOCSSIaTxmNkH58yo1 TsNQgomtXNnecwR63Z83Xb9NwMXjK3T6N7XOXW36kbsEHG+d2x9Tnj+QmSVz n6qrjleqi3JxwXml/8UT1NT5eBycp/IbKqTPmUmQN2yZzbtAsKh2eU3HE2r/ qbROTcpfmAMtmbkE3+QyY05TjrZ+9u8BKtf6KzwKX1F249kosb6YQG2mXOA7 Zf3XV0aGSqn9sycsrFkkWNph5h32gkDyuZCvNeWvveVqltQ9SF8hw+FPuTRG fFHyT86f129MoOy+OHGttoG6Z/cTRjspGz47YhLzjurHSeOUacpSLtVrnRqp +QMBPfxLVF3Nt5OXt1L1Kh/5uZfy8/BZx9Z2AvW8Sy02lGM0TmxPo3KeuXGd igdlz4l6lheVc532frGrlI0yFIr39lDnIJty9z5l6aOxfoJUji94ckdmUmbn W9SmUzmunenjLaXc8+YkR9Ew1S/+vg21lCsuNr4NoXIazl+X1UQ5Vl7ltimD ugf6h151UT5HT7QQp3J4ZbXqsSHKxg84RCap3FnkagYyKcsYu/VW/8md/+Zt U5Q5lrWlR1M5cX8fZ/mLcl+Jhqsddc6nJlxWLVB+4Zq2U5Hq8wcN471LlB+I rZ7+M84s/XkI/g9IADTq "]]}, Annotation[#, "Charting`Private`Tag$211095#2"]& ], TagBox[ {RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[CompressedData[" 1:eJwV1nk8VG0UB3BSkVeJVBIhSxLSpoj5VVpsKUuFJMpe2SuUNUIoIVsqOy0i ayHGnlJZk0IlhDFzZSlFvI/5Zz7fufc+5zzn3nvOiJ9x1LdawMbG5szOxjb/ rWU12EwfOkbbvvvKA5dc490L1YWcvqzZDiFPLs7O5nG1bQ/iEvPX7MeUjGcH +3sJWp+wpN9laV2MdDzkCy/YQ9N+25F3b40hvO22uK16bUCTDBNJnxM1hud6 /e2L9c7SZrTOxlpIm+FA5k1dv6dOtOGAthqLGAt0n5GJhKcn7YTl75eRaywx t1y7IIV+jVajLlRcnWgNX4+Z/c7CYTRFCbXcCVE7GDGoktADUbTEBeYPpVLP IbfXNM8/NZ7G1eufclzaAZOxue2pKUm0kq8tb6sNnRDcu89xWiKd5nTUUss0 xhnZ75V1j1g+oknTJ+smOlygX7qkjVc5l9a9OUg9fI0b9oVrfB3LzqdFPxCk S528iLtmtpNL4oppWryPVMsTL+Go8bbaG7OlNDaf3S+O91zGWKNIrYEbnVbE atxBiXrAY2ZbQL1CNe28mVlekIUnTtnTDyptraOtf0cpiKVegfGFnqlt/g20 j2p+j5/3XUXIoHSj/vq3tJvZ/DJ60t5YbTR9ly+0iXZAJC1tyMYHapc/zcTn ttC86xKWVxr6QrYmjDuEo51m7P1dN3zSF0sqle3TAjto25Xkwo1j/KCQd7kv d9cnGi/L7Y3UTn84NDlYuazrpg2nv1wy1uGPajXv2WPCX2lJK49cv7EmAFwT x5/VB3+nXXkbW3O8JAB+7hv9u+36accDvy6QOBmIgy8ZW57Z/qDxTDr7lCZe R0CPsyZvNYP240nJyyC1IKwbviF3QoxFq7LkmDHoCcKx1Nyxc0dGae5t0e4j oiEw+tTK48U+TjMI6y56Tg+Bk4FQi+zFCZrCfunJAIsbGGFd4Ns8PUnryy92 FkkNBaW5q2AMf2gV59hyh9TDUNqvYh8+95eWIKHJKuwLw4NJV+xonaHpRX2y 15W+CYM4Py1FUzbIaUs8FKq/iaC1s51mVuzg4jj/Y8DmFtJ8K2MveCzA6Rez zyoMI6Bomce3sHohdFZKNEulR+BIfEP176lFUHE+NBo6GYGjwxwRqSqcWLkx QsEo5jYaPO12/f22BAsCCw6XD9xG6LXULcs1/sPo14/nJXdGwoxzg09BCQ/e xIk/Hu2IhHH7vQ1edbzw48rfELImGr0tS0VYtBWQPXQ7OM8pGgvtw66Nqwig JdBx6HN9NGSWFuw6hpWQ5JB7rHDpDm6fLRfOt1iNun9pCm0tMTh9ifveleXC cFS9duvfxliIau9pXGwgAsErFqPSfrFwzU+59vv+OthNieR5bI5DujOvZd1D MfCMx+wQDYtHV++t9LB4CRRuuRij8T0ewmoyo1vOSMLMyeC3s0oCeKbMdXgU pZDD5H1RM5iA1UOPniV9lob+YLCq/YFE8H3IvrjETRbT0jb3ohITIVGY0ypo uwlpVgdmy8YTYVBA7e+2kMNkLzudN+Ueau5JFdRYKyCu21O9cPY+ntJLAr+f 3IK9wsZpPcceoGLi+f5E5hYMm+xcxJX9ABGxbXYO/luxbsTjbLZ8EhZ0K816 FW6Do52SFFtXEnr4nKfW71NCTXB6ezRnMsY7J3J9mEoQzBK4vnFbMuTi7UK2 Je4EfWBsQP9GMiTdxMQrOJTBb5mTlb4rBVx3BJJUZnbD+to6YxXLFOSdXSEn Va2K0pTwJe9vpcDwerNTargaLL+ds58aSIF9h+9aD3mg0ExGTvtOKh72pnY/ 0dkLI+PknNGfaVB49b55m8ABUJ8NuVOE0mG/tzjYOPwArptxWRmop4O9aUvc Xq6DyD/rKFQUnQ7R0U8+lhyHsMxBLfDKzgwYbvbROcSriVr/TpPFXpkYlJ+Q 5fY9DNNF4YXF6ZkoOPXraN4qXYwF7Vlu9y4T/i7BXNo5uhALz6x9I5qFIld2 X+OBI7gae1HxdlUWBot2lwsr6WHrE77FwlyPkB7A31g6YoAGhVrzt4qPkPnA JF5VwxDmz9xLvY0fIWjN4V9v0gwRXvTF6dujR5iOZrWutTiGQXr254zDj9FU JyueMXAc99s1n22JeoJmbw67SGkT/DfnZ3poXQ66/PpZAZXmiLM7YSZ3MAfJ jUs3K7FZQLJNzpzPIQeSCteeeMECtIcdZz+/JMfL1enNFRZ48TCmsFghF1uV G7ru158B02CkTPtdLobPHMHRCUtsX9KhRuvNxQL9Q4zHqlbwLK8sV/yVC+6L O+QzA63AuTGWvnLdM+h7ypV5r7GG+Ozemi8XnkFrg/NYpYYNjmXFvnFdmgeN o3KMVXV2SDzlr2Mtngf9seOvcgTt0ct/4a3RjjyEilXt+HnOHo5e+96rncrD wxTRcUeBcwjRZ7ZwZuchv3wa5y+cx8uZfZ/u6uTj/JcjWzrhCCk91mB1aAEO bhv/LVzoAiGfQyo2yQWYlo3ezWC6YHl2Uih3cQEWRUbcl97gir9cBgp6vQVw W33nv4EEVzTRi117dhXCV7LdJSLIDZ6KfrNT/YW4OiKl+OniJbzjFRBQ2FOM v1ECFvZZnqRPX7BqPlaM2XXaGpcpTzw/V1fkdq4YtKunRaeVriC13t24NKYY 7j8n6mzrr8Ddp/u+BrMY+yZkVvQxr2I9lbHxbMJzjEvp307Q88Hld8qIm3iB VANlwX8q/limUNjfwFWCl8NyHw3O+iMtXDFsWrgEimxjqr2h/mjW2dBpdqAE 3w4/s8jo9semNwKuUjElYIXo8by/dg1f6qmMvJ2lODGxmfbiUwAOVaYve+tZ BtWddTsy84PQIyZeOHuzDBB3jZT6HgQ338STiqllWKX8710PfzCSEZUV9aYM bdcVNRe4BmP6pe8+E+GXMMkd/cGrFIKckpOXfrx8iTcRhwpN6m9gdQFfDzt7 BT6ELd6rt/omTMOmDftWVUCpc7vXb/2bSLHsf1MnVwFWX7f6wM2bkFv54kWo UQXSjtT23OO8hX2XzO+szK2AuZ/9IfeZW1BKPJERvZmOwOaT+VN/ImBhlnEq q4eOtWPJLseWRiFAa218/BAdRce/v329OQoZShFtNyboWDnZym2tH4WRZZ7a F7gr8SrVy3hZXBQuVRxW3qpUicWX+qI3SEUjTGxSoCy8Evpb8eT6wTso6lVv fK9aBSo0+OmBjFh80PD7GX6oCvTQmNvtjbH49bR8lY5+Fe6/NjocOh6LnVeU LV7ZVEFzv/VF271xeL5i8y96ZBX2edNvD/fE4cV+IbG8wSrQzJLFV4knoCxj 1DU6uhoJWnQZzapEVNnfW2s8UoPde/sSJ1STkT907pzZrxronQqw8jBIRpqt SulZtlqE+00E8NonI9C6w8RBoBZ/UdLiGJsMjTN8CddUa7Gul2eMbTwZ740D BZ+G1cKoSNLFJjsFXRoXVnLI12GL+qDg8c1pmJRW482+UI+Dt2sEFG0zseDP 4+VrpV7jNU1iSvBkDpTmzIsMnjaiuSFu+6eZfDQGbH9XJ/seV3VSPy6rew7R CMafh6wmHNohtyf/TjkYv7/0tCu2YMZ7+QlOzSqkDZe+XnazFXkjvVYvW2qx TCST6utrg3f0no+hUQ0Isyu0TpL8gMEoNfke3bf4tedxn61PB3R5t+j3v26C 29aaglXVHyHswal7ubcFX57WhDaLfwLzTr/9kFo7pu3b7m70/AyXie3/vUnu wKa9nLPWpV3gqk612TPciUMp4jbPVvcgSZ6hGuvQhcsip9d/M/2CqU/CLSrv eiA3cuy/jsNfIRdwR2n49les4B3lqvn7FROFsus52r9hYcXdHInEb2g0jiq+ NdeLc9tLO5do9yJ6PDa9WK0PjzXPJJX/6oW0It97R4d+TDKElg/EfEcZR8Xr Ob8BFBoc4oje3we3dSyRq8k/4KMR+KBgoA86m6e4w5IHId6t9TE1sB+W2wUP 3r81BJWdAdFrtg7AtnJmxSL/YZiue/+HvXUAAf3yp3gNGZh8Hd7r5PcDM3qK nbxSI4hbaOamLzmIKdmnDZ/aR7CipzBlQc0gjD4uOnXOmYlFXn6Gys5D4Nqz oY9axALbQ7OcXv5hOAmcNPf3YqFupMPhwcphTBlqWJr7sBCmqKdgKjiM0Y9J /Gp+LKx+rp7dLjIMoxZux7EAFhTqZR6/khnGK0ch2cNhLJj2j2U8pZH12jbX ViWw8EI86L6n/TCaVFYH5BSx4JKQE85fNQxbzmqhuGEWimcSgqpqhkFn038h NMLCjNl1P5d6Em/1O8FEJgtBEqcutjQOw7z+9Nq7oywkPuE+FdkxjD3fX26/ 8YuF2nIrOX4mud7l6KDcAgqC39e+4RNkIE4+dSBQkMKpA5y1lUIMfLz+h/fb GgopmWPlziIMTF0NY9+9loLc+Ya85vUMHI06T2OIUNg7eSnhtjwD5gu1pNUk KNhzttjxqZP1QhyGMuQpvNwUzMXnwMCeayKy0XspKLWtfhvpxIDva26Fgn0U cq9m3hZwZSBii61sqzqJ97ZOSNCdgVE/p6XLDlIIdlwkL+rPwK6QgmuXtSjo 5/vryccwkNv9126NAYUfKl4JmuUMsB13n0w4S8H8O8/pN3SSbyUzKMGSwqfQ RInD1WQ92rG18VYUGrtKnxx9xcDzD6IHo2wo5Hn/LT/RQvajXZp/5RyFq1WX v1sNkHziPyiKuFLg03KR8182goj+7uY0PwpJlbz/qfCN4NWq4PFYfwqKytlD P1eMwH1f10TINQq6MoMZFmtGIBglH2cfSOHGYjPxvZIjCK5QubAuhMLCas1V bCojMFfMyz0aQeHXbnE2bytyPP1hXu89CoH55T07bEeQ9YkzOe8+BYFNpi+Z 9iT+wUNefg8obBOK9TzlNAKxm0fYhZMpOE3xTKpeIfEDB/fvT6MwVDA1NB0x AnpDp/SZRxS65JtaPcrI9cePtH4opPCAwefFUTGCUfdb3zyKKJx5aCAdXjmC Xcd7lgkXk+slO9yT6kg+AZavTj0n+a3tEalvIut90an+UELqwT1iI9BP8le6 vftBBYWDA5wzT5cykesKi/BXFJakaabvWs5EnJbD5pUNpN4WobpV/EwsT96z KZHYoHtZcvtqJhTFS7MzX5P71bby4Iw4E0YJoYyCRgpXqiQiNJWYOHpzsjir iTwf9yHZZ8YEV5kH/58OCuOe45wWFkzQHQTMrT6S5+lEJqP7LBPuO8fGmohL eXnzO2yJjV2H0zsp1Pn27H3jwsRoeaDCoc8UPp/xOp13neTT1nvFpofCOtLJ N4eQfLZPG78iNl/bL/0klEneC6dAmS8UBlp1WOkRTJhLB9UNEI/uF/aKT2Ai mGdqzuQbhcUbShN8nzIR0dJdu76PgiaHo/e/XCam0iufuxOHfVl/xjOfxNvg zv6OmC/uxka358RCQTGX+ikILzF5blPFxB4t656KAQpbGVPtuh+In0mZbxsi 72OOEp/ILMmHO3ZVCpNCkcnUsiY2FgaZr62GiJctLuG5xsGC+U4muyKLAt1U jWuIi4Up5RmJUuL13PvnClaQvmV4UrKBIvux1GPqbGRBbPQ6veYnBdryFYy5 TSzIjMQrs49RiC1tG8xTYJF6tf6nRqzBb9QnuJ2Fo1xd5XnEjyrMPvfRWLBl U7sYM07BQeh8w1VDFhSretswSepdK1+/+QQLSSHKcCEWdaZqeo1ZoLe68qYR N9W70DVOsxB8rK1v0S+y34sexQL2xFJynlXEv99fT39C+uguKxkusSkKR69o pJ72ZyF3w+VtmsRZ0tzJ/IEsxA0wmp2JTbzCE91vsJBl9+hcJXGZbHTU/jtk v/d1ZU3+UPANTPbrekTysb4R7fKXwtLLnFoW2Sy8khnfdJs4wfYC/0AOC0Y5 jw1ziPO1lVOpAhaaZn+YDhMP8DXXLKhg4blglunJaQouHDvDgypZpD9kRF4i nptIPMZTQ+pnUnz6NrHgR9uBlQ0kn+ipylpi7ftsXBtbSb1SHUs3zlD4eMu6 KbudBY0Zl/K9xJZ+jXFbP7LwVcbKzJjY2zJuo2o3qf9SHvcg4lxZRe0jP0g+ V3Zs+EK8qvj0zYvT5HzOLmGvfxRSs2qP//1H6uNzVeMWsWLCJlEfNlK3NytE kok1vX7nBC8i1t9ZU018Vf1W811eCsuDukQXzZL3dcdkvBg/ha+ipVkCxDHS J8+kCxCj7KsEcc6SDeNPyRww/6BusZe49325QBXp81//HilxJ3aslOw+KE3s t6ElkHgm70b6Gxlyn4dtHkQSr4w5rtRO5oCYn+6px8QapqwTgztJnrxTVzuJ 2w4bil1QIX2V0/h4H7EFSgZ/qpK+xhnAYBF7rr/uMU3mhvljJx2OOQrZgyJ3 l+mQ8zk05mSIg+8FmvfoUojwqHy/ldhSnyn1VI+sv87BQJVYuKws9/AJst9d lLsu8ZST5CURE1JXNx6RE8StUmG7maZkfQeW+2niG7dO1oWdIddbx5s6Elvv rw41JXMjwil34BLxvj+yenK2ZD96MvLexH/O/P385gKp72j3eCixrVL8T24P CnuU/wWnEe9nsBV/ukI8kLfqEbFoku3VR97kuTQSt88h/rBkF6dWAIkn+s36 BXFe+YPGNUFk/9YR/OXEN105I4fI3GgyKgiuIj7Q/UE45BbJ57JI52tisUha r1EkOZ9RW/iOeOZgRqbMHRIv/qFFC3FB7sWtrxLIeTdGN3USR1h1/44lc2b5 hTKdLuJzQgde2iSR3xui934hXh8goMGZQfIJV3/SRzy76+rSjqz5/QVJ/iDu ZH5vyXhMXFtwcWh+/RTtuEtPSV8sXpDMmF//RP6pg89IfLHHmUzi8zxrJVYV kN8XDN6giDUq/Qf7i+bv/4T2T+I5WX3XwDJy/JXN+QniT19e7DpG5orvDo13 k8RF0eKzklUk3uEh/t/EkZoh1RM15H6JheyeInaYHQ2uqSfP3zlrzT/EWvlG utFkrvgm0NX+EkvZ0ldYviX51HSsmSZmE5Hp3EbmSsTTkZ55dzXfus/RSo43 7rk5Q/z8+u+zre2kPrRVG/8RR+8+vTGVzJWklpzceTuN1rFcyBwxX6wnPUus nU7+xvTMP4+00HlLm8R48JO5YJ5a+nXeC3hnab3fSbzzvDJzxD3VVgvzSJ/3 jfY5M+8S97cNfqTPO83p3553jPyOW3oj8+9fc+G8nXsTDcVJ3z4au6953jqx C4V+kr5t/ovqm7eMzvkv9Amyr5n1Y/NeyN6WFvGb5P9b6u+8vxbutjcnfcy8 X3123mX2qZsVSR9Y7vZqbt6xov9Nzn9zsc1/RvE/eY27+w== "]]}, Annotation[#, "Charting`Private`Tag$211095#3"]& ]}, {}}, 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, 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->{{0, 1}, {0., 1.0000000000000018`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.774262723282547*^9, 3.7742627388377447`*^9}, 3.7742637636687183`*^9, {3.774287110086497*^9, 3.774287143441832*^9}}, CellLabel->"Out[83]=", CellID->871842890] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107564], Cell["Interpolate colors:", "Text", TaggingRules->{}, CellChangeTimes->{{3.774262750160475*^9, 3.77426275310926*^9}}, CellID->441744458], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Table", "[", RowBox[{ RowBox[{"Hue", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "1", ",", ".1"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7742621486585093`*^9, 3.7742621763885183`*^9}}, CellLabel->"In[88]:=", CellID->513265914], Cell[BoxData[ RowBox[{"{", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0., 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0., 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.1], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.10000000000000002`, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.1`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.1, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.1], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.2], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.20000000000000004`, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.2`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.2, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.2], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.30000000000000004`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.30000000000000004`, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.30000000000000004`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.30000000000000004`, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.30000000000000004`], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.4000000000000001, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.4`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.4, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.4], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.5, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.5`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.5, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.5], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.6000000000000001], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.6000000000000001, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.6000000000000001`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.6000000000000001, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.6000000000000001], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.7000000000000001], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.7000000000000001, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.7000000000000001`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.7000000000000001, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.7000000000000001], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.8000000000000002, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.8`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.8, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.8], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.9], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.9, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.9`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.9, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.9], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0., 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "1.`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[1., 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[1.], Editable->False, Selectable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7742621637594757`*^9, 3.774262176867016*^9}}, CellLabel->"Out[88]=", CellID->963073216] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Table", "[", RowBox[{ RowBox[{"Hue", "[", RowBox[{"SmootherStep", "[", "x", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "1", ",", ".1"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7742621486585093`*^9, 3.7742621691435432`*^9}, { 3.774263767659293*^9, 3.774263767734123*^9}}, CellLabel->"In[9]:=", CellID->617377457], Cell[BoxData[ RowBox[{"{", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0., 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0., 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.008560000000000002], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.008559999999999993, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.008560000000000002`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.008560000000000002, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.008560000000000002], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.057920000000000006`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.057920000000000006`, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.057920000000000006`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.057920000000000006`, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.057920000000000006`], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.16308000000000006`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.16308000000000003`, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.16308000000000006`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.16308000000000006`, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.16308000000000006`], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.31744], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.31744, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.31744`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.31744, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.31744], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.5, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.5`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.5, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.5], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.6825600000000003], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.6825600000000002, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.6825600000000003`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.6825600000000003, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.6825600000000003], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.8369199999999997], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.8369199999999997, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.8369199999999997`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.8369199999999997, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.8369199999999997], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.9420799999999989], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.9420799999999989, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.9420799999999989`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.9420799999999989, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.9420799999999989], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[0.9914400000000008], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0.9914400000000008, 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "0.9914400000000008`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.9914400000000008, 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[0.9914400000000008], Editable->False, Selectable->False], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {Hue[1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->Hue[0., 1., 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"Hue", "[", "1.`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[1., 1, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], Hue[1.], Editable->False, Selectable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.7742621730361023`*^9, 3.7742637686569*^9}, CellLabel->"Out[9]=", CellID->177172320] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Properties and Relations", "Subsection", TaggingRules->{}, CellChangeTimes->{{3.7742872285953465`*^9, 3.774287239171404*^9}}, CellID->232113220], Cell[TextData[{ "The resource function ", ButtonBox["SmoothSkip", BaseStyle->"Hyperlink", ButtonData->{ URL["https://resources.wolframcloud.com/FunctionRepository/resources/\ SmoothStep/"], None}, ButtonNote-> "https://resources.wolframcloud.com/FunctionRepository/resources/\ SmoothStep/"], " is second-order discontinuous at ", Cell[BoxData[ RowBox[{ StyleBox["x", "TI"], "=", "0"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ RowBox[{ StyleBox["x", "TI"], "=", "1"}]], "InlineFormula", FontFamily->"Source Sans Pro"], ", creating artifacts in some uses. ", Cell[BoxData["SmootherStep"], "InlineFormula", FontFamily->"Source Sans Pro"], " addresses this:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7742626042637863`*^9, 3.774262617083795*^9}, { 3.774263774332406*^9, 3.7742638056493053`*^9}, {3.774287154362924*^9, 3.7742872154450316`*^9}, {3.859374619509095*^9, 3.859374640850565*^9}}, CellID->431081979], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ RowBox[{"SmootherStep", "''"}], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.774262620837964*^9, 3.7742626843894997`*^9}, { 3.774263786530117*^9, 3.774263786645191*^9}}, CellLabel->"In[10]:=", CellID->970210401], Cell[BoxData[ GraphicsBox[{{{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" 1:eJxTTMoPSmViYGDQB2IQfTRO8f7//+/3M0CB2jdTn7IfCH5Hr9fONx8QfJ89 xZNvPkTwL0kec998GMF/cCVrQ1o7gv/Ha0vjWT4E38TcXWW27Ds432G/4P1F Qm/gfP0Fy+cFab2C86csXNYxzfsFnD8tyOuFm8szOL8qZqfP/PgncP5v0bNq KUGP4PxP7z219/o9gPOnu6pk1ty+A+c3c/1LCz9xA843bczLa/p1Bc6/bLHx 1FX7i3B+6PwqFZaMU3D+BIMDx/7cOgTnVzMY1vuFb4XzOZ67RLCJI/hTzkYY 7ru2Bc5fM6vhsW4Ygn/H5II7b+hmON8uM1/gTNBGOJ9pSbTz5Dmr4Hypwuav TDIIvrHd6uVFs1fC+Sk3fnEHzVoB5x/lmXVFYMYyRPyW3kjtm7wIzpfuWyUg LDoVzt93Jb7cTXUKnJ8gLXqv0nQynL9kRf3qB6ET4fyItpU9MbrdcP4cYZGo w76diPSxoE5dK68dzs/cHXzo+7pmOP/rg9/vVRMr4Py63xe6Pi8sgfPZxJap HnxUAOfrTVuwbceJJIT6aVNvLJ8SBudfaz/260KEP5wPAC871DU= "]], LineBox[CompressedData[" 1:eJwdWHk41N/3H5I9BjPvQaJsUSpUaOFcspSEqFSibJUlRVRSiShlqVBo+VRI 1hLqY6u5lrIz1qjIOmYxiZQ+hO/8fn/d5/Xcc59zXq9zzj33uavcTzt4CZJI JAsBEun/1u4bH2cZB+2gWyRMo2BPPlw6JmkMr9xBa1+cXpZXJfisdRfJWOcD x0MS9r6yrYOMAeEWg3tBYCK0vClHoANMtx3SI9WHg3l4y/iA8QD8zf/ukZp1 DXjacb/JY4NQsjLyvn50FNSV0o51xQ2DrvCrOU+rm+DcrTSl0smE2ycFh0fc 78D0rwr/rzt4cGXjwfxdg8kQsjGi52LPNLwcEXgmdjodBDc1qp3RJ6FzVBMG ZTId1gZq1NneJSETy4uLKmczoHLMSTFigoSaX0y5GJx/DguFDaasbAE07jOs 6BH2ArRcYycqiCVozWRNUsXtXLifk+H8mbEUTa0SqKmVyYN+dZXluhrCqMzB +Gd7Yh7kvbvuP3BBGO0qfrOXnZwPzyPTrB2URdDJ85lSxNNXEPy3YE2Umyjq WNhRY9jzGngGtioX68WRAW3I2VihEJiuhs7P5STQgw1Xf5odLoSrsaoyei4S yP1Yhart10I4oh/p6ftdAk1Vbgr3HCgCdWOFv8Fiy5BMlIbJXdYbMJt6eW2z qjSykxAp4fwphfHZbtuQMzLofomE3cPNZVAkHVKucksG9XuRmbsDy4CYWN4U lS6D/LECJZ9bBvfPDwbe7ZJBscE6Z073lwMzqVc010AW1X3bqzVd/Q7K1/LY ojxZRI47QM8gvYcYR9vEckE55LTV+cB+4/fwiPfcUldeDjGTPCPfvn0PnkNv PI+ZySEh6/MDF7LpMFf0seBbohxaedi26Uothq2qy5UuraWgmgIG7dMoBpdP 99zcjCnopIijxwahSvDM/EtI2FHQq2Kn2W+oEkT/SvjmBVCQibSblmlZJYj7 PuGsKaagIa/hs6k9lfC6kzVoWENB1yu86JO/K0FKR+GSeCcFNXv7HEjbWAXd y/L0BX5S0JGas5FL8qtgLkL0i9F6KiIt/93q3FgFJTCz/Px2KsoIuLC8mF0F C+9q9S9ZUxFX+XKhp2Y1SHvHhH7xoqKLIdcHPjyphjRXibypVCpKXZ+6PTqh BuKnjig9n6Eis62V2LuoBq5+Y4lYLiHQuAXbfHdnDfD8S7L5lYCQy5Y9UsQH GKjx7nihTiBWTK9LUuoH6LkoSrzaQ6CEZIGh4LIPYJWdIe7oRKDt6drHnb58 gCgFue0lxwh0pyzEX3HFR1CQfilfG0ggI7ZC2NOnH8HqUqv030QCDU2bLomo /Ag9zB+mrx4SKJbkc8Nj6CPE6J811Egn0ACt7Lamei2IvxvccPg1gW6pDcmJ WtRCVnpAkkIJgTZtEE9he9UCrTw77NF7AkVbHn6a96IWljYdyuc1EEjfIUI9 vq4WjpwK3lvBINBXl5ys0+xa0Ll9Fey6CaQbPFugv7YOBtLzKqoGCPT5qupm ik0dpJgE5KePEigy1rr0l18dnM32y93FIVBP+oPKkpd1YAx2CaNTBIp4VWXx oLUOFmU+f/3ym0A65Zz60B91cEdoeCZ5lkDdH2VtXWTqoYezjaK4QKCr7Vvb TfTroSrlrbu7AA2t6Xc/sNKxHrYMqVMChGiok33rs0BQPWg9PHjIUoSGrvwq dB1OqoeQZDWPITEa0hL4MlTzph6IXCd3C0kaapdcciKzux642R9vnJaioUvy a7k3Zuph4ISZkBuZhjTVHU97yzfAcMkjUUVZGmJsCP1pvaUB+s68+PBAjoYu bks/r3O4AUo8NvkNU2hI3apxblloAxzzoq6bptJQi8PPsImHDUDfpbSlmaCh C67LhdoqGuD9iGKlP42GVH12RBf2NYC1+PCvHj5uCvaVTFpogN3xlqKS8jR0 LjzxTrBKI7w0p2mL8vHKuHKKE2oEZ4HVN5v59g0pwylGbo2AUqwOHeHjoAyJ FYoRjWDRZ91QzPenXLDx2VxaI+zPEFz2iR9PXbmzRl81/3wlcqjmxxtYey37 /Ugj7BD91BDC56PUkbvu6dIm+GWT/GJWhoY+9ne8DtdsAlcPRwVLvh5nOHOb Paya4LhKn/0Rvl6Kv9XKzE82wZ99wmHGfD1rBGxMNG82gUDP0042X2+awiNL dkMTKBEBpRn8/JQlrIjW4zZBT2jep0p+/o5IPqkPkWiG/1wGcB4/v2mLz2zE bZpBs3Axb3yGQOYhavEOfs1wV89B0myaQGNTGa0PYptBYafvhNcPfr0wXzis bW4G0/30/xRYBGo5qp10ltcM2w65Xc4ZJlBAb05X+bIWkJJOMRb/RqC3TfkH bWxbYDLnro5RF78/i4pcT7W2wDvXg+0OdH4/6Wx++maiBa7kme10LyVQVObb wXnpVogedPEzKyJQQ2qpZ7x9K2gr/TofnEmg/VfpPq/aWqEifldO7i0C/fkP 5c1MtkJdm8sTi2sEat4y+FtFjAFxelD8OpRAZ4rcjU5qM2DWzfA3yY9AbzK9 yv94M+Ck6VPWVWsCXffQ/Kp0kQHmGphdYEqggyvH/qJbDNjtvOtSsRGBZlNP mtzMYUBMj5eUoSY//jjfSgUuA8bavafXL1JRw9mA2q1+beD9pGiTbDYVPdTV Z7leaoMLtben7zymIj/elOi12Da4m7dMm3mXiqRPBFk35rVBcl1FFuUiFe07 fL7ZmdcG1CUx5Bs7qagfXe645N8OlMPz39l9FMRKoxXHXG6H7E1+Dz4xKGhK qDDpQWw7dHYF/pNeTUEi9cz9JTntIKvnaPkpi4J099r3/GS2Q8yrwg2v+fd5 hJtan8/RDsj/HrbNfl4OaUTUMw/ad0JD9Hij6bws0h3xqD1xtBPqS0SMdozL oq2WCy/O+XdCX498/uovsshWfKN3UmwnuL/U2vmgRBadS3jEba3rhFVye4+s CeTPr7TTPyxNu+DHqFMrMSCD/Kqps5v0uyG/ujtodRYZ/bcoeD7arBuKRap2 Lk8go+vbf/z84tAN9n2k5KlQMnr2poEXcbYbTOqK3WzsyKj7Rdggo5hv36nT 5cGWRqax7Do/w09wPCHepC9IChH73yVnbO+Ba1c1Qma9JBBmem6mWH2GMplu cv0HIWR3cMWJdKIfglut9mxLGIeQGgHVKPYAbF+rV9JpyaWvW8dQtPkxBA5z l5cwdy/Fflue3v86MwRDJ18s7bqyFOdZnJE9tTgErJj/dDJfL8VrXMni8VLD MFtXWcYjhLHWbfv/WnWGIeHv9atiA8JYdZLxydF7GFibJFT1/EQx8aYtyXlo GFwt9DV1fCTw/spn5HH2MMRbvfVoSpHASc0BsZcmh2Ff0esdFrUSWI4pE/mY NALxj0vK6GqSmExzOPtNeQT0H+Tqt36WxOIh7Xs9nEcgeOWef6mmUnhhe4eU b+cIKPYdNiHOkXHY26aex19HgLFx10/XWDIm6X5MY4yMwH7/4olbaWQsoFZq YPBrBC4kWc3HtJCxkNgTVwFiFIoZ1irrNGSwRJfPy2SnURA8SihXNsngWFvP Cw1HR+GfLJHk1YMyWLLOxWz+xCj4fI+z9/8lg6XK7bvdL4xCVtCT6ocrZLHs M4OFdamjkHwfuwT4yWL5U4K2NZ9HQfG6jUDfEjmcypyjzQyNwsyuqlZdQg4r Hvs1qM0dhSDV0U9uWnJ4uSMr+PbcKATSLnQctpHDyltaHh9WYoLt9ndr0xPk sMbSB7wfLkzor6WSPOQpOPNK4r9qx5lgGXf3zVktCtb8Ext+wJ8J3WHtj12N KFiLG0atuMIEqym2eZUTBeu0eRnfeMKEC4aHnpUnUbD+Y724FYNMqEu9pW8j QsV6geHCa9hMeLthlXIOhYp1rdrCDCaZ4GeVWDCwiorXT54JtBMYA4GvZbKf tlHxGosCp/BVY6BdyqsbPkXF2oqktjjtMbhzyYAlcJGKtSbsrB/ojUF8eAXM RFGxZurE9iLTMdikqzdw/DEVq/LWq466jcEYJA7va6DiVVVXHk56j0HShkeV q7uoeGVyC2UhYAwKVpp7M75RsbKpvwgtYgxMxla5pk1TseK9/PGdaWOgrMH9 vEOJwDLGOv/mDY3B+FEvkf0eBCbLXtIt5YxBV4a80GlfAkuNNWZ/mBqD3z7r ec5nCSx51/dRvyALSg/rN+dHEFh0NCecrMaCW2MBlTpPCCxSNjurtJYF5/ZL K/c+J7Dwbesg7Y0scBcK+HMgj8BCWzjHzXaw4PBS/dMfSwhMitO2CfJg8d/3 V91OtxJ40S3kw1VfFnTsJLLTOgm8YFBvEneWBZHf2haf9xL478BJvcxrLLg4 4aumNEzguTclOYUxLHjXk5YUP0bg2Vui6vREFoymFbgwuAT+symL6ElnQWKp AKr8SeAZsT+3R3JZIHXu8fzpGQL/7rcSmyxiwYWf2Jk3S+BfRckR8+UsuOad orNlgcDT0WNzYjUssCHbmzkK0PBPF8NgookFVSqU09uEaHhK/8Z31U4WjLeS oyaFafjHV83BbSMs8JzyfPNRgoZjIz3K3nFZkLGRcaNqGQ2v1nmaCD9Z8I/R kjUJ0jRc1fHVr3KWBZVHW85tlqFh11AFyx2CbPAXEdyVJ0vDs6oHVD6IsWF5 vH/obzkavteQ8MdShg1aDiMsOSoN6wa2ttXJs6H/9UY/IYKGmxQkc61XsoEj sW6glo9PVu6MbFrNhlPvn6q40mh4iXeUi+0GNiysPrq0lo//IVcZMAzYMJ1p 5CcoT8NbSxakHUzY8DZ1fj2Zj7uObmN3WLD58/aK1g++/RmRC1X797DBbF/M xjQ+lnxV/PDTPja09Uyv0eTjFwcmgw4d4fu3jmGH8v2bLayz/eLBhk5RFet0 frz9z31Wu/iyYerM1dWPKDQcsucF6VsgG/Bg2JHjfH6UX8O9xy6yIaSUVy3A 51/waGXRUDgb6g48MPIn0/Buc5dYz5tsmKAduJcrRcNMbqoX8w4bXJwni0sl aTgisdvkZAobAsO2B6aI07DyNjl5zhM25A2JZFmJ0nDpkN2k7ws2HBlW06td SsP7bsU28F6yYejbMRaxhJ8/vfr002/Z8NngdpYBiZ+/3qWXJ9+x4aRlmI3m PIFXh5sdOPuBr/8pgVej/xHYlVEuer6TDREh84odU/z6O/9n8M8XNogpyX8m TRD4nsrm8ovDbNhrJ1w9zyFwk//LU1em2HBv8J/LnkMEPklwLUmzbLgyzxZq 6SPwkverV0YIcOBfNetVwvx637rsWXsUmQOCYjGRgy0E7i7uyxWR58CHSMnw yHoCBxxRjLqpwoGkyJHLv6oJnJWbaBi3ngMlN3uHEb+/qNbXHyXZcIC08Mwu 5B8CF0xWBRP7ODA//sw4OpnANqmLtinOHNjrGCroeYfAEawLAo98+HhxLjQ8 nMA/rvseT4/mwCqtRSV7NwLHrs8CjTscSFC/V1B5kK9H94j8i2QOeMfcmFyw 4+uh4dqYk8kBe9lq5hdjPt9qe93CGg68dzoat5xG4Oyet07dTRwgchoPiUgS +DpPKWy2kwNMG5ntxSQCIxq72WyUA0ENQZH2bCou9gn37VjKBafkwum4f6n4 bthYwswyLlS4LMLlHCr2T9pTtpzgwnnB9xo6/PtR672CmKcmFxTX9wnWhVPx I5nCzGlLLuQtlHRMWVFxiKZ8i7wdFxaycqp6jaj4wLYrv7Y7cSGNnsm4ok3F ZC9r86gTXJAIEY8VFKfiyJKhQWo0F95J3rfn1lKw31G5FYb1XEhFp+7KG1Lw rqAQc+c2LhgJ/t7cqMafJze/+Yb1ckHXpkxwC5mCBwpzy2rZXNDGpk4WLDm8 T9j84EHxcWDKu1csvyeHt+cHJYbsHod7lJSZe4OyWKHqc9ljx3FYn18/MlIv i393o6FK53Hgsk8sGX8tiwtIy/TE/cYhKNmAphoui9X3PW95EDsONYX63lpK slhirkusonkcDAP3GwaZy+DIIa27+7vGof3gqmdya2TwQn2o/MTXcZjTnRoN kJbBP1JWrVYdH4eHRo7HfXrJuNvglHm0OA88NzPFrHzIOC1QKGyfFQ98ans2 Ky5KYaXDTsLfbXlAcjwF5CopfM80J+7GAR6YdN7WCYuUwtFk+0dlXvzzFd8u fRSRwv4vH5aujORBv6lD1JTIMryFoz89jnnAWVVeeOm7OC5siwq9XseDH7fj Gr5miWOd0h7BlQweSAoH/ixwF8fK0VdkHL/xYI1U+47iTjEspNmwvnSeB+9f 3vNXLhTFDDc376it3yFF19Pb2EEYn+i93b+i+Dvc12X23dQQwK5KW6h3y78D K/PxxoRWEj5wdGi3UPV30Dlk1SQeQsKWo5tKOW3fIVbwuFVy0iJdfbI38d+J 7/A1229CpOkvfUBUfdfetROAbG9uVhGaoffsbg6r0Z+AfUmPFactftNb48+9 Ndw6AU1daaefXv9Ff0+pV1PeNQFH/JeoXxaapj9e6b/AOT4B5N7CVoOpH/TD RiVFkWkTMJDxc8FpzSjdIdSNM5M9AQzfmcsnoofpu96Lr/J9PQE7N/0ukBsZ pBuZu8TvxRPwVLrbLlSrj657Q/hDTe0E3DleZxPY1kvXang1Z9g6ASSLdw9T g7vpNHtBb+V+PtY4t3HAtZUulZj75O7oBBy7lRS6+VYdXbh7X7cQj78v2Lat N7eSviC/IHlhms/voUd73I03dFfbykbtP/x9of//P6T/D5awvHw= "]], LineBox[CompressedData[" 1:eJxTTMoPSmViYGAwBmIQfTFCXuo18wd7BijIm3SxWIkTwX9lrMZ/hwfBT7ta tWqqAIL/qOy8q78Ign9zZ0XNIWkE/4T96ZcrtBD8Zd4FR0o9EPxDi2+2Nfgg +Pd/O3l2ByD4EmtEzy2IQPC7eHZfP52B4OefZX2t2IngW/jPFjx3EsE/HXQs Ts37I5xfv3bbtyabT3B+yoYrwZpOn+H8G2y966rNvsD5gmcFvjCrfYXza6wP /buq+Q3OL/3Lyx4i8x3OX5DefkVa+QecP8HxTI+k6k84ny9/tdNh0V9w/j6X HXu3Sf2G8//mxpuF8f2B8xnZL83U/ovgm3kUHfJi+Afn/7qz5oXoJwTfJefE BN9vCH7v78cWrb8QfAUp6c4vTP/hfPfwTs3Lwgj+lIupWRNMEXy9Y3JvuCoR /IpQqylOtQj+wSehNlWNCH4Ic2/Py04Ev9rht86JWQj+iV3Xc1v3IPhCXp9F 9x5A8GNu8u37cgTBf//dlS/lLIIvZrplndM9BD/hyPmwqkcI/srg1/82PkPw bYqU/BXfI/htjHbfIz4j+BcmRM6f8B3Bl1IodT/xG8FPXj/h/f//CD4AnVfY JQ== "]]}, Annotation[#, "Charting`Private`Tag$13260#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, 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->{{-1, 2}, {-5.773499235371153, 5.773483399683367}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.774262637815343*^9, 3.774262684840036*^9}, 3.774263787514282*^9}, CellLabel->"Out[10]=", CellID->222005339] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Neat Examples", "Subsection", TaggingRules->{}, CellID->461278909], Cell[TextData[{ Cell[BoxData["SmootherStep"], "InlineFormula", FontFamily->"Source Sans Pro"], " approximates the animation technique of \"ease-in / ease-out\":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.774262549613419*^9, 3.774262596431046*^9}, { 3.775246331787421*^9, 3.7752463548605433`*^9}, {3.859374651249054*^9, 3.859374662136258*^9}}, CellID->581805741], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Animate", "[", RowBox[{ RowBox[{"Graphics", "[", RowBox[{ RowBox[{"Text", "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{ RowBox[{"SmootherStep", "[", "x", "]"}], ",", "0"}], "}"}]}], "]"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", ".1"}], ",", "1.1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", ".1"}], ",", ".1"}], "}"}]}], "}"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "1"}], ",", "2"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.774262387042738*^9, 3.774262530851316*^9}, { 3.7742638119785337`*^9, 3.774263812128948*^9}}, CellLabel->"In[11]:=", CellID->136056457], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt3XtsVGUexvHuLjEbY0xjVBTsH6sBYpqYKFKXJogVYgArJkU0BrxgoA1G 2WxB1wb9Ay9gYiSpl0SjRMQS5CIqgkYxhVAptGVRLLTdFlqxQhm69EovTGG6 j+cX3x06nTK9MNPL95MsOZf3vOfMmfN7znvOxO7fnvpHWvqf4+Lilv5V/6Qt +FdKZuaCrDnxmpm7ZOnijCWLFs5csmxRxqLMvz/1Fy1crv/N+1Nc3O/THefP t7e3NwMY2To7O/2BzqampkAg0A5gBGtra7NAUDKcP3++BcAI1traaoFw9uxZ AgEAgQDAIRAAOAQCAIdAAOAQCAAcAgFDRVuf9L+H2O43uueYQMCQUVdXV1tb +9+IqbE26X8P0d9vuH6igEDA4KcbpUpj7969B3tJm2hDu9X2oYeffvpp165d ubm5mojmfkP7idqpJhAw+KkidMf88ccfddM89YfTp0+rWLTcZjWhWS10DdTY NrHCDO3hks6cOZOfn6+q1ETkW/V/v6H9RO1UEwjDSesfYn0gA8zKSrdpV1Y+ n+/EiRPl5eVVVVW2RBOa1UKtcgVlm7jCDO7BUYbojDU2NnYbCPs8vQ2ESPbb q36idqojDIRz587ZUbkJDDa6qpubm+vr6xsaGmw21kc0YKysDh06pH99Hl2x n3/++ejRo+fMmaNq1djgoYceuv7667du3apV1sY2CS7M4B5MU1OTzthbb72l RwO/36/GwWvVrQWCJmyJDkab+C6mrXS21caSKpL9hjrtCV4S3E/UTnWEgVBT U6N/dcZ0sVmiRusAERF9I7qE9DXZtXTy5El9U8MmuvVBVBc///yzvZ2T9vb2 DRs2xMXFTZ482TIwOTlZs+vXr9cqa6PG2sQVZpceRNdzZWXl7Nmzb7zxxoSE hDVr1nR0dGiooCvcGqjb/R5NqDyVPNnZ2bm5uSoWe+mnlqodRcTq1at/+OEH bRvJfrulDtVV8JLgfqJ2qi8ZCLrSLly4sGrVqqVLl+rAFMjff/99IBAIbaa1 rYg6u+psfKtvqtOj5Ro86/ocul+KHbldXa6sVPv2Bl4j1Y0bNyoBpk6dqmrV J73nnns0++mnn2qVtVHj0MK0HnSudMF/880348aNS01N/fXXX3NycjTeWLhw oVZpj1ah6ragoECBoAmVpwpfVXDttdcqOrS5ZhUpv/zyy8yZM8ePH5+fn686 6nm/4WjDHTt2bNq0SYmkAwg9/ssaAsEiGSHoU+uMzZgx4/7773/66ae7fWrQ YLURsaDLUvcpjQ06L6bvSN+a1sb6APtOF5VdXVZWxcXFjV5higpn8+bNFgj6 jGqZkpKiWaWEVlkbNdYmwYVpPajQ1H7lypXx8fGvvvqq2tsZ0wN7UlLSnXfe qYkW77dCNSvwaEKzSh41XrdunaJj0aJF2q9ujooU1cXx48c1MrGHl3D7tcPu DEMPO1dffbU+lKZVj+oquJ/LlwBdRBIIWqtmH3zwgU54eXm5HbBbqxjXrE6a Tk4uYkE3F11soddYUVHR119/bT+cDTk7d+7URaVLy0YLqovDhw/bSxLR5bpl yxZdkBoYnPVYIOgmq1XWRo21SXBhWg+NXoquWLHis88+01nSDe7dd9/VgF/T 2ur555/fvXu32mta3RYWFtphuP2qmR7t9aiSmJg4duzY1157zQZmaqNvIdx+ tVZ5oh0988wz/wzxwgsvpKWl6fivvPLK9PT0gwcPtnpvhFw/UQmD30USCDpj yquHH354ypQpmZmZ+vitQe8QbLqqqqqsrOw/iDpFtArfvsouKioqdLNTg1gf Y1+Ulpbqomr542nUlXODRxehCwS7Di0QdIfVKmujq7rbQLB3Dhr36hRVV1c/ +OCDY8aMSUhI+Oijj+y8Bb+bLfRowmLknXfe2bNnj9pobVZW1pdffvl7Bfn9 2dnZerLQoYbbr/WgYcmjjz46P8SCBQumTZsW55k9e7YiSOON4H4uYwRcLJJA CAQCq1atWrx4sZ5rNEL77rvvdM67tFFo6LScQ9Tpi7OXYF3SQN+RHhl0XQ3R 78UO264uK6sjR460eGUluiZ1f7dAsHcO9957r2aVElplbdRYmwQXputBpa1T pDGtnv0feOCB3377bcOGDTfccIPuzkoDDeztvYS6VdgqEOx+rU6ee+656667 bu3ate48nzhxQo8MEyZMUEsdcM/77eGR4Ysvvhg1atR7771nj3sWR66fga/8 MCIJBJ0NXVr6OHbtnTx5spVfGQaNVu83dA0DWr2/f+VUexQIsT7AAeDKSp+x yWMP3RYIVncuELTK2qhxaGFaaeu0vP766/Hx8bplKzmtTnU7vuuuuyZNmqQJ lbZ6ULMijyY0a8/OOTk5io6MjAx1pYcLRUpqaqpiQdVhURNuv/auo1va9quv vnr//ffVf4v3y2aXfqJ2qiMJhBZvAGCXlnJ7eFxjw4m+EQ3eSkpKlNX2+uvo 0aPHjh2zW2esj24AWFnpA2rC/XFgGyHoMdb+QOjdd99tjww25rcbujbRLcwV pvXQ4qXoK6+8optyp/eLjOtTFa3H+by8PEWEluiyP3DggN36rY1lguo0OTk5 MTHxpptu0uBZS+xHh5732/OfO9bm2qn6d0uC+4naqY4wEDDI2UuwyspKXUJ6 ALdR3PBIg5agQLAna6tK3VKvuuqqWbNm2SOGbtOa3bZtm73fEzUOLUzXQ8Bz NoiNHLR5u/d/SaAluv1ZIGgiuKUNQpYvX759+3Yb4Qev7Xm/4dgnDddP1E41 gTBsqPyD/552rA9nIFlZlZaWurcK+rAaFNmLR4s+TWhWC10MqrGWBBdmlx66 3Vfwct2yD3g0EdxG9aJ+7NEstIee9xu54H56u22fEQgY/FQRqouysjLd0/2e c97bVCtJW2LTWmgvJEWNtYnP57PC7NJDJNThvz1uL5Ho/35D+4naqSYQMPip Is6cOVNYWKinobKIqbE20YZWmH3ooaKiIs+jiWjuN7SfqJ1qAgFDhf3Xzb0S +odK+tBDTPbbbT9RQCBgqGjrk/73ENv9RvccEwgA/o9AAOAQCAAcAgGAQyAA cAgEAE63gdDW1hbN/9AVQAz1HAhKA5/PV1ZWVgpguDt27Jj9WapwgaDEUBoU FhZWAhjWKioq9u7da38KpudAqKqqCvenXQAMG0VFRQ0NDZcMBA0kYn2kAC4v v99PIAAwBAIAh0AA4BAIABwCAYBDIABwCAQADoEAwCEQADgEAgCHQADgEAgA HAIBgEMgAHAIBAAOgQDAIRAAOAQCAIdAAOAQCAAcAgGAQyAAcAgEAA6BAMAh EAA4BAIAh0AA4BAIABwCAYBDIABwCAQADoEAwCEQADgEAhA5n8+3bt26tZ6N Gzdu27bNSqZvSktL9+zZM4CH138EAhA5FcLcuXPT0tKefPLJW2655Yorrjh1 6lSfe8vKyrrjjjsG8PD6j0AA+qC6unr06NFvvPGGpmtra1evXv3mm29q/GBr i4uLV6xYoVHEhQsXNJuXl7dr166VK1eWlJRoVPDyyy/bwODFF19MSkqK4acI RSAAvdXW1nbbbbc9/vjjmtYIYdKkSfPnz3/iiScmTpxYX1+/b9++m2+++dln n50+ffpjjz2mCho3blxycrLajxkzZtasWWqZkJCgDbOzszUb609zEQIB6K1H HnlEQ33FgqY1MFCx2/KUlJS33347PT19yZIlmq2rqxs/fvy3336r9NixY4eW 6Clj/fr1mpgyZYqW5+TkWKoMHgQC0Ct6TBg7dqx7Oli2bJnu+DadkZGhgcG8 efM+/PBDWzJ16lRN69/Dhw93eomxe/duTWhgoIhQJrz00ksx+AzhEQhA5LZv 3z5q1KhNmzY1NjYqE2praz/55BMNA2pqajQ7YcKELVu2qMZnzJihwsnLy9Oj wf79+/VMcejQIW0+efLknTt3amLatGlbt249fvy4zQ4eBAIQOT0LXHPNNRMn TkxMTLz11ltvv/324uLizMzMpKQkFbuGB2qjcLjvvvumT5+uZmvWrFEdaWBQ UlKiVampqfY6ce7cuRoqfPzxxzwyAEOX6qKurq4mSCAQ0PKKioqjR4+6Zlp4 5MgR94tkU1OTqskmOjo6NNHc3KwJFVd9fX0sPkdYBAIAh0AA4BAIABwCAYBD IABwCAQADoEAwCEQADgEAgCHQADgEAgAHAIBgEMgAHAIBAAOgQDAIRAAOAQC AIdAAOAQCAAcAgGAQyAAcAgEAA6BAMAhEAA4BAIAh0AA4BAIABwCAYBDIABw CAQADoEAwCEQADiRB0JlZWWsDxbA5dXR0RFhIJSXl/sBDGuq94KCgksGgoYH +fn5RQCGtUJPU1NTD4Egmm1sbGwAMNwpDVqCdBsIrQBGjEsGAoCRyQVCR0dH rI8FQIxZIPj9fvsNAsCIZTmgQAh4P0oGAIxsFgj/A2vjqIE= "], {{0, 123}, {347, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{347, 123}, PlotRange->{{0, 347}, {0, 123}}]], "Output", TaggingRules->{}, CellChangeTimes->{3.7742625323351717`*^9, 3.774263814063452*^9}, CellLabel->"Out[11]=", CellID->690977777] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Source & Additional Information", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source & Additional Information"}, CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[TextData[{ "Contributed By", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Contributed By", Cell[ BoxData[ FrameBox[ Cell[ "Enter the name of the person, people or organization that should be \ publicly credited with contributing this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoContributedBy"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Contributed By"}, DefaultNewCellStyle->"Text", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell["Flip Phillips (FlipPhillips.com)", "Text", CellID->865788010] }, 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["interpolation", "Item", CellID->432240414], Cell["smooth spline", "Item", CellID->232553445], Cell["sigmoid", "Item", CellID->404735176], Cell["sigmoidal curve", "Item", CellID->680266397], Cell["clamped spline", "Item", CellID->315202628], Cell["spline", "Item", CellID->934040892] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Categories"}, DefaultNewCellStyle->"Item", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Interfaces & Connections"}], "\" \"", "\"External Interfaces & Connections\""}, "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, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""}, "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, "Notebook Documents & Presentation"}], "\" \"", "\"Notebook Documents & Presentation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Repository Tools"}], "\" \"", "\"Repository Tools\""}, "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, "Strings & Text"}], "\" \"", "\"Strings & Text\""}, "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, "User Interface Construction"}], "\" \"", "\"User Interface Construction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram Physics Project"}], "\" \"", "\"Wolfram Physics Project\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Core Language & Structure"}], "\" \"", "\"Core Language & Structure\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["Geometry", {False, "Geometry"}], "\" \"", "\"Geometry\""}, "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, "Just For Fun"}], "\" \"", "\"Just For Fun\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Machine Learning"}], "\" \"", "\"Machine Learning\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Programming Utilities"}], "\" \"", "\"Programming Utilities\""}, "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, "Sound & Video"}], "\" \"", "\"Sound & Video\""}, "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, "Time-Related Computation"}], "\" \"", "\"Time-Related Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Visualization & Graphics", {False, "Visualization & Graphics"}], "\" \"", "\"Visualization & Graphics\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, {"\<\"\"\>"} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxVT8tKA0EQBDVmV8SzJ8nJ237EsiYhIEbS4n12UkmGzIvpnsP49c6qiJ66mqqiqvqmox\ lJsaDrbZaYpaP5cII+Y3+45Ktnw0LNGsFBUqEHKm4M1ujF4+\ IlO6SKhuCqTYkJnu7fDWdlzcfXW0XrpOLJaK4pG4FjbvsswVVad9S8phCRpNDNoATHkAyqcr6Nk5sP\ F9/5091lC26WeyNqrGi2UpbxS7RPsPjLTCOCzc7/\ D7zbeEGKCT91294XyiOjrr7dgUNOGm8lgppV9nrSfAKBrGVf"}, CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->382407649] }, 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["UnitStep", "Item", CellID->565338136], Cell["Rescale", "Item", CellID->498167924], Cell["HeavisideTheta", "Item", CellID->476555944], Cell["LogisticSigmoid", "Item", CellID->708065406], Cell["Clip", "Item", CellID->590780336], Cell["BSplineCurve", "Item", CellID->373989394], Cell["BSplineFunction", "Item", CellID->161902472] }, 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["SmoothStep", "Item", CellID->478925841], Cell["GeneralizedSmoothStep", "Item", CellID->538186058], Cell["RationalSmoothStep", "Item", CellID->897745747] }, 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[TextData[{ "Perlin, K., \"An Image Synthesizer.\" In: ", StyleBox["SIGGRAPH '85: Proceedings of the 12th annual conference on \ Computer graphics and interactive techniques", FontSlant->"Italic"], ", vol. 24., no. 3., 287\[Dash]296, 1985. DOI: 10.1145/325334.325247" }], "Text", CellID->507037545], Cell[TextData[{ "Perlin, K., \"Improving noise.\" In: ", StyleBox["ACM Transactions on Graphics", FontSlant->"Italic"], ", vol. 21, no. 3, 681\[Dash]682, 2002. DOI: 10.1145/566654.566636" }], "Text", CellID->770507706], Cell[TextData[{ "Ebert, D. S., Musgrave, F. K., Peachey, D., Perlin, K., Worley, S., ", StyleBox["Texturing & Modeling: A Procedural Approach", FontSlant->"Italic"], ", third edition. San Francisco, CA: Morgan Kaufmann Publishers, 2003. ", ButtonBox["https://books.google.de/books?id=F4t-5zSsqr4C&redir_esc=y", BaseStyle->"Hyperlink", ButtonData->{ URL["https://books.google.de/books?id=F4t-5zSsqr4C&redir_esc=y"], None}, ButtonNote->"https://books.google.de/books?id=F4t-5zSsqr4C&redir_esc=y"] }], "Text", CellID->312159144] }, 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["Wikipedia\[Dash]Smoothstep", BaseStyle->"Hyperlink", ButtonData->{ URL["https://en.wikipedia.org/wiki/Smoothstep"], None}, ButtonNote->"https://en.wikipedia.org/wiki/Smoothstep"]], "Item", CellID->138837172], Cell[TextData[ButtonBox["RSL Functions: Step\[Dash]Renderman", BaseStyle->"Hyperlink", ButtonData->{ URL["https://renderman.pixar.com/resources/RenderMan_20/rslFunctions.html#\ step"], None}, ButtonNote-> "https://renderman.pixar.com/resources/RenderMan_20/rslFunctions.html#step"]\ ], "Item", CellID->994286192] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Tests", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"VerificationTests", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Specify an optional list of tests for verifying that the function \ is working properly in any environment. Tests can be specified as \ Input/Output cell pairs or as symbolic ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "VerificationTest", "SymbolsRefLink", ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"], BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, { "Link"}]], ButtonData -> "paclet:ref/VerificationTest", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " expressions for including additional options."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoVerificationTests"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "VerificationTests"}, DefaultNewCellStyle->"Input", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"SmootherStep", "/@", RowBox[{"{", RowBox[{"0", ",", ".5", ",", "1"}], "}"}]}], " ", "\[Equal]", " ", RowBox[{"{", RowBox[{"0", ",", ".5", ",", "1"}], "}"}]}]], "Input", CellChangeTimes->{{3.7742622758305063`*^9, 3.774262312078148*^9}, { 3.774263824208275*^9, 3.774263824311655*^9}}, CellLabel->"In[12]:=", CellID->474158128], Cell[BoxData["True"], "Output", CellChangeTimes->{3.7742623126140347`*^9, 3.77426382504678*^9}, CellLabel->"Out[12]=", CellID->658983156] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Compatibility", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Compatibility", Cell[ BoxData[ FrameBox[ Cell[ "Specify any known compatibilities for your resource to ensure it is \ discoverable on the correct platforms.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibility"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Compatibility"}, CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[TextData[{ "Wolfram Language Version", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityWolframLanguageVersionRequired", Cell[ BoxData[ FrameBox[ Cell[ "Enter required Wolfram Language Version (e.g. 12.1+).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> { "SectionMoreInfoCompatibilityWolframLanguageVersionRequired"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{ "TemplateGroupName" -> "CompatibilityWolframLanguageVersionRequired"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{ "CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell["12.3+", "Text", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Operating System", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityOperatingSystem", Cell[ BoxData[ FrameBox[ Cell[ "Select all operating systems where your resource is expected to \ function properly.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityOperatingSystem"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityOperatingSystem"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Windows", {False, "Windows"}], "\" \"", "\"Windows\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["MacOSX", {False, "MacOSX"}], "\" \"", "\"Mac\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Unix", {False, "Unix"}], "\" \"", "\"Unix\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 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->589765368] }, 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[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebooks"}], "\" \"", "\"Notebooks\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Kernels"}], "\" \"", "\"Parallel Kernels\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Access"}], "\" \"", "\"Cloud Access\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 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->851691753] }, 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[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Session", {False, "Session"}], "\" \"", TemplateBox[{ "\"Session\"", "\"Local or cloud interactive session\""}, "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["BatchJob", {False, "BatchJob"}], "\" \"", TemplateBox[{"\"BatchJob\"", "\"Remote batch job\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Script", {False, "Script"}], "\" \"", TemplateBox[{"\"Script\"", "\"Script run in batch mode\""}, "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]}, {"\<\"\"\>"} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Subkernel", {False, "Subkernel"}], "\" \"", TemplateBox[{"\"Subkernel\"", "\"Parallel or grid subkernel\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["Scheduled", {False, "Scheduled"}], "\" \"", TemplateBox[{"\"Scheduled\"", "\"Scheduled task\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, {"\<\"\"\>"} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 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->71422750] }, 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[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[True, {False, True}], "\" \"", "\"Supported in cloud\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, 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->131115484] }, 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["NA", "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}, CellChangeTimes->{{3.774262324422688*^9, 3.774262324432225*^9}}, CellTags->"TabNext", CellID->527241058] }, 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->"SmootherStep | 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.867862999022464`16.340046071990184*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}, "DefaultContentMethod" -> "Legacy"}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.867862999075884`16.34004607199618*^9, "VersionInformation" -> {"ResourceVersion" -> "1.0.0"}, "TemplateVersion" -> "1.6.4", "StatusMessage" -> "", "SubmissionReviewData" -> {"Review" -> False}}, CreateCellID->True, FrontEndVersion->"13.1 for Linux x86 (64-bit) (June 16, 2022)", 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.1 for Linux x86 (64-bit) (June 16, 2022)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Name"->{ Cell[628, 23, 95, 2, 70, "Title",ExpressionUUID->"b906c9b3-57ae-41de-93cb-f803a3f32c5c", CellTags->{"Name", "TemplateCell", "Title"}, CellID->588243223]}, "TemplateCell"->{ Cell[628, 23, 95, 2, 70, "Title",ExpressionUUID->"b906c9b3-57ae-41de-93cb-f803a3f32c5c", CellTags->{"Name", "TemplateCell", "Title"}, CellID->588243223], Cell[726, 27, 124, 2, 70, "Text",ExpressionUUID->"abacad53-4481-437c-9691-d9ef46737036", CellTags->{"Description", "TemplateCell"}, CellID->359655847]}, "Title"->{ Cell[628, 23, 95, 2, 70, "Title",ExpressionUUID->"b906c9b3-57ae-41de-93cb-f803a3f32c5c", CellTags->{"Name", "TemplateCell", "Title"}, CellID->588243223]}, "Description"->{ Cell[726, 27, 124, 2, 70, "Text",ExpressionUUID->"abacad53-4481-437c-9691-d9ef46737036", CellTags->{"Description", "TemplateCell"}, CellID->359655847]}, "Definition"->{ Cell[875, 33, 1206, 29, 70, "Section",ExpressionUUID->"d908d7a7-8742-480d-8856-9c909c4cf308", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "Function"->{ Cell[875, 33, 1206, 29, 70, "Section",ExpressionUUID->"d908d7a7-8742-480d-8856-9c909c4cf308", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "TemplateCellGroup"->{ Cell[875, 33, 1206, 29, 70, "Section",ExpressionUUID->"d908d7a7-8742-480d-8856-9c909c4cf308", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[5113, 155, 1980, 50, 70, "Subsection",ExpressionUUID->"4782180b-6c55-49f7-a4d5-58b3fdabbf59", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[8455, 269, 1429, 32, 70, "Subsection",ExpressionUUID->"1ced3e8f-f7f5-4d2d-85cc-1c51aeaed239", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[10970, 345, 7029, 152, 70, "Section",ExpressionUUID->"1ca0d6f3-de53-4baa-8fad-5c89e97e5ed4", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[110668, 2733, 1026, 26, 70, "Subsection",ExpressionUUID->"5b84dc62-5869-43d3-9929-4fd88cb37c32", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[111802, 2767, 996, 26, 70, "Subsection",ExpressionUUID->"d05e208c-801b-42a2-8442-5c4d6d9b27cc", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[113137, 2816, 221, 6, 70, "Subsection",ExpressionUUID->"4d1bbae5-325f-4e4c-a642-c13dc63ca8ba", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[121742, 3082, 980, 26, 70, "Subsection",ExpressionUUID->"6a022cef-4349-4e9c-b718-a47d8af4b83c", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[123107, 3134, 1039, 26, 70, "Subsection",ExpressionUUID->"620387ab-8015-458c-8ddb-9d8c1c35284e", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[124349, 3174, 1084, 26, 70, "Subsection",ExpressionUUID->"576de5da-7266-4564-8a05-eaff003cf493", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[126553, 3235, 923, 26, 70, "Subsection",ExpressionUUID->"03f76602-7065-4e86-9d68-f5907cfddd3e", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[128079, 3283, 1874, 45, 70, "Subsection",ExpressionUUID->"db9243b9-d29c-4b9b-b75a-08c3c3ab0d4c", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[130550, 3353, 955, 25, 70, "Subsection",ExpressionUUID->"19dfd8fc-5b64-4e6c-9d80-268b128cde9f", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[131530, 3382, 1174, 31, 70, "Subsubsection",ExpressionUUID->"26f67d29-7962-405a-b2dd-0306b0ae77ac", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[132833, 3422, 1113, 29, 70, "Subsubsection",ExpressionUUID->"3923d9bd-ab9a-432d-8510-1eca309c6fd7", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[136084, 3520, 1280, 33, 70, "Subsubsection",ExpressionUUID->"bd0b586e-70f2-4ee2-b2bb-8a20ab8f06d4", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[139553, 3623, 1913, 46, 70, "Subsubsection",ExpressionUUID->"b60db342-57ac-4217-890c-e95cb66c3d0c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[145492, 3793, 1071, 27, 70, "Subsubsection",ExpressionUUID->"0d8b5cec-536c-4475-bcce-f150f6ac1afa", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[147845, 3865, 1155, 28, 70, "Section",ExpressionUUID->"6345ed4c-f83d-46ae-a819-f78da3bfcd55", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[149563, 3909, 1033, 26, 70, "Section",ExpressionUUID->"2f765239-d708-43be-927e-1d8695e781c9", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]}, "Documentation"->{ Cell[4893, 146, 195, 5, 70, "Section",ExpressionUUID->"72fc2e74-3ded-4321-918c-e7f628399ee5", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307]}, "TemplateSection"->{ Cell[4893, 146, 195, 5, 70, "Section",ExpressionUUID->"72fc2e74-3ded-4321-918c-e7f628399ee5", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[110394, 2724, 249, 5, 70, "Section",ExpressionUUID->"e95085ef-974d-4d39-9f2f-62a3b2449690", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Usage"->{ Cell[5113, 155, 1980, 50, 70, "Subsection",ExpressionUUID->"4782180b-6c55-49f7-a4d5-58b3fdabbf59", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310]}, "Details & Options"->{ Cell[8455, 269, 1429, 32, 70, "Subsection",ExpressionUUID->"1ced3e8f-f7f5-4d2d-85cc-1c51aeaed239", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Notes"->{ Cell[8455, 269, 1429, 32, 70, "Subsection",ExpressionUUID->"1ced3e8f-f7f5-4d2d-85cc-1c51aeaed239", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "TabNext"->{ Cell[9887, 303, 221, 6, 70, "Notes",ExpressionUUID->"5be33d8d-7c59-45c2-8fed-ac9bbd773bc8", CellTags->"TabNext", CellID->832587311], Cell[10111, 311, 301, 10, 70, "Notes",ExpressionUUID->"04aec68b-158e-473f-945f-d9212579cab3", CellTags->"TabNext", CellID->838930226], Cell[149003, 3895, 523, 9, 70, "Text",ExpressionUUID->"5d738877-f29d-4bfa-8094-4cd09f026802", CellTags->"TabNext", CellID->527241058], Cell[150599, 3937, 515, 8, 70, "Text",ExpressionUUID->"72cdf50e-1a84-4cd0-8f53-fb06f0c4c8ec", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Examples"->{ Cell[10970, 345, 7029, 152, 70, "Section",ExpressionUUID->"1ca0d6f3-de53-4baa-8fad-5c89e97e5ed4", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011]}, "Source & Additional Information"->{ Cell[110394, 2724, 249, 5, 70, "Section",ExpressionUUID->"e95085ef-974d-4d39-9f2f-62a3b2449690", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Contributed By"->{ Cell[110668, 2733, 1026, 26, 70, "Subsection",ExpressionUUID->"5b84dc62-5869-43d3-9929-4fd88cb37c32", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "ContributorInformation"->{ Cell[110668, 2733, 1026, 26, 70, "Subsection",ExpressionUUID->"5b84dc62-5869-43d3-9929-4fd88cb37c32", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "Keywords"->{ Cell[111802, 2767, 996, 26, 70, "Subsection",ExpressionUUID->"d05e208c-801b-42a2-8442-5c4d6d9b27cc", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425]}, "Categories"->{ Cell[113137, 2816, 221, 6, 70, "Subsection",ExpressionUUID->"4d1bbae5-325f-4e4c-a642-c13dc63ca8ba", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[113361, 2824, 8344, 253, 70, "Output",ExpressionUUID->"58cc7b70-0dbf-4ee2-99da-7e94c52dc6a6", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->382407649]}, "Categories-Checkboxes"->{ Cell[113361, 2824, 8344, 253, 70, "Output",ExpressionUUID->"58cc7b70-0dbf-4ee2-99da-7e94c52dc6a6", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->382407649]}, "CheckboxCell"->{ Cell[113361, 2824, 8344, 253, 70, "Output",ExpressionUUID->"58cc7b70-0dbf-4ee2-99da-7e94c52dc6a6", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->382407649], Cell[133949, 3453, 2098, 62, 70, "Output",ExpressionUUID->"d3cff6b3-f4e6-46c9-ba6f-e09aa3cd6707", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368], Cell[137367, 3555, 2149, 63, 70, "Output",ExpressionUUID->"dbda95e0-216b-4ae6-a6a1-702a08ca7407", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753], Cell[141469, 3671, 3986, 117, 70, "Output",ExpressionUUID->"ee306672-485e-4e61-b6a4-5a5758e228ee", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750], Cell[146566, 3822, 1218, 36, 70, "Output",ExpressionUUID->"b75092a5-7947-4d31-a4e9-1ffcb5a272bf", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "Related Symbols"->{ Cell[121742, 3082, 980, 26, 70, "Subsection",ExpressionUUID->"6a022cef-4349-4e9c-b718-a47d8af4b83c", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169]}, "Related Resource Objects"->{ Cell[123107, 3134, 1039, 26, 70, "Subsection",ExpressionUUID->"620387ab-8015-458c-8ddb-9d8c1c35284e", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472]}, "Source/Reference Citation"->{ Cell[124349, 3174, 1084, 26, 70, "Subsection",ExpressionUUID->"576de5da-7266-4564-8a05-eaff003cf493", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552]}, "Links"->{ Cell[126553, 3235, 923, 26, 70, "Subsection",ExpressionUUID->"03f76602-7065-4e86-9d68-f5907cfddd3e", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773]}, "Tests"->{ Cell[128079, 3283, 1874, 45, 70, "Subsection",ExpressionUUID->"db9243b9-d29c-4b9b-b75a-08c3c3ab0d4c", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "VerificationTests"->{ Cell[128079, 3283, 1874, 45, 70, "Subsection",ExpressionUUID->"db9243b9-d29c-4b9b-b75a-08c3c3ab0d4c", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "Compatibility"->{ Cell[130550, 3353, 955, 25, 70, "Subsection",ExpressionUUID->"19dfd8fc-5b64-4e6c-9d80-268b128cde9f", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822]}, "CompatibilityWolframLanguageVersionRequired"->{ Cell[131530, 3382, 1174, 31, 70, "Subsubsection",ExpressionUUID->"26f67d29-7962-405a-b2dd-0306b0ae77ac", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "Wolfram Language Version"->{ Cell[131530, 3382, 1174, 31, 70, "Subsubsection",ExpressionUUID->"26f67d29-7962-405a-b2dd-0306b0ae77ac", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "DefaultContent"->{ Cell[132707, 3415, 89, 2, 70, "Text",ExpressionUUID->"497c1591-14b0-498b-ba31-3df44f2d37ed", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768], Cell[150599, 3937, 515, 8, 70, "Text",ExpressionUUID->"72cdf50e-1a84-4cd0-8f53-fb06f0c4c8ec", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "ScrapeDefault"->{ Cell[132707, 3415, 89, 2, 70, "Text",ExpressionUUID->"497c1591-14b0-498b-ba31-3df44f2d37ed", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768]}, "CompatibilityOperatingSystem"->{ Cell[132833, 3422, 1113, 29, 70, "Subsubsection",ExpressionUUID->"3923d9bd-ab9a-432d-8510-1eca309c6fd7", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[133949, 3453, 2098, 62, 70, "Output",ExpressionUUID->"d3cff6b3-f4e6-46c9-ba6f-e09aa3cd6707", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368]}, "Operating System"->{ Cell[132833, 3422, 1113, 29, 70, "Subsubsection",ExpressionUUID->"3923d9bd-ab9a-432d-8510-1eca309c6fd7", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406]}, "CompatibilityOperatingSystem-Checkboxes"->{ Cell[133949, 3453, 2098, 62, 70, "Output",ExpressionUUID->"d3cff6b3-f4e6-46c9-ba6f-e09aa3cd6707", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368]}, "CompatibilityFeatures"->{ Cell[136084, 3520, 1280, 33, 70, "Subsubsection",ExpressionUUID->"bd0b586e-70f2-4ee2-b2bb-8a20ab8f06d4", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[137367, 3555, 2149, 63, 70, "Output",ExpressionUUID->"dbda95e0-216b-4ae6-a6a1-702a08ca7407", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753]}, "Required Features"->{ Cell[136084, 3520, 1280, 33, 70, "Subsubsection",ExpressionUUID->"bd0b586e-70f2-4ee2-b2bb-8a20ab8f06d4", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156]}, "CompatibilityFeatures-Checkboxes"->{ Cell[137367, 3555, 2149, 63, 70, "Output",ExpressionUUID->"dbda95e0-216b-4ae6-a6a1-702a08ca7407", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753]}, "CompatibilityEvaluationEnvironment"->{ Cell[139553, 3623, 1913, 46, 70, "Subsubsection",ExpressionUUID->"b60db342-57ac-4217-890c-e95cb66c3d0c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[141469, 3671, 3986, 117, 70, "Output",ExpressionUUID->"ee306672-485e-4e61-b6a4-5a5758e228ee", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750]}, "Environments"->{ Cell[139553, 3623, 1913, 46, 70, "Subsubsection",ExpressionUUID->"b60db342-57ac-4217-890c-e95cb66c3d0c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563]}, "CompatibilityEvaluationEnvironment-Checkboxes"->{ Cell[141469, 3671, 3986, 117, 70, "Output",ExpressionUUID->"ee306672-485e-4e61-b6a4-5a5758e228ee", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750]}, "Cloud Support"->{ Cell[145492, 3793, 1071, 27, 70, "Subsubsection",ExpressionUUID->"0d8b5cec-536c-4475-bcce-f150f6ac1afa", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371]}, "CompatibilityCloudSupport"->{ Cell[145492, 3793, 1071, 27, 70, "Subsubsection",ExpressionUUID->"0d8b5cec-536c-4475-bcce-f150f6ac1afa", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[146566, 3822, 1218, 36, 70, "Output",ExpressionUUID->"b75092a5-7947-4d31-a4e9-1ffcb5a272bf", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "CompatibilityCloudSupport-Checkboxes"->{ Cell[146566, 3822, 1218, 36, 70, "Output",ExpressionUUID->"b75092a5-7947-4d31-a4e9-1ffcb5a272bf", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "Author Notes"->{ Cell[147845, 3865, 1155, 28, 70, "Section",ExpressionUUID->"6345ed4c-f83d-46ae-a819-f78da3bfcd55", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591]}, "Submission Notes"->{ Cell[149563, 3909, 1033, 26, 70, "Section",ExpressionUUID->"2f765239-d708-43be-927e-1d8695e781c9", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 274116, 6265}, {"TemplateCell", 274298, 6269}, {"Title", 274633, 6276}, {"Description", 274814, 6280}, {"Definition", 274992, 6284}, {"Function", 275188, 6288}, {"TemplateCellGroup", 275393, 6292}, {"Documentation", 279245, 6353}, {"TemplateSection", 279438, 6357}, {"Usage", 279812, 6364}, {"Details & Options", 280006, 6368}, {"Notes", 280209, 6372}, {"TabNext", 280414, 6376}, {"Examples", 281020, 6389}, {"Source & Additional Information", 281230, 6393}, {"Contributed By", 281443, 6397}, {"ContributorInformation", 281679, 6401}, {"Keywords", 281901, 6405}, {"Categories", 282093, 6409}, {"Categories-Checkboxes", 282491, 6416}, {"CheckboxCell", 282705, 6420}, {"Related Symbols", 283830, 6436}, {"Related Resource Objects", 284043, 6440}, {"Source/Reference Citation", 284267, 6444}, {"Links", 284472, 6448}, {"Tests", 284656, 6452}, {"VerificationTests", 284874, 6456}, {"Compatibility", 285088, 6460}, {"CompatibilityWolframLanguageVersionRequired", 285318, 6464}, {"Wolfram Language Version", 285591, 6468}, {"DefaultContent", 285854, 6472}, {"ScrapeDefault", 286206, 6479}, {"CompatibilityOperatingSystem", 286410, 6483}, {"Operating System", 286881, 6490}, {"CompatibilityOperatingSystem-Checkboxes", 287146, 6494}, {"CompatibilityFeatures", 287404, 6498}, {"Required Features", 287856, 6505}, {"CompatibilityFeatures-Checkboxes", 288108, 6509}, {"CompatibilityEvaluationEnvironment", 288365, 6513}, {"Environments", 288846, 6520}, {"CompatibilityEvaluationEnvironment-Checkboxes", 289119, 6524}, {"Cloud Support", 289381, 6528}, {"CompatibilityCloudSupport", 289626, 6532}, {"CompatibilityCloudSupport-Checkboxes", 290105, 6539}, {"Author Notes", 290348, 6543}, {"Submission Notes", 290548, 6547} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[628, 23, 95, 2, 70, "Title",ExpressionUUID->"b906c9b3-57ae-41de-93cb-f803a3f32c5c", CellTags->{"Name", "TemplateCell", "Title"}, CellID->588243223], Cell[726, 27, 124, 2, 70, "Text",ExpressionUUID->"abacad53-4481-437c-9691-d9ef46737036", CellTags->{"Description", "TemplateCell"}, CellID->359655847], Cell[CellGroupData[{ Cell[875, 33, 1206, 29, 70, "Section",ExpressionUUID->"d908d7a7-8742-480d-8856-9c909c4cf308", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[2084, 64, 2080, 58, 70, "Input",ExpressionUUID->"fc1bb639-88ee-4f10-8a91-9c17993c713b", CellID->537706402], Cell[4167, 124, 689, 17, 70, "Input",ExpressionUUID->"a5a184fa-1f2f-402d-a0c8-1958ac5a12f5", CellID->714793740] }, Open ]], Cell[CellGroupData[{ Cell[4893, 146, 195, 5, 70, "Section",ExpressionUUID->"72fc2e74-3ded-4321-918c-e7f628399ee5", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[5113, 155, 1980, 50, 70, "Subsection",ExpressionUUID->"4782180b-6c55-49f7-a4d5-58b3fdabbf59", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[7118, 209, 142, 4, 70, "UsageInputs",ExpressionUUID->"f7cc9754-330c-4413-adb8-1d369d729950", CellID->173731633], Cell[7263, 215, 397, 15, 70, "UsageDescription",ExpressionUUID->"5b81c774-bfdc-4bf8-9833-fa78b1cfa289", CellID->737453494] }, Open ]], Cell[CellGroupData[{ Cell[7697, 235, 263, 9, 70, "UsageInputs",ExpressionUUID->"80f58131-79ef-4305-8ac1-719337a56cad", CellID->762892197], Cell[7963, 246, 443, 17, 70, "UsageDescription",ExpressionUUID->"4724ab82-f26b-4975-8c95-690a2f32d772", CellID->293204228] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[8455, 269, 1429, 32, 70, "Subsection",ExpressionUUID->"1ced3e8f-f7f5-4d2d-85cc-1c51aeaed239", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[9887, 303, 221, 6, 70, "Notes",ExpressionUUID->"5be33d8d-7c59-45c2-8fed-ac9bbd773bc8", CellTags->"TabNext", CellID->832587311], Cell[10111, 311, 301, 10, 70, "Notes",ExpressionUUID->"04aec68b-158e-473f-945f-d9212579cab3", CellTags->"TabNext", CellID->838930226], Cell[10415, 323, 506, 16, 70, "Notes",ExpressionUUID->"c96e7792-1255-4bb7-99d9-152178fa988c", CellID->234955554] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[10970, 345, 7029, 152, 70, "Section",ExpressionUUID->"1ca0d6f3-de53-4baa-8fad-5c89e97e5ed4", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell[18024, 501, 75, 2, 70, "Subsection",ExpressionUUID->"92d5846c-23e8-4000-bbce-17c22c43c200", CellID->904125756], Cell[18102, 505, 353, 7, 70, "Text",ExpressionUUID->"b93b2ec4-ac0a-4fc0-88c1-5616f6e0a610", CellID->540922061], Cell[CellGroupData[{ Cell[18480, 516, 245, 6, 70, "Input",ExpressionUUID->"4af871a9-8dd6-4d88-909d-b81e6e206a2f", CellID->511777899], Cell[18728, 524, 202, 5, 70, "Output",ExpressionUUID->"24c6fcc4-036c-4a2f-b9dd-d2ac81a5abf8", CellID->989713502] }, Open ]], Cell[18945, 532, 232, 4, 70, "Text",ExpressionUUID->"a7480e11-0c1f-4caa-8906-4061a5e773dc", CellID->803313474], Cell[CellGroupData[{ Cell[19202, 540, 246, 6, 70, "Input",ExpressionUUID->"a0b78cce-05d9-47d7-ba6f-1be8d2345f35", CellID->878365628], Cell[19451, 548, 174, 4, 70, "Output",ExpressionUUID->"f70b9535-e4b1-4f94-9ddf-310d869ba9c7", CellID->692887730] }, Open ]], Cell[CellGroupData[{ Cell[19662, 557, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"474251d5-dedc-459d-a6c3-7bf9093efb71", CellID->14107562], Cell[19808, 563, 192, 4, 70, "Text",ExpressionUUID->"796346f1-15f4-469c-b1ad-1260d5a8039a", CellID->787187369], Cell[CellGroupData[{ Cell[20025, 571, 376, 11, 70, "Input",ExpressionUUID->"a8eb3e02-c350-4e1c-8ffb-84408f8c36e0", CellID->666044047], Cell[20404, 584, 8077, 156, 70, "Output",ExpressionUUID->"4bb05b25-039c-4d37-a4ce-e327d6a2a47a", CellID->777255173] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[28542, 747, 66, 2, 70, "Subsection",ExpressionUUID->"98adc06a-5b7d-4c4a-9ed1-23fb28f207d9", CellID->204653245], Cell[28611, 751, 477, 14, 70, "Text",ExpressionUUID->"7bd9ff23-1b26-4f59-a27d-e3ba80a3154a", CellID->624875659], Cell[CellGroupData[{ Cell[29113, 769, 246, 6, 70, "Input",ExpressionUUID->"fc5857f8-7032-41fe-a862-1141780c2ed6", CellID->884859976], Cell[29362, 777, 186, 5, 70, "Output",ExpressionUUID->"726ec965-3565-4bdb-b40c-1cbc330e8da8", CellID->34711034] }, Open ]], Cell[CellGroupData[{ Cell[29585, 787, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"df37ffef-6910-4620-be75-3e7b04e8a0ce", CellID->14107563], Cell[29731, 793, 224, 4, 70, "Text",ExpressionUUID->"6904133d-9812-4d02-9772-0368c2d441f8", CellID->192434427], Cell[CellGroupData[{ Cell[29980, 801, 480, 15, 70, "Input",ExpressionUUID->"3b1d6700-86ea-4a31-b899-3ba35a5e5409", CellID->514021828], Cell[30463, 818, 9080, 171, 70, "Output",ExpressionUUID->"cd8ceb84-3e4b-4942-ac1d-bb60befe32ec", CellID->905898871] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[39604, 996, 73, 2, 70, "Subsection",ExpressionUUID->"411e52b6-0ae0-4f20-ab7f-84f65a57b6ed", CellID->605265931], Cell[39680, 1000, 278, 7, 70, "Text",ExpressionUUID->"b8f3a6d6-f7fc-4c9f-8a32-07b7a76a99bc", CellID->436661374], Cell[CellGroupData[{ Cell[39983, 1011, 574, 16, 70, "Input",ExpressionUUID->"b657e091-ef59-4640-bdc0-5361d3a8ccf0", CellID->83808608], Cell[40560, 1029, 15298, 276, 70, "Output",ExpressionUUID->"45a718fc-7450-4083-9218-1899a70b735a", CellID->871842890] }, Open ]], Cell[CellGroupData[{ Cell[55895, 1310, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"34c53792-2f97-4e50-b72a-1935f2e38ac5", CellID->14107564], Cell[56041, 1316, 139, 3, 70, "Text",ExpressionUUID->"212c297b-d37a-4c5d-937f-1a2a9e37ac4c", CellID->441744458], Cell[CellGroupData[{ Cell[56205, 1323, 315, 9, 70, "Input",ExpressionUUID->"03a7381b-c6a2-4441-9e65-704212883551", CellID->513265914], Cell[56523, 1334, 17477, 485, 70, "Output",ExpressionUUID->"1650b8c3-b78c-444e-9923-2606abafb17e", CellID->963073216] }, Open ]], Cell[CellGroupData[{ Cell[74037, 1824, 404, 11, 70, "Input",ExpressionUUID->"85821301-ce43-42ef-8774-d5e8ba578c45", CellID->617377457], Cell[74444, 1837, 17824, 493, 70, "Output",ExpressionUUID->"51ce69ec-a3e3-41b5-b11c-75458261826b", CellID->177172320] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[92329, 2337, 153, 3, 70, "Subsection",ExpressionUUID->"33f3807c-c2e0-4cea-992c-418dcab04455", CellID->232113220], Cell[92485, 2342, 992, 29, 70, "Text",ExpressionUUID->"a677f168-71de-4d75-a824-5ea7b6ab8225", CellID->431081979], Cell[CellGroupData[{ Cell[93502, 2375, 401, 12, 70, "Input",ExpressionUUID->"20919ce2-063d-4153-8c70-e6f75d3c2d0c", CellID->970210401], Cell[93906, 2389, 10038, 188, 70, "Output",ExpressionUUID->"449e6b43-3065-4dbb-8f58-806459946db1", CellID->222005339] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[103993, 2583, 74, 2, 70, "Subsection",ExpressionUUID->"a947d71a-1ffd-40e1-9c46-960fac2db3e8", CellID->461278909], Cell[104070, 2587, 382, 9, 70, "Text",ExpressionUUID->"1a178ec8-57bd-4606-bc79-61c604cc2396", CellID->581805741], Cell[CellGroupData[{ Cell[104477, 2600, 856, 27, 70, "Input",ExpressionUUID->"0405e712-9445-496e-94dc-dfd4b1e5c19e", CellID->136056457], Cell[105336, 2629, 4997, 88, 70, "Output",ExpressionUUID->"29b9cdb7-421a-4b4d-8358-2e45d0b4a840", CellID->690977777] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[110394, 2724, 249, 5, 70, "Section",ExpressionUUID->"e95085ef-974d-4d39-9f2f-62a3b2449690", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[110668, 2733, 1026, 26, 70, "Subsection",ExpressionUUID->"5b84dc62-5869-43d3-9929-4fd88cb37c32", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[111697, 2761, 68, 1, 70, "Text",ExpressionUUID->"3c6a4fea-422b-46f3-a5ca-f94fa2d6fb2d", CellID->865788010] }, Open ]], Cell[CellGroupData[{ Cell[111802, 2767, 996, 26, 70, "Subsection",ExpressionUUID->"d05e208c-801b-42a2-8442-5c4d6d9b27cc", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[112801, 2795, 49, 1, 70, "Item",ExpressionUUID->"41cc7350-6fdd-468f-9947-e10a3febbfac", CellID->432240414], Cell[112853, 2798, 49, 1, 70, "Item",ExpressionUUID->"020797d3-c521-4ebd-9f1c-aeb88e0f993c", CellID->232553445], Cell[112905, 2801, 43, 1, 70, "Item",ExpressionUUID->"64758d0a-4a59-4f23-9a82-2fe99e3abb02", CellID->404735176], Cell[112951, 2804, 51, 1, 70, "Item",ExpressionUUID->"31f33da5-b8ed-441e-af8e-dfb08bc148c0", CellID->680266397], Cell[113005, 2807, 50, 1, 70, "Item",ExpressionUUID->"6da28e69-f057-4cbf-bd99-39f5c7d9e941", CellID->315202628], Cell[113058, 2810, 42, 1, 70, "Item",ExpressionUUID->"4f665ef4-4854-4f66-a874-61c8625f4241", CellID->934040892] }, Open ]], Cell[CellGroupData[{ Cell[113137, 2816, 221, 6, 70, "Subsection",ExpressionUUID->"4d1bbae5-325f-4e4c-a642-c13dc63ca8ba", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[113361, 2824, 8344, 253, 70, "Output",ExpressionUUID->"58cc7b70-0dbf-4ee2-99da-7e94c52dc6a6", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->382407649] }, Open ]], Cell[CellGroupData[{ Cell[121742, 3082, 980, 26, 70, "Subsection",ExpressionUUID->"6a022cef-4349-4e9c-b718-a47d8af4b83c", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[122725, 3110, 44, 1, 70, "Item",ExpressionUUID->"33437c5a-65d0-4a38-ad65-9a54a72f7ce4", CellID->565338136], Cell[122772, 3113, 43, 1, 70, "Item",ExpressionUUID->"cb065031-7221-4974-8635-96f5d674daa6", CellID->498167924], Cell[122818, 3116, 50, 1, 70, "Item",ExpressionUUID->"eb9793c8-d69f-415b-b80e-990c148d49e0", CellID->476555944], Cell[122871, 3119, 51, 1, 70, "Item",ExpressionUUID->"9de5324b-0158-4bef-888b-2a9f93421eac", CellID->708065406], Cell[122925, 3122, 40, 1, 70, "Item",ExpressionUUID->"b902c8a2-bafd-42e9-9c00-e4c2c0011815", CellID->590780336], Cell[122968, 3125, 48, 1, 70, "Item",ExpressionUUID->"e85c3ce1-3f20-46b3-8712-5391b9c311c6", CellID->373989394], Cell[123019, 3128, 51, 1, 70, "Item",ExpressionUUID->"e7759078-ac69-46ef-bed6-93cee15b5de0", CellID->161902472] }, Open ]], Cell[CellGroupData[{ Cell[123107, 3134, 1039, 26, 70, "Subsection",ExpressionUUID->"620387ab-8015-458c-8ddb-9d8c1c35284e", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[124149, 3162, 46, 1, 70, "Item",ExpressionUUID->"6b5c3948-7566-4c05-acc5-660db537b4ea", CellID->478925841], Cell[124198, 3165, 57, 1, 70, "Item",ExpressionUUID->"407bd23b-e95d-4d62-a45a-48862a863755", CellID->538186058], Cell[124258, 3168, 54, 1, 70, "Item",ExpressionUUID->"16dfed1e-cd7d-4708-9a4b-4c904cbfeec5", CellID->897745747] }, Open ]], Cell[CellGroupData[{ Cell[124349, 3174, 1084, 26, 70, "Subsection",ExpressionUUID->"576de5da-7266-4564-8a05-eaff003cf493", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[125436, 3202, 308, 7, 70, "Text",ExpressionUUID->"57870efe-e400-4323-9d37-7077e95d302f", CellID->507037545], Cell[125747, 3211, 224, 6, 70, "Text",ExpressionUUID->"d3766871-bf27-4514-8871-e188f2eb650c", CellID->770507706], Cell[125974, 3219, 542, 11, 70, "Text",ExpressionUUID->"6ad3200c-06e1-4ddd-93dc-8e02e8ce231d", CellID->312159144] }, Open ]], Cell[CellGroupData[{ Cell[126553, 3235, 923, 26, 70, "Subsection",ExpressionUUID->"03f76602-7065-4e86-9d68-f5907cfddd3e", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[127479, 3263, 239, 5, 70, "Item",ExpressionUUID->"072dee8c-a606-4eb7-b912-868045863f1b", CellID->138837172], Cell[127721, 3270, 321, 8, 70, "Item",ExpressionUUID->"6c368cca-5817-4381-8ad6-00205da41e66", CellID->994286192] }, Open ]], Cell[CellGroupData[{ Cell[128079, 3283, 1874, 45, 70, "Subsection",ExpressionUUID->"db9243b9-d29c-4b9b-b75a-08c3c3ab0d4c", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[129978, 3332, 380, 10, 70, "Input",ExpressionUUID->"87f54726-d429-4580-8094-64c1776bee90", CellID->474158128], Cell[130361, 3344, 140, 3, 70, "Output",ExpressionUUID->"466d5d60-48b5-4473-aed4-78e83d7b99b0", CellID->658983156] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[130550, 3353, 955, 25, 70, "Subsection",ExpressionUUID->"19dfd8fc-5b64-4e6c-9d80-268b128cde9f", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[131530, 3382, 1174, 31, 70, "Subsubsection",ExpressionUUID->"26f67d29-7962-405a-b2dd-0306b0ae77ac", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[132707, 3415, 89, 2, 70, "Text",ExpressionUUID->"497c1591-14b0-498b-ba31-3df44f2d37ed", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[132833, 3422, 1113, 29, 70, "Subsubsection",ExpressionUUID->"3923d9bd-ab9a-432d-8510-1eca309c6fd7", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[133949, 3453, 2098, 62, 70, "Output",ExpressionUUID->"d3cff6b3-f4e6-46c9-ba6f-e09aa3cd6707", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368] }, Closed]], Cell[CellGroupData[{ Cell[136084, 3520, 1280, 33, 70, "Subsubsection",ExpressionUUID->"bd0b586e-70f2-4ee2-b2bb-8a20ab8f06d4", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[137367, 3555, 2149, 63, 70, "Output",ExpressionUUID->"dbda95e0-216b-4ae6-a6a1-702a08ca7407", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753] }, Closed]], Cell[CellGroupData[{ Cell[139553, 3623, 1913, 46, 70, "Subsubsection",ExpressionUUID->"b60db342-57ac-4217-890c-e95cb66c3d0c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[141469, 3671, 3986, 117, 70, "Output",ExpressionUUID->"ee306672-485e-4e61-b6a4-5a5758e228ee", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750] }, Closed]], Cell[CellGroupData[{ Cell[145492, 3793, 1071, 27, 70, "Subsubsection",ExpressionUUID->"0d8b5cec-536c-4475-bcce-f150f6ac1afa", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[146566, 3822, 1218, 36, 70, "Output",ExpressionUUID->"b75092a5-7947-4d31-a4e9-1ffcb5a272bf", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[147845, 3865, 1155, 28, 70, "Section",ExpressionUUID->"6345ed4c-f83d-46ae-a819-f78da3bfcd55", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[149003, 3895, 523, 9, 70, "Text",ExpressionUUID->"5d738877-f29d-4bfa-8094-4cd09f026802", CellTags->"TabNext", CellID->527241058] }, Open ]], Cell[CellGroupData[{ Cell[149563, 3909, 1033, 26, 70, "Section",ExpressionUUID->"2f765239-d708-43be-927e-1d8695e781c9", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell[150599, 3937, 515, 8, 70, "Text",ExpressionUUID->"72cdf50e-1a84-4cd0-8f53-fb06f0c4c8ec", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)