(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 335374, 7612] NotebookOptionsPosition[ 176529, 4575] NotebookOutlinePosition[ 319682, 7277] CellTagsIndexPosition[ 317873, 7227] WindowTitle->StyledCheckboxBar | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["StyledCheckboxBar", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->36893133], Cell["Create a style-customizable checkbox bar", "Text", CellTags->{"Description", "TemplateCell"}, CellID->871839403], 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[{"Module", "[", "\n", " ", RowBox[{ RowBox[{"{", RowBox[{"type1", ",", " ", "type2", ",", " ", "appearenceDefaults"}], "}"}], ",", "\n", "\n", " ", RowBox[{ RowBox[{"appearenceDefaults", " ", "=", " ", RowBox[{"<|", "\n", " ", RowBox[{ RowBox[{"\"\\"", " ", "->", " ", "\"\\""}], ",", " ", "\n", " ", RowBox[{"\"\\"", " ", "->", " ", "LightGray"}], ",", "\n", " ", RowBox[{"\"\\"", " ", "->", " ", "Orange"}], ",", " ", "\n", " ", RowBox[{"\"\\"", " ", "->", " ", RowBox[{"Lighter", "[", "Gray", "]"}]}], ",", " ", "\n", " ", RowBox[{"\"\\"", " ", "->", " ", "White"}]}], "\n", " ", "|>"}]}], ";", "\n", "\n", " ", RowBox[{"SetAttributes", "[", RowBox[{"StyledCheckboxBar", ",", " ", "ReadProtected"}], "]"}], ";", "\n", " ", RowBox[{ RowBox[{"Options", "[", "StyledCheckboxBar", "]"}], " ", "=", " ", "\n", " ", RowBox[{"{", "\n", " ", RowBox[{ RowBox[{"FontFamily", " ", "->", " ", RowBox[{"CurrentValue", "[", RowBox[{"$FrontEnd", ",", " ", "\"\\""}], "]"}]}], ",", "\n", " ", RowBox[{"Spacings", " ", "->", " ", "1"}], ",", "\n", " ", RowBox[{"Magnification", " ", "->", " ", "1"}], ",", "\n", " ", RowBox[{"Appearance", " ", "->", " ", RowBox[{"Normal", "[", "appearenceDefaults", "]"}]}], ",", "\n", " ", RowBox[{"Enabled", " ", "->", " ", "True"}]}], "\n", " ", "}"}]}], ";", "\n", " ", "\n", " ", RowBox[{"type1", " ", "=", " ", RowBox[{"Except", "[", RowBox[{"{", RowBox[{"Repeated", "[", RowBox[{"_", " ", "->", " ", "_"}], "]"}], "}"}], "]"}]}], ";", "\n", " ", RowBox[{"type2", " ", "=", " ", RowBox[{"{", RowBox[{"Repeated", "[", RowBox[{"_", " ", "->", " ", "_"}], "]"}], "}"}]}], ";", " ", "\n", "\n", " ", RowBox[{ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "var_", "]"}], ",", " ", RowBox[{"vlist", " ", ":", " ", RowBox[{"type1", " ", "|", " ", "type2"}]}], ",", " ", RowBox[{"OptionsPattern", "[", "]"}]}], "]"}], " ", ":=", "\n", " ", RowBox[{"DynamicModule", "[", "\n", " ", RowBox[{ RowBox[{"{", "\n", " ", RowBox[{ "check", ",", " ", "\n", " ", "inactiveColor", ",", " ", "\n", " ", "activeColor", ",", " ", "\n", " ", "hoverColor", ",", " ", "\n", " ", "checkColor", ",", "\n", " ", "fontFamily", ",", " ", "\n", " ", "spacing", ",", " ", "\n", " ", "alignment", ",", "\n", " ", "state", ",", " ", "\n", " ", "deploy", ",", " ", "\n", " ", "align", ",", " ", "\n", " ", "magn", ",", " ", "\n", " ", "selectFromAppearance", ",", " ", "checkMark", ",", "\n", " ", "enabled", ",", " ", "alignmentOrientation", ",", " ", "alignmentPartition"}], "\n", " ", "}"}], ",", "\n", "\n", " ", RowBox[{"(*", " ", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", " ", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"options", " ", "--"}], "--"}], "--"}], "--"}], "--"}], "--"}], "--"}], "--"}]}]}]}]}]}]}]}]}], " ", "*)"}], "\n", " ", RowBox[{ RowBox[{"fontFamily", " ", "=", " ", RowBox[{"OptionValue", "[", "FontFamily", "]"}]}], ";", "\n", " ", RowBox[{"spacing", " ", "=", " ", RowBox[{"OptionValue", "[", "Spacings", "]"}]}], ";", "\n", " ", RowBox[{"magn", " ", "=", " ", RowBox[{"OptionValue", "[", "Magnification", "]"}]}], ";", "\n", "\n", " ", RowBox[{ RowBox[{"selectFromAppearance", "[", "label_", "]"}], " ", ":=", "\n", " ", RowBox[{"Module", "[", "\n", " ", RowBox[{ RowBox[{"{", "assoc", "}"}], ",", "\n", " ", RowBox[{ RowBox[{"assoc", " ", "=", " ", RowBox[{"Association", "[", RowBox[{"OptionValue", "[", "Appearance", "]"}], "]"}]}], ";", "\n", " ", RowBox[{"If", "[", "\n", " ", RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"assoc", ",", " ", "label"}], "]"}], ",", "\n", " ", RowBox[{"assoc", "[", "label", "]"}], ",", "\n", " ", RowBox[{"appearenceDefaults", "[", "label", "]"}]}], "\n", " ", "]"}]}]}], "\n", " ", "]"}]}], ";", "\n", "\n", " ", RowBox[{"inactiveColor", " ", "=", " ", RowBox[{ "selectFromAppearance", "[", "\"\\"", "]"}]}], ";", "\n", " ", RowBox[{"activeColor", " ", "=", " ", RowBox[{"selectFromAppearance", "[", "\"\\"", "]"}]}], ";", "\n", " ", RowBox[{"hoverColor", " ", "=", " ", RowBox[{"selectFromAppearance", "[", "\"\\"", "]"}]}], ";", "\n", " ", RowBox[{"checkColor", " ", "=", " ", RowBox[{"selectFromAppearance", "[", "\"\\"", "]"}]}], ";", "\n", " ", RowBox[{"alignment", " ", "=", " ", RowBox[{"selectFromAppearance", "[", "\"\\"", "]"}]}], ";", "\n", "\n", " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"for", " ", "undefined", " ", "symbols"}], ",", " ", RowBox[{ "enabled", " ", "is", " ", "set", " ", "to", " ", "False"}]}], " ", "*)"}], " ", "\n", " \t\t ", RowBox[{"enabled", " ", "=", " ", RowBox[{"OptionValue", "[", "Enabled", "]"}]}], ";", "\n", " \t\t ", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"MatchQ", "[", RowBox[{"enabled", ",", RowBox[{"Dynamic", "[", "_", "]"}]}], "]"}]}], ",", "\n", "\t\t\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"TrueQ", "[", "enabled", "]"}]}], ",", " ", RowBox[{"Quiet", "[", RowBox[{ RowBox[{"Evaluate", "[", "enabled", "]"}], " ", "=", " ", "False"}], "]"}]}], "]"}], ",", "\n", "\t\t\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"TrueQ", "[", RowBox[{"enabled", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}], ",", " ", RowBox[{"Quiet", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{"enabled", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], " ", "=", " ", "False"}], "]"}]}], "]"}]}], "\n", "\t\t\t", "]"}], ";", " ", "\n", " ", RowBox[{"(*", " ", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", " ", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"-", " ", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{"--", RowBox[{ "--", "--"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}], " ", "*)"}], "\n", "\t\t\t", "\n", "\t\t\t", RowBox[{"(*", " ", RowBox[{ RowBox[{ "Initiates", " ", "the", " ", "variable", " ", "to", " ", "an", " ", "empty", " ", "list"}], ",", " ", RowBox[{ "if", " ", "a", " ", "list", " ", "is", " ", "not", " ", "specified"}]}], " ", "*)"}], "\n", "\t\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{"AtomQ", "[", "var", "]"}], ",", RowBox[{"var", "=", RowBox[{"{", "}"}]}]}], "]"}], ";", "\n", "\t\t\t", "\n", "\t\t\t", RowBox[{"(*", " ", RowBox[{ "handler", " ", "for", " ", "alignment", " ", "of", " ", "the", " ", "checkboxes"}], " ", "*)"}], "\n", "\t\t\t", RowBox[{"If", "[", "\n", " \t\t\t\t", RowBox[{ RowBox[{ RowBox[{"Head", "[", "alignment", "]"}], " ", "===", " ", "List"}], ",", " ", "\n", " \t\t\t\t", RowBox[{ RowBox[{"alignmentOrientation", " ", "=", " ", RowBox[{"alignment", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\n", " \t\t\t\t", RowBox[{"alignmentPartition", " ", "=", " ", RowBox[{"alignment", "[", RowBox[{"[", "2", "]"}], "]"}]}]}], ",", "\n", " \t\t\t\t", RowBox[{ RowBox[{"alignmentOrientation", " ", "=", " ", "alignment"}], ";", "\n", " \t\t\t\t", RowBox[{"alignmentPartition", " ", "=", " ", "1"}]}]}], "\n", " \t\t\t", "]"}], ";", "\n", "\t\t\t", "\n", " ", RowBox[{"(*", " ", RowBox[{ "graphics", " ", "for", " ", "clicked", " ", "and", " ", "unclicked", " ", "states"}], " ", "*)"}], "\n", " ", RowBox[{ RowBox[{"checkMark", "[", "col_", "]"}], " ", ":=", " ", RowBox[{"{", RowBox[{"col", ",", " ", RowBox[{"Thickness", "[", "0.1", "]"}], ",", " ", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0.2", ",", " ", "0.5"}], "}"}], ",", " ", RowBox[{"{", RowBox[{"0.35", ",", " ", "0.35"}], "}"}], ",", " ", RowBox[{"{", RowBox[{"0.75", ",", " ", "0.75"}], "}"}]}], "}"}], "]"}]}], "}"}]}], ";", "\n", " ", "\n", " ", RowBox[{"deploy", " ", "=", " ", RowBox[{ RowBox[{"Deploy", "[", RowBox[{"Graphics", "[", RowBox[{"#", ",", " ", RowBox[{"ImageSize", " ", "->", " ", "15"}], ",", " ", RowBox[{"BaselinePosition", " ", "->", " ", RowBox[{"Scaled", "[", "0.2", "]"}]}]}], "]"}], "]"}], " ", "&"}]}], ";", "\n", " ", "\n", " ", RowBox[{ RowBox[{"state", "[", RowBox[{ "st_", ",", " ", "active_", ",", " ", "hover_", ",", " ", "inactive_", ",", " ", "checkCol_"}], "]"}], " ", ":=", " ", RowBox[{"Module", "[", "\n", "\t\t\t ", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"origin", " ", "=", " ", RowBox[{"{", RowBox[{"0", ",", " ", "0"}], "}"}]}], ",", "\n", "\t\t\t ", "base", ",", " ", "mouseover"}], "\n", "\t\t\t ", "}"}], ",", "\n", "\t\t\t ", RowBox[{"If", "[", "\n", "\t\t\t ", RowBox[{"st", ",", " ", RowBox[{"deploy", "[", RowBox[{"{", RowBox[{"active", ",", " ", RowBox[{"Rectangle", "[", "origin", "]"}], ",", " ", "\n", "\t\t\t ", RowBox[{"Sequence", " ", "@@", " ", RowBox[{"checkMark", "[", "checkCol", "]"}]}]}], "}"}], "]"}], ",", "\n", "\t\t\t ", RowBox[{ RowBox[{"base", " ", "=", " ", RowBox[{"deploy", "[", RowBox[{"{", RowBox[{"inactive", ",", " ", RowBox[{"Rectangle", "[", "origin", "]"}]}], "}"}], "]"}]}], ";", "\n", "\t\t\t ", RowBox[{"mouseover", " ", "=", " ", RowBox[{"deploy", "[", RowBox[{"{", RowBox[{"hover", ",", " ", RowBox[{"Rectangle", "[", "origin", "]"}]}], "}"}], "]"}]}], ";", "\n", "\t\t\t ", RowBox[{"Mouseover", "[", RowBox[{"base", ",", " ", "mouseover"}], "]"}]}]}], "\n", "\t\t\t ", "]"}]}], "\n", "\t\t\t ", "]"}]}], ";", "\n", "\n", " ", RowBox[{"(*", " ", RowBox[{ "a", " ", "single", " ", "checkbox", " ", "\n", " ", "A", " ", "DynamicWrapper", " ", "with", " ", "Dynamic", " ", "is", " ", "used", " ", "for", " ", "handling", " ", "the", " ", "response", " ", "from", " ", "external", " ", "\n", " ", "updates", " ", "to", " ", "the", " ", "control", " ", "variable"}], "\n", " ", "*)"}], "\n", " ", RowBox[{ RowBox[{"check", "[", RowBox[{ RowBox[{"Dynamic", "[", "main_", "]"}], ",", " ", "st_", ",", " ", "label_", ",", " ", "color_List", ",", " ", "style_", ",", " ", "en_"}], "]"}], " ", ":=", "\n", " ", RowBox[{"DynamicModule", "[", "\n", " ", RowBox[{ RowBox[{"{", "\n", " ", RowBox[{"none", ",", "\n", " ", RowBox[{"x", " ", "=", " ", "\"\<\>\""}]}], "\n", " ", "}"}], ",", "\n", " ", RowBox[{"DynamicWrapper", "[", "\n", "\t ", RowBox[{ RowBox[{"Dynamic", "[", "\n", "\t \t", RowBox[{"Row", "[", "\n", "\t ", RowBox[{ RowBox[{"{", "\n", "\t ", RowBox[{ RowBox[{ "Toggler", "[", "\n", "\t ", RowBox[{ RowBox[{ "Dynamic", "[", "\n", "\t ", RowBox[{ "x", ",", "\n", "\t ", RowBox[{ RowBox[{ "(", "\n", "\t ", RowBox[{ RowBox[{"x", " ", "=", " ", "#"}], ";", "\n", "\t ", RowBox[{"If", "[", RowBox[{ RowBox[{"TrueQ", "[", RowBox[{"x", " ", "==", " ", "st"}], "]"}], ",", "\n", "\t ", RowBox[{"If", "[", RowBox[{ RowBox[{"!", " ", RowBox[{"MemberQ", "[", RowBox[{"main", ",", " ", "st"}], "]"}]}], ",", " ", RowBox[{"AppendTo", "[", RowBox[{"main", ",", " ", "x"}], "]"}]}], "]"}], ",", "\n", "\t ", RowBox[{"main", " ", "=", " ", RowBox[{"DeleteCases", "[", RowBox[{"main", ",", " ", "st"}], "]"}]}]}], "]"}]}], "\n", "\t ", ")"}], " ", "&"}]}], "\n", "\t ", "]"}], ",", "\n", "\t ", RowBox[{"{", RowBox[{ RowBox[{"st", " ", "->", " ", RowBox[{"state", "[", RowBox[{"True", ",", " ", RowBox[{"Sequence", " ", "@@", " ", "color"}]}], "]"}]}], ",", " ", RowBox[{"none", " ", "->", " ", RowBox[{"state", "[", RowBox[{"False", ",", " ", RowBox[{"Sequence", " ", "@@", " ", "color"}]}], "]"}]}]}], "}"}], ",", "\n", "\t ", RowBox[{"state", "[", RowBox[{"False", ",", " ", RowBox[{"Sequence", " ", "@@", " ", "color"}]}], "]"}], ",", "\n", "\t ", RowBox[{"Enabled", " ", "->", " ", "en"}]}], "\n", "\t ", "]"}], ",", "\n", "\t ", RowBox[{"Spacer", "[", RowBox[{"{", RowBox[{"5", ",", " ", "0"}], "}"}], "]"}], ",", "\n", "\t ", RowBox[{"Style", "[", RowBox[{"label", ",", " ", RowBox[{"Sequence", " ", "@@", " ", "style"}]}], "]"}]}], "\n", "\t ", "}"}], ",", "\n", "\t ", RowBox[{"Alignment", " ", "->", " ", "Center"}]}], "\n", "\t ", "]"}], "\n", "\t ", "]"}], ",", "\n", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{"main", ",", "st"}], "]"}], ",", " ", RowBox[{"x", "=", "st"}], ",", " ", RowBox[{"x", "=", "\"\<\>\""}]}], "]"}]}], "\n", " ", "]"}]}], "\n", " ", "]"}]}], ";", "\n", "\n", " ", RowBox[{"(*", " ", RowBox[{ "horizontal", " ", "and", " ", "vertical", " ", "alignments"}], " ", "*)"}], "\n", " ", RowBox[{"If", "[", "\n", " ", RowBox[{ RowBox[{ "alignmentOrientation", " ", "==", " ", "\"\\""}], ",", "\n", " ", RowBox[{"align", " ", "=", " ", RowBox[{ RowBox[{"Grid", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"Partition", "[", RowBox[{ "#", ",", " ", "alignmentPartition", ",", " ", "alignmentPartition", ",", " ", "1", ",", " ", "Null"}], "]"}], "]"}], ",", " ", RowBox[{"Spacings", " ", "->", " ", "spacing"}]}], "]"}], " ", "&"}]}], ",", "\n", " ", RowBox[{"align", " ", "=", " ", RowBox[{ RowBox[{"Grid", "[", RowBox[{ RowBox[{"Partition", "[", RowBox[{"#", ",", " ", RowBox[{"UpTo", "[", "alignmentPartition", "]"}]}], "]"}], ",", " ", RowBox[{"Spacings", " ", "->", " ", "spacing"}]}], "]"}], " ", "&"}]}]}], "\n", " ", "]"}], ";", "\n", "\n", "\t ", RowBox[{"Magnify", "[", "\n", "\t ", RowBox[{"(*", " ", RowBox[{ RowBox[{ "check", " ", "whether", " ", "labels", " ", "are", " ", "included"}], ",", " ", RowBox[{"and", " ", "process", " ", "accordingly"}]}], " ", "*)"}], "\n", "\t ", RowBox[{ RowBox[{"PaneSelector", "[", "\n", "\t \t", RowBox[{ RowBox[{"{", "\n", "\t \t\t", RowBox[{ RowBox[{"True", " ", "->", " ", RowBox[{"If", "[", "\n", "\t\t\t ", RowBox[{ RowBox[{"MatchQ", "[", RowBox[{"vlist", ",", " ", "type1"}], "]"}], ",", "\n", "\t\t\t ", RowBox[{"Deploy", "[", RowBox[{"align", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"check", "[", RowBox[{ RowBox[{"Dynamic", "[", "var", "]"}], ",", " ", "i", ",", " ", "i", ",", " ", RowBox[{"{", RowBox[{ "activeColor", ",", " ", "hoverColor", ",", " ", "inactiveColor", ",", " ", "checkColor"}], "}"}], ",", " ", RowBox[{"{", "Black", "}"}], ",", " ", "True"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "vlist"}], "}"}]}], "]"}], "]"}], "]"}], ",", "\n", "\t\t\t ", RowBox[{"Deploy", "[", RowBox[{ "align", "[", "\n", "\t\t\t ", RowBox[{ "MapThread", "[", "\n", "\t\t\t ", RowBox[{ RowBox[{ RowBox[{"check", "[", RowBox[{ RowBox[{"Dynamic", "[", "var", "]"}], ",", " ", "#1", ",", " ", "#2", ",", " ", RowBox[{"{", RowBox[{ "activeColor", ",", " ", "hoverColor", ",", " ", "inactiveColor", ",", " ", "checkColor"}], "}"}], ",", " ", RowBox[{"{", "Black", "}"}], ",", " ", "True"}], "]"}], " ", "&"}], ",", "\n", "\t\t\t ", RowBox[{"{", RowBox[{ RowBox[{"vlist", "[", RowBox[{"[", RowBox[{"All", ",", " ", "1"}], "]"}], "]"}], ",", " ", RowBox[{"vlist", "[", RowBox[{"[", RowBox[{"All", ",", " ", "2"}], "]"}], "]"}]}], "}"}]}], "\n", "\t\t\t ", "]"}], "\n", "\t \t\t", "]"}], "]"}]}], "\n", "\t \t\t", "]"}]}], ",", "\n", "\t \t\t", RowBox[{"False", " ", "->", " ", RowBox[{"If", "[", "\n", "\t\t\t ", RowBox[{ RowBox[{"MatchQ", "[", RowBox[{"vlist", ",", " ", "type1"}], "]"}], ",", "\n", "\t\t\t ", RowBox[{"Deploy", "[", RowBox[{"align", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"check", "[", RowBox[{ RowBox[{"Dynamic", "[", "var", "]"}], ",", " ", "i", ",", " ", "i", ",", " ", RowBox[{"{", RowBox[{ RowBox[{"Lighter", "[", "activeColor", "]"}], ",", " ", RowBox[{"Lighter", "[", "inactiveColor", "]"}], ",", " ", RowBox[{"Lighter", "[", "inactiveColor", "]"}], ",", " ", RowBox[{"Lighter", "[", "checkColor", "]"}]}], "}"}], ",", " ", RowBox[{"{", "Gray", "}"}], ",", " ", "False"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"i", ",", " ", "vlist"}], "}"}]}], "]"}], "]"}], "]"}], ",", "\n", "\t\t\t ", RowBox[{"Deploy", "[", RowBox[{ "align", "[", "\n", "\t\t\t ", RowBox[{ "MapThread", "[", "\n", "\t\t\t ", RowBox[{ RowBox[{ RowBox[{"check", "[", RowBox[{ RowBox[{"Dynamic", "[", "var", "]"}], ",", " ", "#1", ",", " ", "#2", ",", " ", RowBox[{"{", RowBox[{ RowBox[{"Lighter", "[", "activeColor", "]"}], ",", " ", RowBox[{"Lighter", "[", "inactiveColor", "]"}], ",", " ", RowBox[{"Lighter", "[", "inactiveColor", "]"}], ",", " ", RowBox[{"Lighter", "[", "checkColor", "]"}]}], "}"}], ",", " ", RowBox[{"{", "Gray", "}"}], ",", " ", "False"}], "]"}], " ", "&"}], ",", "\n", "\t\t\t ", RowBox[{"{", RowBox[{ RowBox[{"vlist", "[", RowBox[{"[", RowBox[{"All", ",", " ", "1"}], "]"}], "]"}], ",", " ", RowBox[{"vlist", "[", RowBox[{"[", RowBox[{"All", ",", " ", "2"}], "]"}], "]"}]}], "}"}]}], "\n", "\t\t\t ", "]"}], "\n", "\t \t\t", "]"}], "]"}]}], "\n", "\t \t\t", "]"}]}]}], "\n", "\t \t", "}"}], ",", "\n", "\t \t", "enabled"}], "\n", "\t ", "]"}], "\n", "\t ", ",", "\n", "\t ", "magn"}], "\n", "\t ", "]"}]}]}], "\n", " ", "]"}]}], ";", "\n", " ", "\n", "\t", RowBox[{"(*", " ", RowBox[{ RowBox[{"Handling", " ", "of", " ", "non"}], "-", RowBox[{"Dynamic", " ", "first", " ", "argument", " ", RowBox[{"e", ".", "g", ".", " ", RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "3"}], "}"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}]}], "]"}]}]}]}], " ", "*)"}], "\t \t\t", "\n", "\t", RowBox[{ RowBox[{"StyledCheckboxBar", "[", RowBox[{"var_", ",", " ", "vlist_", ",", " ", RowBox[{"opts___", ":", RowBox[{"OptionsPattern", "[", "]"}]}]}], "]"}], ":=", "\n", "\t\t", RowBox[{"DynamicModule", "[", RowBox[{ RowBox[{"{", "varDummy", "}"}], ",", "\n", "\t\t ", RowBox[{ RowBox[{"varDummy", "=", "var"}], ";", "\n", "\t\t ", RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "varDummy", "]"}], ",", " ", "vlist", ",", " ", "opts"}], "]"}]}]}], "\t\t", "\n", "\t\t", "]"}]}], ";"}]}], " ", "\n", "\n", "]"}]], "Code", TaggingRules->{}, CellChangeTimes->{3.8219391115973883`*^9, 3.827666248960232*^9}, CellLabel->"In[34]:=", CellID->236459004] }, 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[{"StyledCheckboxBar", "[", RowBox[{ StyleBox[ StyleBox["x", "TI"], FontSlant->"Italic"], ",", RowBox[{"{", RowBox[{ SubscriptBox[ StyleBox["val", "TI"], StyleBox["1", "TR"]], ",", SubscriptBox[ StyleBox["val", "TI"], StyleBox["2", "TR"]], StyleBox[" ", "TI"], ",", RowBox[{ SubscriptBox[ StyleBox["val", "TI"], StyleBox["3", "TR"]], "\[Ellipsis]"}]}], "}"}]}], "]"}]], "UsageInputs",\ FontFamily->"Source Sans Pro", CellID->68120567], Cell[TextData[{ "represents", Cell[BoxData[ StyleBox[" ", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "a", Cell[BoxData[ StyleBox[" ", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "styled", Cell[BoxData[ StyleBox[" ", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "checkbox", Cell[BoxData[ StyleBox[" ", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "bar", Cell[BoxData[ StyleBox[" ", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "with", Cell[BoxData[ StyleBox[" ", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "setting ", Cell[BoxData[ StyleBox["x", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " and with checkboxes for values ", Cell[BoxData[ SubscriptBox[ StyleBox["val", "TI"], StyleBox["i", "TI"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " to include in the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["List", "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/List", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " ", Cell[BoxData[ StyleBox["x", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->309048217] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{ TagBox[ ButtonBox[ StyleBox["Dynamic", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Dynamic", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "[", StyleBox["x", "TI"], "]"}], ",", RowBox[{"{", RowBox[{ SubscriptBox[ StyleBox["val", "TI"], StyleBox["1", "TR"]], ",", SubscriptBox[ StyleBox["val", "TI"], StyleBox["2", "TR"]], StyleBox[" ", "TI"], ",", RowBox[{ SubscriptBox[ StyleBox["val", "TI"], StyleBox["3", "TR"]], "\[Ellipsis]"}]}], "}"}]}], "]"}]], "UsageInputs",\ FontFamily->"Source Sans Pro", CellID->736980483], Cell[TextData[{ "takes the setting to be the dynamically updated current value of ", Cell[BoxData[ StyleBox["x", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], ", with the values in the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["List", "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/List", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " ", Cell[BoxData[ StyleBox["x", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " being reset every time a checkbox is clicked." }], "UsageDescription", CellID->797541101] }, 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["StyledCheckboxBar"], "InlineFormula", FontFamily->"Source Sans Pro"], " is built using the top-level ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Dynamic", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Dynamic", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Graphics", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Graphics", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " functionalities in the Wolfram Language." }], "Notes", CellTags->"TabNext", CellID->782002636], Cell[TextData[{ "In comparison to the built-in ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["CheckboxBar", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/CheckboxBar", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ", ", Cell[BoxData["StyledCheckboxBar"], "InlineFormula", FontFamily->"Source Sans Pro"], " is much more flexible in terms of the styling (e.g. hover color) of the \ checkboxes." }], "Notes", CellID->809921909] }, 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[TextData[{ "A ", Cell[BoxData["StyledCheckboxBar"], "InlineFormula", FontFamily->"Source Sans Pro"], " with default states:" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[124449]}, CellChangeTimes->{{3.8200537350651817`*^9, 3.820053749965811*^9}, { 3.820054163747077*^9, 3.8200541704180403`*^9}, 3.8201392304212418`*^9, 3.8276669092075243`*^9}, CellID->118228536], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x1", "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4", ",", "5"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820054175900659*^9, 3.8200542097615423`*^9}, { 3.82005427994032*^9, 3.8200542816994877`*^9}, {3.8276657349272757`*^9, 3.827665749508173*^9}, {3.8276658008721867`*^9, 3.8276658014146585`*^9}, { 3.8276658669256053`*^9, 3.8276658675427136`*^9}}, CellLabel->"In[14]:=", CellID->54126449], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnE1u1DAYhgNsWHIFJA5RZceSbREHaNVJxWaQpgjELXKa3KXKYULiyY+d ZDoVsv192M8jtWq7ep/afmMnaT/e/7it3hZF8fS+/3R79/vz6XT35+uH/ptv x6fvj8fDw5fjz8Pj4XRz/67/4af+49ebohi+7gAAAAAAAMDlOQzSWhfBF198 Y/rqT+gXfPHFN6av/oR+wRdffGP66k/oF3zxxTemr/6EfsEXX3xj+upP6Bd8 8cU3pq+KhG1TlcVAWbce3faQ9h1Uz67Gt6yasMaivq2xdXTrlH0dmmrWDjir BX3behnZFVWjIqFJ2dSVlTPthrkwJKU9Hgn5XpqBQQdZ0Ndh6RcaRirhUi79 Equr5BtmnHP9ZbwdJdt5GobrGDnffgZWwxZtHtE2xlZV0NdiGuvz/i3thrk2 d8USjvnGY0KTfsMMktXab7oOBKsYSd8dXjkr/x0NvuNk7md2TcNI7mFqa8Fl 0TB7hBZX5ptBw1iKNIxsQhsaJo+GOesmfEpylh0NI5vQJteGyemUNN2GSfhO 72rR0TCyCW0ybZjgBSPuaz9TMQOc8NPqzZLLomHs0TVvI6xkBRPaZNkw0+pL dAY6jtY03NzuTsN355KeW8PMI2xfMAUT2uTXMPP4hHwbRpGveVo9OYcbZynf 3SND2g2zZnkbwVFWkjCzhmljbF8MOnwt5ke5/hxtZHwvVEleDWOYLpyLs5KE WTXMXC9hty8GDb4uYR8nifi+8HarQ4DxFvF9iU2rKkmYT8PErJdOge+awG/E iPjSMAublawkYSYNMx9U49RLJ+27JfTBQZVvfqek7SFJS8IcGiZ+vXRqxrcb bgS2EX4Deny7zBrGGl5HWC7hla1loGER8726kw6z6sR8d55TjwMb9B9WyPnu kHTDvPZP5/UlpGGS8N00TBnhv8PQMPF81xN693U70YQy4IsvvjF99Sf0C774 4hvTV39Cv+CLL74xffUn9Au++OIb01d/Qr/giy++MX31J/QLvvji+//6AgAA AAAAAADALn8BHwbBnw== "], {{0, 18.}, {187., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{187., 18.}, PlotRange->{{0, 187.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[124529]}, CellChangeTimes->{ 3.820054283200142*^9, {3.820054319973259*^9, 3.820054325787307*^9}, 3.820054406250387*^9, {3.82013858843163*^9, 3.820138593216807*^9}, { 3.8201386839645967`*^9, 3.8201386928690033`*^9}, {3.8201389388934517`*^9, 3.82013894024396*^9}, {3.8276657105201406`*^9, 3.8276657516340437`*^9}, { 3.827665801787355*^9, 3.8276658037243643`*^9}, {3.827665868263366*^9, 3.827665872193104*^9}}, CellLabel->"Out[14]=", CellID->509209943] }, Open ]], Cell[TextData[{ "The second argument can be a list of rules of the form ", Cell[BoxData[ StyleBox["value", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " ", Cell[BoxData["->"], "InlineFormula", FontFamily->"Source Sans Pro"], " ", Cell[BoxData[ StyleBox["label", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.820138738417293*^9, 3.8201387601078587`*^9}, { 3.8201387943908978`*^9, 3.8201388142886763`*^9}, 3.820139233836825*^9}, CellID->914927205], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x2", "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "\[Rule]", "\"\\""}], ",", RowBox[{"2", "\[Rule]", "\"\\""}], ",", RowBox[{"3", "\[Rule]", "\"\\""}]}], "}"}]}], "]"}], ",", RowBox[{"Dynamic", "[", "var", "]"}]}], "}"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8201388242217827`*^9, 3.820138880239627*^9}, { 3.820138917771783*^9, 3.820138927951624*^9}, {3.827665887075689*^9, 3.827665887775391*^9}}, CellLabel->"In[16]:=", CellID->214744739], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnU9u1DAYxQNsWHIFFtwBZceSLYgDtKKp2BSpRULcIgfgHL4L8mGGOE4y tmM7/uI4dibvJ0HbifNnXp5fHNuZeX//80vzuqqql7fdf1/ufn96fr778/Vd 98e3p5cfj08P3z8//Xp4fHj+eP+me/FD9+/vq6oSv18AAOAkcM7atml57uMA AIAukViXRy1bmUisqau6blrGODINAFACnLEu1uqqqqlNLd7WVeNMw39piH6/ RwIaxgMNz4tMKNoKvhiEl+KBhvFAwzPDGlKoIdOSAw3jgYZnZiGkiMXhpXig YTzQ8Mwg00oDGsYDDcuHi0593zDjUGDFlpFphQEN4zmChqypqhWDdDeBMnXC U6qfL1Z3JUld/jeXaZwJEUY62Y433ySThrKK+SF6Kx9H0PC8mda9c2LmbDqQ SSyeyUvTsVlddDDbZNIQmbazhqfNNGLk0Fe4mUwb/VRf5xKLRtvBKuOlgLau YLg+HEk3lSNoiExLtcKNZNqQaPNjcy4olmwaqiDTkmuITEu1wm1k2pBcNvsM zroetSzbF1V73/q+N/t7nvfRBSi1mlwaarjr42JVtK0qHsbbs5+zcA17FCG5 fKhn0Gb+0KLcktRcL2v3Yrhjd/a23CcyLcBLnkibh9qQae10Y2rr7FA2be2k S9iAyaShjrs+LrbgZqHnkDBlE6VwDXtGnZilG9hYZ8o0W5exuf1wx+7v7fHd lJZpvrecx0tB5pkWqx254zWRj8bSteDTq/M+umQ1Mo+GBh5JlxpqSjv4uiFV w65mpu7nLF1DgebDJsiHWlnFnXxWctmxWbw97rmkTFsqncdLC+YxFk9e0t+J pa3nqr1pe0LyaGjgkVS9ERLoGWYsdnVnjjUqUaiVrqEg3IdKpllz6Vo23LF5 vD3ugnjau6xNEIJc9ogszX7L4yXvracr08zSs343s7LOdnjW+mhtiJm39kz5 w6NhIhGL1/BC8KH9Ndvr4Y7N423efxoQdQqtQHT7NW14JywfVvB1D/Zt4nrx QyDzeGlNpi36wzndbSLRxSyPhga++qi1xJR7S6Vlpi/0bCWRiMVreAn34fKW jGIBjs3jbS4fH1i1adH0EvfJ4ftq5RMICzvrj8krbB4v0cyDTAsgNNP635u2 rbUXQjIt6V1O8Rpezphp076pWyevIlppwSss3Atn8pK3epiGIGba7lO0Mmmo E5BGYpmMNCZ/9tJpty5op+XItADHrvP2NKwQVyeSjxEQe+zKnMvhqx+O+WkB Xso0KTKThjpe01/bYkIiOcNqDDX11hP9aftmGsGxa7ytDtTGnLbCxj0LzTT3 MJplQbCXEo/NuciloYa/Fg3BxaZIm0JNzkUw+6KDzsuWHEDDFJkWruoa/dUb 1pgrPTIt0EvKyPg0D2qazagdMsFL0zOkjTq3W44BJ/vSrHwaKvhr0dBQq+t5 k8zUUJGQz85LsqvFATRMkWkUx67ytmP+CQ1kWrCXXP2e5vESvOTrTD3tnFuB zdvXUNPXCj0vW3IcDTfONIpjV3ibb3E1QqaRvBTy8WmkTLv0l66mVrZa0WbK kMmtYU/YNGZHq9Yh4cJ52ZIjaJgo0y4Ux1K8za8fcxN3OUKm0b10cKBhPNBw S/QGXXz7mvogAbU8Mq00oGE80HBLxqaj3vUWgRxbCtqW7Hyl3eoi00oDGsYD DQtneNTSO9LG5dOY9BxFppUGNIwHGp4ZZFppQMN4oOGZQaaVBjSMBxqeGeo4 KfF7rAAAYE9WPCTfz2jZaAAEAAC2Qs6hW/WM/fiVGUf9WiEAwG0hHzjebLoJ AAAAAADYlf8uij3w "], {{0, 18.5}, {206., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{206., 18.5}, PlotRange->{{0, 206.}, {0, 18.5}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[124609]}, CellChangeTimes->{{3.8201388669267883`*^9, 3.820138934125362*^9}, { 3.827665811330042*^9, 3.8276658156904216`*^9}, 3.827665888507543*^9}, CellLabel->"Out[16]=", CellID->690443285] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Scope", "Subsection", TaggingRules->{}, CellID->204653245], Cell["Any Wolfram Language expression can be used as the label:", "Text", TaggingRules->{}, CellChangeTimes->{{3.820139242348443*^9, 3.820139257579932*^9}}, CellID->810567002], Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Plot", "[", RowBox[{ RowBox[{"Sin", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"2", "\[Pi]"}]}], "}"}], ",", RowBox[{"ImageSize", "\[Rule]", "40"}], ",", RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", FractionBox[ RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], "2"]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"c", "=", RowBox[{"ImageResize", "[", RowBox[{ RowBox[{"ExampleData", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}], ",", "40"}], "]"}]}], ";"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.820139296404121*^9, 3.820139351210512*^9}, { 3.8201394106557693`*^9, 3.8201395638884087`*^9}}, CellLabel->"In[9]:=", CellID->614341346], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "exp", "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "\[Rule]", "a"}], ",", RowBox[{"2", "\[Rule]", "b"}], ",", RowBox[{"3", "\[Rule]", "c"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820139261598584*^9, 3.82013928159652*^9}, { 3.820139546345175*^9, 3.820139553976554*^9}}, CellLabel->"In[12]:=", CellID->646100923], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsvQeQY9d5oNuNnHNs5Bwucu4c0UAj5wYajdQBnXPOeTrNcBJnhpmiREoU tRZXa0u2ZcmS7fJaZbtWpad6lp+pWpVX5ZWf7Sr6lcpLl7e29C66ydaIQWLo IVpDfPUTdQeDBsBzb339z3//c46obypShFRVVc2hwIdIYal1drawEiWBf4hP zo0MTQ4OdE3ODw4Nzjr6oOCTMfC/f6quqiod/6JChQoVKlSoUKFChQoVKlSo UOFDc/v66dhA31hfYTDTm+/pzqe6+3t7hvtyE4P9U8ODYEwOD44XB0f6+4r5 7GAucx7FfGaokAVfNtKfHxkoDPXlB/KZQm9PrieZTkTj4WDI5wt4vUGfLxLw J4K+7oA34XFFXR0xt7Pb25X0eZK+rqzfNRRyjYY6B/0d+a6OnNc5EPaOpyKT PbGxRHA46huJBSZT4ZlMbC4Xn8vF5rKJhUJydSC1NZhYy0dmUv7BkLsv4p0a Gji4dnzvmRefefHzL7z0hVdefe3V1//za1/7vdd+7/df+/ofvPq7X3/5q//l lde/9vnX/tM3vvXtco93hQoVKlwOA5neBqO+Xq81KeUaiQAQCwwKqUMHNJoN rXZzq93SYrc0Ws21Rp1VozKpFWBYNEqrVmnTquw6tV0H2HRqs0alV8m0cgkg Fcn5HB6DRieRqEQi+MimkrlUIpeAZaFhTASkBosQUwhKJlVTQ7cLmZ1Krg/g dSpqGvh0K5tsYZMdHIqNRTJQ0DoSyszANwrpTgXHDfBdAM8FCLw6cdQsSVmE YQ2rhU80MrBmPrOruXFoZHJt73jr4GTv8OTGnSfvPPv83Rc+f/elV+5+4Yu3 P/f506eev/7MC0dPPvXgc18o93hXqFChwuXQl043mAz1Bp0Z1K9UqJEIjUqZ Q69ptBhBb7farS12W5PNUmvSW7Uqs1phBhTgga3kbbVdr7Zp1RZAYVTJdAqJ TiEFH5VCAZ/JYJDINCKRQSazqRQOmViDx7CxCB4BLWeSTGJOAyBxmpTRRuOA p2Ei3Dbsb+5tswXM6naloFHItDDwAA6mwsIMVAxo9U4lx6MVdOmEHr0oaJKl bIpemzSoZtXV4PVMYoNa3h0Jzy5v7Jzc3ju8fnB4+sTd+3ef/9zdz7385Oe/ +OQXvnjnc5+//vTzN5558ejJZ598/vPlHu8KFSpUuBxG+/sdBq1DpzEoJGox XyXi6+QSq0YNJtsNFmOjxdxgMdeZjTa9Bsy6DUqpQSUzAQqzRmk5C5NaDhpb Kxdr5GK9UmZQydViEZ/JBO1NJRIoBAIVj2cQcAIqUSNgNepkgSZTuqtxMNIx 1eNZG4wdzeRvrQzfXB45mulfG0hOdvv6PS3xOqNTJarl021skoNDbhTSWuWs djWvSy8OmmUJqzxhlnRIaHoqSltD7ai1FQr9C5v7G4fXN7b2tjZ3Dk+eOHny 6aP7zx0/9dzp08+dPnjq4Oadg1v3tk7vPv35L5d7vCtUqFDhchgd7LcbNHYd oFdIQHUrhTytTGzRqGqN+gaLCbR3vdlUazJY9WqjWq4H7a2UgsYGM3BQ3aDD wSd1Sin4PHhg1amtOkAnl4lq2EwyBbQ3EYsloDEcCsmiFMWddbO50LXZws3V 4Sc3Rp7eGX3xYOLl04XXbm9+9d7B6w+ufeXe/hdv7754sn57bXJjIDnoaQpZ lK0yVj2f3CCktMrZHr04bJHFLbKgTljPIwEUpFHECbjdY1NzK3sn6wcnaxs7 W5vbhyc3ju8+de3JZ6/df/YEFPi9BwdP3N6/+eTmye2nKvauUKHC48Lb9taq 9fIze4v477G3sVQ2+QB7mwCl8SwVt+qBOrMODKNKLuawaQQCDoXCIpB0AsGs EKW9zQczuZdOF7/6YPf1+ztfubn82un0q4djXzqc/E83ln7v/t43Xzj59kvX v/vFO9997elvfenB608dPb0zs10EHd7gN8qapYwmEd2t5kZMkphZ4lJxLCyc moqp1Sh7Uun5jf21o1ur+8frm9s7O7tHN26e3Hvm4P7zBw+eP3n6hdN7Tx/c uLP/xN3Nk1tPf+HVco93hQoVKlwOYwN9Dj1g06h1colaJHi7cqJV15n0DVZT g9VcZzE5jAYwqQalbVBKwDCpZGa1vFQ50aosOjUYNgPgMGrrLfp6i84ElOxN xuKwSFDdeINMmPY0HkxnvnRz6evPHXz9uWtfvbvx8sHEC6v5p2bi9yfjzy5k X94Zf+1o9neOZ792c/kPnrn2nVfufPfVe3/08m0wJ7+7OjrT7YnYgXYZ26Vg RfQCMFrEND0do2WR22vtA8Pjq4c3107urOwerW9s7e3tHd+6ffzgWVDd+/ef P37wPJiH754+sXv95sbx9ae/8Eq5x7tChQoVLoeSvXVn9paV7K0WCz6EveXm s84T0N5gyg2m7g6jptYE2hvMvbV6lVTEYbNpVBG3ptGi64+5j+fyLx1O/c6t xd+5tfzq6fxL+xNPLxfuTCRO+zxHvZ2nfb67k8mn5zPPzPY8M5t+cWXgS4ez X3ty+5svnvzRizdev7t7f31qsTeUbjaFDMKwltMlp9vZOA0VYxayfe1toxMz K/vXF3dOZpfWF+YXN9fXr52cHt65v3vrwc7Ne/s3n9w/ubGxtwfG8s7Oveef K/d4V6hQocLlMDrQb9dpbNozewv5ahFfr5DYdGf2tpjOb1k6jHqrTm0E5AaV 1Kh6u3Ji1qgsWrVVr7aXEm+g1qSpM2scJo1eKVWKBAaVzN/RsDCSfura7Gu3 V1+9PvviVvGZlfzTS/mnlgsPlgp3ZzLXh2NHef9RIXBjJHZnInl3LP7EQOAk 7z0dCN6dSj+/Vnx5d/IrJ8uvPbH5zM7s1kBioNMW0fMbOVgtCa6h4xrUkoS3 a3xscn55a2JmdXhofHRwaGFqentza/faycb+8erO/vrW9sraytzC9NzCzOTs 1BN3bpZ7vCtUqFDhcvgw9q416my/tLfsnaJ3yd6l1kGD2mEshd0E1Jq19Sag zaZPeZrXxtIvXl/++gvXvvHs7qsn008t5e7MpO7OpO8t5J5aGby/PHh7Nn99 LHVcTBwX46dD8dPB8EGvayPSuBKoXYs07/R0nvQHn5rLvXIw+9qNted3Z7YK oVSt0sZAybFVOjbF5TAVkonJscnJyYWhoalCtr8/k50sDq3ML66tbS0urU7P TE2MF0eGMv19yf6+nnw2tb+3Ve7xrlChQoXLYXRgwK7T2jTAWeWEfz5bx64D 6t+2t+nsrmXJ3mDKbSzdspRZNHKLVlEqm5y1fDsMAChwm6Fk7xa7PthqGwy1 bg1G7q8Vv3Rj6T8/ufHV26tfOp5+cXv4mbXiA9DbSwP3V4r3lot3FgZuTOUO h1K7hdhWb2Aj6VqNNC96a+fctlm3Y9FfvxFrPcx6b40lP7c59uWTpXtLAyPe ugYBWUmEWcTcmMc1OTI2O7s0PrlYHJ7uKwwN5PsnhkYWZhcWFpcnJycGBzLZ 3mAy0RkLd8TC7kjQtbYyX+7xrlChQoXL4cPYu86kAy1tfsjeVu07c3bOKieg ve1GoNGi8TUY+z31a2n39ZHYk7O9D5b7n9sY+dzu5MvXZr5wMP3C9sT9leHb C/235go3ZwtPTOePx9I7hdhSwjflbxtx1Y10WEfbLWNtZjAmndZ5b91qqHG7 u+POePKV3cmXdiZ3BqLxOo1dSG/Wq/symfXN/dXto5nlndHZteGJhYmJ2fm5 heWV1dmF+eJwf086FIt2hAKNvq4Gv6/F721dWpou93hXqFChwuVwbm+7BtDL pOd3LQ0KmV2rqTcZ3ra3xVhn1oOKNgPyUtH7rHJi1SjP1A3YwADtbQTqTJpO my7ZaBjvsq/G2rZ7XNu9XXt9odOx9P3l4nNbE89ujN2Z7zsa69kf6t4rJnYH 49uF6FqPfybcOeRqSjdao1ZtxKSKm5QpqyprV/fXa8ZajLNu+2qk9aQ/8uxi 3xd2Jp9aH11I+0K1+kBL4+TkzOHNB3tPPLW0/8T0xuH06t7y2t7W9v7Gzu7M 0mxhIB1PeKIRZyTYHvS3hsMdoUjH6vpsuce7QoUKFS6H87q3XaPWv9Nz8qv2 Nj9sb9M7tyytGtXb9jZowKg1aVrMmoBNk6nXjrWZZj11c4HmuXDLSnfnbiF8 Otb7xFT+cKRnLROYi3fOxJzTkY4xf/Ogsy7bZO2uM4Wtuk6dskEqtAs4tYKa VhnPDwhjenGPSd7foJ/zNx/kQ/dmsi/vTr16snxzfnA05ikkoitrm6cPXji8 98LayZPze6W2k+3969eOb+wdHs0tzeUKqXjMk4x6e+KBZMyXTPrj3V3rW3Pl Hu8KFSpUuBxGB/pKK01pVDqZGLQ3IBYaFHK7VltvLE2Tb7RaGqymOrMBFLUF UJjVpU7v0jR5rdqqU9v0GptRazdqG0xapxkIW1Rpm2qgQT/qtE8HmhfjHeup ru2MfzsTXE35JkIdhY7a3hZLpsXS02AMGZUdCmGDmFcnFdbLxFYxX8VkCEhE AQmvZlDq+Mw2EbtdxA4A4oFW61av//5c35cOZr9ysvxgbXytmJ0bHd7ev3b6 4NmDJ59ZO741v3uytH24s3d8eHR9/9rh/OJcIZdKRX3ZeLAvHc/3xLOZWHe3 Z22jkntXqFDhMeEde7/d7/2QvQ2/tLfJAL4GtLdJLftlryD4U3qtzairNema zdouszpslMeM8pQVKDSZJnyNK0nXVsa3nvLMBNv62hwRm9alkXUCki6trEMp tHEZaipRTiaC0tZxOeoaNo9EIiGRODicjkZJyAQtjWSgkRw1dK9GOhlouz3T /8WDuZd3Z+4sDO1MDm0sLR6cnJ7ce2r/9pNrhzcWdo6WNg82tvb2d/d2trcX 5mYG873ZRLg/FR3K9gxm0325VDLhW1udKfd4V6hQocLlcNExqJdLQHUDEqFB KbNpNXWgvc2mptIqVaC99eALzGqFUSU/WyFWbdUCVq3GqtPaDbo6s77NovVZ 1CGjPKiThfTybot6oM08HWyejzlB8WZbbF6DslHCs3KZVi7LzmcbahhSMoGH xwqIBDmdrmbXyBgMFp6AhcHh1RAUBEpGIDlYjASPUxJwZgYl4TDsDvY8vz7x 9GLxeCy3NTm8vbFxdPPW9ftPXbt9d+Po+tLu8dLm/sraxubq8vrywtz02FB/ ti+dGOxNDud7h/LZgVw6FQ+srfyW5d5/8cN/ePZrPzh86Xvn8cof/s2Pf/pm ub9UhQoVrgTv2BvQy6WAWPCOvYE6o/5te5tN4DFo79Iag++2t8Zu0DaY9Z1W XdAKhI1Kv0bmUYv9alHEJOt2aJONplitwa1X1Iq4OiZVRSUrqWQ5hSQkEdhY LAuH5ZGIUjpdwWCKqDQWDk+AI1EQGKIaiqqGkeEIDhojQCFlGGS7XDQVcZ+M pI8HE1t9iY2J4d3tneNbd6/ff/rw9t2t4xvLe6eLG3uLi8tLsxPzU0OTo33D /ZnBfLqYzwwXckOF3GCuNx0Pbfz2dAyC3p648a3sztffGzvP/3nF4RUqVBjp 7wNdbdOc594CjUQA2tuuBeqNhibzO2sMGg2grk2l3Pt8hROVVau2aAEwHAZN k0XXZddH7bqYSeUHpE4Zv03MbhQyHQKWTVjjEHKtfLaGQZVTCGISgU/Es7EY OhpFQ6HoGDSbgBeQySIKVUCi1OAINDSWjEQTEShQ4xQkqgaDFWDQChymUcjJ NlnnQh3L0c6V3sjW1PjB3gFo7+M7D67dvLt5DObe1+ZWNuZmZmbHBieL2ZH+ 1FBfT7HQO9SXG+rrGyrki/neTCK6tbpU7vH+zfzbW/9x+8t//b7efji++t2/ K/c3rVChQjl5x94qvVwMiPmaUu4tB7PxepOhyfI+9jZdrE91Fg4D0GzV+2tN 3bWGbrPapxI28ZkWJllFwYsIWBERJycTFBSChIDj47E8Aq4Gj2WgUWQkgoSA k5BIKhbDwuN5RJKIRBGTqaDGhWSKgEwV0+kSBkPOoKsZdHMNs0XKDxsU2Trd SId9vju4PTN1eHh8dPPuwc17u9dvrezuTy0tjk6OjQ+D6s6N9vcU892DueRA Pj0IZt2FfGk3t3w615PY3Vwv93j/Bv75zf81e/uPLxQNpt+vfftvf/STfwHj B2/807Nf+8HDAr//O9//j//9f8r9lStUqFAeRgdK9rYCSp1MfJZ7C40qxbm9 G62mRmvJ3g6j3qL7pb3NGoVFqzSXQmU3aJqthkC9OQWGRe1T8mtrqCoSTohD 83AYMRGnIOPlJJwIh+Zi0Tw8lk/EcnFoBhpJRMBwcDixlIGDVifKqTQtq0Zf w9Gyawx8fq1SXg+oapWyeoWsXaNya5VeQBLWikGBT8V827PTR8enhzfv7t64 vXFwPL240FfMZTOxwVz3WH/vaH/vYKGnkEnmepOFTLqQ6cn3JvvzPblMam9v u9zj/et4l7pf+cO/AfPw977m+it/efEa8Lgi8E+bN27VVZUofqPc3+RxYXp6 uuoj8p3vfKfc37r8vGNv1Tv2FpXsrdfWmy/sbXQYdJazujdob+OZvc2/tLe2 yWLw15nTjZZcrTaul7aJWAY6SU7Cy8hELYNiZtMsLIqeQQZoZIBB1bNpehZV QSWycWgyEklBoVlYnIhIAuh0C4dj5XJNXI5DKnGZDYE6m89uCdbbu1ub4g12 r1bepeB3W4HxqHdzdubo+Ma1J+5uHp3Or20MDPUn4t54qCOfDIz2pccGcwN9 vZl0oqc72ptKZFOJTCqWzyaz2dTewQ74v/z/PBo+4YkARX2h7v6D3//T7//0 17wYFPuFwG9/+a8/4Uf/VnA1ztqZuOtufePM35do7ze+8cYbl/Zmv304HI63 3nrrk77LG+AoXsa3+e1hZKDPqgUsQKlj8J3cW35m77N+b8tZu6Bea9GqSuuc vJN7n6u7tLK3Xttg0nscxlSDqb/RkK/VxPTSDkmNvYYGeruex+qQcD1yvlvO 75AK2mTCdrmwXSaoE9SoGRQhAc/H48UkkpJK1TPoZhbDzGIaa1i1ElGXSRet t8UaHGln60DQm3O1By36LrU4YdONxwKbc7OHxzcOrt9a3dkbm57s6YkFva0R b0uhOzDenxkv5vryqWQiHI/4U7FwJhHLdMeyvd3p3vjO3uYvrooH3s1FRg2q +wdv/NNvfP1Xv/t3D2fpn/DTrz5X4ax9owiauySINy7X3t8o1n2G8/g333yz paXlMt4JHMdb5fJ3Wa7P99hb9I69Db+0t0Fr0bzX3mrLWct3rVHbbtaErECv Q9NXr8s5gLhB5lEIOqU8n0LYrZfnLAAYKaMqolUEAXlALXPJRQ0CjoXNMDLp ZjbDymZZ2Uwzg2qkU41sRp1Y0KlV+swan1kfa6rr87kHAl09bQ2JWlO2tXYq FdtcXLx2fH33+HRhdaW/2B+N+nzulpjfWUzHpou58WI22xsLh7oC3k5Q6+lY pLc7lkl3p5KRza3Vco3zr+e1b//thYr/+kf/+Eh/6reUK3XWLtfe5ZTOFeD1 11/f2tq6lLcq46/Bslyf5/Y2AyrteeVEWqqcgE6uMxvOdmcw1f2ycnJmb0B2 VvdWWbSAVaexGkpzLev1qjZA7AVEMaO826yMmRRhnTQMSLp18rwVKNbqB+26 XqM6opb5ZCKPVOiWCtrF/FYht1nAaRJwGwW8Ok6NlUkzM2h2LqtJKuxQy1qV knqJsBVQRBprc97OAb9rwNM+5HXOZFOby8v7R8eb+/tTc9PZQjoU9vi9HcmI dzTfMzucHx3sSSX8nq42l7M56O1MRkPp7ng2nUwmQhvrS+Ua51/Dj37yLxcS BoX8kX72ojtl+Pib//zm//rY3+Hqc6XO2qXa+zMu71LR+9KK2OCJKZO+y3J9 vmNv5Tv2Fr9jb32D1fi2vY0P21sOvtiiedvepZnyJp1Dq7RLeXYe08FjOASs OlFNk5jjFHODCmFSK+81KJMaeVAu7ORzWtiMJha9gc2or2HWc86Cy6rj1tjZ LBuD5mAxGoWcdqXECcgbpAI9m6mvYTUDymhTXcHrHPR1DnidY6n40szMxvb2 8trK2Hgxk0mEw56Q39WbCE30984O5Ybz8USos8vZ0NlWH+jqSMVC2Z5kIdPT kwhvri2Wa5w/iH/9+b9f9HV/jAr2w9Xyw5e+9/G+w28FV+qsXaa9P+vy/oXB YLiEovfblE3fZbk+h/sLFo36IXuLTKXKiQbMvestRjBq31s5AVTgj5RCC4D2 rrXoa/Vqi4SvolP4OAwTg2RjUWI8Rkch1rPpTj7bLahpBy1Np9jIRDMBZyTg 9AQcQMCpCViAiNeQiRoKWU8hW2mUejajRcR1qqUurbJRJtaymUo63Szkt+u1 oTp7vKmuu7ku7/dODgwuzM3NTk8M92czyVAs6Ir4OjOxwGiuZ7LQM5AMxrxt 3o56T3tDyONMx8OF3tRgLt0bD22dzdYpyzh/EPd/5/vn7gUl/N4Okw/Dj3/6 Zv/B75+/ye/+2Y8/3te4+lyps3Z59gbf6TMt7zfffBO09yW+4TeK5ekFKsv1 OdxXsABqs/o99jZd2FsP/tGiUZrUspK9VQqzWmUpCbzU7203ausshnqD1iYT KelUFhJJhEAoUBgPiVBiMWYyoZZKtFMIBjxWjUIqkQg1CqHFoAAMSo5GipBw IRLBRyH5aJQMizGSiLUMagOX1SwVtKlk9VKxlsNW0GkaNssiFNQr5G0atcdi TLo6hzO5yZHRscG+/lQ0HemKeltD7pZuv6svER7sDvcG3RFXU8DZEHS1RH2u nlgol0r0pbt7Iv7NpblyjfP78hc//IeLmsmPfvIvH+eiOePiDiao8f/5zz// 2O9zlbk6Z+0Xl2jv0hs9Mtm8Aab1Z911V/j3w3e+853p6V9Zdf+dfsz34UON VJn0XZbrc7hQMKvVJrVSIxWrz+2tVoC6BqVdD6bfZkOtUWfXA2ZAYVRJDUqp sbQlsdICnIVGebY8bMnetUqJgcuUkwgyPE5DItlp1EY6tYVBbWaQa8kEIw6j Au2NgGvQSDMOayXiTQQ8gMPKMBgeElWDQAhRSA0OC9reTCOb2XSrgGvicQE2 C7S3kkFXM5namhqbWOQ0GVJe72jf4MTo2FA+k4n6Er72YGejp80RdDYm/a7e YFe8qy3obAp0Noe62iM+Vzzk6w4HeyKhmNe1Nj9drnF+L//6838fPv7muXU/ 9/UffsyL5oz/+N//Z/3pP3u86ydX5Kydc2n2fkSqeeMbt4oPOfAK23tra+v1 119/+JlPau8y6bss1ydob5NabVQpAalIJeaX7lqe29v4QfY+mywPKM53t7Tq AYdRV6vTgPZ2iDh1PHa7gBuWSTIqRV4pzcnFGakgIeQFOOwOOq2RTKonk5op lHYGo4PFbmax7XQGQCCJ0GgR6HYMBhS4GodVEHEKKllJpykYoLppSiZdQaMq qFQTn9dpteQSidmp2fmFpdHhwUx3JB5w+Tobnc02T1tdwufsCXVFPR1+V4vf 3RbwOANep9/XGfC4Ql6339W+PDtVrnF+LxcTJydufOvj1Uwe5u9/9v9dpPHf /qu//4TvdgW5ImftnMuy9yMQzS/FXVcED6+6vVtaWt5881cW7Xnb3h9/XMpT jCrL9TnU12cEVAaVQi0VKsU8QFrq97bpSk6uM+vrzAaHUW/Ta8yAEvQ2aG9D aYMGmbl077LUOlja2tKgsWtVNoW4VszrkApjasWAUT9tM89bjcsWwxoYZsOS QTumVPSKBIEatovJctdwAwJJUCx3C8R1DDYocDkGq8RgVVisHIMWYVB8LEZA wEuoZFDgahZdRaOoKCSLgO9rbBju61vb3NrcP5hfWhoc6Et1R32e9o5Wh8fZ kI548slwIuzxezo87vazaHO7W92dbd4up6ezbXHuqtj7xz9980K2H6a7+8Nw MYUH/HXw+E3AvApnrWTb9/LxVXHRP355vO0+0Nxv/OLi+15Ve7/11lsOh+Nd T35ie5dH32W5Pt9rb8O5vQ26OpP+rNlbb/1VexvVpc4TE3A+ZV4Fpt9WMAlX Smolgnap0K+QJ7RA2qDLG7TjJsOm3Xa9seFmU+O+zTKuUkR43HZWTQuH3ymS e6Qqp1Bay6wBiGQ5Fq/G4rU4ghqLk6DRXBSKg0ULSAQ5nQqAAicT1SSCQyyK ujpnpib3jo4Ob97avHY0Ob+QLeT9fnd7a63P3Qyqu5hPprqDPp8TNLbLCXq7 xe1qdbvavd5Oj7tj4cpUTi4KHZc4UxI09kX/yeM3f+cqnLVL5pEUvd+4VSxe qOuK2/u9Re9fXIa9y1I7Kcv1CaayJuCXlRPw0aCUWbVgRq2tNelLtywNurcX OQHVrZCcCbw0X/58i7TzGZdWrcoOyGtlwnoht5bHswmEJoHIKhB2SWXDOuN+ feOt1raDWseIQuGtqall1Zg5AqtAYuOLjSyuikQT44gyLMFAINtJFCuRrMHh RVgMF7Q3ES+nkDQUMoDHAUR8o0KRiURWVlYOr18/uXv34Obtxa2d/uHhYNDb 0VIXcLUUUrGhQronGfJ5210dLWB4Olt9XU6/1xUMeHwe5+L8lci9//T7P724 yfivP//3T3TR/Cp//aN/fFxvX5b9rF0+jyD1fu8nXGV7b21tvfjii+968hLs XY7kuyzXJ2hvM6A2vW1vwbm9LdrSFHi7UW8vlU3eniZveF97a1Rnky7Vdq3K oRDbBVwDm6VkcwRMjojJcQikGb1lu7n9Rodrr75hSKny8viNPJFJKFPzxBIm h0+g8TBEMZaoJ1EbqUwnndVGYzooVC2ZKCMTpGSigkQAcDgtFmtiMLrsjtH+ /r29/dMbN0/v3D26fW/t4HBkcjIWDbnaGoOdrfnu6FCuJ50I+j3tXaC6O9qC 7s6I3xsJBaIh8MnOhStQOQEz5IsG7486N+fDcDHj/jFb/6S8Z+1R8Ej7Tc75 hPb+hDnsm2++CabWoVDog17gdrt/8pOfvOvJS7B3OZLvslyfZz0nKpNSoZGI 1KLSTHnQ3qCQraU9K3VglMommlLZRK+Q6BVig1JiUJ0J/Kz32wQozwUOPjpU snqZuFEsbJBIbSK5XazwaUwTjW3HXYFbXYGDxpYpvbFXCUQBvVNtMIuVMiZX SKDKcWQLmdHB4gVqhMEavofFaWEwbQy6nknT0KkaIkGHxVgp1DY10BsKrcwv nJ6c3nji1umtO8e37m4eHk/Nz/f0JH3ujpC7IxsLD6S70/FgyOv0dbb5Xc6o z9MdDiUi0Xg47Pe456/AXctHXZ1++Pbl4zR9vrxn7VHw6FPvctr75s2bJBJp eHiYxWJ9//vff9/XvG+n93t7Turqirc+2ipen8LQvpuyXJ9DpZ4TpVEp/1V7 q87sXQqrHniPvc8F/nYB3KxRGAGlXq20A6pOvSZhNhRs9n573UBtw0yr89Af uheK3XH5Dhta1m11C/b62fqWAUdzUGNuFsob2IKOGn6YL+kRK9NiRZQn8bC5 zSyWg800s+kmBs1CJtdRaW6Fssftnh4b3d/ZuXH99PqNJ45v3Dy8cWv76GR+ ZaXQV4gEfWGvKx0JFJLRnlgw6u8KdjnBAA+6w8FkLNYdjQY9XQuzZa57/+vP //1iZs2jU+vnvv7D849Yf/rPHpvbl2U8a4+Ix9jeP/vZz8C8+lzaoMbfN/0G /zafz7/3+Q/sGPwIkyg/hX/WvJuyXJ/FQt6oVoDGBiTCs7q3UK+Ugol06V6k oRQWnfrslqXccGbvUijBkOjPkvBzgevVcs3Zjjwhh22yvfXA473hD94Ihe/E Ys8lup8NhG81t1+z1R3UNhy3dV53B/ac/tn6tqLBPqgxjmgM44B+SK3PyoAQ X9LB5joYDCODpqdRzBRyE53pl8rz7R0zgwPbm2vHR/snx4dHJ8fXrl8/uP7E 9uHx0tp6cagYj0bCvq5kyJdJhFLRAGjqkNcV6GoPdnVEA57uWCSViIHJ9+Lc TLnG+ZyLZUlAr17CFfMBPDz7/g/+4r8/ug/6NCnjWTtnenq65QN4b/H2w/Ap /PO+vJWTc9566633Tb9Bq3+ocXvjYtLRh/8f+QzZ26BW6JUy9a/YW2nVfbC9 FRf2lhhLDYRyrVKqlovtWnWisX4rEPhcOvPVvv6vFAqvZrNfTqZe6PJdt9dv 6cw7FsfNDs9z0Z4XErm7gfhJu/ewqWOvtmnFZB9VG1ISpZsjbGCwDBSKikhQ YTFmHN7F5WdqG2Yz2e3lxaPDvZOTa4dHBwfH4NHpzsmNjYOj+dW1/sGBSCQY 9HZ2hzy98WAy4o8EPUGfy+du63I2+z0dsUgglYiGA56l+XLa++GaxqPemBKU 9mPWPVius/bI+FCGeePX8Zs/42PY++EPOLP3R/vE9+V902/wmfcWvT/wW936 SLNGPyv2HjrLvUFjqyUCpYgPOlynkJoApUUHWPQaMMw6tUmjNJxVTnRy8VlI dODxucDP5u9oFBKVXGjTKBP1tfvh8Gt9xT8cGf/awOBr6d5Xo/Fn2l37Ruus HJhVGw6anS90Z7/SP/bF3oHngsknO/1H9a1LBlu/DAjzJO0sft25vXFYAImy 44lBuWrI71+ZGN/dXD882Ds+Ojg6vnZwfLR7fLp5dLqyezC1uJgtZAOBLn9X ezLkycSD3WFf2OcOeDs9rjZXexP4GAp6E7FQ0Ne1WNaOwcOXvvep3U98+N7o p7kD5nnX4qP4xHKdtUfGhzBMqfvv1/CbTfaR7f2rn1hXV6o5f6RPfF/eN/1W KpUf4S3e6WOv2PthPtDe2o9kb3HJ3oAi6rBte30vpzOvZ/JfiCWe9gWe6uw6 cTTOKDS9HGGGL12w1N0PJ76SH/pKZvDz4Z4HnYF9e9OkytAjkPnZIhdH4uJL Wjn8Ohq9lkJt5wlSdXWTmfT6wuzO+sre1vrh/s6ZwA+vnZzsHJ2s7e7PLC4W +nLhYFfI25GO+HKgvUNeMA/3ezq9bmeXsw18DAV8sUgw4HEtlO+u5UUvHxhg En5pF80Hc7GIyqX3Jf4aLpYcv/R3LstZe5R8Goa5CpWTc96VfoMm/zW9KO// VSr2fg/FvrxBpQCNrRKf2Vsq1IFCBlTm8+W7dZrS2rCAArS0vuRtkU4Bxnn9 5EzdSqlJJdUqxSqF0ArIg1bzQmvrHbf7KWfnaUPjnqNu31G/qDf18sReKivC 4o0BhpM254uh2OdDiefcodvNnRsG26BEFeWI/RxZRKrr1Vh7Naa4Qh1SqeMO R38oMDvUvz4/tbk0u7Uyt7uxcri3eXy4d3p6dHRytHdwsLq2OjZSTHeHwcQb VHc+EUqEPGDi7fe6At6ugNcd8vui4VAsEi7Ze2ayXON80Wryac6juZgT9Ol8 6MP3ZC/9zcty1h4pn5G69zlvvvkmiUT62c9+dv7HBw8egD7/0D/9EQsnFXuf bZ0DBnhgBErJ+UP2Fp1Xv0u936XcW6pVSQCl2KyRu0z6Pptl0Wxc0WimFMpJ QLNoskzq9CmBKMjk9PDFk2rdltV+Ut942tBy5GjaNtkn5ZoUV+RjCfw8RQ9g G3W0zTR2TDS0FFvbBkO+0VzPzHD/4kRxaaK4ODm0PDu+vTp/tLd58/Tg1o2j 68fX9rY35qbG+jLJTCLUl4oUUpFExBMIuP1BbygUjISC0XA4Ho3GoxG/xzVf Pnv/4mwXhp3n//xTS4N/8akn/A/3ulz6m5frrD06HuOek/dl+ozz43w+/0Ft hO/ioZuWH6UA9KlP1ynL9Vks5AxqOWhspUSgFPNUUoFWKTFolCad2qIHwDBr VeAL9EoJKG2t4m17v52Bn9+4VEt1aolGBf6UvF6n9mtUGbmkTyjICYSDStWc xTJvsQ4DwKAclLl2UWdc0OrnNNoZtWZKqRmTqXJ8cYDJ6WRwfDx5WmMbr+9Y dHqXunyzoeBkT3yiLz0x0DvRnwZjvL9nophbnB7b31i6ebJ394nDm6f7B9tr c5OjfZlUNhnp740V0pF41OMPefzRYDgWjUTCYNYdj0XB8HuvRL/3p8xFl8uj LraDvx0eaTPk43fWHk2C+GuW6PvIIr9ce4OJ90X6/cFren/Q9y/jF/9QlOX6 /AB7K0w6lVmvBsNUsrdMpxRr321vEfikHpS2WgqGrpR+i7RyYZ1EGBAL0iJh TiweUqnmTObV2rqVuvoVR+2y2Tql1hREkhRPkOYLs0JxhieKsrguGrONxvby ZGmNday+bdHlXfaH5mPRiXR8JBMvZqLFdKTYGy32xoZzqemRgc3FmZO9jSeO d07217eWZyaKhWwq3tsdfsfeXf6gyxfxBSPBUNAXDQe7E/GeZHc05F9avFrr e38KfGqTdx71r4nH8Kw9Esdcpr3fuOyt7s/T75/85CcfXPR+9/f/6FN1ylI4 Kc/1OVjI6VVyrUKiFPOVIp5KItAoJHpAYTpbwKTULliaqiMFXa2RC8HQykFF i88eSwI3KMVg7g0GeKASc6Vclp7L8UjFeZVyTK2aVqvntYZVW/12m3OzuW3G YMrwRT4q00NnRbn8tEjcwxOGmOwOCh20t48vSwOmUVvjXFvngjcwHQkPJcJ9 3aFCd6C/OzCYChV7osOZ1FSxb2VmfHd98drW8s7q7MJ4cbC3OxUNgJFPRvLd wVjA6e1q6fK0eTwdvlK/ty/dncj3ppPx8NrKQrnGuYw80oLGOQ9vzfmISjSP 4Vn77O2rc55+Hx4efpSi90fnM7NK1dv2lkuUIr5SyFOJBRoZmFFf2Bt4295y kUYmBKMk7YfsrVeKS2vGqqRWhcQg4KmYLD2L45RIC3rtotm4qdevAfp1vW23 tmXdVj8qU8XpLC+JHmJzsxLZoFKZFYlBe3dS6E46OyCQ9Sh1/TrLWF3TtMsz Hgr1R4M50Mkxf1/M3x/zDyRCw+nE1EB+aXJ0c2l2e2VubXZ8ajCXjYcjXhcY qaA3GXD5OxrbGizNDZa2RrurtTHs6eqJxbOlTYl9Kwtlnq1TFh6+mfiIJu88 iiUT38XjeNbKtYtXOQFzbxQKdWnbEL8fn50VYgfzWZ1SBhpbIeQpBFzQ4YBU pFPKjRplafWSsw2LDUqpVibSSAVaqUAnE+plotLtS7modB/zrH4C2rtOqWgQ yx01EgtTWM8XxQDVvM18YLPt6027auMeYFmTaye44gKDk2Xzi1LFtEY3rdH0 SaRhJttNZbgZNUGBJC5RJqXqgtE61uGeiESL8UhfPNSfADUeKIS9hYivmIxM 9edWpsd2l+f3Vhc25qami32ZeCTgdno7WsPu9lBni7PeWmsC7EZ1vdXQ0Vgf cLvjwVAiFAw42+cnRss1zuXl4ck7l37b9Nt/9fefQmviY3nWPoM7Ep+n35e3 DfH7UJZfimW5Pkv2VkgAiUjO58j4NUoBDyi1fMuMwLm91Ua1AnyBRirUSB6y 95nA9TKxtpSNC4xKaT2gaVdZ26R2O0+rqxE0ivgFvWbbUXvDUX/TUneqs+0r 9WsS9YJEOScHlrT6VaNpTqMpgLk3gwXau5PB7uLwPRyBt0aQUGqLrR1Tsfh4 OjmaSY7nUqM9iWI8NBALjKTj8yMDu8tz13c3buxtXltfWpka70/3hDxuT0dr yHVub3utSWfTA/UWU3tjk6+zK+jxhTxdXS3Ns6Mj5Rrn8vLolv7+t7f+42Ja 0CPdE/mKnLVfKct+YvV+9monJd61Fdpl8xnaGW0wn9HKxWqxUMqtkXDZcj5X LRZo5VKDWmECVCZAqVfKShsWSwSAmA8+ghrXSkXa0qNQKwGVztfIeAalxK7R N+ubmjVOk9guYfEVTGqHWDBmMh83tz3V4X7Q0nmrruXYWr9rtK3pzIs6/YxG OyRTJDk8D43RTmE005jNdGYzmd5KYYTEioGmtpnu7tm+3OxQ3/xI/9xgbiqb Gu/tnu7Lrs9MXN/beHDj2v3rB0/sbe4szY339yXDwYjXnQx6UyEv6PDOpvq2 utqOxkZPuzPY5Qt5A1F/IOR2r8x+Fisn5zyi7sGL/d2W7v3JI52SfxXOWknd v7TtWTveJ5Qv+I6fudrJI6ZMvxHLcn0O5jJaqVgl5ItrWEIWU8KpUQp5pdK3 Um5QKgzKUkm8tICViHdWFeerQY1LhID4TOYinkbM1Uh5OoXIqFJb1FaLvB7g GwV0LotEkNIpnTLZXF3DHbf3Kbf/bpv7tK5l22Rf0BhGFKqcWBrl8MCsu5lI rSNSa0lUB5HswOLrcaSAUDbc5lzJ5tZGh5YmhhcnhudHB+aK+dmB/MLwwM7i 7J3D3WdvHz91ff+J3bW9pbm5ocH+ZCIfjwymu4ezqb7uaDocSPr9qUCgJxzp jSWy3cmBTGYgnT7a2S7XOF8FLn2NrIdvVl7W/m4fxBU8a2d5eEXfV4ty/XOm LNfnQDYDiEUKHk/ApPPoNFDgMh5HJRZqZBIwAwcDkIhVIoFCyAXT8lJhHHT4 2f1NJXgs4AAi0N4CjUwAiARKjkBBF8gpPAmFySASCXisjEGPqVTrjoaThtZD R9O63jIpBwpCaYzD72LWNJNpdjzJjCWacEQrnuTAE2wojAONB+095fbtDQ7v Tk0sTwzPjAxMFvtmhvvmhgcWRos7C7O3Drbvn+7d3F3dX57amBqZGyyM9SbB mBnIzQ/1zw7kJnO9k1kwspP5/FR//8zw0Mr01MrU5INbT3w6p/Jq8j//+eeX ePvy4Y3sH7OdID4kl7I3cUXfl0rZalFlsXcunZEJhCI2h0OjcqgUPoMu5rAV Qj4ocNDbYKjFYOLNVwh5cj5HIeAozwQOalwBypxfowbTb6kQfFSw6BI8ToLE KNBEJZlRQ6ZhcVg2DtNGpw+LpAsqzaxKOyiWhVncFhLVjCNo0Tg1CqtCYtVI rBaDM2FwNizOjEBZkZigQLrg9p8OjR7OTCxPDk4Wc2P92dnh/oXx4YXp8Y3V xZOD7dP99Z2FycWR/Ex/73gmOZqMTfR2zxfzK6MDS8N9iwO5xcHC0tDg8sjw ysTo+szk/sri3tLCC/ee/HRO5ZXlq9/9u4s7jP/85v+6rLf6NCeQXh0uo3RS 0fel8hm7kZBNp8U8Po/BYlLILAqFC6bfbJaUx1WI+KC3SyESqM8m0ZeMLeAo +CWBg3n4WXBUIh4gFqh4NVIKUYJEyKEINQoHkOgSKoODJypRKCcSncWTBpjs Al8Q5/GaaXQVCsOBwDjVMCEUIYOj1UiMDo01obEWNM6EQIPpt58nmmnuOMhm d0b75kbSE4X4VCa+XMiujgwtzU2ub68cHG7tby0vTQyOZ7uH07GBRLgv7CvG Q9N96YWh/NxAZibfM9uXmS/2LY0OLU+Mrk6Ngxn75uz0M7dvlXu8ywyYMC/d +5Nz6x6+9L2P/T4Pz6z89l/9/SV+w98azmehX4J4K/q+ND5j8v7FSK5bK2IL WAwqiUIjUVhUGpfJFHE4MgFPKRSAoQKjVDkp5d5SLvssas5Dxqs5l7mMzRDh cXwoTFANk8DRShzJQKLWEkhOFCZcDU9B4CkMtofB6BbwvDxuLY2qweKUSDSA xOhRWAsG78ARGvHEVhKljUjuoFACfEHWaBrsbMuHnLlQa7GrcbajadPl2o1E dwYKB0uzYOJ9uLm8OFEczaWKvYl8PNTjc+VCXWOZxOxA71Q+Nd6bGM+mpvpy c8ODC2PDi+Mj69MTKxNj929cL/d4l58f//TNi2L1x6ufXNavgN9i3l5A5HKs +1lzziPjM/d7cLMYdgI0vZDGplGpZAqdTGXRGTx2jZjLk/H5Mj4obTD4Eh5H VMPisxh8ZilA24MhZDHENUxJDUtEp/AxaDYEQq+q5kCgagS6FYOPYwk5FK4X ikxUweJQRJpE7hcJhgBln1qRFIl8LHYHhdZGpnSQKZ0Uqp/OiHI4CR43KuB6 RLxWqcChFtt1YqdGmJbxZ4TCTYn8QG86ae+4nUnfn5u6sTi7Oj44XkgPZ1OF eCjpdaYDrpF0dLo/PZFPjaa7R3uTE7ne6YHC3FBxYXRkbXJyeWz0ydOTco/3 leDhosfH2CfiYvLm8PE3P2H55beSy9g391f5DPZ9PwLeuFW89ZmS9y/ujnkH LISQlmwWUiQsModKYVJLAucy2cIa0NgcMYcj5nKFNTU8JrOGRgUlz6ZS2BQy g0ymUcg0OoXBoHGoJCEWI4LBRBAIAIW2wpE9SOwYGj+BwhXgmHg1IloN78bg 8iz2mEoxa9LPGfVjKlVBLOoR8BM8TozHSQh43VJhXC7ySPl2EVtaQ+Ew8VIa tp6ITWAwo0jsApqwSWYcCSS3bY4nff6jRHw+GhoOeocD3j6PK+Vq6/F3Fnsi E4XUWDY1lOoeSibAx+F0ajyfmykWlycm5keG7xwflXu8rwRg8rzz/J+fG3j2 9h//21v/8eF/9mJuzmO26/GH5fLVXaHCx+S5EdeaAz1bi08aiC0SooZNENGI oI1raKUSCp8FOrxGxCnZm8tgskGxU8kMEpFGIJDwJXBkIoVC4VNIOhy+DoVu Q6BCCNQACjeLxs+j8ONIbA60NxQZgiB8UIQPjQ0zmGmZtKjXjBu0Y1rVICDP KsXdCmFYIXAr+A0yrlbE5PEoDCaeS0LrMchOOCIBQeSrEUUocgKGXkThN6nM TYFkVqHuVwO9AFDQ6fMWc6qhtsfT0Z8MjWS7h9KJ/kSsEA1nwsHeULDQnRjJ 52eHRyYHB24cHpR7vK8KD+99efjS9z5kq/YP3vini3L3p7lQ+VWhou4KV4mn B5xbVsR+A3rBgc1psF4RppmLMbOxShZZVMMQgOrm8iR8vpTPA485NDqTRKLi 8SQcnkLAs4hEEZmspVAbSRQfnpTC4vvRuCkMfg1DXMcQ5pC4IgKThaO7YagQ DOmuhrVUQevgqDoKpU3A9SrFYa00pJN4tKJ2QFCr5OplLLGYzuaRGWwCj4bT 4dHtCFQYguwGA1qKVDW8twqarYKlIcgIEuPB4L04YpRIjbM4EaUy3tJQiAWH s8liOpGPhXuD/ri3K9LlSgT82WRytL9vuJA72d8t93hfIUAVX2TR11/5y98o 8IfVDabuj8d2mR+Jt6vdn2TZvgoVLo8bWecMAFu3IBZNyDENckCByMsRcRm6 XUoyillyEV8mEiskEqVECAqcx2CySGQqkUinUMR0mp1O89PovRT6EJE2gSdP Y4nzGMIyhrCGISyh8ZMIXD8cnYGhUnBUFI72QxHtVTBbFUwFR4gIWCGLLBfR AQUTULLkcqZQQuOJKBw+mc8hyhl4MxHThkIFoMgYBBkHXQ1FBqFIbzW8swra WgVpqKq2V0HsVdDGKqgTguhC49xsTsRm6Y+Fxvp6h3q7s5Fg0u8Juzv9nc6g tysRCfdl0gPZ9NHeTrnH+2rxp9//6YXAwQz81zT+/cUP/+FC3bO3//izWO6u UOGKsZZwxvjQXjGsRwxLCWF5EXRMDh3XILJ6gkvLNCmFKrkMUMgBqVjO4wnZ bEENSyziapSiNrkgy2HPkWmrBOo6jrKGJa1giKC6FzGEeTR+GoUbRWALcHQS huqGo5IITAyOdkMRdVUwbRWEC4XgMXA8Dc3kEAQCkohPEnGIEhZezcDbaPh2 AjaAQsdgyDhobygyCkVGYCV7u6HIZijCDoEbITB9FcQICrwa2oRBOxkUMJPv aW8Y6+2e6s8NdMeTYNbtcgY6nX63K+jzREOBTDKR6+m+trtV7vG+cvzun/34 QuATN7713lL2v731HxfT4SvqrlDh6jAV6miiQuqpUAsZaiFB2qjVKW71mAo2 bsb0mGlNWp5WIdWAAhcJFaU2Qq5GK61r1PnbTINm1QqHvYUhriDxc2gCGAvo krdnwawbhRtH4kaQ2CwCHYYhwUghMEk42gNDtkLgzdUwIxTGgcPoOISIgtEz CXYGoY6CayJinVh0CIVOIlC9MFQPFJmAIqLvRBiK8ILZOxTRAEPYoQhLFcxc BbWh0A08epdNlvI5xvKBxbH87GC+EItGOp2+1lZ/hzPk8USDwXg43NudyHTH 97c2yj3eV5GHb0Sez6P/6nf/DtQ4+Dzo7eHjb1781dK9P6mou0KFK8J0uMNB gWqJMB4aWoOAyFHVTeTqHiFkVIfosxC69GyzUqCViLQCvl4kMBvk9R3GQMgx 0GVbMSh2afQ1GGYcgh5AYodROFDaUyjcBJh1I0sB2juDQHthyC4YMgZDgxm4 H4b0QBFBGLIThjTDEAACYcKgWnAYHw4bw2CSCHQaisxCkBkoMgVm3TBkCIoI QOBBCAI8CEIRHggclH8tBGaCwIEqmAoK11KIdi3f4zPl+p3z88mt9eL6QnFy IN0b9oWc7YEOZ9Tn64nFehPJQjqdSyb3tzbLPd5XlB+88U8XNzE/KG5/+a8/ UndKhQoVHinrSaebA6tlwMUEGAtVEjiAhThZkLQcltVh/Vp6rYyt49cYRfwG vaK9w+SKOhJB21gdsMrnrGIIkxBUHxSdQ2KKSOwEEjuJxILSLiKwg4jSYxqO AfNtMGHugiJBaYfO8nAwQKW3gVk0FN4IhXdCERFYydh9EFQOgkzCkEEE0oNE uRBINxTeVQ3rqoa7IfDOs6QdzLcVVdW8KggDAmOiUcIast7Ab3frujNN49Oh 9e3C/sHw9mZxeiSViXmj7s64z9sbjxd60sVcvq+n92Brq9zjfXUBzfzat//2 orj9cIAp96NehKpChQoflZv5zj4FPCpBmBlwHg5GR8KEWLiNhujiIUMSXJeE Wsej69gMs5TfXq/xBG3uqC3eqpmQ8ZcIpEkYJg9FpmHoPBIzfKbucSTobUwO js7AwUdMCobxn4m6CQrvgMIDMGQUhgyUZI7oAoVcDXdWwTxVsGipmQSRqUZG 4ch2DKoOj2rAotqQSCfodgisvRreDIE5qqDaKoiwCkKHVBPhUDwGSabiuEKa Wstx1Ek7XLpYd31x3Lu80bNz0L+xXpgaTeST/p6QNxUKZWKJvlQafNxZWy/3 eF91QIf/xQ//4avf/bvrr/zl577+Q/DgU9iMvkKFCh+DZ4uuBT18SI1o5cCF BDgVheAR0Doato6JbWEQm+g0K4WhZTDMKkFbm9YZMLe6dGGjeJLNXELjh6Ao MFVOwtF9CMzYmb1HEZj82Z3KOAyZgKG6oegwDNUBRTqg8DoIDEyzfVAEmEh3 QODOalhnNcxVDfNWw4PV8Eh16a8aMEiAjFZR0TYcsg2OAIXfBoE3QmCWaqiq CsKtglAgUAIKRiKi6UwCh0cRS+hKFUuj5RiNfNDhnW5dKtM0Nh1YXE0uLqVG h8K9MU/E7Yp0eRK+APi4Oj9f7vGuUKFChcvh6QHXgg4+poZ1cuBiApyCRtYQ sHIKTk0maLBkHYqhw7H1bK7NKGlxaZu9uoZGRVDBnaLRFlH4wlkjdwyOApPt YQRmBIEZQKB7QXVDkREoIgJFxqGoGAzlhiJt0FKjiB0Ca4CUNO6AwGqrYQ1V sOZqWCsU3gKF18PgeiRCSEQy6GgOBQWg4GCyDYa1CmqogihAdUMgFDiMCKbc FCyLTRAIKFIJTS6hy6V0qYQukdCkUjoAsGtrpV1+c0++dWCkK19wx0Jt3vZm b1tb0OnytXcsTk+Xe7wrVKhQ4XI4zHTmpbC0GNrMgonwJXvTsWgODlODxnKg BAGEpsBxTSJxQ52q1aNr8mjqG2V+BXeESptC4nthaD8MFYShUjAUmHIXSgWT 0nE3DAnm3pGzOknsrMpdC0XoIDCgGgpUwwAIVA2BAhCYFgLTQ6EGKBSAQYVI GA2PwNHQeBaWSUGL4TBVVZWiqkpaVSWsqq6phlARMDIBRafja7gkgZAiFlMl 5yGiikQUgYDM55NFQqpMxtDqePZ6eZtL7+qyOJ1WZ2utu6016HIHO93Lc5Xc u0KFCo8JExFnIwPawIDqKDAeHkHBoMgoFAmJwEORuCo0sYrAI7KMSklzi6at S9voBuqb5U6Am6RTC0hcGo6JwTFROLobjk4jQHWjexGlgx44OgEvpeX+s+iC IVugSAsErqyGSaqhYghUBIfyUXA+Bi5Aw/gICAsOwaMgcDICxcHRRSQRhyAj IGVwiBhazamqIldVYaogGCSiVOjmkcVimlRCFYPSFoDSpggFZKGQLDg75vEo NTUkMASlejjPYpfVNqibmkwdrQ3Brq6oL7Cxslru8a5QoUKFy6Hb08HDQARY CBcHZ+FRVCyagEJhYDB4FRRaBYVVwWlkkkYjaGxTt7qAhk61o1lWq+G0Msh+ FCYJx2SQ2DQS24PA9iIwWQQmh8RkkZg0AhMHc3Io0gsttQj6oaDDUU4owgaB q6ugMgiMj4IxiQgqFUklI6g4GAkNwWKhGAaKISepTcw6M7NZRW4SYuu4WICO YmERODQCR8DSWES+gCIVU6ViikhIEfBL+TZfQBYIQYGX7M3hkhlMAo2GY7NJ UjlbbxLba+X1DZrmZpuvyx0PR3a3tss93hUqVKhwObidHShoNRYGIaLgVDya iscS0Wg0DA6tgpTWcIBUk2g4lY5b16JoalfWtSmsDVI9wNEzSLUolBeGAgXe UxI4DtR4DoHNIbGZkswxydJ0G1QvFJWFIgehqBEYqh+KikGQbVVwEwQmQMNJ VCSajcayUGQ6gkGDs9lIgQynd9BdXfxCXDTbI1xNi5Z7ZMWw1N/Cs5tYaiVD JKRywNSaTeTxiAJQ2r9qb/CYXUOk0fFUGo7JJApFDI1e4KiXN7fq2ttrQ0Fv Otl9bX+/3ONdoUKFCpdDe3tHdXU1HArBIuFkHJpGwFFwOBwCCYdAS/JGQCgs vErPqW2S1bfI7U0yc61Eq+aomCQAibBVw9ohCDCvjsExSQQmBcd0I9AJBBpU eh6GnoSiV6DoLSjqGhR9BEXvQtHzEFS2utRJIkPDsRQkhIWCs1E0DkokQgNq nMVOdnbVFHLSwyX1q9f1336+9rsvu/7LC13PnjRvTBlzUVmjtUbEJ9PpBGZJ 4CRQ1yWHCylCEQW0N5dLotPxZDKWQsWBByww/VawbfUKp9vq97f1JKN9mfTJ 4bVyj3eFChUqXA6gvSEQCAIGxaEQJXsTcXQigYjGlNJv8Hk0nF5DVOm59gap o0lmawDtDebeXDWTpEAilFUQQxWkoRreCUV5zurbnTCkD4ZMQ1ETMPQGFHMM xTwBRd+Bop6EoO9A0CcQ1GI1MgWBmxBwEg5RTUHCGEgaFymTofR6vKOBFogK 5mbUL900fu/L9v/xJ+7/9we5n/5fw//3n/T+0cuuZ/fMM1mZu5GrlDGZbDKd QWTXkEBpl25cSqkiIYXNJlAoGCIJQ6PjwKBScVw+VW8RO7ts0YS7v5AaKmRP r1XsXaFChceE9g4nDApFIxB4NJqEw9CIeDqRSMbisEgkAg5DYZEMDkmp49rq pfZGua1RbqmXmbQ8PYusRiIUVdWqKoi+CmqFwB0QmK0UcCcEkYUg56GoTQhq pxTIPQjysBp1vRp1CkFuQxDDEHg7FMaDw5AYGJwEIzJgXAFCqsDqrDRfRLy6 onvtgeUvv+z479/q+tl/K/zj30z+j/828KNvhf7rK/VfuW66NmNI+JRqJZtG J9IZZ32DUppUSuXzwJwcRyShQHvTGXg6A0eh4BgMglTOrmvSheIdg4M9w325 0/2KvStUqPCY4Op0ouBwHOr/b+9en5uq0wCO53duOfeTk7Q5CW2aprm2iU0D adOmYKEkTXJymvSSNrWxN6DFFlpW8cJFmCJFqCzLbTGLrKIosFTLtFzWFZbu jHXF1ReCsrhlUUZ0x51h98W+2reeRP0PmOmMns88OXNe5NXvxXeeZHLBWZLk aIpnGC3LaiiGwglcraZZ0mjSlXtN1UFbYLm9eoWjermjurLEb+C9mLpCBbly A1cAxAPgRwDsA0hj/o8sRyBsDMI25Fs9DKGbALYVYOOQeieMjQK0WYXI2adV AMAAJiBGixpKKFdVgZS07HzGPXXEP38q+Onb4VuXWr+40nVnLnX3mrhweeVn 51fOvb768PPB7mb7Iy6dYKB0AqE3koUCwXIYQSIkjfFaSjCwgsDqtDTPkQYj 5/FawvG6/jWpJ9b0Htizd7HPW6FQKB6OeKSJUWMcQXAUxdIMJw/DMCRNqkmK JHkdW1Km9/hK/HXWmqDNLwdcHq+52qhdiqk9KliutxPATgipgOAqCA7mv0GZ BEgKIJ0A6fjpJgOQIQh9EsaegrEhgCZzvxAICSqAquQHRGtwk0XjDwjpZPH4 SNnpPd6rr6yYf3XV/MvBD7M1n56u/WJ2xcIfG7+8ErvzrvT+qXB2h783UeJx MZoClOZRkoFhFEAwwElUq8vVW6/PvQHO0DjPk6VlQk29O5WODg50H5ycXOzz VigUioejNdpUQGA6iuBpmmPYH4YhGRKX68cIRr7MafQsNS8NWP11Nn99vt4+ s99U6CNJD5BXaJBbvwEs38vpllRISiXXG47lRwRQHMAJALcBuAvAvQB5PPcE WIKQEI3WFmBuA2Yz4eV2tj6gb5eKRjqN2x8TDm2wvbUnML23dvpZ26XniucP Om+cC96+1HT3SuLelcTdi7G/vdmQ3ebNiGa/Z4nHaXZZzUsEPccxNEtwPCEH XMtTLEtQJC4HvFBgnRWmplh9X2/q0K+VeisUip+JVDRsJNV6mtQyjIbleFaj ZTUcxVIEpeGYIpPO4S5yLyutrCnz1dqWBe3+eoffb/HZjB4tW45iDhWUGwC7 VUiDCkmrkH4V3JHvdhRA8rU5l+5c0uVot6ogSQViKtBKoWuczMYGfmOcH2zW DiSFDd2m54ctu9Yat7VotrcLk8Plx8bKf98vTK0vnNvnunH20X9czi3edy6I 92aj92Yi89nG7K8atnY1be5s39CW6gw1BasqS0sMvJakaXXulQOhJgg1SeIc RxQVa4PLvekuaf9+5RODCoXiZyK6ol4g8UK53izLcxotp9VxvIZiaYLSaVmL VahcVuoL2r11dnfA5g7YvfWuqjqHp9LsMOmsLFmKoaUoYsZQK4oFEKwVRrsh JAnB4Xy9WwD0w8qd27oRpBuHH2OQPi36jIc9ll5yfqvl8oRlZrfl7Ljt3IRj ZtLxh23FR3s1E23cixnD4T7hZIa7MFzwwWT5rdP1X82u+mq28Z/TjfenI/+Z afvudO+tgyN/3bXl/Z2758Yn39m2a3JwKBNaVVlm1tAkisIoiuTqTeFyzHUF VJXPnmhp3L5j82Kft0KhUDwc4ZUNHIFzFMnRP+7ePMMxBE3hZIGOtTkMy2qt tStd3qDd4jObvKXWgNNVV273WcxW/RI9IzC4nsEL5aFxG6EOqtWrELQOhv0A ejS/eGcA3C8HHIL7CHR9gXqTmdjhobMJ4U/bbTeOe26/5r75SsXHWc9Hx9zX j9iv7S6eGtO9nGEOdNBHOsg3uomLI/y1cfNHR903T1R9fnLp56cCC2+svv9a 57+zY98d2v3N3gNfv3Dw25eyXx89eX3fod8ODrcFaot4HgAAQQAnMLneJImx HO50Fjeurtn87Mhin7dCoVA8HFu3bBFjsbgoSnGpWWpOSIlEXIpHRTEqtrY0 9/R1DI/2jG0eGBztTa9Nt/Z3pZ/ozWwc6F6f6ehJtXUmki3xZIvY3CLGk2K7 FOsXo+sikf5wuD8UGgmFtoTCE6HwvlDoxXB4UoocTYsn10hvb2r5y0vpv08N fPPnoX9dHbz/7rp7l4fuXli7MN3z2Vvp68fb3tsvTY9HpneE3puIfHA4cf1E xydvdt8823Prnb7bs4MLM09+ee6Fb89kH5w5999T5x+8OvW/M7P/vzj34MLV D4+//punn3u8rX11XkyMiPGYKEYkKZrJpEZH1/3uxJHFPm+FQqFQKBQKheKX 4nu9JlUT "], {{0, 42.}, {245., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{245., 42.}, PlotRange->{{0, 245.}, {0, 42.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[124689]}, CellChangeTimes->{{3.8201395553028793`*^9, 3.8201395670943203`*^9}, { 3.8201396022444468`*^9, 3.82013960548324*^9}, {3.827665836668954*^9, 3.8276658521163163`*^9}}, CellLabel->"Out[12]=", CellID->482407661] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Options", "Subsection", TaggingRules->{}, CellID->890561554], Cell[CellGroupData[{ Cell["Appearance", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.820139670809226*^9, 3.820139673151844*^9}}, CellID->334799721], Cell[TextData[{ Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Appearance", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Appearance", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " can be used to change the colors of the different states. Use the \ sub-option \"InactiveColor\" to change color when the state is ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["False", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/False", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[124769]}, CellChangeTimes->{{3.820139745494368*^9, 3.820139764963009*^9}, { 3.82013989264955*^9, 3.820139896025012*^9}, {3.827665836462698*^9, 3.8276658453159356`*^9}, {3.828461548369808*^9, 3.828461548954894*^9}, 3.828461616959208*^9}, CellID->619021669], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x3", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Appearance", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", "LightRed"}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820139904457493*^9, 3.820139951807713*^9}, { 3.8276658792506976`*^9, 3.827665895646123*^9}}, CellLabel->"In[17]:=", CellID->280153644], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnEFu1DAUhgPdsOQKSD1ElR1LtkUcoBWTis0gTRGIW+Q0uUuVw4Qkkzh2 kmEqZPs97O9TW7Vdva/P7489SefD4/f76m1RFM/v+i/3D78+nk4Pvz+/73/4 cnz+9nQ8fP10/HF4OpzuHm/6X972nz/fFMXwfQcAAAAAAAArXl6CfKgFX3zx jemrv0K/4IsvvjF99VfoF3zxxTemr/4K/YIvvvjG9NVfoV/wxRffmL76K/QL vvjiG9NXQ4VtU5XFQFm3Pt32EPYdVM+uo29ZNYGNJX3b0dbRrVP2dWgqox1y Vcv5tvXS2RVVo6LCscqmrqw6006YCy0pnX6k43tpBYZtsux6Niz5QsJIVbiE Sz9idZV8wkxrrr+Mt5Nka5ZhwIyRXIHVsEUzHW2jbFXlfC3mXp/3b2knzNW1 K1XhVN90TGjST5hBslr7zdeBcBGjYuIMr12V/44C32kx9yu7JmEk9zC1NXBZ JMwewcV1+WaQMJYiCSNboQ0Jk0fCnHUTPiU5Y0fCyFZok2vC5HRKml+GSfiV 3tXQkTCyFdpkmjDhA0ba176nMjY44bvVm5HLImHs7o5PI6xldUxclgkzT1+i K9BxtJbh5uXuNHx3Lum5JYzpsHPB1DFx+SWM6U/Qp2H0+I53q2fngH0W8t09 MqSdMGuWpxFcZR0VZpYwbZTty4gKXwtzK9efooOI74UoySthRuYLp+Wso8Ks EsbES+Dty4gCX5fAt5MkfP/ydKtDiH5r6+82VXVUmE/CRI2XTt53TegnYiR8 SZiF7STrqDCThDEH1Ujx0mnpryH4wUGTb36npJ1DkpIKc0gYgXjptPS3G14I bGP8BdT4dpkljNVeV1iswitby1BtkfK9upMONHVi/d3ep54aG/YNK9RMXJd4 wrz6X+fVVUjCJOG7SZgyxrvDkDBi87v/uJ1khULgiy++MX31V+gXfPHFN6av /gr9gi+++Mb01V+hX/DFF9+Yvvor9Au++OIb01d/hX7BF198/19fAAAAAAAA AADY4w9CfzH6 "], {{0, 18.}, {187., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{187., 18.}, PlotRange->{{0, 187.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[124849]}, CellChangeTimes->{{3.8201399542377367`*^9, 3.820139958200906*^9}, { 3.8276658552646537`*^9, 3.8276658962522316`*^9}}, CellLabel->"Out[17]=", CellID->849481031] }, Open ]], Cell[TextData[{ "The sub-option \"ActiveColor\" modifies the color when the state is ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["True", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/True", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[124929]}, CellChangeTimes->{{3.8201399866507483`*^9, 3.8201400108377533`*^9}, { 3.8276659023565903`*^9, 3.827665907859545*^9}, 3.8276669987375216`*^9}, CellID->53241723], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x4", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Appearance", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "LightRed"}], ",", " ", RowBox[{"\"\\"", "\[Rule]", RowBox[{"Darker", "[", "Green", "]"}]}]}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820140020952888*^9, 3.820140038429531*^9}, 3.827665911505389*^9}, CellLabel->"In[18]:=", CellID->515140919], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnEFu1DAUhgPdsOQKSD1ElR1LtkUcoBWTis0gTRGIW+Q0uUuVw4Qkkzh2 kmEqZPs97O9TW7Vdva/P7489SefD4/f76m1RFM/v+i/3D78+nk4Pvz+/73/4 cnz+9nQ8fP10/HF4OpzuHm/6X972nz/fFMXwfQcAAAAAAAArXl6CfKgFX3zx jemrv0K/4IsvvjF99VfoF3zxxTemr/4K/YIvvvjG9NVfoV/wxRffmL76K/QL vvjiG9NXQ4VtU5XFQFm3Pt32EPYdVM+uo29ZNYGNJX3b0dbRrVP2dWgqox1y Vcv5tvXS2RVVo6LCscqmrqw6006YCy0pnX6k43tpBYZtsux6Niz5QsJIVbiE Sz9idZV8wkxrrr+Mt5Nka5ZhwIyRXIHVsEUzHW2jbFXlfC3mXp/3b2knzNW1 K1XhVN90TGjST5hBslr7zdeBcBGjYuIMr12V/44C32kx9yu7JmEk9zC1NXBZ JMwewcV1+WaQMJYiCSNboQ0Jk0fCnHUTPiU5Y0fCyFZok2vC5HRKml+GSfiV 3tXQkTCyFdpkmjDhA0ba176nMjY44bvVm5HLImHs7o5PI6xldUxclgkzT1+i K9BxtJbh5uXuNHx3Lum5JYzpsHPB1DFx+SWM6U/Qp2H0+I53q2fngH0W8t09 MqSdMGuWpxFcZR0VZpYwbZTty4gKXwtzK9efooOI74UoySthRuYLp+Wso8Ks EsbES+Dty4gCX5fAt5MkfP/ydKtDiH5r6+82VXVUmE/CRI2XTt53TegnYiR8 SZiF7STrqDCThDEH1Ujx0mnpryH4wUGTb36npJ1DkpIKc0gYgXjptPS3G14I bGP8BdT4dpkljNVeV1iswitby1BtkfK9upMONHVi/d3ep54aG/YNK9RMXJd4 wrz6X+fVVUjCJOG7SZgyxrvDkDBi87v/uJ1khULgiy++MX31V+gXfPHFN6av /gr9gi+++Mb01V+hX/DFF9+Yvvor9Au++OIb01d/hX7BF198/19fAAAAAAAA AADY4w9CfzH6 "], {{0, 18.}, {187., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{187., 18.}, PlotRange->{{0, 187.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125009]}, CellChangeTimes->{ 3.8201400393217688`*^9, {3.8276659121933107`*^9, 3.827665914334123*^9}}, CellLabel->"Out[18]=", CellID->301382733] }, Open ]], Cell[TextData[{ Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " modifies the color when the mouse is hovered over the checkbox when it is \ in the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["False", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/False", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " state:" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[166833]}, CellChangeTimes->{{3.820140048487563*^9, 3.820140088395883*^9}, { 3.820140123508196*^9, 3.820140123685129*^9}, {3.8276659215305867`*^9, 3.827665929821184*^9}, 3.827666996148143*^9, 3.828461658037965*^9}, CellID->865973637], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x5", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Appearance", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "LightRed"}], ",", " ", RowBox[{"\"\\"", "\[Rule]", RowBox[{"Darker", "[", "Green", "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", "LightBlue"}]}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820140096213574*^9, 3.8201401288032103`*^9}, 3.827665936232258*^9}, CellLabel->"In[20]:=", CellID->644066481], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnEFu1DAUhgPdsOQKSD1ElR1LtkUcoBWTis0gTRGIW+Q0uUuVw4Qkkzh2 kmEqZPs97O9TW7Vdva/P7489SefD4/f76m1RFM/v+i/3D78+nk4Pvz+/73/4 cnz+9nQ8fP10/HF4OpzuHm/6X972nz/fFMXwfQcAAAAAAAArXl6CfKgFX3zx jemrv0K/4IsvvjF99VfoF3zxxTemr/4K/YIvvvjG9NVfoV/wxRffmL76K/QL vvjiG9NXQ4VtU5XFQFm3Pt32EPYdVM+uo29ZNYGNJX3b0dbRrVP2dWgqox1y Vcv5tvXS2RVVo6LCscqmrqw6006YCy0pnX6k43tpBYZtsux6Niz5QsJIVbiE Sz9idZV8wkxrrr+Mt5Nka5ZhwIyRXIHVsEUzHW2jbFXlfC3mXp/3b2knzNW1 K1XhVN90TGjST5hBslr7zdeBcBGjYuIMr12V/44C32kx9yu7JmEk9zC1NXBZ JMwewcV1+WaQMJYiCSNboQ0Jk0fCnHUTPiU5Y0fCyFZok2vC5HRKml+GSfiV 3tXQkTCyFdpkmjDhA0ba176nMjY44bvVm5HLImHs7o5PI6xldUxclgkzT1+i K9BxtJbh5uXuNHx3Lum5JYzpsHPB1DFx+SWM6U/Qp2H0+I53q2fngH0W8t09 MqSdMGuWpxFcZR0VZpYwbZTty4gKXwtzK9efooOI74UoySthRuYLp+Wso8Ks EsbES+Dty4gCX5fAt5MkfP/ydKtDiH5r6+82VXVUmE/CRI2XTt53TegnYiR8 SZiF7STrqDCThDEH1Ujx0mnpryH4wUGTb36npJ1DkpIKc0gYgXjptPS3G14I bGP8BdT4dpkljNVeV1iswitby1BtkfK9upMONHVi/d3ep54aG/YNK9RMXJd4 wrz6X+fVVUjCJOG7SZgyxrvDkDBi87v/uJ1khULgiy++MX31V+gXfPHFN6av /gr9gi+++Mb01V+hX/DFF9+Yvvor9Au++OIb01d/hX7BF198/19fAAAAAAAA AADY4w9CfzH6 "], {{0, 18.}, {187., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{187., 18.}, PlotRange->{{0, 187.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125169]}, CellChangeTimes->{{3.82014010760299*^9, 3.8201401346971083`*^9}, { 3.827665932632118*^9, 3.8276659432675886`*^9}}, CellLabel->"Out[20]=", CellID->185843592] }, Open ]], Cell[TextData[{ Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " modifies the color of the check mark when in the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["True", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/True", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " state:" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[125249]}, CellChangeTimes->{{3.820140147605204*^9, 3.820140170060981*^9}, { 3.8276659576280313`*^9, 3.827665957858901*^9}, 3.827666992463806*^9, 3.828461653165093*^9}, CellID->560999808], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x6", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Appearance", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "LightRed"}], ",", " ", RowBox[{"\"\\"", "\[Rule]", RowBox[{"Darker", "[", "Green", "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", "LightBlue"}], ",", RowBox[{"\"\\"", "\[Rule]", "Black"}]}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8201401798542833`*^9, 3.8201401877892437`*^9}, 3.8276659619857883`*^9}, CellLabel->"In[21]:=", CellID->118064073], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnEFu1DAUhgPdsOQKSD1ElR1LtkUcoBWTis0gTRGIW+Q0uUuVw4Qkkzh2 kmEqZPs97O9TW7Vdva/P7489SefD4/f76m1RFM/v+i/3D78+nk4Pvz+/73/4 cnz+9nQ8fP10/HF4OpzuHm/6X972nz/fFMXwfQcAAAAAAAArXl6CfKgFX3zx jemrv0K/4IsvvjF99VfoF3zxxTemr/4K/YIvvvjG9NVfoV/wxRffmL76K/QL vvjiG9NXQ4VtU5XFQFm3Pt32EPYdVM+uo29ZNYGNJX3b0dbRrVP2dWgqox1y Vcv5tvXS2RVVo6LCscqmrqw6006YCy0pnX6k43tpBYZtsux6Niz5QsJIVbiE Sz9idZV8wkxrrr+Mt5Nka5ZhwIyRXIHVsEUzHW2jbFXlfC3mXp/3b2knzNW1 K1XhVN90TGjST5hBslr7zdeBcBGjYuIMr12V/44C32kx9yu7JmEk9zC1NXBZ JMwewcV1+WaQMJYiCSNboQ0Jk0fCnHUTPiU5Y0fCyFZok2vC5HRKml+GSfiV 3tXQkTCyFdpkmjDhA0ba176nMjY44bvVm5HLImHs7o5PI6xldUxclgkzT1+i K9BxtJbh5uXuNHx3Lum5JYzpsHPB1DFx+SWM6U/Qp2H0+I53q2fngH0W8t09 MqSdMGuWpxFcZR0VZpYwbZTty4gKXwtzK9efooOI74UoySthRuYLp+Wso8Ks EsbES+Dty4gCX5fAt5MkfP/ydKtDiH5r6+82VXVUmE/CRI2XTt53TegnYiR8 SZiF7STrqDCThDEH1Ujx0mnpryH4wUGTb36npJ1DkpIKc0gYgXjptPS3G14I bGP8BdT4dpkljNVeV1iswitby1BtkfK9upMONHVi/d3ep54aG/YNK9RMXJd4 wrz6X+fVVUjCJOG7SZgyxrvDkDBi87v/uJ1khULgiy++MX31V+gXfPHFN6av /gr9gi+++Mb01V+hX/DFF9+Yvvor9Au++OIb01d/hX7BF198/19fAAAAAAAA AADY4w9CfzH6 "], {{0, 18.}, {187., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{187., 18.}, PlotRange->{{0, 187.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125329]}, CellChangeTimes->{{3.820140188790571*^9, 3.8201401920259743`*^9}, { 3.827665962635769*^9, 3.8276659655653048`*^9}}, CellLabel->"Out[21]=", CellID->166639204] }, Open ]], Cell[TextData[{ Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " can be used to arrange the layout either horizontally or vertically:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.820140243258782*^9, 3.820140284304895*^9}, { 3.820140331064246*^9, 3.820140333519267*^9}, {3.827665971451577*^9, 3.827665975100285*^9}, {3.828461563867379*^9, 3.8284615742077093`*^9}, 3.828461667704949*^9}, CellID->65203553], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x7", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Appearance", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820140286955505*^9, 3.820140322576353*^9}, 3.8276659804804554`*^9}, CellLabel->"In[22]:=", CellID->585177016], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt3DFOwzAYhuEIFkauwCUQysbIWsQBqGgqliK1SIhb5DQ9ByvyYcAhceLE TtqqoHwl7ycVtUyP7NqJ/j/u1fxllp0lSbK5sH9mj2+36/Xj+/2l/fCw2jwv V4unu9XrYrlY38zP7T8/7Ovavor3X4Ro5PNvghAhwikKzTZLkyJpbtSEZptX OEFhg0sz+1ZPaPK00hWoraDQErOsBkkKW0GIECFChAiPEFYX5r7UWITHByFC hIQQQgghU4v+3RdChAjLdlRTe0ir5oWKsKcuYpUaQlfuynJj6vGskL5xPGFh zLrVODesHnFM4dDINnSEB0Z+liNAKaFbyu1qtoyw3hzbu6GK0MSHT0ZY87rD pyEc5o0udE+xBF8+DeE+vDGFOxo+jRvh8UGIECEhhBBCyNSif/eFECFCeaH5 6Zm1mma5Utesr3LTqcOOKsyKRmPNMfFDcSMKB8ZVtVtxEsKyqq06y+5rqLNS vEHz1rHSbhMTJmVLXEnoxe42bof0J1pI2BrUZjXLCYPlLCcMdkQ1oTs0rPgU gWmuyyLXlHCfcbvNVmS36QrT6N2h0iz3BSFChIQQQgghvxv9exuECBGelrCp QWieXPBrJIpCd7InjTQDFIR1YTgsHkoIvaKrpLBVFBYUdorWcsKgqC4mjLRB pYQRn5QwSlES7jybknhNC4QHRWeWEU5ZGA1ChAgJIYQQQqYW/bsvhAgnLhyo gGk8S3w6wuHfMEKIEGGwlsvn7jsP3ksJHbQ1rCMKA3Fz+kPzfEp7YPVPIQkL gx8zFROGkywk9BaKyMnWPY+ACwmj2/Wown2DECHC/yEkhOzMN5Tfv5Y= "], {{0, 104.}, {27., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{27., 104.}, PlotRange->{{0, 27.}, {0, 104.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125409]}, CellChangeTimes->{3.8201403265776243`*^9, 3.827665981432335*^9}, CellLabel->"Out[22]=", CellID->878052532] }, Open ]], Cell["\<\ Specify the number of rows or columns as second item in the list:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.8201403498239107`*^9, 3.8201403772916327`*^9}}, CellID->843159504], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x8", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Appearance", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "2"}], "}"}]}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820140391697665*^9, 3.8201403962575703`*^9}, 3.827665986596975*^9}, CellLabel->"In[23]:=", CellID->67556022], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnc1u00AYRS3YsOQVeAuUHUu2RTxAK+KKTZBSJITEmrWfxu9SzcMEO/4b 25M0wDjfieceKVVbqdW9Of4Zu57pu4dvd/mrLMue3lQf7u5/fNjv739+elt9 8Xn39PVxt/3ycfd9+7jdv394XX3zV/X6Xb3qzw9CCCGEWBfPy2Bd6yT8vvyE ceH35SeMC78vP2Fc+H35CePC74tI6Mp8k9VsChexWwjrvnXVpuux7yYvp42N E7qyyIeAKzfiCq+qVzovGQkHGVWkIl+9kbKtmBeuLenab2WZ78QsYbvBtLtt uX4jdcl82q/bbTwldgld4QVMwkiIeXFIQhmREdu+Haij1ohEjQSEUBImaaQb ao1bQxKmZ6S/OBlfjWASJmbEhXcPUMK0jPQ6prsHJuEhJSPndRASjnKu3Uh3 R3V28sAk9KKu38glOkwTnrgT2t8RXUaOWd8X6g6ezBLKCM6IDfy+/IRx4ffl J4wLvy8/YVz4ffkJ48Lvy08Yl9T6CiGEEEIIIYQQQgghhCCQ2t1pfl9+wrjw +/ITxoXfl58wLvy+/IRx4fflJ4wLv69pQndck2K0KEUxW5UiLqZ9R/TLC3Bm vZ16EnbRB+QN+44YfKCM5PWKD30ad40Fawz7enSTM5rjA8ZIiHa/OT/D4n8g 9G19VFtjISOAvl7FWzDSbD4rPmqNNjm6ke40suIz++QQgDTijzmO4VY8+p0d km/BSNYsCXbxj/81dn0Dp0ikET+yK7srlOUOXFZ9g0MWupGGfmj477/iHDZ9 g2/9rRhZeLhl0vfFebotx83QJOEF6Ve1j9y0kRP7dzRQfeFHLTfc11r1NbsH zMh83NuNfpe8JLHrGwBuZHOFv47ICA9+X37CuPD78hPGhd+XnzAu/L78hHHh 9+UnjEtqfYUQQgghhBBCCCGEEGmie6E0ZISGjNCQERoyQkNGaBgaOfPE+HLP /fKRERr2RlJ+90PICA0ZoSEjNGSEhr2R0aSeek7P0pN64KCMDPPelq4NxtDI FG9m6BX+UTsWkJEj3Y6TrhKakcUntOPBGemWMJQRhhEdtEBGvBN7wj4AK4DN x74p6ziQjOjysMHOiAgjIzRkhIaM0JARGjIihBBCCCES4Q/X96kV "], {{0, 62.}, {67., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{67., 62.}, PlotRange->{{0, 67.}, {0, 62.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125489]}, CellChangeTimes->{3.820140396926927*^9, 3.8276659874632387`*^9}, CellLabel->"Out[23]=", CellID->799806582] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Enabling/Disabling", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.82014047010198*^9, 3.8201404712615423`*^9}, { 3.8276656263885317`*^9, 3.827665630507634*^9}}, CellID->507497444], Cell[TextData[{ "Setting ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Enabled", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Enabled", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " to ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["False", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/False", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " prevents the checkbox bar from being controllable:" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[176545]}, CellChangeTimes->{{3.8201404805705423`*^9, 3.8201405555777903`*^9}, 3.827666983471296*^9, 3.827667041304373*^9}, CellID->639290864], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x9", "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"Enabled", "\[Rule]", "False"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820140562215291*^9, 3.820140588001821*^9}, { 3.827665998543137*^9, 3.827665999311573*^9}}, CellLabel->"In[24]:=", CellID->227823971], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztmj9OwzAYxStYGLkCEodgZWQt4gCtKBVLkVokxNZb5BS+RA6RI7D4EMFO 7fyrKxY73yN+P6kIOr0ffnHir71bfyzfrhaLxeHG/Fiuvh73+9X3863542V3 eN/uNq9Pu8/NdrN/WF+bN+/NqzIv+3tNCCGEEDl+0iCtdRH6ovniJ4wLfdF8 8RPGhb5ovvgJ40JfNF/8hHGhL5ovfsK40BfNFyKhrlRxtBSljugWQtrXqp5c G99CVWmNRX11YzvQLc98RRPaBSlVl3DmDdRlT7UnrapZ+l7QHS+yXMKufGYJ SjX7BlZOUZXaSWr31vGYroNyvqaBym7x7Yrq8K1OLKG7QtxtqJp/A62kGvv5 fSJZBSV9Azjfvq5cQnOJdAuSRQNDpBYH84Vq4AA2MI8GnnQx7sKhZPk1MKe7 sH8MhDmJDMi0gckLKO7bHrb8ORhtGjMKmlcD/eqktJb2HTXQDQOQEg6DZtTA dlqWchoI5NtMY7xzf51BEmbWQD3F9teA4dvDmXfXHUjCrBrY1i/t9teA4Dtk fBwGSZhPA6esXw3gO+ZsIgiSMJMG+o+lEj/89ZD1Pcd/FNYtNEjCHBo4ff1q mPWt7UFEB/8DcgkvfXWinRwlKaOY7x+6qXop5huYw7SPHyDTGDYwrwYWwW8H Iu3S00BfNF/8hHGhL5ovfsK40BfNFz9hXOiL5oufMC70RfPFTxgX+s7blxBC CCGE/At+AWQP6CM= "], {{0, 18.}, {107., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{107., 18.}, PlotRange->{{0, 107.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125649]}, CellChangeTimes->{3.8201405886641417`*^9, 3.8276659997141886`*^9}, CellLabel->"Out[24]=", CellID->911344177] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Spacings", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.8201406264856663`*^9, 3.820140627933814*^9}}, CellID->203711531], Cell["Adjust the spacings between individual checkboxes:", "Text", TaggingRules->{}, CellChangeTimes->{{3.82014063025497*^9, 3.820140649539797*^9}}, CellID->272837669], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Column", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x10", "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"Spacings", "\[Rule]", "space"}]}], "]"}], ",", RowBox[{"{", RowBox[{"space", ",", "3"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820140658084508*^9, 3.820140739555578*^9}, { 3.827666003315692*^9, 3.8276660040536833`*^9}}, CellLabel->"In[25]:=", CellID->708912205], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnUGO5EQURAvYsOQK3ALVAokl20EcYEa0R2waaQYJseIKPk3fBfkwxnY5 s1wul5rpb/tH+r8nzQhmlRGRUc7KdCm///DHu+rr0+n0+dvur3fv//rp06f3 f//yXfc/vz5//v3j89NvPz//+fTx6dMPH77p/vGf7s+PX51O/X+3AAAAAAAA AAAA3vy7Dd6yHoLeY+uNQ7Rk0XtsvXGIlix6j603DtGSRe+x9cYhWrLoPbbe OERLFr3H1hsHiWSbl+p86jnXzTYyM956e6kXrYPec/WyrWJXvc2g9kZuvbHe OLgm20/kurome/DmNvVE6kR09XJIvQ/k7hByCPySvZa2m7p1dfjmvowSq7oZ RTbjP51O23XXT2/X3KpfUuREmx2XVgFwS3b8RB6Xiy/Hb24vsprrS8+lzarr qXeBUe+Wq4wo+CXbfSRfJ3KI5i6xtXAxvTR3NUSSpbkxmnuRy2p5BUSSjdrc SKvl9DWX3q6CSLJBm7t5cd315k24tK/MqdBKeCc7ErK5aVZvqdpb76y54+b6 ZnID4Z3sSLzm5tPObXdrZPQOp0JJMwtmOyLJBmtus8fjdkBD74RRObvLVkSS DdXcXNsdpq+C3lvYXl4HkWTjNHfP2rYCeudworsSIskGaW56/W+/ieur9570 6hyPXCsiyUZo7v61bWXybfsNqsbFgaPil+yjn5Lkk79NSuym9xW5W81mN70L 50H5awLP2xXwS5bmxmrumV/nropfsj6g99h64xAtWfQeW28coiWL3mPrjUO0 ZNF7bL1xiJYseo+tNw7RkkXvsfUCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAbA2/37SAexZwzwLuWcA9C7hnAfcs4J4F3LOAexZwzwLuWcA9C7hnAfcs 4J4F3LOAexYk3MuXvJV2OaO3e71x58nNPWVdtuXq3nCz4K15Zd165OpeP/Xq anJTFs39/+49uGJspxu118DRvUf3sxU0Af3cu5a2m2z1Xvfnroufe+nC4apu RsuafHleKd31c69rbtUvUPJsa8pb9rm5ly4vvyzwdrv5el3c3Gt7y6q5W+lJ Ukh1Pd1bYHSvEPNc78+dTD2a+4XuLVOWjWLu0dy3uFfWlMuIuJcpy0Yx9y7m FeKdjHtlTbmMiHsJVstvdS99zS1oAoq4R3Mt7o0UVlx39/KWXtpX5lSI5u7r 3kCah+V46O3erLnjVv2GglfF270Rmmtxb3I+WcrztkfGveFUKDlYyhwUcY/m GtxrynvcDmi4N2H0sYxPPxH3aO6b3cu1LWPCTVBw75aStpdF3KO5b3Ov3Nq2 Au7NKepEV8Q9mvsG99ILe4VMtTt83bsnvdZXxiQUcY/mfql7pde2lZl7bb9B 1RTnp597j36ukU/XCiixm3uvmFfG/HNzb+E8KH/pKGDWXfBzj+Ya3KO5Fvfu mnsu7te5SiuWEsE9C7hnAfcs4J4F3LOAexZwzwLuWcA9C7hnAfcs4J4F3LOA exZwzwLuWcA9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADYB37drANZ 6KCfhf4I40AWOuhnoT/COJCFDvpZ6I8wDmShg34W+iOMA1nooJ+FxAjzRWpF XCa0Gd5Z9DGcJ3ftFHQ91uq4ZjHcLHgbxf2tR64j7CdLXU3utqK5Xlk8uGKs yBu118Axi0e3vc3K4TfCa2m76VGXeX/uuvhlka4vrupmDKDJ193F7K5fFl1z q365k5vQLC9J3UaYLgi/LMkKvfl6XdyyaPsAqrn36bM/ZHU9s1hgzGIahd8I u4+W62Shua3cbAkdilgWUs29IfIkyYhkkYkcilgWlyg0VstLI4s5STIiWSRY LWtkkb7myuxQ3UBzW5ksRkIX1z2LvEGY9pXVToVmA6W5AlkMpJkTNRHvLGbN HTf+lUZ4O9Co8+SCSBaTE8WYz9semSyGU6GUx7QfIiOkua1KFk30x+2ARhYT xlSun6UiI6S5rUYWubZxH7cDClncMt9eFhkhzW0FsqC2Gfcs5tyd6IqMkOa2 3lmkV+wCf7md4JvFPemVw2tBREZIc1vXLKjtDMcsZjTX95ZF3qF69JOIfIIV rsRuWbwSRcQ+u2WxcB6Uv8KInArR3DluWdDcO9yyuGvuefHXuUqrAiALHfSz 0B9hHMhCB/0s9EcYB7LQQT8L/RHGgSx00M9Cf4RxIAsd9LPQH2EcyEIH/Sz0 RxgHstCBLAAAAAAAAAB24z/lhEuz "], {{0, 63.5}, {159., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{159., 63.5}, PlotRange->{{0, 159.}, {0, 63.5}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125729]}, CellChangeTimes->{{3.820140666885704*^9, 3.820140748388143*^9}, { 3.8276660063287616`*^9, 3.8276660095931416`*^9}}, CellLabel->"Out[25]=", CellID->898457876] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Magnification", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.82014111445192*^9, 3.82014111744415*^9}}, CellID->730865267], Cell["Increase the size of the checkboxes:", "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[125809]}, CellChangeTimes->{{3.820141122892812*^9, 3.8201411327239532`*^9}}, CellID->211397411], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "x11", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8201411375727158`*^9, 3.820141164515957*^9}, { 3.8276660128395295`*^9, 3.827666013627201*^9}}, CellLabel->"In[26]:=", CellID->184029065], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt3UGOG9UWxvEWTBiyBTaBkGcMmQaxgETEEZMgJUiIXXg13guqxTT+ukOl yr5Vbt+qe/7H1d9Pek+AnuCeP7d9On7tyg/v/nyz/+bh4eHzd6f/evP2758/ fXr7z6/fn/7kt4+f//jw8f3vv3z86/2H959+evft6S/+qP+c/vf640czMzMz MzMzMzMzMzMzMzMzMzMzMzMzMzMzs/vxbwJ0gyB0ZqEbBKEzC90gCJ1Z6AZB 6MziqTeMzix0gyB0ZqEbBKEzC90gCJ1ZPPWG0ZmFbhCEzix0gyB0ZqEbBKEz i6feMDqz0A2C0JmFbhCEzix0gyB0ZvHUG0ZnFrpBEDqz0A2C0JmFbhCEziye esPozEI3CEJnFrpBEDqz0A2C0JnFU28YnVnoBkHozEI3CEJnFrpBEDqzeOoN ozML3SAInVnoBkHozEI3CEJnFk+9YXRmoRsEoTML3SAInVnoBkHozOKpl+mO +93DF7tDt97feA10ZllhjO542O92feZT6N1uf+xSxaYzy6IBuuOp8jjzc+hD stL3n7qgO4y7J3kloTNL/enPok7aH7c09WD+wW7Kda96dGZZNkF3OI+cNDid WepPf/VrOVHpO09dcpE/S246s9Sf/vVuqMvdlOte9ejMUn/6U+brt2t3fr0g dGapP/1LvpbT3G46s6w5TyF+ltZ0Zqk//WvcUNpNw6n1HsjB7/LNqT37cD2N 39TrjuObl2JH0Zml/vSnr+Xd/nSXT5UHV7h7ens13esmnVnWm+bry+jp38Au V+k7T92nvTEnPbEsnPjLhTp247+Y5V716MxSffj/w5arDhdYhhVFZ5Y2kw1K 57jgdGZZa5bBfjp0oz9Z65+wCJ1Z6k//+jZU/9X69H8fn2fIc696dGZZcv7j fn+cSjr8diHBiqIzS6PRBqUThN5S6rOV5A1VUn/617ihTq+Zu7MXTW+oec2G y/W9PZ1ZGo3mDXVpjTkuFpI3VEn96V/lhprJkOde9ejM0my4XOHpzNJoNG+o S8unKKwjb6iS+tN7Q40z5LlXPTqzNBtu8GuoBC+cdGZpNNrX0Ak6P24jdXEZ eUOV1J/eG2qcIc+96tGZpdVsybrTmaXJYF/3U4bMQmeWZRNMrCJvqJL603tD jTPkuVc9OrM0Gi1bdjqzrDxSN/rc3/TPrESjM8uS808uIm+okvrTT30eavf8 0YrJR6XQE0v91HMZstyrHp1ZmgyW7Af5HjeSeuIj0rt9qotNZ5b608+sIW+o kvrTX//E7vCHsrcy9VyGLPeqR2eWBmMNb16W5nRmWTzE1IYqfyFT6MxSe/bZ JeQNVVJ/+hc+U+Li3QF6Yln2720qQ5Z71aMzy9ozja5djl8/CZ1ZFg8x/5ip LNebzix1J7+ygryhSlYeqXt+Usrcg3rpiWXNib2hZq070ehZSJly05ll7Zm6 88ce5UhOZ5aac19dQN5QJY1GGz/1c/StLj2xrDmpN9SsFceZvlM8OrO0mi3Z u6p0Zrn91C9YP95QJe2mm/rMPz2xrDimN9S8tWYZPU8+2Xp63Fbqgkw/c05n lpsP/dLnbBeAxenM0nC8iY9U0hPLilN6Q81bZZDhesry+22M0Zml4XiZvr2n M8vNh/aGqtVwPG8oGp1Zlk+Rfz09biX1JG+osZsP7Q1Vq910Uy/d9MQSMGYG dGZZOMJdrKfHTaSek+nJR3RmaTJYpm8DntGZpdlwk4+epieWFef0hpq35Pyj 9ZQt7hidWVrNluyK05mlyWDeUCVtJpv70Ao9sbQZNcu96tGZpfrwd7SeHu88 ddnTD5sn/E126czSZDBvqJJ1J7r8BMXluwL0xFI9323vJtMXjc4slUef//Bo vtZ0Zqk9+8tudZr3WOnM0mQwb6iS6sO/5CXk/Hf7u/upvaFuVnl0b6jb1Z79 6q32U4/ONRnMG6qk+vBXXkKmLzU9sdQO7Q11s8qje0Pdrvbs5Vu90yOgD5lW 0xd0ZmkymDdUSfXhiy8h155rfvdT3xc6s9ANgtCZhW4QhM4sdIMgdGbx1BtG Zxa6QRA6s9ANgtCZhW4QhM4snnrD6MxCNwhCZxa6QRA6s9ANgtCZxVNvGJ1Z 6AZB6MxCNwhCZxa6QRA6s3jqDaMzC90gCJ1Z6AZB6MxCNwhCZxZPvWF0ZqEb BKEzC90gCJ1Z6AZB6MziqTeMzix0gyB0ZqEbBKEzC90gCJ1ZPPWG0ZmFbhCE zix0gyB0ZqEbBKEzi6feMDqz0A2C0JmFbhCEzix0gyB0ZvHUG0ZnFrpBEDqz 0A2C0JmFbhCEzix0AzMzMzMzM5v0HzIKyYM= "], {{0, 27.}, {283., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{283., 27.}, PlotRange->{{0, 283.}, {0, 27.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[125889]}, CellChangeTimes->{{3.820141165025071*^9, 3.820141172756374*^9}, 3.8276660143335238`*^9}, CellLabel->"Out[26]=", CellID->420335918] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Properties and Relations", "Subsection", TaggingRules->{}, CellID->232113220], Cell[TextData[{ Cell[BoxData["StyledCheckboxBar"], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["CheckboxBar", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/CheckboxBar", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " are similar in functionality:" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[60177]}, CellChangeTimes->{{3.820141220493908*^9, 3.820141238324771*^9}, 3.827666943224519*^9, 3.8276670510559845`*^9, 3.828461679545595*^9, 3.828461873644799*^9}, CellID->41666536], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "t1", "]"}], ",", RowBox[{"Range", "[", "5", "]"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820141240196557*^9, 3.8201412485567513`*^9}, { 3.827666023246323*^9, 3.827666023758442*^9}}, CellLabel->"In[27]:=", CellID->340219013], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnE1u1DAYhgNsWHIFJA5RZceSbREHaNVJxWaQpgjELXKa3KXKYULiyY+d ZDoVsv192M8jtWq7ep/afmMnaT/e/7it3hZF8fS+/3R79/vz6XT35+uH/ptv x6fvj8fDw5fjz8Pj4XRz/67/4af+49ebohi+7gAAAAAAAMDlOQzSWhfBF198 Y/rqT+gXfPHFN6av/oR+wRdffGP66k/oF3zxxTemr/6EfsEXX3xj+upP6Bd8 8cU3pq+KhG1TlcVAWbce3faQ9h1Uz67Gt6yasMaivq2xdXTrlH0dmmrWDjir BX3behnZFVWjIqFJ2dSVlTPthrkwJKU9Hgn5XpqBQQdZ0Ndh6RcaRirhUi79 Equr5BtmnHP9ZbwdJdt5GobrGDnffgZWwxZtHtE2xlZV0NdiGuvz/i3thrk2 d8USjvnGY0KTfsMMktXab7oOBKsYSd8dXjkr/x0NvuNk7md2TcNI7mFqa8Fl 0TB7hBZX5ptBw1iKNIxsQhsaJo+GOesmfEpylh0NI5vQJteGyemUNN2GSfhO 72rR0TCyCW0ybZjgBSPuaz9TMQOc8NPqzZLLomHs0TVvI6xkBRPaZNkw0+pL dAY6jtY03NzuTsN355KeW8PMI2xfMAUT2uTXMPP4hHwbRpGveVo9OYcbZynf 3SND2g2zZnkbwVFWkjCzhmljbF8MOnwt5ke5/hxtZHwvVEleDWOYLpyLs5KE WTXMXC9hty8GDb4uYR8nifi+8HarQ4DxFvF9iU2rKkmYT8PErJdOge+awG/E iPjSMAublawkYSYNMx9U49RLJ+27JfTBQZVvfqek7SFJS8IcGiZ+vXRqxrcb bgS2EX4Deny7zBrGGl5HWC7hla1loGER8726kw6z6sR8d55TjwMb9B9WyPnu kHTDvPZP5/UlpGGS8N00TBnhv8PQMPF81xN693U70YQy4IsvvjF99Sf0C774 4hvTV39Cv+CLL74xffUn9Au++OIb01d/Qr/giy++MX31J/QLvvji+//6AgAA AAAAAADALn8BHwbBnw== "], {{0, 18.}, {187., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{187., 18.}, PlotRange->{{0, 187.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[126049]}, CellChangeTimes->{{3.820141251096457*^9, 3.820141265248357*^9}, 3.8276660244447207`*^9}, CellLabel->"Out[27]=", CellID->742865759] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"CheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "t2", "]"}], ",", RowBox[{"Range", "[", "5", "]"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820141253319018*^9, 3.820141261404517*^9}, { 3.827666027286894*^9, 3.8276660284142656`*^9}}, CellLabel->"In[28]:=", CellID->324170808], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztm01OwzAQhQNsWHIAJMQZ2KDsWLIt4gCtiCs2RWqRELfIaXIZH6Y4P3ac tPmzPalN3ieBCtLUT+N59tROHzdfK3YdRdHhVvxarX9e9vv179ud+ON9d/jc 7pKP1913sk32z5sb8c8H8XN/FUX56yMAAAAAAAAAAACAlzxZAM3Q7JtmH2Qb v89l53rmQHugeTYuLtuxAJ6xOMqJU26la/rQJoG53FJvoTlmGZVqh5oL0Q3V KY1souLMmJJOUiROZPO0znALls0hoBCRpUyT4b+nOrIWD6bMfmiLwK65psg3 iadqR8FTPYG1nURBpiwIT1VTK9Z4XgnlarYpXOXOUyzfTVVyOWFnQOApmfZy n/XfU0al4EBANXzVOGVheCoXytoa5eJEYCrKJt9m/i2HnhZY1YYolBSe6g8U a2ddnsF46hx04uEpXSY8NSkQnjIb2iKwVO1579coUnhqUmDIngqw95Mfpzw/ o2iVKDw1KTBgTxFayq1m/eysyLXnZ+knBRqMp/QsF3cWYwTDUxJZqB5PtKTl qag8v7RUOG5og8AzS36InlKZHlxx4akClUKa2ynCvZVnUrrzlNM1Uf57qk19 ZzEsG57SbqYIRdM+MKMOqc3GsBm6P7DDPOF5qkCuvAO64SllKKotqntod4Ek R3/2mnueRmjgNPWEqR63FizcU/MY6uzQLgNpbqjgqTbjinvJnlIdMrWhTod2 G0jUSpE3UYH1fiNbv+V6ak5DHckmmmufnX1/jkIjOE9paR4W7ebZpN4d3sfz qMGmxHWBOpro01P0KscU31JZsKesHv+Hp4L2VEz37Sl4qpHnsRe+5fsYY6bc HmiG5v8nGwAAAAAAAAAAAAAA4A9/GOQdCA== "], {{0, 15.5}, {142., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{142., 15.5}, PlotRange->{{0, 142.}, {0, 15.5}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[126129]}, CellChangeTimes->{ 3.820141261821843*^9, {3.8276660289716964`*^9, 3.8276660327312083`*^9}}, CellLabel->"Out[28]=", CellID->779699790] }, Open ]], Cell[TextData[{ "However, various stylings e.g. ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " can't be specified in the checkboxes, in contrast to ", Cell[BoxData["StyledCheckbox"], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{"AttachedInlineCell" -> CellObject[167073]}, CellChangeTimes->{{3.820141266889515*^9, 3.820141299439395*^9}, { 3.827666938337675*^9, 3.8276669626526346`*^9}, {3.8284616877357483`*^9, 3.8284616929846687`*^9}}, CellID->499849707], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"StyledCheckboxBar", "[", RowBox[{ RowBox[{"Dynamic", "[", "t3", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Appearance", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", "LightGreen"}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.820141330631062*^9, 3.820141351950569*^9}, { 3.8276660387983*^9, 3.827666039759158*^9}}, CellLabel->"In[29]:=", CellID->522421764], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnE9u1DAUhwPdsOQKSD1ElR1LtkUcoBWTis0gTRGIW+Q0uUxWPUlIPInj /BmmQrbfw/4+tVXb1fv6nn+xJ+l8ePx+X70tiuL5Xf/l/uHXx9Pp4ffn9/0P X47P356Oh6+fjj8OT4fT3eNN/8vb/vPnm6IYvu8AAAAAAABgyUv3EuJDWusi +OKLb0xf/RX6BV988Y3pq79Cv+CLL74xffVX6Bd88cU3pq/+Cv2CL774xvTV X6Ff8MUX35i+Kipsm6osBsq69ei2h7TvoHp2Nb5l1YQ1FvVtje1Ct07Zd0FT We2AUy3o29ZzZ1dUjYoKTZVNXTl1pp0wF1pSuv1IyPfSBAZtsvA8W+Z8IWGk KpzDpV9idZV8wowz11/G21GytWMYLmNEJ7Aatmi2o22Mraqgr8PU6/P+Le2E uTa7YhWO9Y3HhCb9hBkkq7XfdB0IFjE6VpzllVP572jwHYe5n+yahJHcw9TO gssiYfYILa7MN4OEcRRJGNkKXUiYPBLmrJvwKWmx7EgY2Qpdck2YnE5J08sw Cb/Su1p0JIxshS6ZJkzwgBH3de+pmAYnfLd6s+SySBi3u+ZphJWs9ASOZJkw 0+pLdAIXjs4Ybl7uTsN355KeW8LYDrsXTOkJHMkvYWx/Qj4No8jX3K2enMP1 Wcp398iQdsKsmZ9GWCgrqTCzhGljbF8MOnwd7K1cf44uMr4XoiSvhDFMF87Z WUmFWSWMjZew2xeDBt8lYW8nifj+5enWBQH6ra6/m1RVUmE+CRMzXjoFvmsC PxEj4kvCzGxWspIKM0kYe1CNEy+dtO+W0AcHVb75nZK2hyQtFeaQMPHjpVPT 3254IbCN8BfQ49tlljBOexfCchVe2VoGaouY79WddJhVJ9ff7X3qsbFB37BC z4rrEk+Y1/7rvL4KSZgkfDcJU0Z4dxgSRm797j5uJ1qhDPjii29MX/0V+gVf fPGN6au/Qr/giy++MX31V+gXfPHFN6av/gr9gi+++Mb01V+hX/DFF9//1xcA AAAAAAAAAHb5AwKtONk= "], {{0, 18.}, {187., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{187., 18.}, PlotRange->{{0, 187.}, {0, 18.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[126369]}, CellChangeTimes->{ 3.820141353422452*^9, {3.8276660414360332`*^9, 3.8276660434618087`*^9}}, CellLabel->"Out[29]=", CellID->922631055] }, 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["Soumya Sambeet Mohapatra, Jayanta Phadikar and Kunal Khadke", "Text", CellID->828200548] }, 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["keyword 1", "Item", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->744507960] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Categories"}, DefaultNewCellStyle->"Item", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "3D Visualization"}], "\" \"", "\"3D Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Accessibility"}], "\" \"", "\"Accessibility\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Accessing External Services & APIs"}], "\" \"", "\"Accessing External Services & APIs\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Associations"}], "\" \"", "\"Associations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Astronomical Computation & Data"}], "\" \"", "\"Astronomical Computation & Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Background & Scheduled Tasks"}], "\" \"", "\"Background & Scheduled Tasks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Calculus"}], "\" \"", "\"Calculus\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Calling External Programs"}], "\" \"", "\"Calling External Programs\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Functions & Deployment"}], "\" \"", "\"Cloud Functions & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Code as Data"}], "\" \"", "\"Code as Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Color Processing"}], "\" \"", "\"Color Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computational Geometry"}], "\" \"", "\"Computational Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computation on Graphs"}], "\" \"", "\"Computation on Graphs\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computer Vision"}], "\" \"", "\"Computer Vision\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Control Objects", {False, "Control Objects"}], "\" \"", "\"Control Objects\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Core Language & Structure"}], "\" \"", "\"Core Language & Structure\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Creating Form Interfaces & Apps"}], "\" \"", "\"Creating Form Interfaces & Apps\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cryptography"}], "\" \"", "\"Cryptography\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cultural Data"}], "\" \"", "\"Cultural Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Structures"}], "\" \"", "\"Data Structures\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Transforms and Smoothing"}], "\" \"", "\"Data Transforms and Smoothing\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Visualization"}], "\" \"", "\"Data Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Date & Time"}], "\" \"", "\"Date & Time\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Decorations"}], "\" \"", "\"Decorations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Differential Geometry"}], "\" \"", "\"Differential Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Dimension Reduction"}], "\" \"", "\"Dimension Reduction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Discrete Mathematics"}], "\" \"", "\"Discrete Mathematics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Dynamic Interactivity Language"}], "\" \"", "\"Dynamic Interactivity Language\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Error Handling"}], "\" \"", "\"Error Handling\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Expressions"}], "\" \"", "\"Expressions\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Interfaces & Connections"}], "\" \"", "\"External Interfaces & Connections\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Language Interfaces"}], "\" \"", "\"External Language Interfaces\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "File Operations"}], "\" \"", "\"File Operations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Front End Utilities"}], "\" \"", "\"Front End Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Functional Programming"}], "\" \"", "\"Functional Programming\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Function Visualization"}], "\" \"", "\"Function Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Games"}], "\" \"", "\"Games\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data and Entities"}], "\" \"", "\"Geographic Data and Entities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data & Computation"}], "\" \"", "\"Geographic Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Visualization"}], "\" \"", "\"Geographic Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometric Region Properties"}], "\" \"", "\"Geometric Region Properties\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometric Transforms"}], "\" \"", "\"Geometric Transforms\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometry"}], "\" \"", "\"Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Construction & Representation"}], "\" \"", "\"Graph Construction & Representation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Properties & Measurements"}], "\" \"", "\"Graph Properties & Measurements\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Visualization"}], "\" \"", "\"Graph Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Handling Arrays of Data"}], "\" \"", "\"Handling Arrays of Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Higher Mathematical Computation"}], "\" \"", "\"Higher Mathematical Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Image Filtering & Neighborhood Processing"}], "\" \"", "\"Image Filtering & Neighborhood Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Image Processing & Analysis"}], "\" \"", "\"Image Processing & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Importing and Exporting"}], "\" \"", "\"Importing and Exporting\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ "Interactive Manipulation", {False, "Interactive Manipulation"}], "\" \"", "\"Interactive Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Iterated Maps & Fractals"}], "\" \"", "\"Iterated Maps & Fractals\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Just For Fun"}], "\" \"", "\"Just For Fun\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Knowledge Representation & Natural Language"}], "\" \"", "\"Knowledge Representation & Natural Language\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Layout & Tables", {False, "Layout & Tables"}], "\" \"", "\"Layout & Tables\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Life Sciences & Medicine: Data & Computation"}], "\" \"", "\"Life Sciences & Medicine: Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Linguistic Data"}], "\" \"", "\"Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "List Manipulation"}], "\" \"", "\"List Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Logic & Boolean Algebra"}], "\" \"", "\"Logic & Boolean Algebra\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Low-Level Notebook Programming"}], "\" \"", "\"Low-Level Notebook Programming\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Machine Learning"}], "\" \"", "\"Machine Learning\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Maps & Cartography"}], "\" \"", "\"Maps & Cartography\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Mathematical Functions"}], "\" \"", "\"Mathematical Functions\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Matrices and Linear Algebra"}], "\" \"", "\"Matrices and Linear Algebra\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Molecular Structure & Computation"}], "\" \"", "\"Molecular Structure & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Natural Language Processing"}], "\" \"", "\"Natural Language Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Neural Networks"}], "\" \"", "\"Neural Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Basics"}], "\" \"", "\"Notebook Basics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Document Generation"}], "\" \"", "\"Notebook Document Generation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Documents & Presentation"}], "\" \"", "\"Notebook Documents & Presentation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ "Notebook Formatting & Styling", { False, "Notebook Formatting & Styling"}], "\" \"", "\"Notebook Formatting & Styling\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Number Theory"}], "\" \"", "\"Number Theory\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Numeric Approximation"}], "\" \"", "\"Numeric Approximation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Optimization"}], "\" \"", "\"Optimization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Computing"}], "\" \"", "\"Parallel Computing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Persistent Storage"}], "\" \"", "\"Persistent Storage\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Physics & Chemistry: Data and Computation"}], "\" \"", "\"Physics & Chemistry: Data and Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Plane Geometry"}], "\" \"", "\"Plane Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Polynomial Algebra"}], "\" \"", "\"Polynomial Algebra\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Precollege Education"}], "\" \"", "\"Precollege Education\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Presentations with the Wolfram System"}], "\" \"", "\"Presentations with the Wolfram System\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Probability & Statistics"}], "\" \"", "\"Probability & Statistics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Programming Utilities"}], "\" \"", "\"Programming Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Random Stuff"}], "\" \"", "\"Random Stuff\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Real & Complex Analysis"}], "\" \"", "\"Real & Complex Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Recreational Math"}], "\" \"", "\"Recreational Math\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Repository Tools"}], "\" \"", "\"Repository Tools\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "RepositoryTools"}], "\" \"", "\"RepositoryTools\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Rules & Patterns"}], "\" \"", "\"Rules & Patterns\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Scientific and Medical Data & Computation"}], "\" \"", "\"Scientific and Medical Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Scientific Data Analysis"}], "\" \"", "\"Scientific Data Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Segmentation Analysis"}], "\" \"", "\"Segmentation Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sequence Analysis"}], "\" \"", "\"Sequence Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Shortcuts and Idioms"}], "\" \"", "\"Shortcuts and Idioms\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Signal Processing"}], "\" \"", "\"Signal Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Social, Cultural & Linguistic Data"}], "\" \"", "\"Social, Cultural & Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Social Data"}], "\" \"", "\"Social Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Solid Geometry"}], "\" \"", "\"Solid Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sound & Video"}], "\" \"", "\"Sound & Video\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Statistical Data Analysis"}], "\" \"", "\"Statistical Data Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "String Manipulation"}], "\" \"", "\"String Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Strings & Text"}], "\" \"", "\"Strings & Text\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Symbolic & Numeric Computation"}], "\" \"", "\"Symbolic & Numeric Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "System Operation & Setup"}], "\" \"", "\"System Operation & Setup\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Text Analysis"}], "\" \"", "\"Text Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Text Manipulation"}], "\" \"", "\"Text Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Theorem Proving"}], "\" \"", "\"Theorem Proving\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Time-Related Computation"}], "\" \"", "\"Time-Related Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Time Series Processing"}], "\" \"", "\"Time Series Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Topology"}], "\" \"", "\"Topology\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Tuning & Debugging"}], "\" \"", "\"Tuning & Debugging\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Units & Quantities"}], "\" \"", "\"Units & Quantities\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "User Interface Construction"}], "\" \"", "\"User Interface Construction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Viewers and Annotation"}], "\" \"", "\"Viewers and Annotation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Visualization & Graphics"}], "\" \"", "\"Visualization & Graphics\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Weather Data"}], "\" \"", "\"Weather Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Web Operations"}], "\" \"", "\"Web Operations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram Physics Project"}], "\" \"", "\"Wolfram Physics Project\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram System Setup"}], "\" \"", "\"Wolfram System Setup\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Working with Paclets"}], "\" \"", "\"Working with Paclets\""}, "RowDefault"], StripOnInput->False, FontSize->12], "\<\"\"\>"} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxVkMFKxDAQhkF2tRVxr16EnLz1IUq1sLBa2dkXSLOza9w0EzITIW9vWkH0NAPfD9/\ 801YNrEGyQ7gekoQkDdx0H2gueDyteLWzLLDpyEskp4bxE40wPGy9YNRG7BeqV+1tSE6LJQ+\ bnc6URD2pgx4dMjy+\ keBIdFE9xUmLWH8udFaWrci3ghNz3Sahgq1poHqPFDBKhttOC54pWuRy1hBmBZ+ufs6a5z4VR/\ VytLLY1r12jL+gfkaHf8ncjVya/H/h/VInxJJdStStz5BGxvKMuz0ypWjwkANC1Sdv5sw3LMhtqg==\ "}, CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->635166788] }, 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["CheckboxBar", "Item", CellID->876565968] }, 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["OnOffToggle", "Item", CellID->533302726], Cell["PrettyProgressBar", "Item", CellID->706212597] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Source/Reference Citation", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Source/Reference Citation", Cell[ BoxData[ FrameBox[ Cell[ "Give a bibliographic-style citation for the original source of the \ function and/or its components (e.g. a published paper, algorithm, or code \ repository).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSourceReferenceCitation"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source/Reference Citation"}, DefaultNewCellStyle->"Text", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell["Source, reference or citation information", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Links", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Links", Cell[ BoxData[ FrameBox[ Cell[ "List additional URLs or hyperlinks for external information related \ to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoLinks"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Links"}, DefaultNewCellStyle->"Item", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell["Link to other related material", "Item", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->132505746] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Tests", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"VerificationTests", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Specify an optional list of tests for verifying that the function \ is working properly in any environment. Tests can be specified as \ Input/Output cell pairs or as symbolic ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "VerificationTest", "SymbolsRefLink", ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"], BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, { "Link"}]], ButtonData -> "paclet:ref/VerificationTest", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " expressions for including additional options."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoVerificationTests"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "VerificationTests"}, DefaultNewCellStyle->"Input", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MyFunction", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellTags->"DefaultContent", CellLabel->"In[3]:=", CellID->946203791], Cell[BoxData[ RowBox[{"x", " ", "y"}]], "Output", CellTags->"DefaultContent", CellLabel->"Out[3]=", CellID->168370258] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Compatibility", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Compatibility", Cell[ BoxData[ FrameBox[ Cell[ "Specify any known compatibilities for your resource to ensure it is \ discoverable on the correct platforms.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibility"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Compatibility"}, CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[TextData[{ "Wolfram Language Version", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityWolframLanguageVersionRequired", Cell[ BoxData[ FrameBox[ Cell[ "Enter required Wolfram Language Version (e.g. 12.1+).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> { "SectionMoreInfoCompatibilityWolframLanguageVersionRequired"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{ "TemplateGroupName" -> "CompatibilityWolframLanguageVersionRequired"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{ "CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell["12.3+", "Text", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Operating System", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityOperatingSystem", Cell[ BoxData[ FrameBox[ Cell[ "Select all operating systems where your resource is expected to \ function properly.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityOperatingSystem"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityOperatingSystem"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Windows", {False, "Windows"}], "\" \"", "\"Windows\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["MacOSX", {False, "MacOSX"}], "\" \"", "\"Mac\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Unix", {False, "Unix"}], "\" \"", "\"Unix\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxNkNuKwkAMhsEerLDsE/gKfQipCoJLF7PL7m0PUQenM8Mkg87bmwot3iX5/\ 3w5bIoSMuCoEfI6sAtcwrK6YnfD/pxQelTEsPxTprd3gvyr6Wr4h/\ TXqIc0HhgHmmznBaWnIKDZPgWzkkj/\ BJmLL9iELL69deg5wrqyg2tYtUorjrUUJTEXiCRDZcnasbLmxX6fTsWuV9y0EmX7RhPOwmqLGt+\ V8VKrw2CoSkr4PBhG77xYRjCsNiZCaAnlIx8nJBt8hz/RIRT7YLrR8wRtF2wJ"}, CellTags->{ "CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Required Features", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityFeatures", Cell[ BoxData[ FrameBox[ Cell[ TextData[{"Choose any other features that are ", Cell[ BoxData[ StyleBox[ StyleBox["required", "TI"], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " in order to use your resource."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityFeatures"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityFeatures"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebooks"}], "\" \"", "\"Notebooks\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Kernels"}], "\" \"", "\"Parallel Kernels\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Access"}], "\" \"", "\"Cloud Access\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxlUM1qwzAMHmuzJlDKLrv3BfIQIVugrKyl2gs4jsJMFdtY8sFvP2eDkLHb96cPSU1ZQw\ GSCOHpEsVHqWHXfqG+4zA+8PZsOCvFSXDicfPLx0fe3mKeqD6cYO/cnVdwcZ+vKigipOM7BovE/\ 5Ulu2/JxeHYaI3Mf1kN5TU4j0ESvLRu8kpMb8hI6lBJDJgTu4sX4+\ xP33pDLt8GI6rPqOgUMS5G9YqEa2c+21GcLLebGg4nKxh8yJG5GKrGJog9Y37G/\ obsYtD4mTxC2UWr58w3NfBx2Q=="}, CellTags->{ "CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Environments", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityEvaluationEnvironment", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Select all evaluation environments where your resource is expected \ to be compatible. See ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "$EvaluationEnvironment", "SymbolsRefLink", ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"], BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, { "Link"}]], ButtonData -> "paclet:ref/$EvaluationEnvironment", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " for more details."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityEvaluationEnvironment"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityEvaluationEnvironment"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Session", {False, "Session"}], "\" \"", TemplateBox[{"\"Session\"", "\"Local or cloud interactive session\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Script", {False, "Script"}], "\" \"", TemplateBox[{"\"Script\"", "\"Script run in batch mode\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Subkernel", {False, "Subkernel"}], "\" \"", TemplateBox[{"\"Subkernel\"", "\"Parallel or grid subkernel\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["WebEvaluation", {False, "WebEvaluation"}], "\" \"", TemplateBox[{ "\"WebEvaluation\"", "\"Cloud evaluation initiated by an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["WebAPI", {False, "WebAPI"}], "\" \"", TemplateBox[{"\"WebAPI\"", "\"API called through an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Scheduled", {False, "Scheduled"}], "\" \"", TemplateBox[{"\"Scheduled\"", "\"Scheduled task\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["BatchJob", {False, "BatchJob"}], "\" \"", TemplateBox[{"\"BatchJob\"", "\"Remote batch job\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12], "\<\"\"\>", "\<\"\"\>"} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxdUdFqwzAMhK1tEtj2EXvPR3RpChmDlmqw58RRialjG0su5O/\ nlMTJ9mRJd9yd5H2awxZ4UAi7k2frOYek6FDcsL0mtPmSxJAAEkmjYQfCScuQgW9u6DQqeP3BprzXy\ tf8YIR2f64CQ3TYeoUtpB81i+7TNMGpYuxp1r0+0eYSKIv+XERkNpzeOF8FWMqI/\ sv0t120p6jTu9KO0ZcyonGb9V7p2RmLjgd4L0xvg08jleRhcS31XTqje9TjgU92nNEouj4EpWUruW5\ CtT3WijAC2QEVrpHxl4zyvabiOYe3SjM66wLlsXG210M4C2Ewe7kgGe8Efg82xD96LUbOL+VQrkA=\ "}, CellTags->{ "CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Cloud Support", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityCloudSupport", Cell[ BoxData[ FrameBox[ Cell[ "Specify whether your resource is expected to work in the public \ cloud.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityCloudSupport"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityCloudSupport"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[True, {False, True}], "\" \"", "\"Supported in cloud\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxNjkEKwkAMRVGqVhAX7tx5gR5Cq0JBqBgvUNsUB6eTYZIsentnQMVdyH/vJ/\ u8gBnIaBHmtYpXKWBRPrF9YddPOLsYFs7uQTFyleDA320/\ 5eym0duAek9BsNsZt2stafc18msgj0FG2JY0+EbMw1gjY5mgjxbv1V4MOU6N/\ 82cnzojzSNOs3NjGX/B8ogW/5P0NFkdHJeTAtaVEww+RCQVw+\ JAZLFxBaxuyKShxfvoEfKzujYRb6FXWpA="}, CellTags->{ "CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Author Notes", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Author Notes", Cell[ BoxData[ FrameBox[ Cell[ "This section, when used, will appear near the bottom of the \ published resource. Content displayed in this section can include background, \ possible improvements, additional information and/or implementation details \ that are otherwise beyond the scope of the function documentation.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoAuthorNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Author Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell["Additional information about limitations, issues, etc.", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Submission Notes", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Submission Notes", Cell[ BoxData[ FrameBox[ Cell[ "Enter any additional information that you would like to communicate \ to the reviewer here. This section will not be included in the published \ resource.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSubmissionNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Submission Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell["Additional information for the reviewer.", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"StyledCheckboxBar | 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.85540564854952`16.33864506847517*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}, "DefaultContentMethod" -> "Legacy"}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.855405648602143`16.338645068481096*^9, "VersionInformation" -> {"ResourceVersion" -> "1.0.0"}, "TemplateVersion" -> "1.6.3", "StatusMessage" -> "", "SubmissionReviewData" -> {"Review" -> False}}, CreateCellID->True, FrontEndVersion->"13.0 for Linux x86 (64-bit) (November 22, 2021)", StyleDefinitions->Notebook[{ Cell[ StyleData[StyleDefinitions -> "Default.nb"]], Cell[ StyleData[All, "Working"], DockedCells -> { Cell[ BoxData[ TemplateBox[{}, "MainGridTemplate"]], "DockedCell", CellMargins -> {{-10, -10}, {-8, -8}}, CellFrame -> 0, Background -> RGBColor[0.921569, 0.341176, 0.105882], CellTags -> {"MainDockedCell"}, CacheGraphics -> False], Cell[ BoxData[ TemplateBox[{}, "ToolsGridTemplate"]], "DockedCell", TaggingRules -> {"Tools" -> True}, CellTags -> {"ToolbarDockedCell"}, CellFrameMargins -> {{0, 0}, {2, 2}}, CellFrame -> {{0, 0}, {1, 0}}, CacheGraphics -> False, CellOpen -> Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]]]}, PrivateNotebookOptions -> { "FileOutlineCache" -> False, "SafeFileOpen" -> "IgnoreCache"}, CellLabelAutoDelete -> False, CodeAssistOptions -> {"AutoDetectHyperlinks" -> False}, AutoQuoteCharacters -> {}], Cell["Hint Styles", "Section"], Cell[ StyleData["MoreInfoText", StyleDefinitions -> StyleData["Text"]], FontColor -> GrayLevel[0.25]], Cell[ StyleData["ErrorText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, Inherited}, {10, 10}}, CellElementSpacings -> {"CellMinHeight" -> 0, "ClosedCellHeight" -> 0}, FontWeight -> Bold, FontColor -> RGBColor[1, 0, 0]], Cell[ StyleData["WarningText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, 35}, {0, 0}}, FontSize -> 14, GridBoxOptions -> {BaseStyle -> {}}], Cell["Template Boxes", "Section"], Cell[ StyleData["MoreInfoOpenerIconTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> GraphicsBox[{ Thickness[0.09090909090909091], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], RGBColor[0.627441, 0.627441, 0.627441, 1.]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.627441, 0.627441, 0.627441, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic], True -> GraphicsBox[{ Thickness[0.09090909090909091], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], RGBColor[0.5, 0.5, 0.5, 1.]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "]]}, { FaceForm[ RGBColor[0.5, 0.5, 0.5, 1.]]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.999985, 0.999985, 0.999985, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["MoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], "\"Click for more information\""}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["InlineMoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], #4}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["ClickToCopyTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> TagBox[ GridBox[{{#, ButtonBox[ GraphicsBox[{ GrayLevel[0.85], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, { 9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {16.5, 4.5}, { 16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {15.75, 17.25}, { 15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, { 8.25, 18.}}, {{9.75, 17.25}, {12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, { 14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{8.25, 12.}, { 14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], ButtonFunction :> Null, Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Evaluator -> Automatic, Method -> "Preemptive"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], True -> DynamicModuleBox[{RSNB`clickTime$$ = 0., RSNB`timeout$$ = 3.}, TagBox[ GridBox[{{#, TagBox[ ButtonBox[ DynamicBox[ ToBoxes[ Refresh[ If[AbsoluteTime[] - RSNB`clickTime$$ > RSNB`timeout$$, RawBoxes[ TemplateBox[{ PaneSelectorBox[{False -> GraphicsBox[{ GrayLevel[0.65], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], True -> GraphicsBox[{ RGBColor[0.988235, 0.419608, 0.203922], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], "\"Click to copy to the clipboard\""}, "PrettyTooltipTemplate"]], RawBoxes[ TemplateBox[{ GraphicsBox[{ RGBColor[0, NCache[2/3, 0.6666666666666666], 0], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], "\"Copied\""}, "PrettyTooltipTemplate"]]], UpdateInterval -> 1, TrackedSymbols :> {RSNB`clickTime$$}], StandardForm], Evaluator -> "System"], ButtonFunction :> (RSNB`clickTime$$ = AbsoluteTime[]; CopyToClipboard[ BinaryDeserialize[ BaseDecode[#2], Defer]]), Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Method -> "Queued", Evaluator -> "System"], MouseAppearanceTag["LinkHand"]]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], DynamicModuleValues :> {}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["PrettyTooltipTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ TooltipBox[#, FrameBox[ StyleBox[#2, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain", StripOnInput -> False], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8, StripOnInput -> False], TooltipDelay -> 0.1, TooltipStyle -> {Background -> None, CellFrame -> 0}], Annotation[#, Framed[ Style[ RSNB`$$tooltip, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain"], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8], "Tooltip"]& ]& )}], Cell[ StyleData["ToolsGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Template Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection automatically using appropriate \ documentation styles\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2790153672590285854; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Template Input"; DefinitionNotebookClient`TemplateInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 2790153672590285854]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Literal Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection as literal Wolfram Language code\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4138174468017918531; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Literal Input"; DefinitionNotebookClient`LiteralInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 4138174468017918531]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Insert Delimiter\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert example delimiter\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1887802176716758884; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Insert Delimiter"; DefinitionNotebookClient`DelimiterInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 1887802176716758884]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Subscripted Variable\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert subscripted variable placeholder\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3787878858871814623; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Subscripted Variable"; DefinitionNotebookClient`SubscriptInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 3787878858871814623]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], ActionMenuBox[ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ TemplateBox[{ "\"Tables\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\ \[FilledDownTriangle]\""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Table functions\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert table with two columns\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5800166344906378520; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with two columns"; DefinitionNotebookClient`TableInsert[2]]]], DefinitionNotebookClient`ButtonCodeID[ 5800166344906378520]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Insert table with three columns\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 533841403879783297; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with three columns"; DefinitionNotebookClient`TableInsert[3]]]], DefinitionNotebookClient`ButtonCodeID[ 533841403879783297]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Add a row to the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4413051590217973467; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Add a row to the selected table"; DefinitionNotebookClient`TableRowInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 4413051590217973467]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Sort the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 9150037060110806081; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Sort the selected table"; DefinitionNotebookClient`TableSort[]]]], DefinitionNotebookClient`ButtonCodeID[ 9150037060110806081]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Merge selected tables\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2347719643166780208; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Merge selected tables"; DefinitionNotebookClient`TableMerge[]]]], DefinitionNotebookClient`ButtonCodeID[ 2347719643166780208]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ActionMenuBox[ FrameBox[ ButtonBox[ StyleBox[ TemplateBox[{ "\"Cells\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\[FilledDownTriangle]\ \""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert comment for reviewer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2572781756330727330; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Insert comment for reviewer"; DefinitionNotebookClient`CommentInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 2572781756330727330]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as comments\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3646530685697756512; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as comments"; DefinitionNotebookClient`CommentToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 3646530685697756512]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as excluded\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1866935765212102190; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as excluded"; DefinitionNotebookClient`ExclusionToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 1866935765212102190]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { GrayLevel[0.9]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> {1 -> GrayLevel[0.9]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.5}, 5}, "Rows" -> {{Automatic}}}, FrameStyle -> GrayLevel[0.75]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], Cell[ StyleData["MainGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, {0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, {34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, {23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, { 24.953, 23.914}, {25.418, 23.91}, {29.746, 23.91}, { 30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, {33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, {31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> {Automatic, 32}, ImagePadding -> {{5, 0}, {0, 0}}, BaselinePosition -> Scaled[0.25], AspectRatio -> Automatic, Background -> RGBColor[0.988235, 0.419608, 0.203922], ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], StyleBox[ TagBox[ GridBox[{{ StyleBox[ "\"Function Resource\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", StripOnInput -> False], StyleBox[ "\"DEFINITION NOTEBOOK\"", FontFamily -> "Source Sans Pro", FontTracking -> "SemiCondensed", FontVariations -> {"CapsType" -> "AllSmallCaps"}, StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "ColumnsIndexed" -> {2 -> RGBColor[1., 1., 1.]}, "Rows" -> {{None}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], FontSize -> 24, FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", TemplateBox[{ StyleBox[ TemplateBox[{ "\"Function Repository\"", "\" \[RightGuillemet] \""}, "RowDefault"], "Text", FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False], "https://resources.wolframcloud.com/FunctionRepository"}, "HyperlinkURL"]}, { TemplateBox[{ TemplateBox[{ "\"Open Sample\"", "\"View a completed sample definition notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4393071033038384034; DefinitionNotebookClient`$ClickedButton = "Open Sample"; DefinitionNotebookClient`ViewExampleNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[4393071033038384034]]& , "\"View a completed sample definition notebook\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ "\"Style Guidelines\"", "\"View general guidelines for authoring resource \ functions\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5906117565281445171; DefinitionNotebookClient`$ClickedButton = "Style Guidelines"; DefinitionNotebookClient`ViewStyleGuidelines[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[5906117565281445171]]& , "\"View general guidelines for authoring resource functions\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{"\"Tools\"", PaneSelectorBox[{False -> GraphicsBox[{ RGBColor[1., 1., 1.], AbsoluteThickness[1.], LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], LineBox[{{5, 2.5}, {5, 7.5}}], LineBox[{{2.5, 5}, {7.5, 5}}]}, ImageSize -> 9, PlotRangePadding -> 1.5], True -> GraphicsBox[{ RGBColor[1., 1., 1.], AbsoluteThickness[1.], LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], LineBox[{{2.5, 5}, {7.5, 5}}]}, ImageSize -> 9, PlotRangePadding -> 1.5]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]], BaselinePosition -> Scaled[0]]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.35}}}], "Grid"], "\"Toggle documentation toolbar\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5074018684552945401; DefinitionNotebookClient`$ClickedButton = "Tools"; DefinitionNotebookClient`ToggleToolbar[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[5074018684552945401]]& , "\"Toggle documentation toolbar\"", False}, "OrangeButtonTemplate"], TagBox[ GridBox[{{"\"\"", "\"\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxDividers -> { "ColumnsIndexed" -> {2 -> True}, "Rows" -> {{False}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{2}}}, GridBoxSpacings -> {"Columns" -> {{0.5}}}, FrameStyle -> RGBColor[0.994118, 0.709804, 0.601961]], "Grid"], TemplateBox[{ TemplateBox[{ "\"Check\"", "\"Check notebook for potential errors\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 7891204313296928191; DefinitionNotebookClient`$ClickedButton = "Check"; DefinitionNotebookClient`CheckDefinitionNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[7891204313296928191]]& , "\"Check notebook for potential errors\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{"\"Preview\"", "\"Generate a preview notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4299709568580201021; DefinitionNotebookClient`$ClickedButton = "Preview"; DefinitionNotebookClient`PreviewResource[ ButtonNotebook[], "Notebook"], DefinitionNotebookClient`ButtonCodeID[4299709568580201021]]& , "\"Generate a preview notebook\"", True}, "OrangeButtonTemplate"], ActionMenuBox[ TemplateBox[{ TemplateBox[{"\"Deploy\"", TemplateBox[{5}, "Spacer1"], "\"\[FilledDownTriangle]\""}, "RowDefault"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1898445052439169298; Null, DefinitionNotebookClient`ButtonCodeID[1898445052439169298]]& , "\"\"", True}, "OrangeButtonTemplate"], { "\"Locally on this computer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 8714502586816766511; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Locally on this computer"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "Local"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8714502586816766511]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"For my cloud account\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1389539917011878958; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "For my cloud account"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPrivate"]]]]], DefinitionNotebookClient`ButtonCodeID[ 1389539917011878958]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Publicly in the cloud\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5593410685219912767; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Publicly in the cloud"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPublic"]]]]], DefinitionNotebookClient`ButtonCodeID[ 5593410685219912767]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"In this session only (without documentation)\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 8586347731213964380; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "In this session only (without documentation)"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "KernelSession"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8586347731213964380]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ItemBox[ StyleBox[ DynamicBox[ ToBoxes[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}, ""], StandardForm], Initialization :> (CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}] = "")], "Text", GrayLevel[1], StripOnInput -> False], ItemSize -> Fit, StripOnInput -> False], DynamicBox[ ToBoxes[ If[ CurrentValue[ EvaluationNotebook[], { TaggingRules, "SubmissionReviewData", "Review"}, False], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit Update\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit changes to update your resource submission\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3196298050911436087; DefinitionNotebookClient`$ClickedButton = "SubmitUpdate"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepositoryUpdate[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3196298050911436087]]& , "\"Submit changes to update your resource submission\"", True}, "OrangeButtonTemplate"]], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit to Repository\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit your function to the Wolfram Function \ Repository\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3704832848557640569; DefinitionNotebookClient`$ClickedButton = "Submit"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepository[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3704832848557640569]]& , "\"Submit your function to the Wolfram Function \ Repository\"", True}, "OrangeButtonTemplate"]]], StandardForm], Evaluator -> "System", SingleEvaluation -> True]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {-1 -> Right}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { RGBColor[0.988235, 0.419608, 0.203922], RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> { 1 -> RGBColor[0.988235, 0.419608, 0.203922], 2 -> RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.9}, 5}, "RowsIndexed" -> {1 -> 1.1, 2 -> 1.3, 3 -> 0.25}}, FrameStyle -> RGBColor[0.988235, 0.419608, 0.203922]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], Cell[ StyleData["ReviewerCommentLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{#, TemplateBox[{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, { 0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, {34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, { 23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, {24.953, 23.914}, { 25.418, 23.91}, {29.746, 23.91}, {30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, { 33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, { 31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> 12, AspectRatio -> Automatic, Background -> None, ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], "Wolfram Function Repository Reviewer"}, "PrettyTooltipTemplate"]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.25}}}], "Grid"]& )}], Cell[ StyleData["CommentCellLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ StyleBox[#, FontSize -> 11]}, { StyleBox[ DynamicBox[ ToBoxes[ DateString[ TimeZoneConvert[ DateObject[#2, TimeZone -> 0]], { "Month", "/", "Day", "/", "Year", " ", "Hour24", ":", "Minute"}], StandardForm], SingleEvaluation -> True], FontSize -> 9]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{Automatic}}, "Rows" -> {{0}}}], "Grid"], "CommentLabel", ShowStringCharacters -> False]& )}], Cell[ StyleData["OrangeButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (FrameBox[ ButtonBox[ StyleBox[#, "Text", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Condensed", FontSize -> 13, FontColor -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], GrayLevel[1], RGBColor[0.9568627450980391, 0.8019607843137255, 0.75]], Evaluator -> "System"], StripOnInput -> False], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[]}, If[#4, CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]]; With[{RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3145484069433207908; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ #2[]]]], DefinitionNotebookClient`ButtonCodeID[3145484069433207908]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; Null], FrameMargins -> {{5, 5}, {0, 0}}, Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8CJZ47CsMQUA2qYY8cOe/Zsl82ZQBGQFF gOLEGPI8UOymHTtE1xUkE+BsoCxQDR5DgLJotuNCyOagGQJ3A0EEVInVEKB/ iTQBguDhg2wIZkjiR0D1EI2Q1AiJTbSQxI8gKiHxzgAGlBtCFZdQMUyoFTtU SSfUSrFUyTvUysVULE9IQlQ0BD8gprQHAOYEDp4= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoY8DpK86ikKQUA2qYacdhZaZ8CxXJsNGQFF gOLEGHLfX3yHOTeadmQElAWqwWMIUBaPdmSEbA6aIRA3rMCrfQXMPVgNAfqX SGdAEDx8kA3BDEn8CKgeohGSGiGxSZIJEASJdwYwoNwQqriEimFCrdihSjqh VoqlSt6hVi6mYnlCEqKiIfgBMaU9AAiH5q8= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8zTb72JMMQUA2qYZ8Wdr69/1LNF8DRYDi xBjyvsz115UjEPFvL589PbgNgoBsiCBQFqgGjyFAWYjIpwe3D2YFLNdmQ0ZA EaA4RAGyOWiGQNzw/ubllQY8aCZAEFAcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+y IZCQxPQFJgKqgYQzRCMkNUJiExKSBE2AIEg4Q+KdAQwoN4QqLqFimFArdqiS TqiVYqmSd6iVi6lYnpCEqGgIfkBMaQ8AIISqgg== "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> RGBColor[0.921569, 0.341176, 0.105882], Method -> "Queued", ImageSize -> {All, 23}, Evaluator -> Automatic], FrameStyle -> Directive[ RGBColor[0.921569, 0.341176, 0.105882], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False]& )}], Cell[ StyleData["SuggestionGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ FrameBox[ AdjustmentBox[ TagBox[ GridBox[{{ TemplateBox[{#2, #3, {16., 16.}, {{1., 17.}, {1., 17.}}}, "SuggestionIconTemplate"], PaneBox[#, ImageSizeAction -> "ShrinkToFit", BaselinePosition -> Baseline, ImageSize -> Full], RowBox[{ AdjustmentBox[ TemplateBox[{ ActionMenuBox[ TagBox[ PaneSelectorBox[{False -> GraphicsBox[{ EdgeForm[ Directive[ GrayLevel[1, 0], Thickness[0.025]]], FaceForm[#4], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], #5, LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0], True -> GraphicsBox[{ EdgeForm[ Directive[#5, Thickness[0.025]]], FaceForm[#2], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], GrayLevel[1], LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], MouseAppearanceTag["LinkHand"]], #6, Appearance -> None, Method -> "Queued"], "\"View suggestions\""}, "PrettyTooltipTemplate"], BoxBaselineShift -> -0.5], " "}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {Automatic, Automatic, Fit}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], BoxMargins -> {{0.25, -0.5}, {0.15, -0.15}}], RoundingRadius -> {13, 75}, Background -> #4, FrameStyle -> None, FrameMargins -> {{0, 8}, {0, 0}}, ImageMargins -> {{0, 0}, {5, 5}}, StripOnInput -> False], "Text", FontColor -> #5, FontSize -> 14, FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Plain", PrivateFontOptions -> {"OperatorSubstitution" -> False}, LineBreakWithin -> False]& )}], Cell[ StyleData["SuggestionIconTemplate"], TemplateBoxOptions -> {DisplayFunction -> (GraphicsBox[{ Thickness[0.05555555555555555], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGZigIIGAwcIQ8kBxk94ekHp9k9Vh4qXaoYcOfoO m+a+X37stKZDbP+hrxpzdOA0TBymDqYPl7n2pnG7PHlk4PzZRxQ2FGWIwPWD jI3p54WbLxuVYn3fnwluD8S8H/Yo9gD5KPYA+TB7YPph9sDMh9EwcZg6FPdh MRfdXpi7YPph7oaZD/MXzB5c4QCzBwA8nn+Z "]]}, FaceForm[#]], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{8.175292500000001, 7.416875}, {7.796855000000001, 11.3084375}, {7.796855000000001, 13.38}, {10.11998, 13.38}, {10.11998, 11.3084375}, { 9.741542500000001, 7.416875}, {8.175292500000001, 7.416875}}, CompressedData[" 1:eJxTTMoPSmViYGCQBGIQ/cTvZcLf/4oOD6tE1rk/5HNQjDzAkqeL4FsusdsW 1KjgwAAGAg7hCSdehX2Xd5BvfR24Q07QwaZCOJPjjZyDHdf1xQW2Qg56LJYa iWlyDv2HvmrEzBeG80GmVbmIwvkvtjT6Sb8Qg+t/BLLPUwJuPti6DEm4/WD7 2qTg7gMZJyIm7QBzP4y/zEVob88lJTi/7+dk7hV1ynD9c3LzfPxZVODmr3ro 0futUwVu/0bpbbqnzqjA3Qfjw9wP48P8B9MP8z/MfFj4wOyHhR/MfbDwRQ9/ ACBxmlc= "]}]}, FaceForm[#2]]}, ImageSize -> #3, PlotRange -> #4, AspectRatio -> Automatic, BaselinePosition -> Scaled[0.1]]& )}], Cell[ StyleData["FormEditValuesButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TemplateBox[{ TagBox[ PaneBox[ PaneSelectorBox[{False -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWHlMVEcYf28XlGM5VlcRapRDDFK0sBaLBWVXUDxTKpe4JgvoQlALAsvV hHIoV4KK6wGiQlUqoqDcKKysDSZtPZJWTTzaxGrV2mqrNtqKB3Qnz8+Zd6Cv tn90vkgyv+/4zc58M9/3dEtIXZoooSgqw8r8Z2l8tjo9PT43wtE8iUrJSE5K 0a1akKLXJenSAxKkZlD58h9y+X+M8Z7a/I3G7V/lHQgKp2kGmzw9rcrQb+j/ ZItPIGBvNywsVVGVJ01DWAqbpBYUFZ1hGsTYvssRqTLHt4nvoIgvbP6ZjM+I Nt9PzUePPdbvcvX+ZwzTQ9vv8yMh6R04fFNY0/ciOkM8wzjXY4+F47xJgiPF cqRuY3kOlnUGLFq4khsv53NPv8zd7NXs/lYsR+158Gm9l1Tu7IYwmq7oJaMd uWMnR7jMMXLd/isYt7UXx4F9Rjtj1NmNXPPsCKyh6S9+AHzUOHEcpR3gMWM+ iQdHrq1kZFkmidvYQS633399ZBf31G21F/ZdLmmvPo0zVcyalCFg33Qr78Ce 7+qv5jdOm8W3e39u9yN+npR3ieHQ5ArlWGwW28pBIXwfilvFcESnC2eyMoS0 ii8UstncZ2XDjiaROihGjbMcyWVJLBP0N2ELC8vm229icHFPKKo+Y3zK3Jj6 q2lV3gFvZpk4BfSqKHwfFC4fLNDml3cVt2IGO7m+5sRzfoSNxglemGVV8dZT yRXqaKeJ5V1gkWIALX5bk8r5u+3x3qEbwvuN3kJ1DN9j5mLQdz60skXIeM9X PoPMnWYzdD4cjoGRMC3XRyI5+CNolyQhJK4A5mWdXGs7Ofs3HP+z9nz16fbf Scz41Muf67c8B7Q7z6L5RiPMAxZxbfU1OFbDtVDNSGtmnb4qQz/W1F1ElYsc 8rG9A6BF8x1fw2zhSnbddHHHJ115kl3rJNI1mzBL6HI2x9SglrugQzHzG7Ft RQ95IglF+DfwqylNb2gRugnWMnNteFWLj/+FsNlLyd3tfoTrTPWZV+vUcBnQ cHbre8HoTzy3ljGYxzT2Cep3MespaibRtZWwGy9vnPmkmXPgjy1fgte7Mxlk fhwZa/8V+9EQTZuPzwg4HBSA1J4XZqCotB1gExTO58hrYOoYM5RzcCcAHHIn QKpPD8eBzx12GHP0PAlfjXPI3C8J7JXlSNjt9vuSYVrKkjbwUs4R2quCwxLU mFJTZpCoaQjXuPqrgPmqhBhs7XH1lTsxmP889su24lOEZuzEyJE7ZJ3Gu23o Z9bDHvitrb2A0Um+NedwxKO/IGzrKZhn15FnRFHeAdh2zSZuXxscCXtpGorR kxqpRWx2zxPQsTk8/bgrxe+MaWj9UXw/be11pZih5VduxzPCqu03kiPFALPM 3VyOCV5kv9P3ovJk6rbkipI2du3n39AwLegO3UBzn0CYH3vMfzHUMeyM4Mu6 7Vwfiqr6BrRxBWhO0/suAxK5jm8fpoX7LszAz4bJStAanylcGCwiFbD9V2ja xk4ZosmNTsc+Xv51F4Xit9yduwJbqaJ0JYEfoT4xaw9YFDaBVuaId93cVb58 MxPLsL/UIlSz2URmft3FGL2tA7YI1UAONF7HOeWnxhb6XULrJFnQsLHz+XDW x6ooZQjcOD4DKXsvkfnu6i1kYxpaVcw/H/5QRQl7L0lk27HfLJCtp8Rw6EqF fDe08F+54MjaC0jX8aDpFtglV4jhCAoH+44HzPvdfFuTy63xMGwd5GMpKq8B fNTRpNZj2vw4RvznkfhoZ7A/fBO9AdzTEhrM70HiNBGj1jJcRY3PJvmSHod+ Ao3Yr2j8HVXeNXMx7Cr7K7HmHOzFZGXWHpytjmPEcXx2kIzWcG15juOYqUHk dz+S2OwRVmFa3DkhaboljgF1R9wc6R3A/RJIz5PWe1wsNlssB0XFZgllI8Qe TrOhxcJSPAfqIjabhOLkNYSvFsL3XlqsG67qv264eqcYuv4gI9V/bz+Kptcf IbETz4ualXP+zf/+WMuWJO08i2J1P0qrYjJTIl2WyXx5NV6PK1C88/bR/7vx N3kqZvY= "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}], True -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWG1MU1cY7m1vS4GWttBLy0dLWyhl5aultrT0C2QzM5rMIWgyluDHkMwf YgBF9gc1cWpijDNuRNFsv2Rmuqmb/NjIYIFkG2qyAYnAljidODfdmItu+AHs Xi6n59x7D3LH9mPnRJLzvB/Pue95z3nfat3UWLVFKpFImpX0n6qNrRVNTRvb 1mrpRc225tcbttW/tnJbS31DfZN/k4wGS+b/MSb/jxFvt7QX95R86TytXyMh WEztye1w97v7c97SBAG2tEHIqRpXX/ksnPlnCVIiMTWXz0DMN5rZSGqX4l+u t+wp+wn1z05Lu7ZCiIYfOjoTnf+MQfd8aFLoiZmRR4FbeEl02tQsnkFpCT/E +1lsUtViOezHOJYzhZdSVqVt5vvLe0/ldpzk7mbZN2I5vEPAJnjPdlBpnQOJ 4s9Qb2V3SB0Dk9rM7b4xiJNJ4jigjSINiaAV3TO1FjEgSr+PWRjFcRR+AiyS X0RxqjrnCDtNO1Bcpga5HJp8tud4m/2Yd9g3WvixZxBmqpg96SqBfmDCeXrZ t6XjzjOaMEbvhfADYZ4UdYvhMLfhcsy8k6sl1+PvQ8EFMRymJnwm6ypRLcse nI7rc1kC1xshk+sVRmkcn8V2AGvfi1jKy24vxhBvs+71XI4+Zm9M6XhuR5J/ cZaE54CcqoH3IS49eaWlvai74AJkIHWOE9GnQg/FPQl5kMW6zz2QfSh1nTKr qBto2I8CKXxbbQeF0VYVB27i4828hanrhRYpq4E8dF+WOBcFe8xmZv5OcxhC 9xdiYKexjm9DSP0/AGl6A4NYdoN14SW+NqnjfkPkT++QZzD0G4pFH6u9fDvz LiD1XGHWxT1gnbKKr+s4AX35rxtqpfHsPrXl7n4o8Y4wlQsditTIIyBl1iVf gVXaZm7djLfBk3b1cWsdIcs5DFkMr3A5NKHg3RgH7dN5BsmUT9ETse6F34Cp pkTBedxNkKno2hCrxZG/GIyq4mTKA1hnPJdj+6wVMEiYlzg6PX8mT2UqFlMV cU/Q0cnuJ/8ciuYcAdGYv3H0SbPnIByuL4BVUoBFjBtQX74xeQrwZmmHZwQ4 5PrYmQ7hGSSS3HeADt0XCTicXWwdY4duOewEAIfCEMu/wYU44LmDCEOOyFTG VphDdL+EiZU0DkQ7NEks0FIWXgRWuuW4WOV/QDCNqSTJh6Lls7DGlY4DTFuO YyCTYPVVGFgseQX3Zct6Yy6mxyFSdget0zDa7n52P9wB31rvMERVLs9VxOPP DOYeAOu8d9Ezor/Qj0TwML+vpapBLOlvb0ElBGlujUzF7iCHQ+Xm7xS+M3RN /AjeTzLJth8yBH/hdzxSZfBXlMN+NHZfTvI5EvLQfic67eqzH8s+VHiRW/uF N9RYB2SBm8xaEwTr8EPhi5G6npsRwml/m29Dv4FfA6llNxs+3yhAMrcL9Y11 4L7jGYTZoC6JffmTuHQWy2wEmG+MvvRqXaW5zdSE2Hi9Izj/wbuGV6EWVWN7 U/8S0yc6TsXux1kgJbUw6nRXOf9m2g5Ae4I01Lp60cz3jphaSA3UMNSCHPDf gDmlrYAajk7cPlEWZsjUmjL9y1SNrhLcOCEDOn3X0HxPdOJ0ymet+4TnIxxU Dd46fQtXj/tmgekeEMNh24+zLTgvfOWoau8wIwv9HpgAetmHxHDo1wB92nbu /S67bW7j13gwSI0ila6+XcAmdR0qVRUZN7AzeQWKK9KAfuAW8wbwTws32O9h pjILojIVrKLRJyoXahH4EUjE/oqGv6OKulNWg6hyfyV6roJYqEscp2C2yilx HM73UW/+6+ZdckoTQn/3M9PcKlUa62DnNBerCXEMTHfEz5HII9gvxbCp4D0+ Zm4Vy0H3kjtx2Qh8LyShs1UunoPpIly9OD/OroytONx3La1+oar/rJHotB8N /4F6Kv1Onkz3hx+iWPRp/jm6Y/gX//sjU6U3eK4wvsIPcjvYzCRkph3sLy// DcvuuIyle//vxt/PCE6d "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], ImageSize -> {Automatic, 15}, ImageSizeAction -> "ResizeToFit"], MouseAppearanceTag["LinkHand"]], "\"Edit values\""}, "PrettyTooltipTemplate"]& )}], Cell["Documentation", "Section"], Cell["Usage", "Subsection"], Cell[ StyleData["UsageInputs", StyleDefinitions -> StyleData["Input"]], CellMargins -> {{66, 10}, {0, 8}}, StyleKeyMapping -> {"Tab" -> "UsageDescription"}, Evaluatable -> False, CellEventActions -> {"ReturnKeyDown" :> With[{RSNB`nb$ = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[RSNB`nb$, Cell["", "UsageDescription"], All]; SelectionMove[RSNB`nb$, Before, CellContents]], {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, ShowAutoStyles -> False, ShowCodeAssist -> False, CodeAssistOptions -> {"DynamicHighlighting" -> False}, LineSpacing -> {1, 3}, TabSpacings -> {2.5}, CounterIncrements -> "Text", FontFamily -> "Source Sans Pro", FontSize -> 15, FontWeight -> "Plain"], Cell[ StyleData["UsageDescription", StyleDefinitions -> StyleData["Text"]], CellMargins -> {{86, 10}, {7, 0}}, StyleKeyMapping -> {"Backspace" -> "UsageInputs"}, CellGroupingRules -> "OutputGrouping", CellEventActions -> {"ReturnKeyDown" :> With[{RSNB`nb$ = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[RSNB`nb$, Cell[ BoxData[""], "UsageInputs", FontFamily -> "Source Sans Pro"], All]; SelectionMove[RSNB`nb$, Before, CellContents]], {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, ShowAutoSpellCheck -> False], Cell["Details & Options", "Subsection"], Cell[ StyleData["Notes", StyleDefinitions -> StyleData["Item"]], CellDingbat -> StyleBox["\[FilledVerySmallSquare]", FontColor -> GrayLevel[0.6]], CellMargins -> {{66, 24}, {9, 7}}, ReturnCreatesNewCell -> False, StyleKeyMapping -> {}, DefaultNewCellStyle -> "Notes", ShowAutoSpellCheck -> False, GridBoxOptions -> {BaseStyle -> "TableNotes"}], Cell[ StyleData["TableNotes", StyleDefinitions -> StyleData["Notes"]], CellDingbat -> None, CellFrameColor -> RGBColor[0.749, 0.694, 0.553], StyleMenuListing -> None, ButtonBoxOptions -> {Appearance -> {Automatic, None}}, GridBoxOptions -> { FrameStyle -> GrayLevel[0.906], GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{True}}}, GridDefaultElement -> Cell["\[Placeholder]", "TableText"]}], Cell[ StyleData["TableText"], DefaultInlineFormatType -> "DefaultInputInlineFormatType", AutoQuoteCharacters -> {}, StyleMenuListing -> None], Cell["Examples", "Subsection"], Cell[ StyleData["ExampleDelimiter"], Selectable -> False, ShowCellBracket -> Automatic, CellMargins -> {{66, 14}, {5, 10}}, Evaluatable -> True, CellGroupingRules -> {"SectionGrouping", 58}, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False, CellLabelAutoDelete -> True, TabFilling -> "\[LongDash]\[NegativeThickSpace]", TabSpacings -> {100}, StyleMenuListing -> None, FontFamily -> "Verdana", FontWeight -> Bold, FontSlant -> "Plain", FontColor -> GrayLevel[0.906]], Cell[ StyleData["ExampleText", StyleDefinitions -> StyleData["Text"]]], Cell[ StyleData["PageBreak", StyleDefinitions -> StyleData["ExampleDelimiter"]], Selectable -> False, CellFrame -> {{0, 0}, {1, 0}}, CellMargins -> {{66, 14}, {15, -5}}, CellElementSpacings -> {"CellMinHeight" -> 1}, Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), CellFrameColor -> GrayLevel[ Rational[77, 85]]], Cell[ StyleData["Subsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["Subsubsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["ExampleImage"], PageWidth :> 650, CellMargins -> {{66, 66}, {16, 5}}, Evaluatable -> False, ShowCellLabel -> False, MenuSortingValue -> 10000, RasterBoxOptions -> {ImageEditMode -> False}], Cell["Links", "Section"], Cell[ StyleData["Link"], FontFamily -> "Source Sans Pro", FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.855, 0.396, 0.145], RGBColor[0.02, 0.286, 0.651]]]], Cell[ StyleData["StringTypeLink", StyleDefinitions -> StyleData["Link"]], FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.969, 0.467, 0.], GrayLevel[0.467]]]], Cell[ StyleData["CharactersRefLink"], ShowSpecialCharacters -> False], Cell["Annotation", "Section"], Cell[ StyleData["Excluded"], CellBracketOptions -> { "Color" -> RGBColor[0.9, 0.4, 0.4], "Thickness" -> 2}, GeneratedCellStyles -> { "Graphics" -> {"Graphics", "Excluded"}, "Message" -> {"Message", "MSG", "Excluded"}, "Output" -> {"Output", "Excluded"}, "Print" -> {"Print", "Excluded"}, "PrintTemporary" -> {"PrintTemporary", "Excluded"}}, CellFrameMargins -> 4, CellFrameLabels -> {{None, Cell[ BoxData[ TemplateBox[{ StyleBox[ "\"excluded\"", "ExcludedCellLabel", StripOnInput -> False], "\"Excluded cells will not appear anywhere in the published \ resource except for the definition notebook\""}, "PrettyTooltipTemplate"]], "ExcludedCellLabel"]}, {None, None}}, StyleMenuListing -> None, Background -> RGBColor[1, 0.95, 0.95]], Cell[ StyleData["ExcludedCellLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontFamily -> "Source Sans Pro", FontSize -> 9, FontWeight -> Plain, FontSlant -> Italic, FontColor -> RGBColor[0.9, 0.4, 0.4, 0.5], Background -> None], Cell[ StyleData["Comment", StyleDefinitions -> StyleData["Text"]], CellFrame -> {{3, 0}, {0, 0}}, CellMargins -> {{66, 0}, {1, 0}}, CellElementSpacings -> {"ClosedCellHeight" -> 0}, GeneratedCellStyles -> { "Graphics" -> {"Graphics", "Comment"}, "Message" -> {"Message", "MSG", "Comment"}, "Output" -> {"Output", "Comment"}, "Print" -> {"Print", "Comment"}, "PrintTemporary" -> {"PrintTemporary", "Comment"}}, CellFrameColor -> RGBColor[0.880722, 0.611041, 0.142051], CellFrameLabelMargins -> {{0, 10}, {0, 0}}, FontColor -> GrayLevel[0.25], Background -> RGBColor[0.982, 0.942, 0.871]], Cell[ StyleData["AuthorComment", StyleDefinitions -> StyleData["Comment"]], GeneratedCellStyles -> { "Graphics" -> {"Graphics", "AuthorComment"}, "Message" -> {"Message", "MSG", "AuthorComment"}, "Output" -> {"Output", "AuthorComment"}, "Print" -> {"Print", "AuthorComment"}, "PrintTemporary" -> {"PrintTemporary", "AuthorComment"}}, CellFrameColor -> RGBColor[0.368417, 0.506779, 0.709798], Background -> RGBColor[0.905, 0.926, 0.956]], Cell[ StyleData["ReviewerComment", StyleDefinitions -> StyleData["Comment"]], GeneratedCellStyles -> { "Graphics" -> {"Graphics", "ReviewerComment"}, "Message" -> {"Message", "MSG", "ReviewerComment"}, "Output" -> {"Output", "ReviewerComment"}, "Print" -> {"Print", "ReviewerComment"}, "PrintTemporary" -> {"PrintTemporary", "ReviewerComment"}}, CellFrameColor -> RGBColor[0.560181, 0.691569, 0.194885], Background -> RGBColor[0.934, 0.954, 0.879]], Cell[ StyleData["CommentLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontSlant -> "Italic", FontColor -> GrayLevel[0.5]], Cell["Special Input", "Section"], Cell[ StyleData["FormObjectCell"], CellMargins -> {{66, 66}, {16, 5}}], Cell[ StyleData["LocalFileInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued", ButtonFunction :> With[{RSNB`file = SystemDialogInput["FileOpen"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { None, None}}], Cell[ StyleData["LocalDirectoryInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued", ButtonFunction :> With[{RSNB`file = SystemDialogInput["Directory"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { None, None}}], Cell["Misc", "Section"], Cell[ StyleData["Item"], DefaultNewCellStyle -> "Item"], Cell[ StyleData["ButtonText"], FontFamily -> "Sans Serif", FontSize -> 11, FontWeight -> Bold, FontColor -> RGBColor[0.459, 0.459, 0.459]], Cell[ StyleData["InlineFormula"], HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, LanguageCategory -> "Formula", AutoSpacing -> True, ScriptLevel -> 1, SingleLetterItalics -> False, SpanMaxSize -> 1, StyleMenuListing -> None, FontFamily -> "Source Sans Pro", FontSize -> 1. Inherited, ButtonBoxOptions -> {Appearance -> {Automatic, None}}, FractionBoxOptions -> {BaseStyle -> {SpanMaxSize -> Automatic}}, GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["DockedCell"], CellFrameColor -> GrayLevel[0.75], Background -> GrayLevel[0.9]]}, Visible -> False, FrontEndVersion -> "13.0 for Linux x86 (64-bit) (November 22, 2021)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Name"->{ Cell[633, 23, 99, 2, 70, "Title",ExpressionUUID->"cf4d4917-4c9c-4d7d-9d45-4dc00c4360e3", CellTags->{"Name", "TemplateCell", "Title"}, CellID->36893133]}, "TemplateCell"->{ Cell[633, 23, 99, 2, 70, "Title",ExpressionUUID->"cf4d4917-4c9c-4d7d-9d45-4dc00c4360e3", CellTags->{"Name", "TemplateCell", "Title"}, CellID->36893133], Cell[735, 27, 120, 2, 70, "Text",ExpressionUUID->"8402c5a9-e86e-4b17-b9e7-3633e8e6d141", CellTags->{"Description", "TemplateCell"}, CellID->871839403]}, "Title"->{ Cell[633, 23, 99, 2, 70, "Title",ExpressionUUID->"cf4d4917-4c9c-4d7d-9d45-4dc00c4360e3", CellTags->{"Name", "TemplateCell", "Title"}, CellID->36893133]}, "Description"->{ Cell[735, 27, 120, 2, 70, "Text",ExpressionUUID->"8402c5a9-e86e-4b17-b9e7-3633e8e6d141", CellTags->{"Description", "TemplateCell"}, CellID->871839403]}, "Definition"->{ Cell[880, 33, 1206, 29, 70, "Section",ExpressionUUID->"6c3fbcb5-75d0-41a7-998a-baefdf547ae7", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "Function"->{ Cell[880, 33, 1206, 29, 70, "Section",ExpressionUUID->"6c3fbcb5-75d0-41a7-998a-baefdf547ae7", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "TemplateCellGroup"->{ Cell[880, 33, 1206, 29, 70, "Section",ExpressionUUID->"6c3fbcb5-75d0-41a7-998a-baefdf547ae7", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[30747, 685, 1980, 50, 70, "Subsection",ExpressionUUID->"33250c8b-09bc-444a-be2d-7db322c02af2", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[36732, 890, 1429, 32, 70, "Subsection",ExpressionUUID->"500e1f04-a663-4986-981f-5996a340fb59", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[40162, 993, 7029, 152, 70, "Section",ExpressionUUID->"2f2a7250-d756-4701-a3fe-29bd337e0e13", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[119570, 2783, 1026, 26, 70, "Subsection",ExpressionUUID->"ddafecea-758e-4839-b72c-b0ed8b745b6e", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[120731, 2817, 996, 26, 70, "Subsection",ExpressionUUID->"174caa8f-d476-45e7-adeb-1897c1d66ce1", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[122251, 2858, 221, 6, 70, "Subsection",ExpressionUUID->"79e2c999-46ee-47e7-b485-e38903b3d0a9", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[151274, 3847, 980, 26, 70, "Subsection",ExpressionUUID->"55dc229e-b896-4a84-9dca-b0040dd81e2d", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[152341, 3881, 1039, 26, 70, "Subsection",ExpressionUUID->"ae970e58-6934-4075-af48-5988f761bc78", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[153523, 3918, 1084, 26, 70, "Subsection",ExpressionUUID->"a9a46070-ebd5-4576-96b8-d4b786b1fc6d", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[155163, 3959, 923, 26, 70, "Subsection",ExpressionUUID->"2ae8babe-4386-4362-ac12-903a146d13b5", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[156631, 4000, 1874, 45, 70, "Subsection",ExpressionUUID->"78be5c2f-9b4a-4d68-848f-256c3db03c50", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[158862, 4066, 955, 25, 70, "Subsection",ExpressionUUID->"719718c4-3aab-4c3f-b64d-b7130bbd16a4", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[159842, 4095, 1174, 31, 70, "Subsubsection",ExpressionUUID->"2a9c8aac-bf5d-4216-992b-6b72fcbd2bb9", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[161145, 4135, 1113, 29, 70, "Subsubsection",ExpressionUUID->"bc1af924-5cfb-4fa9-825f-fc7ac4e7e994", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[163619, 4211, 1280, 33, 70, "Subsubsection",ExpressionUUID->"df9419ce-cc77-4f2f-b82c-50a50ffb0b5b", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[166304, 4292, 1913, 46, 70, "Subsubsection",ExpressionUUID->"46d02f59-31a5-438c-ba5c-f76fb24fe34b", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[171153, 4428, 1071, 27, 70, "Subsubsection",ExpressionUUID->"2a64a596-5606-4d34-ac9f-2f53af6ad451", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[173226, 4492, 1155, 28, 70, "Section",ExpressionUUID->"a392e2af-bdf2-4974-bb47-6bc394673a26", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[174950, 4535, 1033, 26, 70, "Section",ExpressionUUID->"51b3e962-3924-4b44-a2e1-6ef18ba06153", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]}, "Documentation"->{ Cell[30527, 676, 195, 5, 70, "Section",ExpressionUUID->"81308d5e-1bac-4e0e-81a1-a148966ea48e", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307]}, "TemplateSection"->{ Cell[30527, 676, 195, 5, 70, "Section",ExpressionUUID->"81308d5e-1bac-4e0e-81a1-a148966ea48e", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[119296, 2774, 249, 5, 70, "Section",ExpressionUUID->"3a08cad6-842e-416f-9e6d-3243346319cf", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Usage"->{ Cell[30747, 685, 1980, 50, 70, "Subsection",ExpressionUUID->"33250c8b-09bc-444a-be2d-7db322c02af2", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310]}, "Details & Options"->{ Cell[36732, 890, 1429, 32, 70, "Subsection",ExpressionUUID->"500e1f04-a663-4986-981f-5996a340fb59", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Notes"->{ Cell[36732, 890, 1429, 32, 70, "Subsection",ExpressionUUID->"500e1f04-a663-4986-981f-5996a340fb59", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "TabNext"->{ Cell[38164, 924, 1197, 38, 70, "Notes",ExpressionUUID->"8cae1a68-16a2-421b-8d89-5496970f6fd4", CellTags->"TabNext", CellID->782002636], Cell[121730, 2845, 484, 8, 70, "Item",ExpressionUUID->"51d686de-a72d-49b8-a58a-00fde7f6b0f2", CellTags->{"DefaultContent", "TabNext"}, CellID->744507960], Cell[154610, 3946, 516, 8, 70, "Text",ExpressionUUID->"46172916-80d4-4cea-8e35-ab07c7dd7aa9", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[156089, 3987, 505, 8, 70, "Item",ExpressionUUID->"25d81b96-4c3d-44f3-b775-18e04278bbb4", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746], Cell[174384, 4522, 529, 8, 70, "Text",ExpressionUUID->"8b7cb2c2-f514-4080-afd2-6134186661a7", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[175986, 4563, 515, 8, 70, "Text",ExpressionUUID->"cd993ced-5e33-4cf9-be1e-794cfe7d7bde", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Examples"->{ Cell[40162, 993, 7029, 152, 70, "Section",ExpressionUUID->"2f2a7250-d756-4701-a3fe-29bd337e0e13", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011]}, "Source & Additional Information"->{ Cell[119296, 2774, 249, 5, 70, "Section",ExpressionUUID->"3a08cad6-842e-416f-9e6d-3243346319cf", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Contributed By"->{ Cell[119570, 2783, 1026, 26, 70, "Subsection",ExpressionUUID->"ddafecea-758e-4839-b72c-b0ed8b745b6e", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "ContributorInformation"->{ Cell[119570, 2783, 1026, 26, 70, "Subsection",ExpressionUUID->"ddafecea-758e-4839-b72c-b0ed8b745b6e", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "Keywords"->{ Cell[120731, 2817, 996, 26, 70, "Subsection",ExpressionUUID->"174caa8f-d476-45e7-adeb-1897c1d66ce1", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425]}, "DefaultContent"->{ Cell[121730, 2845, 484, 8, 70, "Item",ExpressionUUID->"51d686de-a72d-49b8-a58a-00fde7f6b0f2", CellTags->{"DefaultContent", "TabNext"}, CellID->744507960], Cell[154610, 3946, 516, 8, 70, "Text",ExpressionUUID->"46172916-80d4-4cea-8e35-ab07c7dd7aa9", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[156089, 3987, 505, 8, 70, "Item",ExpressionUUID->"25d81b96-4c3d-44f3-b775-18e04278bbb4", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746], Cell[158530, 4049, 158, 5, 70, "Input",ExpressionUUID->"4da48fb3-bd51-4047-aba8-6b8202900020", CellTags->"DefaultContent", CellID->946203791], Cell[158691, 4056, 122, 4, 70, "Output",ExpressionUUID->"a2ecfdeb-eaa5-46c8-ace0-646cf0628f88", CellTags->"DefaultContent", CellID->168370258], Cell[161019, 4128, 89, 2, 70, "Text",ExpressionUUID->"9fdfe546-3a4a-45e8-81af-9db521e4e3e8", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768], Cell[174384, 4522, 529, 8, 70, "Text",ExpressionUUID->"8b7cb2c2-f514-4080-afd2-6134186661a7", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[175986, 4563, 515, 8, 70, "Text",ExpressionUUID->"cd993ced-5e33-4cf9-be1e-794cfe7d7bde", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Categories"->{ Cell[122251, 2858, 221, 6, 70, "Subsection",ExpressionUUID->"79e2c999-46ee-47e7-b485-e38903b3d0a9", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[122475, 2866, 28762, 976, 70, "Output",ExpressionUUID->"5bc705ce-a3ec-42d9-8908-d65fa0d04d93", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->635166788]}, "Categories-Checkboxes"->{ Cell[122475, 2866, 28762, 976, 70, "Output",ExpressionUUID->"5bc705ce-a3ec-42d9-8908-d65fa0d04d93", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->635166788]}, "CheckboxCell"->{ Cell[122475, 2866, 28762, 976, 70, "Output",ExpressionUUID->"5bc705ce-a3ec-42d9-8908-d65fa0d04d93", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->635166788], Cell[162261, 4166, 1321, 40, 70, "Output",ExpressionUUID->"02c8936b-1d9e-40ca-b95e-67bd5454a8a6", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524], Cell[164902, 4246, 1365, 41, 70, "Output",ExpressionUUID->"acb1b7fb-4a03-43e2-9333-f7c9ed786dd6", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059], Cell[168220, 4340, 2896, 83, 70, "Output",ExpressionUUID->"7be265ae-c640-47a4-9aa8-cb662d12394f", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308], Cell[172227, 4457, 938, 28, 70, "Output",ExpressionUUID->"6a5444ec-822c-42e2-a0fd-dd86e6114625", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Related Symbols"->{ Cell[151274, 3847, 980, 26, 70, "Subsection",ExpressionUUID->"55dc229e-b896-4a84-9dca-b0040dd81e2d", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169]}, "Related Resource Objects"->{ Cell[152341, 3881, 1039, 26, 70, "Subsection",ExpressionUUID->"ae970e58-6934-4075-af48-5988f761bc78", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472]}, "Source/Reference Citation"->{ Cell[153523, 3918, 1084, 26, 70, "Subsection",ExpressionUUID->"a9a46070-ebd5-4576-96b8-d4b786b1fc6d", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552]}, "Links"->{ Cell[155163, 3959, 923, 26, 70, "Subsection",ExpressionUUID->"2ae8babe-4386-4362-ac12-903a146d13b5", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773]}, "Tests"->{ Cell[156631, 4000, 1874, 45, 70, "Subsection",ExpressionUUID->"78be5c2f-9b4a-4d68-848f-256c3db03c50", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "VerificationTests"->{ Cell[156631, 4000, 1874, 45, 70, "Subsection",ExpressionUUID->"78be5c2f-9b4a-4d68-848f-256c3db03c50", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "Compatibility"->{ Cell[158862, 4066, 955, 25, 70, "Subsection",ExpressionUUID->"719718c4-3aab-4c3f-b64d-b7130bbd16a4", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822]}, "CompatibilityWolframLanguageVersionRequired"->{ Cell[159842, 4095, 1174, 31, 70, "Subsubsection",ExpressionUUID->"2a9c8aac-bf5d-4216-992b-6b72fcbd2bb9", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "Wolfram Language Version"->{ Cell[159842, 4095, 1174, 31, 70, "Subsubsection",ExpressionUUID->"2a9c8aac-bf5d-4216-992b-6b72fcbd2bb9", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "ScrapeDefault"->{ Cell[161019, 4128, 89, 2, 70, "Text",ExpressionUUID->"9fdfe546-3a4a-45e8-81af-9db521e4e3e8", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768]}, "CompatibilityOperatingSystem"->{ Cell[161145, 4135, 1113, 29, 70, "Subsubsection",ExpressionUUID->"bc1af924-5cfb-4fa9-825f-fc7ac4e7e994", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[162261, 4166, 1321, 40, 70, "Output",ExpressionUUID->"02c8936b-1d9e-40ca-b95e-67bd5454a8a6", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "Operating System"->{ Cell[161145, 4135, 1113, 29, 70, "Subsubsection",ExpressionUUID->"bc1af924-5cfb-4fa9-825f-fc7ac4e7e994", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406]}, "CompatibilityOperatingSystem-Checkboxes"->{ Cell[162261, 4166, 1321, 40, 70, "Output",ExpressionUUID->"02c8936b-1d9e-40ca-b95e-67bd5454a8a6", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "CompatibilityFeatures"->{ Cell[163619, 4211, 1280, 33, 70, "Subsubsection",ExpressionUUID->"df9419ce-cc77-4f2f-b82c-50a50ffb0b5b", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[164902, 4246, 1365, 41, 70, "Output",ExpressionUUID->"acb1b7fb-4a03-43e2-9333-f7c9ed786dd6", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "Required Features"->{ Cell[163619, 4211, 1280, 33, 70, "Subsubsection",ExpressionUUID->"df9419ce-cc77-4f2f-b82c-50a50ffb0b5b", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156]}, "CompatibilityFeatures-Checkboxes"->{ Cell[164902, 4246, 1365, 41, 70, "Output",ExpressionUUID->"acb1b7fb-4a03-43e2-9333-f7c9ed786dd6", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "CompatibilityEvaluationEnvironment"->{ Cell[166304, 4292, 1913, 46, 70, "Subsubsection",ExpressionUUID->"46d02f59-31a5-438c-ba5c-f76fb24fe34b", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[168220, 4340, 2896, 83, 70, "Output",ExpressionUUID->"7be265ae-c640-47a4-9aa8-cb662d12394f", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Environments"->{ Cell[166304, 4292, 1913, 46, 70, "Subsubsection",ExpressionUUID->"46d02f59-31a5-438c-ba5c-f76fb24fe34b", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563]}, "CompatibilityEvaluationEnvironment-Checkboxes"->{ Cell[168220, 4340, 2896, 83, 70, "Output",ExpressionUUID->"7be265ae-c640-47a4-9aa8-cb662d12394f", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Cloud Support"->{ Cell[171153, 4428, 1071, 27, 70, "Subsubsection",ExpressionUUID->"2a64a596-5606-4d34-ac9f-2f53af6ad451", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371]}, "CompatibilityCloudSupport"->{ Cell[171153, 4428, 1071, 27, 70, "Subsubsection",ExpressionUUID->"2a64a596-5606-4d34-ac9f-2f53af6ad451", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[172227, 4457, 938, 28, 70, "Output",ExpressionUUID->"6a5444ec-822c-42e2-a0fd-dd86e6114625", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "CompatibilityCloudSupport-Checkboxes"->{ Cell[172227, 4457, 938, 28, 70, "Output",ExpressionUUID->"6a5444ec-822c-42e2-a0fd-dd86e6114625", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Author Notes"->{ Cell[173226, 4492, 1155, 28, 70, "Section",ExpressionUUID->"a392e2af-bdf2-4974-bb47-6bc394673a26", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591]}, "Submission Notes"->{ Cell[174950, 4535, 1033, 26, 70, "Section",ExpressionUUID->"51b3e962-3924-4b44-a2e1-6ef18ba06153", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 299915, 6914}, {"TemplateCell", 300096, 6918}, {"Title", 300430, 6925}, {"Description", 300610, 6929}, {"Definition", 300788, 6933}, {"Function", 300984, 6937}, {"TemplateCellGroup", 301189, 6941}, {"Documentation", 305043, 7002}, {"TemplateSection", 305237, 7006}, {"Usage", 305612, 7013}, {"Details & Options", 305807, 7017}, {"Notes", 306011, 7021}, {"TabNext", 306217, 7025}, {"Examples", 307192, 7044}, {"Source & Additional Information", 307402, 7048}, {"Contributed By", 307615, 7052}, {"ContributorInformation", 307851, 7056}, {"Keywords", 308073, 7060}, {"DefaultContent", 308269, 7064}, {"Categories", 309573, 7089}, {"Categories-Checkboxes", 309972, 7096}, {"CheckboxCell", 310187, 7100}, {"Related Symbols", 311310, 7116}, {"Related Resource Objects", 311523, 7120}, {"Source/Reference Citation", 311747, 7124}, {"Links", 311952, 7128}, {"Tests", 312136, 7132}, {"VerificationTests", 312354, 7136}, {"Compatibility", 312568, 7140}, {"CompatibilityWolframLanguageVersionRequired", 312798, 7144}, {"Wolfram Language Version", 313071, 7148}, {"ScrapeDefault", 313333, 7152}, {"CompatibilityOperatingSystem", 313537, 7156}, {"Operating System", 314007, 7163}, {"CompatibilityOperatingSystem-Checkboxes", 314272, 7167}, {"CompatibilityFeatures", 314529, 7171}, {"Required Features", 314981, 7178}, {"CompatibilityFeatures-Checkboxes", 315233, 7182}, {"CompatibilityEvaluationEnvironment", 315490, 7186}, {"Environments", 315970, 7193}, {"CompatibilityEvaluationEnvironment-Checkboxes", 316243, 7197}, {"Cloud Support", 316504, 7201}, {"CompatibilityCloudSupport", 316749, 7205}, {"CompatibilityCloudSupport-Checkboxes", 317227, 7212}, {"Author Notes", 317469, 7216}, {"Submission Notes", 317669, 7220} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[633, 23, 99, 2, 70, "Title",ExpressionUUID->"cf4d4917-4c9c-4d7d-9d45-4dc00c4360e3", CellTags->{"Name", "TemplateCell", "Title"}, CellID->36893133], Cell[735, 27, 120, 2, 70, "Text",ExpressionUUID->"8402c5a9-e86e-4b17-b9e7-3633e8e6d141", CellTags->{"Description", "TemplateCell"}, CellID->871839403], Cell[CellGroupData[{ Cell[880, 33, 1206, 29, 70, "Section",ExpressionUUID->"6c3fbcb5-75d0-41a7-998a-baefdf547ae7", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[2089, 64, 28401, 607, 70, "Code",ExpressionUUID->"86643f96-3235-4996-ab6f-9f20e7b83531", CellID->236459004] }, Open ]], Cell[CellGroupData[{ Cell[30527, 676, 195, 5, 70, "Section",ExpressionUUID->"81308d5e-1bac-4e0e-81a1-a148966ea48e", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[30747, 685, 1980, 50, 70, "Subsection",ExpressionUUID->"33250c8b-09bc-444a-be2d-7db322c02af2", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[32752, 739, 551, 21, 70, "UsageInputs",ExpressionUUID->"8fe12a47-0a1c-4438-86ea-3492bd5bb861", CellID->68120567], Cell[33306, 762, 1516, 56, 70, "UsageDescription",ExpressionUUID->"03c4cb35-6a74-4d6d-b88c-fc9f0311eda3", CellID->309048217] }, Open ]], Cell[CellGroupData[{ Cell[34859, 823, 971, 33, 70, "UsageInputs",ExpressionUUID->"01bf9186-541a-492e-8060-ca01194c97d4", CellID->736980483], Cell[35833, 858, 850, 26, 70, "UsageDescription",ExpressionUUID->"c8ca1d1d-fe8e-406d-9f24-7038c1864dba", CellID->797541101] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[36732, 890, 1429, 32, 70, "Subsection",ExpressionUUID->"500e1f04-a663-4986-981f-5996a340fb59", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[38164, 924, 1197, 38, 70, "Notes",ExpressionUUID->"8cae1a68-16a2-421b-8d89-5496970f6fd4", CellTags->"TabNext", CellID->782002636], Cell[39364, 964, 749, 23, 70, "Notes",ExpressionUUID->"90433593-aaf2-496c-a861-d87f7979677c", CellID->809921909] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[40162, 993, 7029, 152, 70, "Section",ExpressionUUID->"2f2a7250-d756-4701-a3fe-29bd337e0e13", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell[47216, 1149, 75, 2, 70, "Subsection",ExpressionUUID->"42a8ee70-ecc8-4a09-9d1b-3fb1e05779ef", CellID->904125756], Cell[47294, 1153, 399, 10, 70, "Text",ExpressionUUID->"a5062108-0f09-43b1-8a2d-f7904f8f99c4", CellID->118228536], Cell[CellGroupData[{ Cell[47718, 1167, 545, 13, 70, "Input",ExpressionUUID->"fa397a22-99f9-4b4f-a4fe-33ee1b72aa99", CellID->54126449], Cell[48266, 1182, 1954, 38, 70, "Output",ExpressionUUID->"8759cfc6-de64-4325-b6dd-23423bb3dd9c", CellID->509209943] }, Open ]], Cell[50235, 1223, 547, 17, 70, "Text",ExpressionUUID->"bbd9f5f4-4d57-485b-9401-bbe8fdb4e9ef", CellID->914927205], Cell[CellGroupData[{ Cell[50807, 1244, 643, 17, 70, "Input",ExpressionUUID->"4d6e58e2-d09c-4dd1-a231-b2c0a020760c", CellID->214744739], Cell[51453, 1263, 2469, 46, 70, "Output",ExpressionUUID->"fa49ce15-6f63-435f-9d9d-d4499374fe6a", CellID->690443285] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[53971, 1315, 66, 2, 70, "Subsection",ExpressionUUID->"67455c5a-eea3-4101-99ec-8cea20191e72", CellID->204653245], Cell[54040, 1319, 178, 3, 70, "Text",ExpressionUUID->"6d7a5497-21a0-4f81-868f-c011ad49b566", CellID->810567002], Cell[54221, 1324, 946, 30, 70, "Input",ExpressionUUID->"f8b209fd-1fca-4bcd-98cd-27f0d47c7f0d", CellID->614341346], Cell[CellGroupData[{ Cell[55192, 1358, 462, 13, 70, "Input",ExpressionUUID->"1d4ce73d-ecd3-439c-b11b-8ea9b9edfbff", CellID->646100923], Cell[55657, 1373, 26826, 446, 70, "Output",ExpressionUUID->"2b0a6f1b-fe9e-4b67-9eaf-fcce0888b648", CellID->482407661] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[82532, 1825, 68, 2, 70, "Subsection",ExpressionUUID->"2b55340a-9b6b-462d-b129-2bf259ccf33c", CellID->890561554], Cell[CellGroupData[{ Cell[82625, 1831, 140, 3, 70, "Subsubsection",ExpressionUUID->"02403eda-72b8-47d6-adcf-7e3ad91f3eb4", CellID->334799721], Cell[82768, 1836, 1439, 40, 70, "Text",ExpressionUUID->"ecc85ef0-66b7-42e5-8874-252bfdf8b943", CellID->619021669], Cell[CellGroupData[{ Cell[84232, 1880, 478, 13, 70, "Input",ExpressionUUID->"82852a2b-9670-45e4-8a91-fe942fc0e827", CellID->280153644], Cell[84713, 1895, 1648, 33, 70, "Output",ExpressionUUID->"7bf354db-ae8d-4707-92ce-b68639fc9eea", CellID->849481031] }, Open ]], Cell[86376, 1931, 799, 22, 70, "Text",ExpressionUUID->"7d45ed06-f3b7-46ba-a8ef-d4712c357eea", CellID->53241723], Cell[CellGroupData[{ Cell[87200, 1957, 575, 15, 70, "Input",ExpressionUUID->"047cf883-5d79-45ca-8162-7640e4405cf9", CellID->515140919], Cell[87778, 1974, 1622, 33, 70, "Output",ExpressionUUID->"bf859cd3-f450-4031-8112-8501863ce419", CellID->301382733] }, Open ]], Cell[89415, 2010, 973, 26, 70, "Text",ExpressionUUID->"311e1817-20c4-4e47-bf1f-de1981196932", CellID->865973637], Cell[CellGroupData[{ Cell[90413, 2040, 643, 17, 70, "Input",ExpressionUUID->"9bcd59f4-1a44-4f26-ad79-b23aaa42b330", CellID->644066481], Cell[91059, 2059, 1645, 33, 70, "Output",ExpressionUUID->"d60264f9-f9aa-4a04-880e-f8ba04ee31bc", CellID->185843592] }, Open ]], Cell[92719, 2095, 896, 25, 70, "Text",ExpressionUUID->"c40ce34e-8f01-4698-876d-66b3ec7398b6", CellID->560999808], Cell[CellGroupData[{ Cell[93640, 2124, 711, 18, 70, "Input",ExpressionUUID->"251704d3-83a7-458c-822e-f689f49136b4", CellID->118064073], Cell[94354, 2144, 1646, 33, 70, "Output",ExpressionUUID->"2a75de60-351a-40f8-8070-55d6bc53f1e7", CellID->166639204] }, Open ]], Cell[96015, 2180, 465, 10, 70, "Text",ExpressionUUID->"5a893c46-bc84-42bd-903d-47aad3e0dd1c", CellID->65203553], Cell[CellGroupData[{ Cell[96505, 2194, 459, 13, 70, "Input",ExpressionUUID->"5b6c8b05-4cb9-41f2-9b9e-86fd0306d917", CellID->585177016], Cell[96967, 2209, 1398, 29, 70, "Output",ExpressionUUID->"3c6e96a2-b694-4748-8c8d-c912b8e8813e", CellID->878052532] }, Open ]], Cell[98380, 2241, 198, 5, 70, "Text",ExpressionUUID->"b353a7ba-c62d-48fa-ad22-c507bea2f5bc", CellID->843159504], Cell[CellGroupData[{ Cell[98603, 2250, 513, 15, 70, "Input",ExpressionUUID->"74d9b2cf-d8f2-41ca-8846-45fb5635dbf1", CellID->67556022], Cell[99119, 2267, 1696, 34, 70, "Output",ExpressionUUID->"6b5d7069-b24d-4d26-9356-1e5ab33531c4", CellID->799806582] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[100864, 2307, 200, 4, 70, "Subsubsection",ExpressionUUID->"0baf4a73-9d07-427d-87ac-02efceadd3fe", CellID->507497444], Cell[101067, 2313, 1247, 38, 70, "Text",ExpressionUUID->"99f82aae-1a14-40c8-bdea-e83da89a8055", CellID->639290864], Cell[CellGroupData[{ Cell[102339, 2355, 416, 11, 70, "Input",ExpressionUUID->"c01fef40-b72b-4fd0-8f67-96a08a0f739b", CellID->227823971], Cell[102758, 2368, 1294, 27, 70, "Output",ExpressionUUID->"20450d79-0aa8-4c17-b80b-e2651f3f5bb8", CellID->911344177] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[104101, 2401, 140, 3, 70, "Subsubsection",ExpressionUUID->"372221e8-54a4-4a73-af32-eebad929bde4", CellID->203711531], Cell[104244, 2406, 170, 3, 70, "Text",ExpressionUUID->"ab103687-c067-4c04-ba80-f630df56ebe3", CellID->272837669], Cell[CellGroupData[{ Cell[104439, 2413, 581, 16, 70, "Input",ExpressionUUID->"0c4f816d-dcc3-421a-bf4b-4344bb8acff4", CellID->708912205], Cell[105023, 2431, 2885, 53, 70, "Output",ExpressionUUID->"a55f70ea-95d5-4e7f-90d6-2dc181419464", CellID->898457876] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[107957, 2490, 141, 3, 70, "Subsubsection",ExpressionUUID->"efa7f369-6b70-4f6b-98d9-1ec47dd90184", CellID->730865267], Cell[108101, 2495, 201, 3, 70, "Text",ExpressionUUID->"c55d63f2-dc88-4ade-b8a4-6a49acd30fd9", CellID->211397411], Cell[CellGroupData[{ Cell[108327, 2502, 399, 10, 70, "Input",ExpressionUUID->"7310b211-b50f-48c3-a8dd-5ed16e6804a4", CellID->184029065], Cell[108729, 2514, 2926, 54, 70, "Output",ExpressionUUID->"8dea3990-423c-4d53-a5cf-5d0f928bdb3e", CellID->420335918] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[111716, 2575, 85, 2, 70, "Subsection",ExpressionUUID->"1382f15d-e0ac-4a28-a3d6-7ca040e90d03", CellID->232113220], Cell[111804, 2579, 883, 25, 70, "Text",ExpressionUUID->"f69453e6-3f5f-442f-a232-6f71f43187a8", CellID->41666536], Cell[CellGroupData[{ Cell[112712, 2608, 342, 9, 70, "Input",ExpressionUUID->"2bce0a9d-c47f-41b6-8532-f86dc01e307d", CellID->340219013], Cell[113057, 2619, 1629, 33, 70, "Output",ExpressionUUID->"25a41ed9-c7fe-47f3-91d7-6f9766ff2d7b", CellID->742865759] }, Open ]], Cell[CellGroupData[{ Cell[114723, 2657, 336, 9, 70, "Input",ExpressionUUID->"414d8360-4058-4e74-b4a0-635e75effe54", CellID->324170808], Cell[115062, 2668, 1471, 31, 70, "Output",ExpressionUUID->"00a85bfe-fd8d-4dc1-abb2-c769c81ae793", CellID->779699790] }, Open ]], Cell[116548, 2702, 553, 13, 70, "Text",ExpressionUUID->"9acd3a7c-a515-42d3-be6a-e4399f4cd737", CellID->499849707], Cell[CellGroupData[{ Cell[117126, 2719, 476, 13, 70, "Input",ExpressionUUID->"ceb0a5ec-12d7-4f96-a924-e9fef9737357", CellID->522421764], Cell[117605, 2734, 1630, 33, 70, "Output",ExpressionUUID->"a4cc22d4-1a0c-4ade-9085-3a01d241af66", CellID->922631055] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[119296, 2774, 249, 5, 70, "Section",ExpressionUUID->"3a08cad6-842e-416f-9e6d-3243346319cf", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[119570, 2783, 1026, 26, 70, "Subsection",ExpressionUUID->"ddafecea-758e-4839-b72c-b0ed8b745b6e", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[120599, 2811, 95, 1, 70, "Text",ExpressionUUID->"101d4893-08e8-4c1b-940e-aab15d83ac2b", CellID->828200548] }, Open ]], Cell[CellGroupData[{ Cell[120731, 2817, 996, 26, 70, "Subsection",ExpressionUUID->"174caa8f-d476-45e7-adeb-1897c1d66ce1", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[121730, 2845, 484, 8, 70, "Item",ExpressionUUID->"51d686de-a72d-49b8-a58a-00fde7f6b0f2", CellTags->{"DefaultContent", "TabNext"}, CellID->744507960] }, Open ]], Cell[CellGroupData[{ Cell[122251, 2858, 221, 6, 70, "Subsection",ExpressionUUID->"79e2c999-46ee-47e7-b485-e38903b3d0a9", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[122475, 2866, 28762, 976, 70, "Output",ExpressionUUID->"5bc705ce-a3ec-42d9-8908-d65fa0d04d93", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->635166788] }, Open ]], Cell[CellGroupData[{ Cell[151274, 3847, 980, 26, 70, "Subsection",ExpressionUUID->"55dc229e-b896-4a84-9dca-b0040dd81e2d", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[152257, 3875, 47, 1, 70, "Item",ExpressionUUID->"13f0d4da-f78f-483a-9865-3747aec2484a", CellID->876565968] }, Open ]], Cell[CellGroupData[{ Cell[152341, 3881, 1039, 26, 70, "Subsection",ExpressionUUID->"ae970e58-6934-4075-af48-5988f761bc78", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[153383, 3909, 47, 1, 70, "Item",ExpressionUUID->"6cdfb0bf-4e61-4d56-a7dc-257e53e53092", CellID->533302726], Cell[153433, 3912, 53, 1, 70, "Item",ExpressionUUID->"68fee26f-f079-4cb4-88b8-616bceeddf73", CellID->706212597] }, Open ]], Cell[CellGroupData[{ Cell[153523, 3918, 1084, 26, 70, "Subsection",ExpressionUUID->"a9a46070-ebd5-4576-96b8-d4b786b1fc6d", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[154610, 3946, 516, 8, 70, "Text",ExpressionUUID->"46172916-80d4-4cea-8e35-ab07c7dd7aa9", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[155163, 3959, 923, 26, 70, "Subsection",ExpressionUUID->"2ae8babe-4386-4362-ac12-903a146d13b5", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[156089, 3987, 505, 8, 70, "Item",ExpressionUUID->"25d81b96-4c3d-44f3-b775-18e04278bbb4", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746] }, Open ]], Cell[CellGroupData[{ Cell[156631, 4000, 1874, 45, 70, "Subsection",ExpressionUUID->"78be5c2f-9b4a-4d68-848f-256c3db03c50", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[158530, 4049, 158, 5, 70, "Input",ExpressionUUID->"4da48fb3-bd51-4047-aba8-6b8202900020", CellTags->"DefaultContent", CellID->946203791], Cell[158691, 4056, 122, 4, 70, "Output",ExpressionUUID->"a2ecfdeb-eaa5-46c8-ace0-646cf0628f88", CellTags->"DefaultContent", CellID->168370258] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[158862, 4066, 955, 25, 70, "Subsection",ExpressionUUID->"719718c4-3aab-4c3f-b64d-b7130bbd16a4", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[159842, 4095, 1174, 31, 70, "Subsubsection",ExpressionUUID->"2a9c8aac-bf5d-4216-992b-6b72fcbd2bb9", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[161019, 4128, 89, 2, 70, "Text",ExpressionUUID->"9fdfe546-3a4a-45e8-81af-9db521e4e3e8", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[161145, 4135, 1113, 29, 70, "Subsubsection",ExpressionUUID->"bc1af924-5cfb-4fa9-825f-fc7ac4e7e994", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[162261, 4166, 1321, 40, 70, "Output",ExpressionUUID->"02c8936b-1d9e-40ca-b95e-67bd5454a8a6", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524] }, Closed]], Cell[CellGroupData[{ Cell[163619, 4211, 1280, 33, 70, "Subsubsection",ExpressionUUID->"df9419ce-cc77-4f2f-b82c-50a50ffb0b5b", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[164902, 4246, 1365, 41, 70, "Output",ExpressionUUID->"acb1b7fb-4a03-43e2-9333-f7c9ed786dd6", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059] }, Closed]], Cell[CellGroupData[{ Cell[166304, 4292, 1913, 46, 70, "Subsubsection",ExpressionUUID->"46d02f59-31a5-438c-ba5c-f76fb24fe34b", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[168220, 4340, 2896, 83, 70, "Output",ExpressionUUID->"7be265ae-c640-47a4-9aa8-cb662d12394f", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308] }, Closed]], Cell[CellGroupData[{ Cell[171153, 4428, 1071, 27, 70, "Subsubsection",ExpressionUUID->"2a64a596-5606-4d34-ac9f-2f53af6ad451", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[172227, 4457, 938, 28, 70, "Output",ExpressionUUID->"6a5444ec-822c-42e2-a0fd-dd86e6114625", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[173226, 4492, 1155, 28, 70, "Section",ExpressionUUID->"a392e2af-bdf2-4974-bb47-6bc394673a26", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[174384, 4522, 529, 8, 70, "Text",ExpressionUUID->"8b7cb2c2-f514-4080-afd2-6134186661a7", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[174950, 4535, 1033, 26, 70, "Section",ExpressionUUID->"51b3e962-3924-4b44-a2e1-6ef18ba06153", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell[175986, 4563, 515, 8, 70, "Text",ExpressionUUID->"cd993ced-5e33-4cf9-be1e-794cfe7d7bde", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)