(* 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[ 337849, 7239] NotebookOptionsPosition[ 183975, 4315] NotebookOutlinePosition[ 327288, 7020] CellTagsIndexPosition[ 325479, 6970] WindowTitle->ToPrompterNotebook | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["ToPrompterNotebook", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->282550582], Cell["Create a slide show prompter from a notebook", "Text", CellTags->{"Description", "TemplateCell"}, CellID->408261290], Cell[CellGroupData[{ Cell[TextData[{ "Definition", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Function", Cell[ BoxData[ FrameBox[ Cell[ "Define your function using the name you gave in the Title line \ above. You can add input cells and extra code to define additional input \ cases or prerequisites. All definitions, including dependencies, will be \ included in the generated resource function.\n\nThis section should be \ evaluated before creating the Examples section below.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoFunction"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Function"}, DefaultNewCellStyle->"Input", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"$tag", "=", "\"\<744b4ebc-a331-449d-90f9-80a71dfce00f\>\""}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"ToPrompterNotebook", "::", "outopen"}], "=", "\"\\""}], ";"}], "\[IndentingNewLine]", "\.00", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"ToPrompterNotebook", "[", RowBox[{"file_", ",", "\n", "\t", RowBox[{"resolution", ":", RowBox[{"{", RowBox[{"userwidth_", ",", "userheight_"}], "}"}]}], ",", "\n", "\t", "wpm_", ",", "\n", "\t", RowBox[{"opts", ":", " ", RowBox[{"OptionsPattern", "[", RowBox[{"{", "\n", " \t\t", RowBox[{ RowBox[{"FontSize", "\[Rule]", "Regular"}], ",", "\n", "\t\t\t", RowBox[{"Overlap", "\[Rule]", "True"}], ",", " ", "\n", "\t\t\t", RowBox[{"BlankFirstPage", " ", "\[Rule]", " ", "True"}], ",", "\n", "\t\t\t", RowBox[{"BlankLastPage", " ", "\[Rule]", " ", "True"}]}], "\n", " \t\t", "}"}], "]"}]}]}], "]"}], ":=", "\n", "\t", RowBox[{"Catch", "[", RowBox[{ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "\n", "\t\t", RowBox[{ RowBox[{"w", "=", RowBox[{"Round", "[", RowBox[{"0.9", "*", "userwidth"}], "]"}]}], ",", "\n", "\t\t", RowBox[{"h", "=", RowBox[{"Round", "[", RowBox[{"0.9", "*", "userheight"}], "]"}]}], ",", "\n", "\t\t", RowBox[{"m1", "=", RowBox[{"Round", "[", RowBox[{"0.5", RowBox[{"userwidth", "/", "60"}]}], "]"}]}], ",", "\n", "\t\t", RowBox[{"m2", "=", RowBox[{"Round", "[", RowBox[{"0.25", RowBox[{"userheight", "/", "30"}]}], "]"}]}], ",", "\n", "\t\t", "fontsize", ",", "text", ",", "data", ",", "dataout", ",", "\n", "\t\t", "i", ",", "j", ",", "c", ",", "\n", "\t\t", "parlengths", ",", "lineheight", ",", "\n", "\t\t", "fsfactor", ",", "overlap", ",", "newname", ",", "\n", "\t\t", "lasthead", ",", "st", ",", "nbout", ",", "\n", "\t\t", "placement", ",", "wordcount", ",", "\[IndentingNewLine]", "\t", "nb", ",", RowBox[{"filename", "=", "file"}], ",", RowBox[{"talkrate", "=", "wpm"}], ",", RowBox[{"options", "=", "opts"}]}], "}"}], ",", "\n", "\t", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"cellsize", "[", "a_Cell", "]"}], " ", ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"w1", ",", "up", ",", "down"}], "}"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"w1", ",", "up", ",", "down"}], "}"}], "=", RowBox[{"First", "[", RowBox[{"MathLink`CallFrontEnd", "[", RowBox[{"FrontEnd`GetBoundingBoxSizePacket", "[", "a", "]"}], "]"}], "]"}]}], ";", RowBox[{"{", RowBox[{"w1", ",", RowBox[{"up", "+", "down"}]}], "}"}]}]}], "]"}]}], ";", "\n", RowBox[{ RowBox[{"inlineCell", "[", RowBox[{"a_TextData", ",", " ", "opts"}], "]"}], ":=", RowBox[{"RawBoxes", "[", RowBox[{"Cell", "[", RowBox[{"a", ",", " ", "opts"}], "]"}], "]"}]}], ";", "\n", RowBox[{"(*", " ", RowBox[{ "$starttime", " ", "and", " ", "$duration", " ", "have", " ", "to", " ", "be", " ", RowBox[{"global", "."}]}], " ", "*)"}], "\n", RowBox[{ RowBox[{"countwords", "[", "list_List", "]"}], " ", ":=", " ", RowBox[{"Total", "[", RowBox[{"Flatten", "[", RowBox[{"countwords", " ", "/@", " ", "list"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"countwords", "[", RowBox[{"TextData", "[", "a_", "]"}], "]"}], ":=", RowBox[{"countwords", "[", "a", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"countwords", "[", "a_String", "]"}], " ", ":=", " ", RowBox[{"Length", "[", RowBox[{"ImportString", "[", RowBox[{"a", ",", " ", "\"\\""}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"countwords", "[", RowBox[{"StyleBox", "[", RowBox[{"a_", ",", "___"}], "]"}], "]"}], ":=", RowBox[{"countwords", "[", "a", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"countwords", "[", RowBox[{"StyleForm", "[", RowBox[{"a_", ",", "___"}], "]"}], "]"}], " ", ":=", " ", RowBox[{"countwords", "[", "a", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"countwords", "[", "else_", "]"}], " ", ":=", " ", "0"}], ";", "\[IndentingNewLine]", "\n", RowBox[{ RowBox[{"firstpage", "[", RowBox[{"talkrate_", ",", "wordcount_"}], "]"}], " ", ":=", " ", RowBox[{"Cell", "[", RowBox[{ RowBox[{"BoxData", "[", RowBox[{"ToBoxes", "[", RowBox[{"Column", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"FrontEndExecute", "[", RowBox[{"{", RowBox[{"FrontEndToken", "[", RowBox[{ RowBox[{"FrontEnd`SelectedNotebook", "[", "]"}], ",", "\"\\""}], "]"}], "}"}], "]"}], ",", RowBox[{"ImageSize", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{"400", ",", "200"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Grid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "wordcount"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"Row", "[", RowBox[{"{", RowBox[{ "\"\<@ \>\"", ",", "talkrate", ",", "\"\< words per minute\>\""}], "}"}], "]"}], ",", RowBox[{"DateString", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", RowBox[{ RowBox[{"wordcount", "/", "talkrate"}], "//", "N"}], ",", "0"}], "}"}], ",", "\"\\""}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"Alignment", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"Right", ",", "Left"}], "}"}], ",", "Automatic"}], "}"}]}], ",", RowBox[{"Dividers", " ", "\[Rule]", " ", "Center"}], ",", RowBox[{"FrameStyle", " ", "\[Rule]", " ", "LightGray"}]}], "]"}]}], "}"}], "\[IndentingNewLine]", "]"}], "]"}], "]"}], ",", "\"\\"", ",", RowBox[{"TextAlignment", " ", "\[Rule]", " ", "Center"}], ",", RowBox[{"CellMargins", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"Inherited", ",", "Inherited"}], "}"}], ",", RowBox[{"{", RowBox[{"Inherited", ",", "200"}], "}"}]}], "}"}]}], ",", RowBox[{"ShowStringCharacters", " ", "\[Rule]", " ", "False"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\n", RowBox[{"lastpage", " ", "=", " ", RowBox[{"Cell", "[", RowBox[{ RowBox[{"BoxData", "[", RowBox[{"ToBoxes", "[", RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"FrontEndExecute", "[", RowBox[{"{", RowBox[{"FrontEndToken", "[", RowBox[{ RowBox[{"FrontEnd`SelectedNotebook", "[", "]"}], ",", "\"\\""}], "]"}], "}"}], "]"}], ",", RowBox[{"ImageSize", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{"400", ",", "200"}], "}"}]}]}], "]"}], "]"}], "]"}], ",", "\"\\"", ",", RowBox[{"TextAlignment", " ", "\[Rule]", " ", "Center"}], ",", RowBox[{"CellMargins", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"Inherited", ",", "Inherited"}], "}"}], ",", RowBox[{"{", RowBox[{"Inherited", ",", "200"}], "}"}]}], "}"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"listToCell", "[", "\n", "\t", RowBox[{ RowBox[{"{", RowBox[{"most__", ",", " ", "last_"}], "}"}], ",", "\n", "\t", RowBox[{"{", RowBox[{"width_", ",", " ", "cheight_"}], "}"}], ",", " ", "\n", "\t", "placement_", ",", "\n", "\t", "options___"}], "]"}], ":=", "\n", "\t", RowBox[{"Cell", "[", "\n", "\t\t", RowBox[{ RowBox[{"BoxData", "@", "\n", "\t\t\t", RowBox[{"FormBox", "[", "\n", "\t\t\t\t", RowBox[{ RowBox[{"ToBoxes", "@", "\n", "\t\t\t\t\t", RowBox[{"Pane", "[", "\n", "\t", "\t\t\t\t\t", RowBox[{ RowBox[{"Column", "[", "\n", "\t", "\t\t\t\t\t\t", RowBox[{ RowBox[{"Flatten", "@", RowBox[{"{", "\t", "\n", "\t", "\t\t\t\t\t\t\t", RowBox[{ RowBox[{"inlineCell", " ", "/@", " ", RowBox[{"{", "most", "}"}]}], ",", " ", "\n", "\t", "\t", "\t", "\t", "\t", "\t", "\t\t", RowBox[{"Item", "[", RowBox[{ RowBox[{"inlineCell", "[", "last", "]"}], ",", "\n", "\t", "\t", "\t", "\t", "\t", "\t", "\t\t\t", RowBox[{"Background", " ", "\[Rule]", " ", RowBox[{"RGBColor", "[", RowBox[{ "0.784314", ",", " ", "0.858824", ",", " ", "0.968627"}], "]"}]}]}], "]"}]}], "}"}]}], ",", "\n", "\t", "\t", "\t", "\t", "\t", "\t\t", RowBox[{"Spacings", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{"0", ",", ".75"}], "}"}]}]}], "]"}], ",", "\n", "\t", "\t\t\t\t\t", RowBox[{"ImageSize", " ", "\[Rule]", " ", "width"}]}], "\n", "\t", "\t\t\t\t\t", "]"}]}], ",", "\n", "\t", "\t\t\t", "\"\\""}], "]"}]}], ",", "\n", "\t\t", "options"}], "]"}]}], ";", "\n", RowBox[{ RowBox[{"listToCell", "[", RowBox[{ RowBox[{"{", "onlyone_", "}"}], ",", "args___"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"listToCell", "[", RowBox[{ RowBox[{"{", RowBox[{"onlyone", ",", " ", RowBox[{"TextData", "[", RowBox[{"{", "\"\<\>\"", "}"}], "]"}]}], "}"}], ",", "args"}], "]"}]}], ";", "\n", RowBox[{"slideDelimiter", " ", "=", " ", "\n", "\t", RowBox[{"Cell", "[", RowBox[{"\"\<\>\"", ",", "\"\\"", ",", RowBox[{"CellTags", "\[Rule]", "\"\\""}]}], "]"}]}], ";", "\n", RowBox[{ RowBox[{"paginate", "[", "\n", "\t", RowBox[{ RowBox[{"{", "cells___Cell", "}"}], ",", "\n", "\t", RowBox[{"textdata", ":", RowBox[{"{", "__TextData", "}"}]}], ",", "\n", "\t", RowBox[{"{", RowBox[{"width_", ",", " ", "height_"}], "}"}], ",", " ", "\n", "\t", "overlap_", ",", "placement_", ",", "\n", "\t", "options___"}], "]"}], ":=", "\n", "\t", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"w1", ",", "h1", ",", "n", ",", "cell", ",", " ", RowBox[{"$RecursionLimit", " ", "=", "Infinity"}]}], "}"}], ",", "\n", "\t", "\t", RowBox[{"(*", " ", RowBox[{ RowBox[{ "find", " ", "n", " ", "such", " ", "that", " ", "n", " ", "lines", " ", "are", " ", "less", " ", "than", " ", "or", " ", "equal", " ", "to", " ", "height"}], ",", " ", RowBox[{ RowBox[{"and", " ", "n"}], "+", RowBox[{ "1", " ", "lines", " ", "are", " ", "greater", " ", "than", " ", RowBox[{"height", "."}]}]}]}], " ", "*)"}], "\n", "\t", "\t", RowBox[{ RowBox[{"n", "=", RowBox[{"Min", "[", RowBox[{ RowBox[{"Floor", "[", RowBox[{"height", "/", "100"}], "]"}], ",", " ", RowBox[{"Length", "[", "textdata", "]"}]}], "]"}]}], ";", "\n", "\t\t", RowBox[{ RowBox[{"{", RowBox[{"w1", ",", "h1"}], "}"}], "=", "\n", "\t\t\t", RowBox[{"cellsize", "[", "\n", "\t", "\t\t\t", RowBox[{"listToCell", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{"textdata", ",", "n"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"width", ",", " ", "Automatic"}], "}"}], ",", " ", "placement", ",", " ", "options"}], "]"}], "]"}]}], ";", "\n", "\t", "\t", RowBox[{"If", "[", RowBox[{ RowBox[{"h1", ">", "height"}], ",", "\n", "\t", "\t\t", RowBox[{"(*", " ", RowBox[{ RowBox[{"If", " ", RowBox[{"we", "'"}], "re", " ", "already", " ", "more", " ", "than", " ", "the", " ", "target", " ", "height"}], ",", " ", RowBox[{ "keep", " ", "reducing", " ", "the", " ", "number", " ", "of", " ", "lines", " ", "until", " ", RowBox[{"we", "'"}], "re", " ", RowBox[{"done", "."}]}]}], " ", "*)"}], "\n", "\t", "\t\t", RowBox[{"While", "[", RowBox[{ RowBox[{"h1", ">", "height"}], ",", "\n", "\t", "\t\t\t", RowBox[{ RowBox[{"--", "n"}], ";", "\n", "\t\t\t\t", RowBox[{ RowBox[{"{", RowBox[{"w1", ",", "h1"}], "}"}], "=", "\n", "\t\t\t\t\t", RowBox[{"cellsize", "[", "\n", "\t\t\t\t\t\t", RowBox[{"listToCell", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{"textdata", ",", "n"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"width", ",", " ", "Automatic"}], "}"}], ",", " ", "placement", ",", "options"}], "]"}], "]"}]}]}]}], "]"}], ",", "\n", "\t", "\t\t", RowBox[{"(*", " ", RowBox[{"Otherwise", ",", " ", RowBox[{"try", " ", "adding", " ", "lines"}], ",", " ", RowBox[{"if", " ", "there", " ", "are", " ", "any"}]}], " ", "*)"}], "\n", "\t", "\t\t", RowBox[{ RowBox[{"While", "[", RowBox[{ RowBox[{ RowBox[{"h1", "<", "height"}], " ", "&&", " ", RowBox[{"n", " ", "<", " ", RowBox[{"Length", "[", "textdata", "]"}]}]}], ",", "\n", "\t", "\t\t\t", RowBox[{ RowBox[{"++", "n"}], ";", "\n", "\t\t\t\t", RowBox[{ RowBox[{"{", RowBox[{"w1", ",", "h1"}], "}"}], "=", "\n", "\t\t\t\t\t", RowBox[{"cellsize", "[", "\n", "\t\t\t\t\t\t", RowBox[{"listToCell", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{"textdata", ",", "n"}], "]"}], ",", RowBox[{"{", RowBox[{"width", ",", " ", "Automatic"}], "}"}], ",", "placement", ",", " ", "options"}], "]"}], "]"}]}]}]}], "]"}], ";", "\n", "\t", "\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{"h1", ">", "height"}], ",", RowBox[{"--", "n"}]}], "]"}], ";"}]}], "\n", "\t", "\t\t", "]"}], ";", "\n", "\t", "\t", RowBox[{"(*", " ", RowBox[{ RowBox[{ "pop", " ", "n", " ", "lines", " ", "off", " ", "the", " ", "list"}], ",", " ", RowBox[{"and", " ", "recurse"}]}], " ", "*)"}], "\n", "\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{"placement", " ", "===", " ", "Top"}], ",", RowBox[{"h1", "=", "Automatic"}], ",", "\n", "\t\t\t", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"w1", ",", "h1"}], "}"}], "=", "\n", "\t\t\t\t", RowBox[{"cellsize", "[", "\n", "\t\t\t\t\t", RowBox[{"listToCell", "[", RowBox[{ RowBox[{"Take", "[", RowBox[{"textdata", ",", "n"}], "]"}], ",", RowBox[{"{", RowBox[{"width", ",", " ", "Automatic"}], "}"}], ",", "placement", ",", "options"}], "]"}], "]"}]}], ";", "\n", "\t\t\t", RowBox[{"h1", "=", RowBox[{"height", "-", "h1"}]}]}]}], "\n", "\t\t\t", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"cell", "=", "\n", "\t\t", RowBox[{"listToCell", "[", "\n", "\t\t\t", RowBox[{ RowBox[{"Take", "[", RowBox[{"textdata", ",", "n"}], "]"}], ",", RowBox[{"{", RowBox[{"width", ",", "h1"}], "}"}], ",", "placement", ",", "options", ",", "\n", "\t\t\t", RowBox[{"CellTags", "\[Rule]", "\n", "\t\t\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{"n", "===", RowBox[{"Length", "[", "textdata", "]"}]}], ",", "\"\\"", ",", RowBox[{"{", "}"}]}], "]"}]}]}], "\n", "\t\t\t", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"paginate", "[", RowBox[{ RowBox[{"{", RowBox[{"cells", ",", "cell"}], "}"}], ",", "\n", "\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{"n", "===", RowBox[{"Length", "[", "textdata", "]"}]}], ",", " ", "\n", "\t\t\t", RowBox[{"{", "}"}], ",", " ", "\n", "\t\t\t", RowBox[{"Drop", "[", RowBox[{"textdata", ",", RowBox[{"If", "[", RowBox[{"overlap", ",", " ", RowBox[{"n", "-", "1"}], ",", " ", "n"}], "]"}]}], "]"}]}], "\n", "\t\t\t", "]"}], ",", "\n", "\t\t", RowBox[{"{", RowBox[{"width", ",", "height"}], "}"}], ",", "\n", "\t\t", "overlap", ",", " ", "\n", "\t\t", "placement", ",", "\n", "\t\t", "options"}], "]"}]}]}], "\n", "\t\t", "\n", "\t", "]"}]}], ";", "\n", RowBox[{ RowBox[{"paginate", "[", RowBox[{ RowBox[{"{", "cells___Cell", "}"}], ",", RowBox[{"{", "}"}], ",", "___"}], "]"}], " ", ":=", " ", "\n", "\t", RowBox[{"{", "cells", "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"SplitString", "[", "sin_String", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"s", "=", RowBox[{"FixedPoint", "[", RowBox[{ RowBox[{ RowBox[{"StringReplace", "[", RowBox[{"#", ",", RowBox[{"{", RowBox[{ RowBox[{"\"\<[[[\>\"", "->", "\"\<[[\>\""}], ",", RowBox[{"\"\<]]]\>\"", "->", "\"\<]]\>\""}]}], "}"}]}], "]"}], "&"}], ",", "sin"}], "]"}]}], ",", RowBox[{"prev", "=", "1"}], ",", RowBox[{"pars", "=", RowBox[{"{", "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"AppendTo", "[", RowBox[{"pars", ",", RowBox[{"StringTake", "[", RowBox[{"s", ",", RowBox[{"{", RowBox[{"prev", ",", RowBox[{"#", "-", "1"}]}], "}"}]}], "]"}]}], "]"}], ";", RowBox[{"AppendTo", "[", RowBox[{"pars", ",", "PAR"}], "]"}], ";", " ", RowBox[{"prev", "=", RowBox[{"#", "+", "1"}]}]}], ")"}], "&"}], "/@", RowBox[{"(", RowBox[{"First", "/@", RowBox[{"StringPosition", "[", RowBox[{"s", ",", "\"\<\\n\>\""}], "]"}]}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"prev", "<", RowBox[{"StringLength", "[", "s", "]"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"pars", ",", RowBox[{"StringTake", "[", RowBox[{"s", ",", RowBox[{"{", RowBox[{"prev", ",", RowBox[{"-", "1"}]}], "}"}]}], "]"}]}], "]"}]}], "]"}], ";", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"DeleteCases", "[", " ", RowBox[{"pars", ",", "\"\<\>\""}], "]"}], "//.", RowBox[{ RowBox[{"{", RowBox[{ "a___", ",", "PAR", ",", "PAR", ",", "PAR", ",", "b___"}], "}"}], "\[RuleDelayed]", RowBox[{"{", RowBox[{"a", ",", "\"\<\>\"", ",", "PAR", ",", "b"}], "}"}]}]}], ")"}], "//.", RowBox[{ RowBox[{"{", RowBox[{"a___", ",", "PAR", ",", "PAR", ",", "b___"}], "}"}], "\[RuleDelayed]", RowBox[{"{", RowBox[{"a", ",", "PAR", ",", "b"}], "}"}]}]}]}]}], "]"}]}], ";", "\n", "\[IndentingNewLine]", RowBox[{ RowBox[{"SplitString", "[", "x_", "]"}], ":=", "x"}], ";", "\n", "\[IndentingNewLine]", RowBox[{ RowBox[{"MarkText", "[", RowBox[{"sin_String", ",", RowBox[{"delim1_", ":", "\"\<[[\>\""}], ",", RowBox[{"delim2_", ":", "\"\<]]\>\""}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"s", "=", "sin"}], "}"}], ",", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"s", "==", "\"\<\>\""}], ",", RowBox[{"Return", "[", RowBox[{"StyleForm", "[", RowBox[{"\"\<[Pause]\>\"", ",", RowBox[{"FontColor", "\[Rule]", RowBox[{"RGBColor", "[", RowBox[{"0", ",", "1", ",", "0"}], "]"}]}]}], "]"}], "]"}]}], "]"}], ";", RowBox[{"pos1", "=", RowBox[{"First", "/@", RowBox[{"StringPosition", "[", RowBox[{"s", ",", "delim1"}], "]"}]}]}], ";", " ", RowBox[{"pos2", "=", RowBox[{"Last", "/@", RowBox[{"StringPosition", "[", RowBox[{"s", ",", "delim2"}], "]"}]}]}], ";", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Length", "[", "pos1", "]"}], "==", RowBox[{"Length", "[", "pos2", "]"}]}], "&&", RowBox[{ RowBox[{"Length", "[", "pos1", "]"}], ">", "0"}]}], ",", RowBox[{"Sequence", "@@", RowBox[{"DeleteCases", "[", RowBox[{ RowBox[{"MapIndexed", "[", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{"#2", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "2"}], "]"}], "\[Equal]", "0"}], ",", RowBox[{"StyleForm", "[", RowBox[{"#", ",", RowBox[{"FontColor", "\[Rule]", RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}]}]}], "]"}], ",", "#"}], "]"}], "&"}], ",", RowBox[{ RowBox[{ RowBox[{"StringTake", "[", RowBox[{"s", ",", RowBox[{"{", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{ RowBox[{"#", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "1"}]}], "}"}]}], "]"}], "&"}], "/@", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"1", ",", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"pos1", ",", RowBox[{"pos2", "+", "1"}]}], "}"}], "]"}], ",", RowBox[{ RowBox[{"StringLength", "[", "s", "]"}], "+", "1"}]}], "}"}], "]"}], ",", "2", ",", "1"}], "]"}]}]}], "]"}], ",", "\"\<\>\""}], "]"}]}], ",", "s"}], "]"}]}]}], "]"}]}], ";", "\n", "\[IndentingNewLine]", RowBox[{ RowBox[{"MarkText", "[", "s_", "]"}], ":=", "s"}], ";", "\n", "\[IndentingNewLine]", RowBox[{ RowBox[{"getNotebook", "[", "filename_", "]"}], ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"nbobj", ",", "nbs", ",", "nbexpr"}], "}"}], ",", RowBox[{ RowBox[{"nbs", "=", RowBox[{"Notebooks", "[", "]"}]}], ";", RowBox[{"nbobj", "=", RowBox[{"NotebookOpen", "[", "filename", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"FailureQ", "[", "nbobj", "]"}], ",", RowBox[{"Throw", "[", RowBox[{"$Failed", ",", "$tag"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"newname", "=", RowBox[{"(", RowBox[{ RowBox[{"StringReplace", "[", RowBox[{"file", ",", RowBox[{"{", RowBox[{ RowBox[{"\"\<.nb\>\"", "->", "\"\<\>\""}], ",", RowBox[{"\"\<.NB\>\"", "->", "\"\<\>\""}]}], "}"}]}], "]"}], "<>", "\"\\"", "<>", "\n", "\t\t\t\t", RowBox[{"Switch", "[", RowBox[{ "fsfactor", ",", "Regular", ",", "\"\\"", ",", "Large", ",", "\"\\"", ",", "Small", ",", "\"\\"", ",", "_", ",", "\"\<\>\""}], "]"}], "<>", "\"\<-\>\"", "<>", "\n", "\t\t\t\t", RowBox[{"ToString", "[", "userwidth", "]"}], "<>", "\"\\"", "<>", RowBox[{"ToString", "[", "userheight", "]"}], "<>", "\"\<.nb\>\""}], ")"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Quiet", "[", RowBox[{"NotebookFileName", "/@", "nbs"}], "]"}], ",", "newname"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Message", "[", RowBox[{ RowBox[{"ToPrompterNotebook", "::", "outopen"}], ",", "newname"}], "]"}], ";", RowBox[{"Throw", "[", RowBox[{"SetSelectedNotebook", ",", "$tag"}], "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"FrontEndExecute", "[", RowBox[{"FrontEndToken", "[", RowBox[{"nbobj", ",", "\"\\""}], "]"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"FrontEndExecute", "[", RowBox[{"FrontEndToken", "[", RowBox[{"nbobj", ",", "\"\\""}], "]"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"nbexpr", "=", RowBox[{"NotebookGet", "[", "nbobj", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{"nbs", ",", "nbobj"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"FrontEndExecute", "[", RowBox[{"FrontEndToken", "[", RowBox[{"nbobj", ",", "\"\\""}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"NotebookClose", "[", "nbobj", "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "nbexpr"}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"getNotebook", "[", "file", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"overlap", "=", RowBox[{"OptionValue", "[", "Overlap", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"fsfactor", "=", RowBox[{"OptionValue", "[", "FontSize", "]"}]}], ";", "\[IndentingNewLine]", "\n", "\t\t", RowBox[{"fontsize", "=", "\n", "\t\t\t", RowBox[{ RowBox[{"Round", "[", RowBox[{ RowBox[{"Max", "[", RowBox[{"{", RowBox[{"userwidth", ",", "userheight"}], "}"}], "]"}], "/", "36"}], "]"}], "*", "\n", "\t\t\t\t", RowBox[{"Switch", "[", RowBox[{ "fsfactor", ",", "Regular", ",", "1", ",", "Large", ",", "1.17", ",", "Small", ",", RowBox[{"1", "/", "1.17"}], ",", "_", ",", "fsfactor"}], "]"}]}]}], ";", "\n", "\t\t", "\n", "\t\t", RowBox[{"text", "=", "\n", "\t\t\t", RowBox[{"Join", "@@", "\n", "\t\t\t\t", RowBox[{"Cases", "[", RowBox[{"nb", ",", "\n", "\t", "\t\t\t\t", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Cell", "[", RowBox[{ RowBox[{"TextData", "[", "a_", "]"}], ",", "___"}], "]"}], "|", RowBox[{"Cell", "[", RowBox[{"a_", ",", "___", ",", "\"\\"", ",", "___"}], "]"}]}], ")"}], "\[RuleDelayed]", "\n", "\t\t\t\t\t\t", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Head", "[", "a", "]"}], "===", "String"}], ",", RowBox[{"{", "a", "}"}], ",", "a"}], "]"}]}], ",", "\n", "\t\t\t\t\t", "Infinity"}], "]"}]}]}], ";", "\n", "\t\t", RowBox[{"data", "=", RowBox[{"Flatten", "[", RowBox[{"SplitString", "/@", "text"}], "]"}]}], ";", "\n", "\t", "\t", RowBox[{"dataout", "=", RowBox[{"{", "}"}]}], ";", "\n", "\t", "\t", RowBox[{"dataout2", "=", RowBox[{"{", "}"}]}], ";", "\n", "\t", "\t", RowBox[{"i", "=", "1"}], ";", "\n", "\t", "\t", RowBox[{"While", "[", RowBox[{ RowBox[{"i", "<=", RowBox[{"Length", "[", "data", "]"}]}], ",", RowBox[{ RowBox[{"j", "=", "1"}], ";", RowBox[{"c", "=", RowBox[{"{", RowBox[{"data", "[", RowBox[{"[", "i", "]"}], "]"}], "}"}]}], ";", "\n", "\t", "\t\t", RowBox[{"While", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"i", "+", "j"}], ")"}], "\[LessEqual]", RowBox[{"Length", "[", "data", "]"}]}], "&&", RowBox[{ RowBox[{"data", "[", RowBox[{"[", RowBox[{"i", "+", "j"}], "]"}], "]"}], "=!=", "PAR"}]}], ",", "\n", "\t", "\t\t\t", RowBox[{ RowBox[{"AppendTo", "[", RowBox[{"c", ",", RowBox[{"data", "[", RowBox[{"[", RowBox[{"i", "+", "j"}], "]"}], "]"}]}], "]"}], ";", "\n", "\t", "\t\t\t", RowBox[{"j", "++"}]}]}], "]"}], ";", " ", "\n", "\t", "\t\t\t", RowBox[{"i", "+=", RowBox[{"j", "+", "1"}]}], ";", "\n", "\t", "\t\t\t", RowBox[{"AppendTo", "[", RowBox[{"dataout", ",", "\n", "\t\t\t\t\t", RowBox[{"RowBox", "[", "\n", "\t\t\t\t\t\t", RowBox[{"Replace", "[", RowBox[{"c", ",", "\n", "\t\t\t\t\t\t\t", RowBox[{"s_String", "\[RuleDelayed]", RowBox[{"(", "\n", "\t\t\t\t\t\t\t\t", RowBox[{"\"\<\\\"\>\"", "<>", RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"s", "===", "\"\<\>\""}], ",", "\"\<[Pause]\>\"", ",", "s"}], "]"}], ",", RowBox[{"\"\<\\\"\>\"", "->", "\"\<'\>\""}]}], "]"}], "<>", "\"\<\\\"\>\""}], ")"}]}], ",", "\n", "\t\t\t\t\t\t\t", RowBox[{"{", "1", "}"}]}], "]"}], "\n", "\t\t\t\t\t\t", "]"}]}], "\n", "\t\t\t\t\t", "]"}], ";", "\n", "\t\t\t\t", RowBox[{"AppendTo", "[", RowBox[{"dataout2", ",", RowBox[{"TextData", "[", RowBox[{"MarkText", "/@", "c"}], "]"}]}], "]"}]}]}], "\n", "\t\t\t", "]"}], ";", "\n", "\t\t", "\n", "\t\t", RowBox[{"wordcount", " ", "=", " ", RowBox[{"countwords", "[", "dataout2", "]"}]}], ";", "\n", "\t\t", "\n", "\t\t", RowBox[{"ssnbcells", " ", "=", " ", "\n", "\t\t\t", RowBox[{"paginate", "[", RowBox[{ RowBox[{"{", "}"}], ",", "dataout2", ",", RowBox[{"{", RowBox[{"userwidth", ",", "userheight"}], "}"}], ",", "\n", "\t\t\t\t", "overlap", ",", " ", "placement", ",", "\n", "\t\t\t\t", RowBox[{"FontWeight", " ", "\[Rule]", " ", "Bold"}], ",", RowBox[{"FontSize", " ", "\[Rule]", " ", "fontsize"}], ",", "\n", "\t\t\t\t", RowBox[{"FontFamily", " ", "\[Rule]", " ", "\"\\""}], ",", RowBox[{"ShowCellBracket", " ", "\[Rule]", "False"}], ",", "\n", "\t\t\t\t", RowBox[{"LineIndent", " ", "\[Rule]", " ", "0"}], ",", " ", RowBox[{"CellMargins", " ", "\[Rule]", " ", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "15"}], "}"}], ",", RowBox[{"{", RowBox[{"Inherited", ",", "Inherited"}], "}"}]}], "}"}]}]}], "]"}]}], ";", "\n", "\t", "\t", RowBox[{"ssnbcells", " ", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"slideDelimiter", ",", "#"}], "}"}], "&"}], " ", "/@", " ", "ssnbcells"}], "]"}]}], ";", "\n", "\t\t", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"OptionValue", "[", "BlankFirstPage", "]"}], ",", "\n", "\t\t\t", RowBox[{"ssnbcells", " ", "=", " ", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"slideDelimiter", ",", RowBox[{"firstpage", "[", RowBox[{"wpm", ",", " ", "wordcount"}], "]"}], ",", "ssnbcells"}], "}"}], "]"}]}]}], "\n", "\t", "\t\t", "]"}], ";", "\n", "\t\t", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"OptionValue", "[", "BlankLastPage", "]"}], ",", "\n", "\t\t\t", RowBox[{"ssnbcells", " ", "=", " ", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"ssnbcells", ",", "slideDelimiter", ",", "lastpage"}], "}"}], "]"}]}]}], "\n", "\t", "\t\t", "]"}], ";", "\n", "\t\t", "\n", "\t\t", RowBox[{"nbout", "=", "\n", "\t\t\t", RowBox[{"NotebookPut", "[", "\n", "\t\t\t\t", RowBox[{"Notebook", "[", RowBox[{"ssnbcells", ",", "\n", "\t\t\t\t\t", RowBox[{ "ScreenStyleEnvironment", "\[Rule]", "\"\\""}], ",", "\n", "\t\t\t\t\t", RowBox[{"WindowSize", "\[Rule]", RowBox[{"{", RowBox[{"userwidth", ",", "userheight"}], "}"}]}], ",", "\n", "\t\t\t\t\t", RowBox[{"DockedCells", " ", "\[Rule]", " ", RowBox[{"{", "}"}]}], ",", "\n", "\t\t\t\t\t", RowBox[{"CellContext", " ", "\[Rule]", " ", "Notebook"}], ",", "\n", "\t\t\t\t\t", RowBox[{"NotebookDynamicExpression", "\[RuleDelayed]", RowBox[{"Refresh", "[", " ", RowBox[{"None", ",", RowBox[{"TrackedSymbols", "\[Rule]", RowBox[{"{", "}"}]}]}], "]"}]}]}], "]"}], "]"}]}], ";", "\n", "\t\t", "\n", "\t\t", RowBox[{"NotebookSave", "[", RowBox[{"nbout", ",", "newname"}], "]"}], ";", "\[IndentingNewLine]", "\t", RowBox[{"SetOptions", "[", RowBox[{ RowBox[{"NotebookOpen", "[", "newname", "]"}], ",", RowBox[{"PrintingOptions", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "False"}], ",", RowBox[{"\"\\"", "\[Rule]", "False"}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"25", ",", "25"}], "}"}], ",", RowBox[{"{", RowBox[{"25", ",", "50"}], "}"}]}], "}"}]}]}], "}"}]}]}], "]"}], ";", "\n", "\t\t", RowBox[{"Export", "[", RowBox[{ RowBox[{ RowBox[{"StringReplace", "[", RowBox[{"file", ",", RowBox[{"{", RowBox[{ RowBox[{"\"\<.nb\>\"", "->", "\"\<\>\""}], ",", RowBox[{"\"\<.NB\>\"", "->", "\"\<\>\""}]}], "}"}]}], "]"}], "<>", "\"\\"", "<>", "\"\<.pdf\>\""}], ",", "\n", "\t\t\t", RowBox[{"NotebookOpen", "[", "newname", "]"}]}], "]"}], ";", "\n", "\t\t", "nbout"}]}], "\[IndentingNewLine]", "]"}], ",", "$tag", ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"post", "[", "##", "]"}], ";", "$Failed"}], ")"}], "&"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"post", "[", RowBox[{"SetSelectedNotebook", ",", "$tag"}], "]"}], ":=", RowBox[{"SetSelectedNotebook", "[", RowBox[{"EvaluationNotebook", "[", "]"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"post", "[", "__", "]"}], ":=", " ", "Null"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.49226800645046*^9, 3.492268058439765*^9}, 3.492268140940867*^9, {3.492269030761994*^9, 3.4922690404201202`*^9}, { 3.4922691623815403`*^9, 3.492269169023823*^9}, {3.492269218363882*^9, 3.492269223630171*^9}, 3.492269540592688*^9, {3.492269789613587*^9, 3.492269819138338*^9}, {3.492269866359571*^9, 3.4922698748598423`*^9}, { 3.492277028034329*^9, 3.4922770337107153`*^9}, 3.4922772981009607`*^9, { 3.4922776882963133`*^9, 3.49227770945256*^9}, 3.492277921647318*^9, { 3.492278546530344*^9, 3.492278580951796*^9}, {3.492278616027032*^9, 3.492278652065748*^9}, 3.4922786951993027`*^9, {3.4922788363940773`*^9, 3.492278861587175*^9}, 3.4922791123631887`*^9, {3.492279188392108*^9, 3.492279215091318*^9}, {3.4922792917179003`*^9, 3.4922792921712713`*^9}, { 3.4922794135319443`*^9, 3.492279414753508*^9}, {3.492279471600071*^9, 3.492279472714095*^9}, {3.492279524389743*^9, 3.492279524605915*^9}, 3.492279581372643*^9, 3.492290002177925*^9, {3.492291568621193*^9, 3.492291568737233*^9}, 3.492291642707183*^9, {3.492339222986147*^9, 3.492339224138414*^9}, {3.4923532600472393`*^9, 3.492353262874703*^9}, { 3.6980809359000196`*^9, 3.698081149318565*^9}, {3.69815476125001*^9, 3.6981547810440683`*^9}, {3.6981548558967657`*^9, 3.6981548839800034`*^9}, 3.6981550856404343`*^9, {3.759760406913238*^9, 3.759760409926807*^9}, { 3.759760528573842*^9, 3.759760583731179*^9}, {3.759761112960198*^9, 3.759761146004715*^9}, {3.759761199210065*^9, 3.759761204619261*^9}, { 3.7597612499797564`*^9, 3.75976128474251*^9}, {3.7597613478137817`*^9, 3.759761403038702*^9}, 3.759761476745894*^9, {3.7597615163655357`*^9, 3.759761535658723*^9}, {3.759761569433345*^9, 3.7597616107762136`*^9}, { 3.759761725991476*^9, 3.759761955621263*^9}, 3.759762070781907*^9, { 3.759762580225224*^9, 3.759762598742271*^9}, {3.759765203879772*^9, 3.759765205658723*^9}, {3.759765241434267*^9, 3.759765275362979*^9}, { 3.759765350661324*^9, 3.759765358974463*^9}, {3.759765389588461*^9, 3.759765391209214*^9}, {3.759765423666863*^9, 3.759765444522978*^9}, { 3.759765583702482*^9, 3.759765609169107*^9}, {3.759765664815783*^9, 3.759765685190213*^9}, {3.7597657164740667`*^9, 3.75976572494347*^9}, { 3.759765767306637*^9, 3.7597657724653263`*^9}, {3.759765824444368*^9, 3.759765834634747*^9}, {3.759765924569965*^9, 3.759765934759502*^9}, { 3.759766338115922*^9, 3.759766343783175*^9}, {3.7597663896634207`*^9, 3.759766423313542*^9}, {3.759766636962571*^9, 3.7597666398210163`*^9}, { 3.75976668346107*^9, 3.759766687410036*^9}, {3.75976671868666*^9, 3.759766726908984*^9}, {3.759766760457881*^9, 3.759766765406577*^9}, { 3.759766810926362*^9, 3.759766892390273*^9}, {3.75976693555542*^9, 3.7597669406939173`*^9}, {3.759766979329279*^9, 3.759767002719819*^9}, { 3.759767038102117*^9, 3.759767046527432*^9}, {3.759767085533205*^9, 3.759767090079281*^9}, {3.759767156597732*^9, 3.75976720414054*^9}, { 3.7597672581705313`*^9, 3.759767261800414*^9}, {3.759767350904353*^9, 3.75976736275937*^9}, {3.759767862035536*^9, 3.759767900068239*^9}, { 3.7597679597999887`*^9, 3.759767961249297*^9}, 3.759768104893306*^9, { 3.759768169037389*^9, 3.759768174279582*^9}, {3.759768395763474*^9, 3.759768511710739*^9}, {3.759768543572391*^9, 3.759768544075612*^9}, { 3.7597685873248653`*^9, 3.759768603896607*^9}, 3.759768666684304*^9, { 3.759768739550448*^9, 3.759768771972608*^9}, {3.759768837977312*^9, 3.75976884078784*^9}, {3.75977003038896*^9, 3.759770100666625*^9}, { 3.759771799784474*^9, 3.759771801722253*^9}, {3.7597718755893917`*^9, 3.759771875734074*^9}, {3.759772281182716*^9, 3.759772282451913*^9}, 3.760722015441546*^9, {3.760722088473523*^9, 3.760722130749852*^9}, { 3.772560939857747*^9, 3.772560959045105*^9}, {3.772561009198427*^9, 3.7725610230544252`*^9}, {3.7725611703693113`*^9, 3.772561232566792*^9}, { 3.7725613417138367`*^9, 3.772561343296929*^9}, {3.772561408622479*^9, 3.772561409176759*^9}, {3.77256174870254*^9, 3.7725618302290487`*^9}, { 3.772808753719396*^9, 3.772808830691476*^9}, {3.772809529857327*^9, 3.77280954046638*^9}, {3.772809893868514*^9, 3.772809919845385*^9}, { 3.772809990668806*^9, 3.7728099937486343`*^9}, {3.772810048718914*^9, 3.7728100529786797`*^9}, {3.772810098980956*^9, 3.77281011732164*^9}, { 3.772810436834798*^9, 3.772810441087075*^9}, {3.772810477788239*^9, 3.772810478353836*^9}, {3.7728123334697437`*^9, 3.772812385572982*^9}, { 3.7728124323749523`*^9, 3.7728124785950127`*^9}, {3.772812547042019*^9, 3.7728125522804537`*^9}, {3.7728125974595003`*^9, 3.772812621269492*^9}, { 3.7728126513251667`*^9, 3.772812699907345*^9}, {3.772812752002405*^9, 3.772812758323181*^9}, {3.772816309800209*^9, 3.772816352960294*^9}, { 3.772816444905703*^9, 3.772816447056098*^9}, 3.772816570353138*^9, { 3.772816863510722*^9, 3.7728168982259274`*^9}, {3.7728170500808783`*^9, 3.772817126766849*^9}, {3.772817288435917*^9, 3.7728173421255217`*^9}, { 3.772817381127359*^9, 3.772817383474432*^9}, {3.7734121873723097`*^9, 3.773412190666926*^9}, 3.773413443711871*^9, {3.773413509003758*^9, 3.7734135095444927`*^9}, 3.7734145446351357`*^9, {3.773414605000288*^9, 3.773414610408403*^9}, {3.7734202533608923`*^9, 3.773420255770062*^9}, { 3.773423232082592*^9, 3.77342324725397*^9}}, CellLabel->"In[531]:=", CellID->806649043] }, 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[{"ToPrompterNotebook", "[", RowBox[{ StyleBox["name", "TI"], ",", " ", RowBox[{"{", RowBox[{ StyleBox["width", "TI"], ",", " ", StyleBox["height", "TI"]}], "}"}], ",", " ", StyleBox["wpm", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->910678914], Cell[TextData[{ "converts a notebook with the specified ", Cell[BoxData[ StyleBox["name", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " to a prompter notebook of ", Cell[BoxData[ StyleBox["width", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ StyleBox["height", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " for the given speaking rate in words per minute." }], "UsageDescription", CellID->207436913] }, 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["ToPrompterNotebook"], "InlineFormula", FontFamily->"Source Sans Pro"], " saves the output notebook and its copy in PDF format in the same directory \ as the source notebook." }], "Notes", CellTags->"TabNext", CellID->817001668], Cell[TextData[{ "The base name of the saved PDF file is the base name of the source notebook \ with the word ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " appended to it." }], "Notes", CellID->310159459], Cell["\<\ The first slide in the output notebook gives an approximate talk time.\ \>", "Notes", CellTags->"TabNext", CellID->255029330] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Examples", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Examples", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Demonstrate the function\[CloseCurlyQuote]s usage, starting with \ the most basic use case and describing each example in a preceding text cell.\ \n\nWithin a group, individual examples can be delimited by inserting page \ breaks between them (either using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"[Right-click]\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Insert Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], " between cells or through the menu using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"Insert\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], ").\n\nExamples should be grouped into Subsection and \ Subsubsection cells similarly to existing documentation pages. Here are some \ typical Subsection names and the types of examples they normally contain:\n \ ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Basic Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "most basic function usage\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Scope: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "input and display conventions, standard computational attributes \ (e.g. threading over lists)\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Options: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "available options and parameters for the function\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Applications: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "standard industry or academic applications\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Properties and Relations: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "how the function relates to other functions\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Possible Issues: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "limitations or unexpected behavior a user might experience\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Neat Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "particularly interesting, unconventional, or otherwise unique \ usage"}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Examples"}, CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", CellID->462042388], Cell["\<\ Save a copy of an example notebook to the system's temporary directory and \ convert the notebook to a slide show prompter: \ \>", "Text", CellChangeTimes->{{3.7734167101400137`*^9, 3.7734167505125103`*^9}, { 3.773416793966432*^9, 3.773416832338955*^9}, {3.7734170391407347`*^9, 3.773417053411256*^9}, 3.7734171464479322`*^9, {3.773418769593326*^9, 3.773418773927888*^9}, {3.7782338546131697`*^9, 3.7782338699856544`*^9}}, CellID->147530393], Cell[BoxData[ RowBox[{ RowBox[{"file", "=", RowBox[{"CopyFile", "[", RowBox[{ RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{ "$InstallationDirectory", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], "]"}], ",", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"$TemporaryDirectory", ",", "\"\\""}], "}"}], "]"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.773416844033103*^9, 3.773416848212956*^9}, { 3.773416889093643*^9, 3.773416943829237*^9}, {3.778233860513507*^9, 3.778233863440712*^9}}, CellID->908698068], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"nb", "=", RowBox[{"ToPrompterNotebook", "[", RowBox[{"file", ",", RowBox[{"{", RowBox[{"600", ",", "500"}], "}"}], ",", "150"}], "]"}]}]], "Input", CellChangeTimes->{{3.773416272515622*^9, 3.7734162982022753`*^9}, { 3.7734163326963453`*^9, 3.773416333134878*^9}, {3.773417194310863*^9, 3.77341719484945*^9}, {3.773417265181888*^9, 3.773417284722499*^9}, { 3.7734173210738373`*^9, 3.773417323056119*^9}, 3.773420258827697*^9, 3.773423252451516*^9}, CellLabel->"In[549]:=", CellID->393813471], Cell[BoxData[ TemplateBox[{ FrontEndObject[ LinkObject["j49kf_shm", 3, 1]], 516, "FrontEndObject[LinkObject[\"j49kf_shm\", 3, 1]]", "516", "\"documentPrompter-600x500.nb\"", "\"/private/var/folders/0m/xs08c2td1y38x1hxbb6qm4w80000gn/T/\ documentPrompter-600x500.nb\""}, "NotebookObject"]], "Output", CellChangeTimes->{ 3.773417932325584*^9, 3.773420290375094*^9, 3.773425892419449*^9, 3.773425959722438*^9, {3.773426044873948*^9, 3.7734260683064528`*^9}}, CellLabel->"Out[549]=", CellID->386345978], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzs3Xd0XNeBJ2id3d45+9/0Ob2TenZ7Zron2S3LttrKtoItd9tqRwXLshyU c84SlXOWKIkURYk5iJKYcwAJgARAAiABEBnMQTlattvTdp8zd+s+AMUqoAoE CFDFJ3/f8c8A6r1769WtVwXUTwXwv1xw7emX/B+HHXbYjf935v9OP//WU264 4fzbz/jzzBdnXXPj5Zdec/FF373mposvvfiGYy/4PzMX/j9/dthhSzPJ/O+w P/zhD6E3//zP/9wv/+t//a/wT//0T+G3v/1t+PWvfx0+/vjj8NFHH4UPP/ww Lx988MGAef/99/eb9957b1B59913h5V33nnnkM3bb78tIiIiIiIiIod4St0f DJTh9iaD7WcG0/Xsry/q2y/FtV24YGGYNWtWWLpkadJDxW5q7py5SXI7q8H0 WbHLise6c+fO0N7eHhobG0NdXV3YsGFDWL9+faipqSma6urqAVNVVTWorFu3 bkhZu3btiKayslJEREREREREpCQZ6Z5jqD3LYPub/fVAA3VIsWOKXVPsnGpr a8PkSZPDhFcmhHlz5yW91Ow3Zoc5s+cU7LAKdVrx/VmxN9u2bVvYvHlz8vHD Dz4Mv/3Nb8Pvfvu78E+/+ycREREREREREZERS+ycYvf0wfsfhPr6+jBlypQw Y/qMJG+8/kbSWQ3UZ/3+978Pv/nNb5L3rcU+a/v27cl7tn7z6W/Crz/5dfjk 40/Cxx99HD7+UERERERERERE/jTz0cHJRx+FTz7+OOmgfvPpp8nfworv33r+ uefD1ClTk84qdld9+634de/7tGKn1dzcHN56663w6a8zc2Tmfe+d98K7b78r IiIiIiIiIiJ/8nnnoOe9d95NOqnYTXV1dSW/l7h79+6ku+rtsXIT/55W/Jte 8X1ab735VvLeLH2WiIiIiIiIiIjk5+D3Wrn9Vuyoujq7kt9NjN1V7LByO634 Hq74+4Zbt25N/pZW/F3Dd956R0REREREREREpE/e/swTf0cxdlaxu4odVu/v I8aPv/vd75J/y7GpqSn5+/Bvv/m2iIiIiIiIiIhIgbxVknz4wQehqbEp6bBi lxU7rZhPP/007NixI2zdsjV5P1npez8REfksU19XH9bXrD9oifOX+jaKiIiI iMhI5rN/z1b8vcStW7YkHVbssmKnFX8n8ZNPPgmtra3J39UqfecnIiKfZfbu 3pt0T/FvMsZ/U3ekE+eN85f6doqIiIiIyEjns3/P1ltvvpl0WLHL6u21Pvzw w7Bp06bw9ltvh7f2viUiIn9C2XvffWHPnXeG33z6m4OWmuqakt9OERERERE5 GHnzM03s02KHFbus2GnF30f84IMPwoYNGw6BtRARkc86sdPSa4mIiIiIyIHn M+y29ryZdFixy+rtteK/kVhdXX1wb+O66vDmc6PD3isuCXvO/EHY/e2TksTP 42VxW9ynVPfB3taKsLfy4bBnwU/CrpnHhJ2T/yZJ/DxeFrfFfUp1fGs6KsJ9 6x8NP1xxTvjygm+E/zj78CTx83hZ3Bb3Kf25LCJpS90jDyS9k15LREREREQO PJ9drxU7rNhlxV7rt7/9bXjvvfdCVVVVeDOzbcSTeS2z95Ybw+6Tjwu///6p IZz9wxB+fmYIvzq7O/HzzGVxW9wn7hvHHJRjKZC9bWvDniUXhp0T/0P43by/ DGHF34Sw5gshVB7enfh55rK4Le4T941jPqvjK+9YG36x+pLw52/81/AXZYeH v6o5Jvx1/QnhvzeclCR+Hi+L2+I+cd845rM6PhFJf3bv3P2Z9Fqlvp0iIiIi InKws/fgZ/fepMOKXVZ8r1Zvr7Vu3brkbwePaCZPCrv+/pTwL6efFsIFPw3h onNDuLBI4rbMPnHfOCaOHfHj6ZM9NWPCjin/Lfxx8X8OYd0RIVR/OYSqrxRO 3JbZJ+4bx8SxB/v4Rte/GP6/2V8K/77yyPCFplPCF5u/Fb64uSdNPen9OrMt 7hP3jWPi2IN9fCLy+ciee+4Nu0eNCp/++tPB5eNPwttTJyYfBzumuqr6oB3/ xmWvhvsefDg8+vjE0LZ9d8nXU0QGnz27doTmTXWhpmpDqF1fGxoaWsK2HXuG NEd7U0N2fO36htA1xOeB4Y4vRXZv7Qz1NTXJMW/IHHtTc+dnOn6k0rDqjXD3 nQ9knsNfCa0pWHcREfkss6d4du1JOqzeXus3v/lNePfdd0e+1xo9Ovzmu6eE cO7p+X3WBT8rnNx+KzMmjo1zHKw12lPxUPj0jX8Twur/kd9nrSuS3H4rMyaO jXMcrOO7t+aR8OfLvxD+S+0J+/qspm+FLzR+s2CyHVdm3zgmjo1zlP5cFJFD PbHTGqjX+njXrryv31+9Krz51KPJx4H2+6x6reUv3BiOPfrYcOxRPwzV7TtK vp4ytGzZtCL88OhvhbPPOrtgvvsPZ4RLb7g3zFu1Iew+BI5XRi71q94IZ8fH br98Kzz9yrzQtXPgnmNbU1W49cyTCo6fsnD/zznDHT/UrJvxRPjG33+n6Lne ne+Hb3z72lDftbPIPLvDyhmjCxzzseGMy54MjZ279nMcwx0/svH8LSIi+0/x Xit2WfG9Wrm91p7MthHJ5EndnVb8PcOCfdZP+6RAv5UZG+eIc43YcfVkd83Y 7k4r/p5hbp+19ojuVH45P72X5/ZbmbFxjjjXSB/fc/Xjkl7qv206Mb/PathP cvqtODbOEeca6eMTkc9XNjx0X9I7Feuk3n5lXHjr+afCB+urwq/feiu8NfrJ 8Ov33uv+mPk6Xv7W888k+w3Uax2s4y8bPyocc9Qx4Ziv/SSsb9te8vWU3OwK 8164J5z3y/PCjfdNDVt37u63T0vFa9333yDyrZ8/EJoyr/dLf7sOnWxtLA9X Z9b3F2deFOZXt5X8eAablZPu3+/9fcKpd4SmrYXv74665eGb+xl/5/ilRa9/ uOMPJIueum5w5/rXfhCqCjyX7d65PUy/76L9jP1FqG7ZUfD6hzv+YMTzt4iI DC6785P5mTK31/r000+Tz9euXTsy11dVk/w9+OR9Wv06rZ+GcP45hZPbb/WO y8yR/G35zJwjtR67WyqTvwefvE+rb6fVt88q1G/ldluZOeJccc6ROr7y9rXJ 34NP3qdVqNPaVCQFuq04R5wrzln681BEDtXs3L5zwF7rnddmhD333RPenjEl 7H30gfD+mu73acWP8et4edwe99NrSW5279waHj/jxOT+Oen0J0Lnjl399mlZ +3pOj3FpeOKxR8JDDzyUJH5+zrdPyHvdXWyeP9W0lE/Lrs308s0lP57BZP2c 0Xn36QW3vxBq6htD08baMHPMw3nbvn/rtLCrz/gdnbXhF0cdnXNO3BLWbGgM 7a1N4bUXbs8bP35Jfb/rH+74A8muHZ3Zx0Lsre7tOccL5a5Rowv2t2WT7so7 tscmLwwtbR2hfu3ScFHO7Yl9YGuBx8hwxx+MeP4WkTRmW3tjeH3SlDBp/JRQ 17yl4D7bOzaHl596IFx5+eU9uTrMnFcedhb4b3wHMmZnV1uYPuaZcMN112cy KsxfVVv4WFs2hSnjXw4TJ84OndvT/vNTfq8VO6zYZcX3asVe65133kkui387 eLjZc9MN4Y8/Om3f7x4OptMq1m1l5ohzxTlH4tiSLLog/GHRX+373cO+nVZF JuV9UlGk28rMEeeKc47U8f181cXh31V8pft3Dwt1WhtPCV+s/2Ze4mUFu63M HHGuOOeIrZ+IfO6y6+67w6477gi//uTXBfPuonnh3WWLw5vPPRneW1MW9j7z WPhox47kY/w6Xh63x/2KzVG1ruqgHf+ql+4IR3/t6HD0350Valq3lXw9Jefc 2rEtPPPzk5P755vnPhW2ZF4r992nufK17vsvk9er2grMszPULJkRTunZJ2b8 8k0lv22HStpy1u+1ypaSH8/+smPLxnDh147KHvP9E1f026elal7O/f3NsHLT lrzt2cd8Jif++N7QvH1n3vayqQ9ktx995C2hpc/24Y4/kOzasSX7WLj0oXlD Hr+tvTr8PGfdxs3fkLd9e9uGvHUds6h2RMcfrHj+FpG0ZVPFknD1ZZeFK3qy rKb/994tTTXhxpx9cjPqiZlhW4Gfh4YyZuf2zvDstVf222/Wivzn7tz97n7u 9bCjwPWmL7u6k7ktscOKXVZur1VZWTn864jv+Trx2O5+aqBO67w+Gajbynwd 59w9Ar3bruY1YdeEf9v9N+IH6rTW9MlA3VZmrjhnnHu4x1fWtib869f+uvtv xG8u3mn9z7r8FO22Nnf/Lfk4Z5y79OegiByKiZ1Wv17ro4/DR52d3b3VmNHh vVXLw95nHg/vzHsj7Hn4vrD7rjuTj/HreHncnuxXXhY+7upKxo9kr7Vza0eo WrUszHljTpg7b0FYVVYd2ru6X2sO5nXR9o6WULlsaTK+e46lYcOmQh1KoewM jevXhkU9Y+e8MT+sWrMhdGzt/1p317YtYXPj5iRbtu0qvN6ZfVqSfVr6/Fyz M7RlLm9oaOoZ23O98+b2XGd1vzlb6jeEZfMXZm9TY8uW/d6euBZrli3OrsWi RatCc9vWovt3bO6+PZs3d3XfF13tobpsVZjfM37ZqrXZ+yL3tsRxTQ014YZT j0/un+O/dUOobeydqyO7b26vNW1NU9HjqJn9bHa/71wzOflvl8XWbVPV2rC4 Z10q1jcP+3zouwbda9g9fuH8ZZmxHXn7912jsrX1BX+Gjb1fS8+a9J5PvXOv KluTnHPFxm7PXMfmzZl9Z+1bl2dnlYX2nmPt6Hef7DuX5+ecy+VVmwrOn3u7 m1t7bndbc/Z2z523IrQXeAzsL5uWv5RzP75S9LrnPnxJdr9Z5fteM+zc3hJu O/W4bOe1fFP/cz52SE/+/JTs+Nk5felwxu977Oafw8Xu0951i9mxpSFc3tMb 3TRu2dDXbfG47PH89NaZBfdpLp+V3efvLx6bt7bDHT9QDuw5oju5z9/V7d3P 3/nPa4v6Pb5EREqRnds6w5wXn+zXJfXttWKX9Phll/ZsHxVqNrWGHdu2hfK5 U7JjJi+sGdaYttqVyWVXX/tYaN26I2yuXpJ8ff1t48OWnP8Ws2LKU93jL304 2W9/t7G9tT0syPycHZ/T97dv3CfuG8d89vfHrqTXih1Wb6/161//Orz99tvJ Zbsy24aTPc88E37//VP7vFcrv9P66PTvhQn/6f8NP/+z/ytJ/DxeVrDb6nnP Vpwzzj3c49td/mD43by/3PderYE6rdVHdGegbqvnPVtxzjj3cI/vnuqHw1+U Hb7vvVqD6LQG6rZ637MV54xzD/f4ROTzmfUP3pv0Trk91JuvvBjeHP1EeL+y POm33hz9VNj75CPd2z/+JLz5/DPJx/h1vDxuj/u9X7km+TyO79trHejxbVoz O3zv744KRxXIi/PWZr5n39/99ZFnhuqWrXljd27fGhZNfKLg2JgfXfxY2Ni2 veh1d22qDDf9+OtFxp8cJsxem7d/0+op2e0TVzQUnDN3n1kVzdnLW2rmZi+f tGh5ePTiU/tfZ+Y2Lq/rDNs76sOd555c8LjuGbcg+e9xfa+3ey0eKboW94yb G7ZmfhbKH9MV7vvWscn2U372ZKhc+Vo4uchazFhemx23ta2q6H0Wc9wp94f2 bTuSfTdXzMpePnV1Y9H7Is557t99LdnvGz96LDs+d93GzJ4fbu9zf/3q8YXD Oh/y1+ChsHLRpIJjr3pwZrLuVbNfKrj9+G9eHCo2debNnXvbZ1VsDCunPlZ8 bH1H3tjlo68oejsKnX8dm8rDNT/+RtH5V/eZP/d2f+NH94T5s17ocy5+L6xt 2Takx3Jc//HX/H3B879QdmTu4x3b8i9rWfdGdvwpP3smdPU5Z3uzYe7o7H43 jl0xIuM7Ny7LW4O561r7jVs5YVTO/M9nH1NbW6rCmT2XX//skiGv2wsXf2u/ 67ZjW3O4pucxctSR54aqtq0jMn7gYzuw54jseo27vef6LgiVtVXhviLPa5ff PSn7mBcRKUXKpz8XLr/00iQzFy4Jz9x2TfL50ur859TWDSt69rsyVG7qytu2 avKzybarrn4idOQ8pw11TO/+Y2ZVJF9v72oKd/Tsk/35qmpx9ngr+/z8USz3 3XNfZv/Lw3XXXhc21Gwoul/cFveJ+8YxJblPMt9fY4cVu6z4Xq3eXquioiL5 GyvDyZ5LLwzh7B/mv1crp6/68PTvhV/+q38Vvn/YYXmJl33Yr9vKec9WZs44 93CPb9fcM0NY8Tf936uV22n19ll907fbyn3PVmbOOPdwj+97S88Of1VzTP57 tQbRaRXttnresxXnjHMP9/hE5POZbVu2hXVr14VPPv4km4/feTfsfe7p8GFr S/L1B/V1YdeoO8KH27YlX+8dMzr5GL/edeeoZHvydWb/vaOfSsbnzhfnP5Bj q186KXztyK8NLl89I1Q1b8mO3b61LYy5+tuDGrd6Y1e/625etyCcNIjrHfXK iuyYpvJXs5dPKWsoeJuK7ZN7+cDH+4/hnB99fcB9nl+wPu86d2zrDK/cctZ+ 5/77q8aGzszPQ7njnvrZSYO+D+asbUnGbW2rCWcMsN+xJ98X2rZuH/SaxWxp XRd+duTfJfudfM4T2ePc37pd+cziYZ0PQ1mDn5z7i4H3+cpNYXPP7R7SfZ7k 5LCkti07dvnY6wfcP3ctN6+dM6jrmF2+efC3O3MeVuY83gaT7Vtbw10/OqFn LS4NTZm1iNdTU7YiTJ80Mbwy/pXw4ksTw9JV8b2JOwrO0ZyzZvdPWlP8fGks C6f17HfyOU9nz5fhjl8z+b7s+ONOuTXv/uyqX77vOSNzHq1t2rpvvuZ12cfE q5l13t7RGipWLAmvTZsRZmQye87isGlzZ8Fjybsvvnp+qO/cVvS4X3vwouzx vdpzfw53/EA50OeI3qx48bZBj42P+9ac9RYR+SxTNu3xcNklN4XK2vg8tj1M uPu6zNeXhCVV+c+VS8c/llx++6Mzw/Y+c2xtrQ3XZ7bF7atqWw94THP1suTr h8Yv7tmnPtyc+frKq54OHZnnyd6v4z4T51cN+jbeecedmTGXJbnumuvC+ur1 /faJl8VtvfvFMSW5TzLfl2OH1dtrffLJJ+Gtt95KLuv+72IHnt1nfD+En59Z +L1a552TvDerb6fVm7gt73cSc9+zlZkzzj3c49s54+gQ1nxhX6/V+96rQu/T KtRr9XZbveN6e63MnHHu4R7fEfO/Hv66/oR+vVbfTusLtafkpV+31afXinPG uYd7fCLy+czOu+4KO2+/Pa+Hivloz57kdwz3vjIu7LrnrvDmuBfCm5NfSfqu 3fffk3yMX8fL4/a4X9w/jus7V+y1hnpcWztqw3lfPTL83Vf/LskJP7ghVNRu Dl1dW0PH5o3hpbvOy25L8pXTw7rNXdnx6157LG/7k5OXhNb2LSG+r7u+YlHe 3Cf99PHk54Desdu2NIar+lz36vWNYVtmW2dzY5jx7KicuU8MS+o6knGNa2Zm L5+8alPB21Vsn9zLY445+Yqwav3mzHVuCw3rluYdb/ftPScsrtiYHFNHU114 +uof5RzvI3m3p2b2M3nH+8qcitCRWcetXR2hfM4r4cSceccuqMuO2761Izx5 zjfyrveKByaGxubOZB0b15eFq354fHbbt698KXT1XG9XW0fobG8Md/ZsP+EH d4XG9s7Qkbm8o23rftejb7oaVoXTcm5f65ZtBdct3r4XZy4JjZtbQtPGhsx9 vm1Y50OhNbhr7Oxk7JbWpjAr71zozk2PTw9NrVvC9q6uULFgQt76Tl7VWPQ+ 7527pXXfcZ2Tdx7en73dce6Ojq5Qs2B8zn1Xk3ncdCRr3Hs/9D2Xf5z5mbeu qS3ps9sy582jOefNMSffEpp65y9wu39w4f1hdVV9aNncFBoaWof8mO7avDac 3jPXty54NlSVz8t+3S+Z83vJuqZ+c1TOeDS7z8w1/bdnr6tl33Xlni/DHb9t S2veutzx8vKC6zV2wfqij/sTfnhO3jmRm+sfmJa9rtznwkt67sO+z1V9s2zM df0eT8MdP1CG8xwRs3zsrf2ex+evrk2e5zvbW8PiyU/mbX9g+vBfr4iIHEi6 WjaHtvbe75Fd4ZW7rg2XXnxxWJTzvWrblo7w4i1XJZe/uqK+3xxx+/M923vH HciYroZ14YrM1/GyNxavCBMfuyP5/LZHZiXH9lLPsd32yLSwdYDn/L6J78O6 9uo49tIk8fOaqprs9vh53+1xTKnuk9hhxS4rvlert9cqLy8f9ry7Tj0xhF+d XbTXir93WKzX+tmf/VnxXiszZ5x7uMe3c9Jfh1B5ePFeq1in1fc9W317rcyc ce7hHt9fvvG34b83nJT/9+KH22tl5opzxrlLdb6JyKGd2GkV6rU+3Lo17H32 8fBBXW3m45Ph43ffSy5/d+WysPvRB5KPyXu7MpfH7d37PZ6MG4leK7eLiZ1I U5/XevE106wHLi/Ya23b0hRuPuWY7LaJS+r6zb+ltTr7Wi9mVs5r3LoFY3Ku +9bQ2O+6d4TFOa//rnxhWXLZiPVamdf0FTkdXUxr9fyc7aeFZT1dWm9ye8Dc XmvblpZwxylHZ8fOrmzuf0xlM/K6k5Yi3cZF98/uN7arcU1e35T7mjl3fLHX 0/nr0VhwzeI8L1x1ana/Sx+dX2TdTgtLN7T3Gz+c86HvGlz/wuJ+5+Gkm8/M bj/7zun95l496d793+eZPDajsv/6bl6b17nN6tPFbN7P+tUtGVu0U+hem9bw 2DknZvd5ZVl9wdt9/p3Tkg51OM81sSs6p28/m82JBbueGWUNeXMMtneJ93nv eZ97Xg53fHI7Gvad8/G4VzVuCbXzR2fn/e6Nk/qt1eYCHWax5D4Ge8+B3I5t oF5qfc5zV+/tG+74gTLc54i8XivzvFfeuGXAYzrm5FEFvheIiHy2KdZr5V6+ vKal4LiX+ow7kDExlfMnJ5fty22hvmVLWPvGuJ6vR4WG9q1Dvm3Fuq1CnVZu 51WKxA6rt9f6+OOPw5tvvplctj3zfWY4Odi91nCP72D3WsM9voPdaw33+ETk 85maB+4JayvXho8/+jibD3ftCrseujfsGT826bD2PPt4eKdsZXh/Y33Y89zT 4aN33kk+xq/j5XF7sl9m/zgujs+dL84/lGPatqUzvHjlt8KRXzkyyaSVDQX3 62yuDD/9yle79/vyj8Paps7k8paa+dmxJ579ZGjPvA4qNH7trEez+13+1MKe y7eGiTednnPdGwuO3drWEOa9OjvMzmRtXWtyWcPqGfsdV2yf3MsveWRev3Fd LVXZ23r89x/ud5u2bWkPT/z0G/22567Fhfe9UWTNt4bRF5ycXcfynnXMnfPI L383rG7oKnBf5e7z01DZ3LnfYyq2Hi/Nrw6dre2hZXNLJm2hLfOxZvWicP0P jsvuc+RXvhGW1rYPet2Gez7k3759a5ObZeNvG/BcbVr96n7v86NPvCM0d20t eFzl0+4rcJ4OfD71O5cz99/KAvdfTHPFrJz55w36dg81eY/Xnhxz0gVhSXl9 8t+T4/FuWrskXHDy0fv2OeLiUN++Zd9aj7llv4+xgc694Y7vTfUbT++7DSd/ M3yj93i//KtQ3dJ/ndfl7B9z3QMTw4aNrcnt7mppDrPH3p+3/c6JZQXXrdjj aKBzbbjjB8pwnyNy74/bX1pV8Dq2drWEe3ufA4pch4jIZ5n4c+rLd14TLrno orBwbdN+L9+XreH1Z+5Ktj81ZeUBj+lNa8PGUFlemfk5e31oz/wM0bp+WbJf zLLqlmSfzvbOTLYM6fbF3zW85qp4TJckiZ/3/bp6XXXJ74fYYcUuK75Xq7fX WrNmTfKe9OFk9+kH8fcQM3MP9/h2Tj+Iv4eYmXu4x3fEvIP4e4iZuYd7fCLy +UxXR1e/XmvvxPFhx223hT2jnwrv124Iby9ZGHbeOSrsvOP28G7F6mSf+DF+ HS+P2+N+cf84Lo7v22sN5Zi2drWFR84+IXz1y18NXz3i7FCxuaPIfh3hqfNP 6tnvR6GysXu/hpXTui/L5NrnlhS9no7GNeFH2f0WDum6C6WhbHr2eieuqB/S PrmXX/3kgv7HurkinP3lr/Rsn1twzR7vOe7jvvdQaMv8fNN3LY468bIwfcb0 MHXy1LzEyy476ah+65g7Z+7lxa437lOes0+xYyq2HoPJI9PKio4vtG4jcT7s bw2WvnDzvtu/qXPE7vPscW0qC98pcvwDnXN553Im942Z1O++nzp5Znj56dv7 Hcfg7vuO8PyVPxj4Pjvil6GqubPfOdx9Pl4d6tq6+j8ntdWGK47Yt9+jr1b2 X+sBHmMxWzo3h3u+f2y/c2+443Nv+9grvtnv9k5YUldwvtUT7s7uc9dLSwvu Uz3v+bx129DS1XNeVmTPy2KPo95sWPRSv9s33PEDZbjPEfseO98JSza0Fb2e Jc9fM6TjEhE5mInfA8aPujpcfOGFYWFl434vL7T99eW1BzymULpaN4bbM/vE /V6YsTrzvbQhPHLTFcnXMbfd92JoLPA9t1jie7GuvjJe78V5iZdVra0q+X0Q Ezus3l7ro48+Cnv37k0u25r8rY0Dz+5LLhjw78Z/8OPTiv7d+LhtoL8bH+ce 7vHtnHPGQfu78XHu4R7faUt+ctD+bnyce7jHJyKfz2wfNSpsv/XW8NGHH+Xl wzffCu/V14Xd48eGvTOmhPe3bgt7p04Iux65P/P51uRj/Dq5PLM97hf3j+P6 zlVZUTmkY9rS2Roe+8nx4SuZ17ZfP+uR0Nq5pei+S56/KdnvK1/6YahoaE8u 27hqWvdlmUxYvrHo2Pam8vCTI77ccz2PJ9czlOvum/zrrRvSPrmXX/XE/AGP tdD23OM+9h8fzB537ryDTe9x5c6Zu77FrrfvPsWOqdh6DJjM3K8uqRlwfKF1 GcnzodgaFDoHh3qfPzy1+M9hucf1zcvGhvacdRzonMs79kGm934a7H3/wPeO 2c/99g9hdc/YeDt+mLPthYXri97m9XOfy+53ac79uvKVu7KXT1u1qfiaNey7 rtzH8XDH971fcm/PWbdPHvD5Ib4Xsb21s+j2ro7N4e7e9cxZ847Na8Mvsufl wM9Ji5+7ut/5MNzxA2W4zxH7e+wUut8Hc1wiIgczWzrbw0t3XBUuuuCCML+i Ie/ysT2Xzyvv/z0md9ziysYDHtN/n84w7aEbk32uuuGFzM8J7eGFGy/v/vrG UeG2yy9JPr/5wamhcwg/18b3ZF11ebzui5LEz9dVriv5+vcmdlixy4rv1ert tVavXj3seXc+9WT4/fdPDeGicwu/Z6vn30SM780698/+LEn8vP+/hZjzXq3M XHHOOPdwj29H2X3hd/P+MoTqL3f3Ub29Vt9uK7ffyn2fVkXOe7Xi2DhHZq44 Z5x7uMd359oHwl+UHR6+2Pyt7t9FbBh8t9Wv02ro/h3EOFecM85d6vNORA7N xE6rUK/Vmzfnvh7ea2hIPt87dWJ4e8WysOPOOzIflyZfx8vj9rhfsTmG02sd +4+3h6aOrqL7znnyygF7rXEDvHaOr/d6+4LTr5+Q9AW51/21r98WNg1w3X1z qPdaR33jjOS/sw2U886+Oiyvae4352fRa13/yMSwbOHiMG/OvJwsDGVr1ud1 OcXGD6bXGs75cDB7rVvHLRnUcZ1/z4xBn3N9e61fnH/5gPf9hef/Itz21Kzk b3YP7r5vD2+MeTo89MDj4YnHniiQR8Ojj03OPn5zb8f+eoz2+uXhHwrcr405 t/eRmRXFx29clR0fz73NPccw3PG5aa5eEE7I6bW+9o0bw8a2wT9fFEr2XMpk 5pqG/vfj4VeE2gG6sdkPXz5wP30A4wfKyPVaPwnlTcXPhxXjbtFricghk+K9 1r5+6dGXF/Ub19lSH27ObMsddyBj+mbt/EnJ9osuuC7UNHVkvoeWh0szX196 2cPJ96+Opppwfc/29ZntQ7mtsdu66YabksTPS732uYkdVm+v9eGHH4Y9e/Yk l23p2jKsbMvMsefEY7t7qdz3bPXptpLfN8xNoU6rt9fKfB3n3DYCx7d104qw a8K/DWHdEf3fs1Wo2xqo0+p9r1ZmrjhnnHu4x7esaUX416/9dfhC0yn579na T7dVqNPqfa9WnCvOGece7vGJyOczVffdlfROxTqpvdMmhXfWVYQ9UyaEnQ/e G95ZUxZ2P/d08jF+HS9/d11lst9AvdZQjqmzoync/72jw5czr4G//KUfhLKG tkHtV96zX93yl7svy+TCh2YXvZ7W9YvC8T37Xf3c/OSyrs6W8NBPjusZ//dh 5cbC110o9aumZq936qqNBfdpyNnnleW1Bcde+cS8fuPamtaEs444ouj2eNyP 9hz3Mf/4QGjp7Oq3Fte+uGxI90PunLnrO9h9credcNbD2WMqvmYNQz5/97du I3E+7G8NFj9/44Db6wdxn1/40Kyix9VUNafobcyfu36Ax8dZobKlfUTv+6Em b87MY2vR+pYh3+aGVdOzl5/0q2dCW4FzKqZ64dic8bNHbPy+ta0P1594ZHaf 3px3T+H7sX7N8jBvwcKwaOHqgo+D3ix67qqeuY4Ps9c2Fli3L4cZawo/Tjo7 GsMtvceU87w53PHDPU8G2if72MlkVpHjipn95BX7fW4VEfms0tXZFsbdcWW4 8ILzw7yKTXnbapZOSy6/8Pw7w8a2jrxtdWVvdG+74Kawvql9WGN607xhRc/2 88MbZd0/B2ysmNcz3yOhpaMzc7wdPcd7a6hr6Rj27T9UEjus2GXF92r19lpl ZWWZ29s17Oy84drwxx+d1uc9WwW6rULp22ll5ohzxTlH4thidiz4VfjDor/a 956tYt1Wbop1Wpk54lxxzpE6vnNWXBD+XcVX9r1nq0i3lZuCnVbPe7XiXHHO kTo+Efn8pb2tPfl3cuP3g0LZ9dLzYffEl8J7zU3hw3feCbueeiTsfOyB5GP8 Ol6+e8K4ZL9ic8T5h3ZcHWHK7eeGI750RJInZlUW3K+lZmE4rmefIw7/fliz qTW5vLVuaTi15/Ijv35dqG/vKDh+7hOXZ6/jqmcXZi9//aHzs5ffPXlVwbGt 9avCAzfeHu4cdWuYsrAquaxu5ZTsuAenFP6+Ov+5G7L7vLxsQ/by3LFXPD63 //U1rg5nfulLRbd3djSHR846Ntl+9Gn3h+bk55j8tTj6tLtCQ5G16GxrDc2b m0NzS3vBOXPXt9j19t0n/5huLXjdubc7dz0Gm/2t23DPh8GswaLe+7TI9mK3 MffyIw4/N1TnrH1uXn/o0oLnad85xi6o7jd25j2/HHB7do3ifZ9Ja895M5jb fSBZ9uJN2eO5eeyyAfa7veD92tFeGy49/Es9x/XtsKK+rcA52Rqev+ykgms+ 3PG9eSPnXLnlyZfCDf94VPbryctr+z1G7stuPy4sLXCd3cdWF677xlcLrvma GY9m57/gwVcLjm+oeDW7z/FnPpR9DhiJ8cUy3OeIRTnPh2fdXfi42ttqwvnZ +2zkzkURkQNN/D7x4u1XhAvOPy/MLd+Yt62tsTpcm7k8brv1oYmhuednjqa6 NdnL73j2tWGPiWlv2xju6dn+4Jh93ys3r1+eXHb59U+GzZm52jZXhxuT/a4N 1Y2FvwelMbHD6u21Pvjgg7B79+4R67W2rF7T/e8innt6dzc12G6rb6cVk5kj zhXnHLHbv3FF97+LuPp/dHdThbqtYsnttGIyc8S54pwjdXzLGlcm/3bhf6nt /vvxBbutQunbaWXGxjniXHHOUp9zInLoZtuoO8K2W28p2kl98PZbeV+/vbY8 2T9+HGi/4fVaXaF22cs5r/nPDCvWt+Rtj68B7z7ruJx99r3eyXsdlcn1T7we OvrMX7dyZk4n9u2wtG7f9/mNq6fnzPvtMG9tY5/j6wgTb/9xdp/bXl7eM27f 68JC/UlT1YLw/d55P6Neq+9a3PHigv5z168O5/bMfcTfnh/W9/QrI9FrPZiz bVXj4DufwWYwvdZwzofPrNfK5PTbXu7XJWxYPm3fccVOpC7/59G65ZOz4y9+ fN6A1x27szX1/Y9vQU6H1NvjHqxeq7V+RbZjLPzY6gqbKt/Iuc1HhGkr6/O2 53ZKJ/7yidDY53G2ds6z+25zzvk8UuNznx+OPOGWpK/duHJa3pi+HWVuZ/qj 68YW7IwWvzwqb97c54/WTav2rVtckz7dWezrcru1vn38cMdvWDkn3HLFleG6 Ox4LlRv3PRePZK8V89KCdX3Gd4TpOb3u8Wc+Oqi+TUTkYCb2Wi8U6bViKuZN SLbFXHzZ1WHUHTdnv77g/BsLdktDH9MRXn92VPf+lz6Y972so70p3N8z9vo7 7gmjbrwq+fyq28Zm//vV5yGxw4pdVvI6pKfXWrVqVfJvYo1Eto1/Kfzmu6eE 8KuzC3RbPf1WXn7Wv9PKjI1zxLlG6rh6s7Xi2fDpG/8mhMrD+3dbhfqt3stz O63M2DhHnGukj+/J6ufCny//Qvhvm04s3G0VS06nFcfGOeJcI318IvL5yrZb bkny4QcfDjp735g1pP0ryiuGfFwdbQ3h5q9/NfM66IieHB9GT5kTyleXh8Vz poeffv3InG3xtWTm9dLG1uz4uhVT8rZ/95d3hcUr14Q1me+BU5+7O2/b6bdO zbvuzvbW8NQvv563zxPjXg9VVTVh5aI54fqzvp13vWWxa0iOuee9ID3bjv7u pWHOkrJQva4ic50P5B9vJi8v3VDweK94bG6/9WhtWB3O7Jm70PbO9sxrxzOP 7b7e79wfmts7s9vql03Ou95zrnsirCxbk6zl7CkvhFNztl31zLyCc/Zd38Hs E9dx3GX/mJ3722feEuYtWpK57vUFb3fuegw2+1u34Z4Pg1mDRaNvGHB7sdvY 95hijj/jujB/ycqCx3XqNRNCR5+5G9fOznuMPPjizLB86fJQ39jRc042hgfP PC7nfP12eGXmolC7vjZUrlwcHr7unIKPocHc7gPNvGevzLtdD774WqitrQ91 G2rCrBcfzNt24i+eDq0553LyWKhbkXfOnviLh0Pl+k1hc2NDWDzlqbzxd45f 3v+xNIzx7c01eY/x6WWberZ1hIm3/TjnHJqUN25z9cJwXJ/7eUnZutCwsSHU VleEZ287N+96x86v7nfcrz54ft59/eKsFaGxcXOoq1oZbjjtqJz78dxQ3dQ+ YuPjbT435zbH83CkniOyj52c3PTQK5nXKmtCWeb8vOtX3yn6nCkiUqp0treH qQ/eHC4477ywsLKh4D4VC2cm23Nz8aV3h+pNLUXnHcqYxuqlPftcG8prm/tt b6otDzf2maemoa3kazeSiR1Wb6/1/vvvh127doWVK1dm7p/OEcv2J57o7rbi +7Z6fyexX79VoM+6qPt9WnFsnGMkjyk321be091txfdt9f5OYm+/VShV+373 MI6JY+McB+v47qi4L+mlkvdtNX8rv98qkN4+K+4bx8SxcY6DdXwi8vnJunvv THqnofRUQ02c/0CObfOG5eF7f3t4+NLffqlIjg3/cMJXuz//4vfCyvqWvPFL Jj0ywNjufOPnD4W61vZ+193WuC5c/92v7Xf8uHlVeeNWT9v/dfZm/JL12XG1 SydlL7/80Tn9jqelviy7FoW2d7RtDg+ccUyy/ajv3Bc2t3XkbV88/t79Hs9X j78u1Da3F5yz0PoOZp+qeS/0v57j7ggNPWteu3xywfUYbPa3bsM9HwazBgue uWLA7cVuY+7l+8tR37k+1DS29Zu7vXVTuOmEr/Tbf+yCmn3nTm1ZuKj3cTJA Hp+5Zki3+0ATj/muM47d7/EcefxFoWJja8E51i+cuN/xP75lfGjp8zgY3vjM 65i7fpHd/ss7Z+Y/RjeVhTNynq/i733mbi9/9ZlB3deX3j8ztBdZt4d+ccJ+ xh8b5lY0FF33Axkfb1fu8/Bxpz+SfX4Z7nPEwmev33d/n3DkgMd2wzPzRuwc FBH5LNLe1BTWr1sf6jfUhpqa+oLP7SMxplg62tpCU0NTkrYi3w/TnNhhxS4r vlcr9lo7d+4c8V4rZttL48LOb58c/uX007rfl5Xbb/XNRd1/Iz7uG8fEsQd7 HbaWPx22T/6v4Y+L/3P335LP7bf6Jm7L7BP3jWPi2IN9fI9XPRv+4xuHh39f eWT335Lv7bd6Oq5sl9XTZ8V94r5xTBxb6vNMRNKRtta2Q7bXSo5v07rw+LVn 93uNc+oZ14Xl1Y1h1aT7e14v/SxUNPR/DVy7en644sxTC7xOOjU8O3lx0de9 MfH12Kuj7w/HFniNddald4eV6wq/flw9+5XwrQKvF+8a/WqoKns9O9+kpRuy YzatnZsdM+qlZf3XoXFdOK/nteWVT88tcKwt4flLT+v3ujM38XeJzvvuUf3X IvNa85mX52a7ptw5J9514YDrm3u9hfdpD0unj85bj9zerXb51Ozlk5fXDfn8 2N+6Dfd8GMwaLO/tDL94Rlhd4HV9/aqZ2euZtHTfbczttW4aMz9ULp0ezi7Q P13z4MSwqUD32pvmuvJw96Vn5Y3p2xHGTmPS4zcX7At+njmXl1XWD/l2Dyft rQ2Zx9ZdRTuMmx+fNOBtjtm4em5ej5Sbu0a/vt/XAkMd37Jhyb7ngi+cF6oK 9IyVb+zrruJ53vcxFc+/S4r15ZnH4eT5lftdt4kPXlNwfOwB43PiyI9vD9Me uCS737h5a0fsOWLpmNuy61nT2BheL/R8O4h1ERGRP73EDit2WbHXeu+995LP V6xYkfm+0zHi6Vq5Kuy8/tqw66Rjw++/f2oIZ/8whJ+f2f07ijHx88xlcVvc J+4bxxyMYymUzrplYcf8X4WdE/5d+N28vwxhxd+EsOYL3b+jGBM/z1wWt8V9 4r5xzGd1fIs3LgvnLL8g/OvX/yb8Rdnh4a9qjgl/XX9C+O8NJyWJn8fL4ra4 T9w3jvmsjk9E0p+tt98ett58c/jg/Q8OWsrXlA/7ODfXbwzr128MmzIfN27a POTxjfW13ePruj82Z15vDnZse3NTqK1eHzbWb0p+f2vTppb9j2ltDvXZMRtD U/Pgr+9gpzFZg03JWtTWNSb/De+zuN7WptbMdbWF5ubW0q/BMM6HkcqGZZPC 4V88PMllj8zOuX82dp83mfNnU+P+z7VsWrrXti3zsdh9Gv87cO653NRU2vui rXFTqMz8XLpseVkoW74s87E88/ge/G2Oj7PK5UvC/LlLMuOXhNlzFocN9Z/d +APNxqq1YenCxZmfycvCormLwqrV1UM6B5tqqzPj5oflmfEL58zOfFw3pMfx cMcfzLQ3N4eNdd3P9aV6bIqIyKGf2GHFLiu+V+vdd98NO3bsOGi9Vm+6lq8I 2594POy85IKw68ffS/4efJLM5/GyuC3uU7J1qV2c/F7hjjk/DjumHZX8PfiY +Hm8LG6L+5Tq+BZuWpz8XuFpS84MX5rb/ffgY+Ln8bK4Le5T6nNLRNKX2Gml odcS+bylWK8lIiIiIgMndlixy4rv1erttZYvX9793/dERORPKuvuuiOsWb0m vLn3zfD+e++PeOK8cf5S306RQy01SyaEL/7PLya55KHXS348IiIiImlJ7LB6 e6133nknbN++Xa8lIvInmubNzUnvdLBT6tspcqileuHYbK915j2vlvx4RERE RNKS2GHFLiu+V6u311q2bFnJj0tEREqT1WWrQ+2G2lBXWzfiifPG+Ut9G0UO tTTXrQsTx7wYXsxkwaoNJT8eERERkbQkdli9vdbbb78dtm3bFpYuXRpam1tF RORPMDXVNUn3dDDepxXnjfOX+jaKiIiIiMjnI7HDil1WfK9W7LW2bt2aXNay uUVEREREREREROSQTeywYpcVe6233nor+XzJkiUlPy4REREREREREZGBEjus 2GXF92q9+eabYcuWLWHx4sUlPy4REREREREREZGBEjus2GXF92rl9lrNTc0i IiIiIiIiIiKHbHJ7rb1794aurq6waNGiUL2uWkRERERERERE5JBN7LBilxXf qxV7rc7OzuSy+fPmi4iIiIiIiIiIHLKJHVbssmKvtWfPnuTzhQsXhvLy8pLm sMMOO6RT6vURERERERERETlUEv89wnfffTf88z//c/jDH/6Q5I9//OOQ8y// 8i95KbbfRx99lCR2WLHLiu/V2r17d+jo6AgLFiwo+XqUurfSa4mIiIiIiIiI DC6l6rVihxW7rPherdhrtbe3D7nX2rBhQ3L8//t//+8AAAAAwJ+WUvZascuK vdauXbuSz+fPn6/PAgAAAGBQStVrxQ4rdlm9XdWSJUvCmDFj9FkAAAAADEqp eq158+aFtra2pK9as2bNgL2WPgsAAACAvkrda8XfQdyxY0dobW0Nc+fO1WcB AAAAMCil6rVihxW7rJ07dya9VktLS7bX0mcBAAAAsD+l7LVil9XV1ZX8u4ib Nm0Ks2bN0mcBAAAAMCil6rXmzJmT9FqdnZ1Jr7Vx48bw6quvlno5AAAAAEiJ UvVas2fPDs3NzUmvFf9dxPr6er0WAAAAAINWyl5r8+bNyXu14t+Pj73WzJkz S70cAAAAAKREqXqtN954I6/XqqurCzNmzCj1cgAAAACQEqXqtV5//fXQ1NSU /A5i/HcR9VoAAAAADEWpe634Xq3Ya9XW1obp06eXejkAAAAASIlS9VqvvfZa aGxsTHqt+O8ibtiwQa8FAAAAwKCVstdqaGhI3qsV/13E2GtNmzat1MsBAAAA QEqUqteaNWtWXq+1fv36MHXq1FIvBwAAAAApUape69VXXw2bNm1Kfgcx/ruI ei0AAAAAhuJQ6bVqamrClClTSr0cAAAAAKREqXqtmTNnho0bNya/gxj/XUS9 FgAAAABDUepeK75XK/Za1dXVYfLkyaVeDgAAAABSolS91owZM0J9fX3SazU2 NoaqqqowadKkUi8HAAAAAClRql5r+vTpoa6uLnmvVvx3EfVaAAAAAAzFodJr rVu3Tq8FAAAAwKCVqteaNm1aqK2tTX4HMf67iHotAAAAAIbiUOq1Jk6cWOrl AAAAACAlStVrTZ06NWzYsCH5HcT47yLqtQAAAAAYikOl11q7dm2YMGFCqZcD AAAAgJQoVa81ZcqUsH79+uR3EOvr6/VaAAAAAAzJodJrVVZWhldeeaXUywEA AABASpSq15o8eXKoqalJfgexrq5OrwUAAADAkBwqvVZFRUV4+eWXS70cAAAA AKREqXqtSZMmherq6uR3EGtra/VaAAAAAAzJodJrlZeXh/Hjx5d6OQAAAABI iVL1WhMnTgxVVVXJ7yDqtQAAAAAYqkOh19qwYUNYs2ZNeOmll0q9HAAAAACk RKl6rQkTJoR169bptQAAAAA4IKXuteLvIK5fvz6sXr06jBs3rtTLAQAAAEBK lKrXeuWVV8LatWv1WgAAAAAckFL3WvF3EGtqavRaAAAAAAzJodJrlZWVhRdf fLHUywEAAABASpSq13r55ZdDZWWlXgsAAACAA1LqXiv+ba3q6uqwatWqMHbs 2FIvBwAAAAApUapea/z48aGiokKvBQAAAMABORR6raqqKr0WAAAAAENS6l5r 2rRpYerUqeGll14Kd9xxR6mXAwAAAICUKFWvFXus8vJyvRYAAAAAB6TUvdba 2o2hoqY2LC0rD6PHjiv1cgAAAACQEqXqtcaNG5f0WpUb6pNea8mqNXotAAAA AAatlL3WmjVr9FoAAAAAHJBDodcqr96Q9FrPjnmx1MsBAAAAQEqUqtd68cUX k16rYn1d0mstXrlarwUAAADAoJWy11q9erVeCwAAAIADotcCAAAAII1K3mvV 1IY1VevDohVl4ZkXxpZ6OQAAAABIiVL1WmPHjg1lZWV6LQAAAAAOiF4LAAAA gDQ6lHqtp58fU+rlAAAAACAlStVrjRkzJum14t+MX72uJixcvkqvBQAAAMCg lbLXWrVqlV4LAAAAgAOi1wIAAAAgjfRaAAAAAKTRodBrla2tDguWrQxPPfdC qZcDAAAAgJQoVa/1wgsvhJUrVyb/FqJeCwAAAICh0msBAAAAkEZ6LQAAAADS 6FDqtZ4c/XyplwMAAACAlChVr/X8889ne61VlVV6LQAAAACG5FDpteYvXaHX AgAAAGDQStlrrVixIqxeV6PXAgAAAGDI9FoAAAAApJFeCwAAAIA00msBAAAA kEaHUq/1xLPPlXo5AAAAAEiJUvVazz33XLbXWlmxLsxbslyvBQAAAMCglbLX Wr58uV4LAAAAgANS6l6rbG21XgsAAACAIdNrAQAAAJBGei0AAAAA0kivBQAA AEAalbrXOuLce8PM1XotAAAAAIam1L3WYYcdFg778pXhlSXLw+PPjC71cgAA AACQEqXqtUaPHr2v18rk27dP0WsBAAAAMGil7rXO7Om1DvurX4VRei0AAAAA BqmUvdayZcvCuGuP63nP1vHhykf9fS0AAAAABqfUvVbv7yHGXusavRYAAAAA g3To9Fpf8X4tAAAAAAat1L3W9Ndnh2mzXg/jJ00PD/v7WgAAAAAMUql7rVWV VWFF+dowd/Ey/x4iAAAAAINW6l7riRvPDcef8NXwtydfHu7RawEAAAAwSKXu tbJ/X+sHD4VH9VoAAAAADNKh0Wv9Q3hk1nK/hwgAAADAoJW61zrt0gfDxKXr /H0tAAAAAIak1L2WvxsPAAAAwIHQawEAAACQRnotAAAAANLoUOq1Hnv62VIv BwAAAAApUape69lnn9VrAQAAAHDA9FoAAAAApJFeCwAAAIA00msBAAAAkEZ6 LQAAAADS6FDpteYsWqrXAgAAAGDQStlrLV26VK8FAAAAwAHRawEAAACQRodC r7V8TaVeCwAAAIAh0WsBAAAAkEZ6LQAAAADSSK8FAAAAQBrptQAAAABII70W AAAAAGmk1wIAAAAgjfRaAAAAAKSRXgsAAACANNJrAQAAAJBGei0AAAAA0kiv BQAAAEAa6bUAAAAASCO9FgAAAABppNcCAAAAII30WgAAAACkkV4LAAAAgDTS awEAAACQRnotAAAAANJIrwUAAABAGum1AAAAAEgjvRYAAAAAaVTqXmviy2PC o089E+596JFw2bW3lno5AAAAAEiJUvdahx12WF4AAAAAYDAOjV7rv4b/pNcC AAAAYAhK3Wtd/vjMsLDn72uNuvnCUi8HAAAAAClR6l7L340HAAAA4EDotQAA AABII70WAAAAAGmk1wIAAAAgjfRaAAAAAKSRXgsAAACANNJrAQAAAJBGpe61 jj3/wTDx9QVh0vTJ4bKffqvUywEAAABASpS61zrssMPyAgAAAACDodcCAAAA II1K3WstWbw4zJibyavTwqj7Hyv1cgAAAACQEqXutfzdeAAAAAAOhF4LAAAA gDTSawEAAACQRnotAAAAANJIrwUAAABAGum1AAAAAEgjvRYAAAAAaaTXAgAA ACCN9FoAAAAApJFeCwAAAIA00msBAAAAkEZ6LQAAAADSSK8FAAAAQBrptQAA AABII70WAAAAAGmk1wIAAAAgjfRaAAAAAKSRXgsAAACANNJrAQAAAJBGei0A AAAA0kivBQAAAEAa6bUAAAAASCO9FgAAAABppNcCAAAAII30WgAAAACkkV4L AAAAgDTSawEAAACQRnotAAAAANJIrwUAAABAGum1AAAAAEgjvRYAAAAAaaTX AgAAACCN9FoAAAAApJFeCwAAAIA00msBAAAAkEaHVK/14HWlXg4AAAAAUuLQ 6bUWhfNOPKzUywEAAABASpS611rY02u9MeW+8B8O02sBAAAAMDil7rXGLK9O eq0ZY64Ih+m1AAAAABikQ6XXmvDwz/RaAAAAAAzaodJrPXnJ1/RaAAAAAAxa qXut0T291rQnL9ZrAQAAADBope61XlrV3WvNfPYivRYAAAAAg1bqXmt5z7+H OOfVp8Phei0AAAAABqnUvdaq3l5r0dJw7Y+/WOrlAAAAACAlDqVe67Gn7y31 cgAAAACQEodWr/VsqZcDAAAAgJTQawEAAACQRnotAAAAANJIrwUAAABAGum1 AAAAAEgjvRYAAAAAaaTXAgAAACCN9FoAAAAApJFeCwAAAIA00msBAAAAkEZ6 LQAAAADSSK8FAAAAQBrptQAAAABII70WAAAAAGmk1wIAAAAgjfRaAAAAAKSR XgsAAACANNJrAQAAAJBGei0AAAAA0kivBQAAAEAa6bUAAAAASCO9FgAAAABp pNcCAAAAII30WgAAAACkkV4LAAAAgDTSawEAAACQRnotAAAAANJIrwUAAABA Gum1AAAAAEgjvRYAAAAAaaTXAgAAACCNSt1rTZgwIYwfPz4899xz4cYbbyz1 cgAAAACQEnotAAAAANKo1L1WeXl5KCsrCwsWLAhPPvlkqZcDAAAAgJTQawEA AACQRnotAAAAANJIrwUAAABAGum1AAAAAEgjvRYAAAAAaaTXAgAAACCN9FoA AAAApJFeCwAAAIA00msBAAAAkEZ6LQAAAADSSK8FAAAAQBrptQAAAABII70W AAAAAGmk1wIAAAAgjfRaAAAAAKSRXgsAAACANNJrAQAAAJBGei0AAAAA0kiv BQAAAEAa6bUAAAAASCO9FgAAAABppNcCAAAAII30WgAAAACkkV4LAAAAgDTS awEAAACQRnotAAAAANJIrwUAAABAGpW613r11VfD9OnTw8svvxxGjRpV6uUA AAAAICX0WgAAAACkUal7raqqqlBZWZl8Hi8DAAAAgMHQawEAAACQRnotAAAA ANJIrwUAAABAGum1AAAAAEgjvRYAAAAAaaTXAgAAACCN9FoAAAAApJFeCwAA AIA00msBAAAAkEZ6LQAAAADSSK8FAAAAQBrptQAAAABII70WAAAAAGmk1wIA AAAgjfRaAAAAAKSRXgsAAACANNJrAQAAAJBGei0AAAAA0kivBQAAAEAa6bUA AAAASCO9FgAAAABppNcCAAAAII30WgAAAACkkV4LAAAAgDTSawEAAACQRnot AAAAANJIrwUAAABAGum1AAAAAEgjvRYAAAAAaaTXAgAAACCN9FoAAAAApJFe CwAAAIA00msBAAAAkEZ6LQAAAADSSK8FAAAAQBrptQAAAABII70WAAAAAGmk 1wIAAAAgjfRaAAAAAKSRXgsAAACANNJrAQAAAJBGei0AAAAA0kivBQAAAEAa 6bUAAAAASCO9FgAAAABppNcCAAAAII30WgAAAACkkV4LAAAAgDTSawEAAACQ RnotAAAAANJIrwUAAABAGum1AAAAAEgjvRYAAAAAaaTXAgAAACCN9FoAAAAA pJFeCwAAAIA00msBAAAAkEZ6LQAAAADSSK8FAAAAQBrptQAAAABII70WAAAA AGmk1wIAAAAgjfRaAAAAAKSRXgsAAACANNJrAQD8/+zdj3Nc1YHoef0XW7VV W7tvNql5A8HeV7W19SbzYLBrq15mJ2Bqtl5SgGEnD4PzdhgwqUlCTCoTO+SB ndrwax6/JmBnsCHBOFgkg0ywHGT8YjvBDlgEmbEdywnylEUQsZyZ9pScOasr /1L/kNSt09Lpq/P5VJ0CTHfr9lVL3efre88FAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCMdC0AAAAAykjXAgAAAKCM dC2g1u9+97uJn9fi94JhGIZhGIZhGEYxijlCMVeATqJrARdUKpXw61//Ovzq V78KR44cCe+++244dOiQYRiGYRiGYRiZj2JuUMwRirlCMWco5g7QCXQt4F// 9V/Db37zm3Ds2LHwi1/8IgwPD0/8TgAAALigmCMUc4VizlDMHYo5RDGXgJR0 LaB4Pyr+7uXkyZOpNwUAACiBYu5QzCGKuQSkpGtB3orjh4u/a9G0AACAVhRz iGIu4ZxEUtK1IG/FufHF37MAAAC0qphLFHMKSEXXgnwV1zIp1n10rBYAADAb xVyimFO4TiKppO5afboWJFP8TBbXNXHcMAAAMBvFXKKYUxRzC0ghddf6ozu+ pWtBIsXP/dtvv516MwAAgBIr5hSup04qqbtWV1dX+PrzP9K1IIHi5/6tt95K vRkAAECJFXMKXYtUOqFr/c+feUjXggSKn/s333wz9WYAAAAlVswpdC1S6YSu 1bX48+F5XQvmna4FAADE0rVIqTO61v8bntO1YN7pWgAAQCxdi5Q6omt1XRm+ ubVH14J5pmsBAACxdC1S6pSu9dA2XQvmm64FAADE0rVIKXXX2rx5c3jmuW7r xkMCuhYAABBL1yKl1F1r9+7doa+vT9eCBHQtAAAglq5FSroW5EvXAgAAYula pJS6a21+YbuuBYnoWgAAQCxdi5RSd62uruvC06/qWpCCrgUAAMTStUgpfdfq Crc99ve6FiSgawEAALF0LVJK3bXWPrk17HQeIiShawEAALF0LVJK3bWsGw/p 6FoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64F AADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64F AADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64F AADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64F AADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64F AADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SKkTulZP99awcePG8OUvfzn17oCs6FoAAEAsXYuU0netH4Y7/9eu0NV1bgDz R9cCAABi6Vqk1Ald66/+na4FKehaAABALF2LlNJ3rd2h57mHw+233x5uuOGm 1LsDsqJrAQAAsXQtUuqErmXdeEhD1wIAAGLpWqSka0G+dC0AACCWrkVKuhbk S9cCAABi6VqkpGtBvnQtAAAglq5FSroW5EvXAgAAYulapKRrQb50LQAAIJau RUq6FuRL1wIAAGLpWqSka0G+dC0AACCWrkVKuhbkS9cCAABi6VqkpGtBvnQt AAAglq5FSroW5EvXAgAAYulapKRrQb50LQAAIJauRUq6FuRL1wIAAGLpWqSk a0G+dC0AACCWrkVKuhbkS9cCAABi6VqkpGtBvnQtAAAglq5FSroW5EvXAgAA YulapKRrQb50LQAAIJauRUq6FuRL1wIAAGLpWqSka0G+dC0AACCWrkVKuhbk S9cCAABi6VqkpGtBvnQtAAAglq5FSroW5EvXAgAAYulapKRrQb50LQAAIJau RUq6FuRL1wIAAGLpWqSka0G+dC0AACCWrkVKuhbkS9cCAABi6VqkpGtBvnQt AAAglq5FSroW5EvXAgAAYulapKRrQb50LQAAIJauRUq6FuRL1wIAAGLpWqSk a0G+dC0AACCWrkVKuhbkS9cCAABi6VqkpGtBvnQtAAAglq5FSroW5EvXAgAA YulapNQ5XWtbuP3Prkq9OyAruhYAABBL1yKlzulaW8OnP9qVendAVnQtAAAg lq5FSp3UtW7+33UtmE+6FgAAEEvXIqXO6VrW14L5pmsBAACxdC1S0rUgX7oW AAAQS9ciJV0L8qVrAQAAsXQtUtK1IF+6FgAAEEvXIiVdC/KlawEAALF0LVLS tSBfuhYAABBL1yIlXQvypWsBAACxdC1S0rUgX7oWAAAQS9ciJV0L8qVrAQAA sXQtUtK1IF+6FgAAEEvXIiVdC/KlawEAALF0LVLStSBfuhYAABBL1yIlXQvy pWsBAACxdC1S0rUgX7oWAAAQS9ciJV0L8qVrAQAAsXQtUtK1IF+6FgAAEEvX IqXO6Vrbwq3/5+WpdwdkRdcCAABi6Vqk1Dlda2v49Ee7Uu8OyIquBQAAxNK1 SKlzupbjtWC+6VoAAEAsXYuUOqdrWV8L5puuBQAAxNK1SEnXgnzpWgAAQCxd i5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FwHyoVCphLPVGADBn dC1S0rUgX7oWAHPrVHjpS38Uurq6xsfNoW/4bOoNAmAO6FqkpGtBvnQtgDI4 FZ697cqwaNHSsGTJkobjivFx65ceDjsG3k+9sdVO/zgsnWha58Ytm95NvUUA zAFdi5R0LciXrgVQBqfCE8sutaGZxlV3bw2jqTf5grOHw12Ttu2+Pb9JvUUA zAFdi5R0LciXrgVQBqfCxkld69YvrQ1r114aX1p1Y1hc07Zu2fR26o2+6Mzg G6Gntzf07jpkjS2ABUrXIiVdC/KlawGUwaSudc23Q6XRTcZOhhe+9B8uta2r HumcY7YAWPB0LVLStSBfuhZAGUzqWlc9GUamvN0/TDrn7+bwxpRhaywMDewJ 3Vu2hC0Tozv0HTzeuJfVGCmOveo+d7/unt5w8MiF9bzGwvDgYBgcH8Oj1Udl jY0OT/z54OBwzfFa5+5zZHxcuMvw4Fuht7v73HZ194T9RzpsvTAAGtK1SEnX gnzpWgBlUN21pj4OqxKeW3apa73VIFSdOfFauGvJFGtzfeyzYcfgFHOSsffC xlVXNr7ftfeG/Uf2hJvO//fv31/9vnLg4X9//rZLw55JG3/m6N9dfIwHdh0I G2/7/YaPf/mtT4ZjTmAE6Gi6FinpWpAvXQugDCafhzhN1zrxg0vXHmxwvuLp Q3/XuEvVjGfe+m3NPY+F9VO1sAbjkw/+rOre/U98+vz/u67qGLLT/X/T9GN2 3fC9po4nAyANXYuUdC3Il64FUAaTj9d6pO48xOI8v/7ep8J1kzrQowc/rLnV sbC65hiod4ZHJz6zjQ6/Ex5e+W8vNaTL7w3vTbpn/8ZPVTWmrz7/s3PnDY5V wtF9z1R93biudXN4fu/xUBkrHvpkeH3jX1b3tiPmSwCdStciJV0L8qVrAZRB 9fUQZxpP7f9N3SO8//pXLt1mxdYGxz59EJ6Y9DXu2/vr839+bNKaXV3hgT31 jx3ef62qbc2uay0Nrw7XP/S+9X9y6Wu/UXscGQCdQtciJV0L8qVrAZRBa13r 1jXPhmNV4WosvLTqo5f60RQLz5899LcXH+PKB38y8WdnJv1Z1w3PTXku4KGN n4nqWlfev7vh456ZdJvrH3u7ud0FwLzTtUhJ14J86VoAZTC5a10XHiuuFbh5 c9hcjIl/3xDWr7qxpm99dtK68aeqjsW68/Fnz923amwJzz58S12bmtyern/6 3Sm3cPIa8LPpWrX3aeU2AKSna5GSrgX50rUAymDyuvH168FfNHo4PLz8Ur+6 cs3u+vs3O85fd3FyV3r04DTnAZ558+L1EHUtgPzoWqSka0G+dC2AMpi8bvw0 10MsfPjapWsiXlxjvrprLVu+Mtx2221TjuXLrw0rHvxRKJaGn9yVvrjtl1N/ 3RM/CIt1LYBs6VqkpGtBvnQtgDJooWtNOm6q65oLt/0gPLnk0jUH3xpr/iuf PnCpK/3BF3805e3e3/mVKfuTrgWw8OlapKRrQb50LYAyaKFrvf/Di8dNFbe9 sET862s/fulah32/nvLuldHRMDo+Lp7rePqnk651eF3oa7jm/MmwfkmXrgWQ MV2LlHQtyJeuBVAG1etrTXW41djIO2H95HW07vz+xdtO7kPFmvJvNOhTByZd 0/CW539x4VHD9tUfuXTfy+8JbwyfvXSnynth422/X7U2l64FkB9di5R0LciX rgVQBtXrY615fEN4/PHHL44N42Ptqmvq1n5/ZuD0pMf4oOqaiF1dS8Nj3fvC 4OBgGNi/Izy86spJ/6+6PxXHgC2teezlE2txLb90bJiuBZA1XYuUdC3Il64F UAanaprUzOO+l39R/zAf/jTctWjm+37h5fr14U8ffXHS+Yi1Y2nY1NsdVk7Z tT5xsWvtmdy1DuhaAAuFrkVKuhbkS9cCKINTYePyqTvUkiVXTPzziiXXhTWP vxSOjZ6d5rFOhpcevqXh41x76/rQd+TDqe86djLs3HxfuG358rB8fNx226rw 4Ibt419v/P+dvbQOV21/OvrCX1w8//GtyqU/P3P8exePA7tl07sNv+SZo9+5 eEzYVLcBID1di5R0LciXrgWQqcpoGBocDMMjI2FoaCiMVqa7SOJYqFQq42Pq 25xxXBVA1nQtUtK1IF+6FgDTq4QXVl46puupg79tcJsPqo4nm+56iwAsTLoW KelakC9dC4CZHHr2U1Vraa3ZsD0cPDIUhocGw/7eTWHl0snnM1afawhAHnQt UtK1IF+6FgAzOxkebnLd+qf2/yb1xgKQgK5FSroW5EvXAqA5p8K+LfeF66a4 nuKNd28M74xMt149AAuZrkVKuhbkS9cCoDVjYXR4KAwODYeR4p+DQ2F0uiXn AciCrkVKuhbkS9cCAABi6VqkpGtBvnQtAAAglq5FSroW5EvXAgAAYulapKRr Qb50LQAAIJauRUq6FuRL1wIAAGLpWqSka0G+dC0AACCWrkVKuhbkS9cCAABi 6VqkpGtBvnQtAAAglq5FSroW5EvXAgAAYulapKRrQb50LQAAIJauRUq6FuRL 1wIAAGLpWqSUums99cP/rmtBIroWAAAQS9cipdRd65Nrt+hakIiuBQAAxNK1 SCl11+r6oy+GH+hakISuBQAAxNK1SCl51+q6Kjzas0vXggR0LQAAIJauRUqd 0LWe1LUgCV0LAACIpWuRkq4F+dK1AACAWLoWKelakC9dCwAAiKVrkZKuBfnS tQAAgFi6Fil1QteybjykoWsBAACxdC1SSt+1PhGefrVP14IEdC0AACCWrkVK ybvWNV8PO/t0LUhB1wIAAGLpWqSUumv957/5+9Cna0ESuhYAABBL1yKl1F1r y+7duhYkomsBAACxdC1SSt21dutakIyuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64F AADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5RSd60XX3wxbN26NTzzzDNhzZo1qXcHZEXXAgAAYula pJS6a7366qth+/btE21r3bp1qXcHZEXXAgAAYulapJS6a+3YsSO88sorE8dt rV+/PvXugKzoWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3I l64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxd i5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOla AABALF2LlFJ3rVtvvTWsWHFzuP7mz4Uv369rwXzStQAAgFi6Fiml7lpdXV3n x/8S/su9uhbMJ10LAACIpWuRUuqudd9994Wvf31N+NJXvhnudR4izCtdCwAA iKVrkVLqrmV9LUhH1wIAAGLpWqSka0G+dC0AACCWrkVKqbvWn/0/d4UHn+nW tSABXQsAAIila5FS6q51Yd34P/vCQ7oWzDNdCwAAiKVrkVLqrvXJ3+u62Lau /6v7Uu8OyIquBQAAxNK1SCl119rxyrfD9f/mXNf6H5asTL07ICu6FgAAEEvX IqXkXWvHjrBl/Y3njtn6vWWpdwdkRdcCAABi6Vqk1Ald6wdPrTrftf7v1LsD sqJrAQAAsXQtUuqErvXwiv/jXNf6dzem3h2QFV0LAACIpWuRUuquteG+Wy6u G/9Hf35P6t0BWdG1AACAWLoWKaXuWheaVtf/9Ofhy+vXp94dkBVdCwAAiKVr kVIndK1/f9OXwlMvvBjW61owr3QtAAAglq5FSqm71ne3vRxeeeWV8OKLuhbM N10LAACIpWuRUuquVawbr2tBGroWAAAQS9ciJV0L8qVrAQAAsXQtUtK1IF+6 FgAAEEvXIiVdC/KlawEAALF0LVLStSBfuhYAABBL1yIlXQvypWsBAACxdC1S 0rUgX7oWAAAQS9ciJV0L8qVrAQAAsXQtUtK1IF+6FgAAEEvXIiVdC/KlawEA ALF0LVLStSBfuhYAABBL1yIlXQvypWsBAACxdC1S0rUgX7oWAAAQS9ciJV0L 8qVrAQAAsXQtUtK1IF+6FgAAEEvXIqXUXevVV18N27dvD1u3bg3r1q1LvTsg K7oWAAAQS9cipdRdq2haxT+3bNkS7r///tS7A7KiawEAALF0LVJK3bV2794d +vr6Jv69+DNg/uhaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J8 6VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1 SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64F AADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0 LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABA LF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUgpddd6 5JFHwkMPPRTuv//+cPvtt6feHZAVXQsAAIila5FSqq5VNKyiZelakI6uBQAA xNK1SCl113IeIqSjawEAALF0LVJKfR6irgXp6FoAAEAsXYuUdC3Il64FAADE 0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciX rgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2L lHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoA AEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnX gnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE 0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciX rgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2L lHQtyJeuBQAAxNK1SEnXgnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoA AEAsXYuUdC3Il64FAADE0rVISdeCfOlaAABALF2LlHQtyJeuBQAAxNK1SEnX gnzpWgAAQCxdi5R0LciXrgUAAMTStUhJ14J86VoAAEAsXYuUdC3Il64FAADE 0rVISdeCfOlaAABALF2LlHQtyFfxM/n222+Hf/7nf069KQAAQAkVc4liTlHM LSAFXQvy9bvf/S4cPnw4nDhxIvWmAAAAJVTMJYo5RTG3gBR0Lcjb0NBQ+PnP f556MwAAgBIq5hLFnAJS0bUgb6dOnZo4H/748eOpNwUAACiRYg5RzCWKOQWk omtB3s6ePRt+9atfhQMHDkz8EwAAYCaT5xDFnAJS0bWAYq3HY8eOhX379k38 fcsvf/nL8E//9E+pNwsAAOggxRyhmCsUc4Zi7lDMIVyDitR0LaBY47F4jyrW fCzOj9+7d2947bXXQm9vb9ixY4dhGIZhGIZhGJmPYm5QzBGKuUIxZyjmDsUc wnrxpKZrAYXi/ahSqUycGz88PBzee++9ib+LKc6ZNwzDMAzDMAwj71HMDYo5 QjFXKOYMxdxB06IT6FrAZMW58cXvgeJ9qjimuBjF38MYhmEYhmEYhpHnuDAv KOYIxVzBelp0El0LAAAAgDLStQAAAAAoI10LAAAAgDLStQAAAAAoI10LAAAA gDLStQAAAAAoI10LAAAAgDLStQAAAAAoI10LAAAAgDLStQAAAAAoI10LAAAA gDLStQAAAAAoI10LAAAAgDLStQAAAAAoI10LAAAAgDLStQAAAAAoI10LAAAA gDLStQAAAAAoI10LAAAAgDLStQAAAAAoI10LAAAAgDLStQAAAAAoI10LAAAA gDLStQAAaLf+DbeHrkWLwpIlS8LSRV1hxdNvp94kAGAB0rUAAGi3/ic+Hbq6 ui6OTz74s9SbBAAsQKm71s6dO8Orr+7UtQCANhkL/b3bQnd397mxpTu8NXy2 /Y/b2x8qbXjUhUrXYqF69913J8ZCMVaphJGRkTA8PDz+z9FQGUu9RQCtSd21 Jj7rLF4Vnte1AIC2OBU2LuuqairXb2rHHPRUeGTR5MddHPpG2vCwC5SuxUI1 v12rEvp7N4V169aNj7Xh/qd3htG2POx7YefmB8PKZR+r+jm9MK5efld4uudA GNG4gBLoiK718c+HrboWANAm/U98omqO9qePtaGpnPlpuKlq7ndzeMMBW1PS tWi3/o2fmXgtLR4fV939SrLjJee8a1VGw+DAnvDsQ3eHpXXNaWnYExm2DvU8 MLEPG/Ws+rE0PLrreHueF8Ac6YiutVjXAgDa58TOr1TPzW54Ln4OXNu1rnqy PcdNLFC6Fu32+tqPV/38pTpcck661tix8Ozau8PyZVfP0JmuC2/M+hdPJWz/ 2seb7FnVY0U7/m4AYI7oWgDAQnO6/2+q52XXxDeo0/3fqnrMy+78fnCKztR0 Ldrrg/Dkks7oynPStU7/NFzXVGOafdeq/Zm8cD713Y+/EPYePBKGhobC4MAb 4dl1dzT82re05XxugPbrlK5lfS0AoG1O/7hmjvjZ8FbkAVu1rUynmZ6uRXvV rJu34LrWjxucc9i+rnX2xPfqzz288ZFwbIrfi2PDPw2rl9Q3sBcH23ENDoD2 6oiu9fHPh21F11p3b+rdAQAsBGd/Hu5q27k75xza+KmqOd59fb9uz7YuULoW 7XUyPDy5s7ThGMzZmpv1tU6FIwMHw8DAwKRxJAwc+G5N75rd77KqcziL8cff CO/NeK/3qvd5MVb8wHGqQMfpiK71v90UVt+1fOLfAQDinQpP1FwT8dGDv53h PtPP1mo7zcyPd+lxR4YOh/17d4Senu7Q3d0denp3hf0Dg2GkMj8zxNHhoXBw 767Q033+6/f0hr37B8LQyOwOYhurjIQjB/eE3p5Lj1c8n8lPp7Rda6wShgeP jH+/dl38fnX39IRdew+GweF2lJT0r4c5NTY6cS5bb82+GxqJ3He15+ld9cjC Wl9rKmferLlexSy61tnDNZ2/KzzV7O+vEz+oOc5raXh1uOVnATCnknetj1T/ jgUAaIfX1/9h1WeMB95oPI87fWDy+YVTXePwVHh2efXccsZrklXeC9sf/+qM 5xZdu2p92DHw/iye4amwcdI2XbXmRzVlbiwc3fVMWLnkY9N+/cvu3Nr0mvqV oTfCw6uumebxFoc1m16feLyjNce3dXrXGjq4Y/y53TDzdeKuXhke6+lv/ToE c/J6qH4NFK/fvuHmzxPrP/89uvCcv7jtF9Pf4cK1ExYtqm+748/vpYfumHb/ feza1WHHkdPTf4mj3wu3LV8+MZYtWxaWLVkSliy5Iixa1Pj1tnh8dE05znWY bUfONL1PmjG/Xav2Oqyz6Fofvlb9umupCY6F7as/UrXfr3/aOltAZ0netS7+ jvy98J/+YnXq3QEALBD9NV3l+sfebni7fev/pLp/7f9Ng1vVrO3T9bnwzjSH 1ry/71tNrpVzaVyz5vstHn9Sc0zapLnq2aEfN1gbZ4rR5LUi+7f8dfPP59q7 wurll5Wja428Ex5e/gctfa8mxsc+F/oGm+slc/d6qD8u8YE9jV6/jdUeU3fl TN+jM9XHTN3x/LkO9mF/7bly04+nGv6MnVN3zYc2jMY/07NXtq5V3e7Hx4rm W/bE/WuumdF1zbddCxboKJ3Rtf5j+OZzPdaNBwDapnYu17irvBfW1xwHcuX9 u+tvdubnYeXked00a1YfeuHzs5+DX/uNcKzpU9Ear6N95tB3Zj7mqEGbmM6+ htdRa210Ytf6sP/vWu5Ndc1kz/TrrM3t66G2t7bWcFo+V7SmsVz/9M/C0Z3/ dRbP7eYp28zpA/9fW1rW5PFfda2a33E/aXkb2n0dDoB26oiu9fHVYavrIQIA bXT2eM31vxqtM123dsz4uPze+vWUa9a4Kc75a+TDfY3n5Fffuj7s2H80jIxW QqUyGoYH3wnbN3y1cX9q8vipuqYxfr+R919r2GmuvfVrYXP3zrD/4MFwcP/e 0Nu9KXzttnPnE850fbMT278yRXO5J2zb1T+xbtLo6EgYHNgTNq5bUZqudebo d6bc1lvXbQx9B4+G4fHnVqlUwujIcBjY+/L4Pruq7rbTHXs096+HtF2rfiwO dz70Qtg/cGR8341MPK/i3MRGt71lU+MuVBxruGHDhrB58+bqUbt/rrgpPF57 mwajeKw9Q3mfh3j2eE3rbvlakrWvs+tCX6rFzQAa6IiutfjzuhYA0F61xxiM z+Vqp2LHX/qLhnPzF4eqW09tA/nTxxrM/+uuwXi+M+z45dTbOPpm+FqD8wW/ uuMfm3iC9U2jdlxz97fDO8NTz+mLz2zTqluz+ty4Y1PjczonHnPkrbC+wXZ1 Vtc6FlY32mc3PhIOzzDhf//gixf3yR3PT9M25uX10Dld6/Jbn5xy350+9GJ9 b23Uj6dztua1eM23W1/jrE3K1rUaHW/1Tgs77+yJV2vu3/5zOwFi6FoAwML0 Qc016mvng5XwwsrGc/Tac/PO1Kz502hOd+jZz8yuTzXsH83M+afvWvdN10+a dKhmjbLpjrOp3bYXVn20Y7tWo+/VH9z9/eY7SeVY6H5+37S3n5/XQ2d0resf 2z3D1URDOFq3P5q49sJ0X7vlY47ap3Rdq8H1EP90ivUGa50+9J2Gx4DqWkAn 0bUAgIWpMv01DCcfi3TFTWHt6k9eum3NuV9HX6g+ruuZgX+p+VoNjv9pYW3m RmsK3Tfj+t9Td637mjreayYNnlODY96mUrtuf8d0rbM1a6XN5tihGc3X6yF9 11rxdJPf1w9/WNNHWuwzutbsu1ao/3ksxhef/9nUPXLsZNj5+F9O2c11LaCT dETX+riuBQC0X/8Tn5hyLla1lvIN3w79Vetf31y1LnL1/L9+XlmsX1M773v0 4G9b2NKTYX3N+WdXrmmwfn2Vxl3rkw+2uCb0FBo9p5lb2yUtN5N50uh6e608 r2bM3+shcddqqS0dC6sXRewTXSuqazXsucW4+nNhU++BMDg0HIaHBsPA/r6w cd0dM157QtcCOklHdK1/c3N4fJuuBQC014md1WuePzCpX+xb/yeT5vNvh/B+ 9Rryl+ZtY+GlyefUXX7v+Ay9Wu3xXF2XfSOcbHFb646nmHHe3qBr/XHrX3cq dc+pxWOaOrVr1W5X12WPNH0MWrPm7/WQuGs1uhbDlOK2VdeK7FqhaLp/N22r mmrcsO6JsDrmewcwxzqia02MPwz/aeXnU+8OAGABqT0259K8/WRYP+nYkfv2 FMeN/EPV8QxX3n/huKea+XiD+fSBmuPCWjlfb6pt7eq6JxybdtGi+k7QzuOO Djz8J3XPqZXpdFm61mV3fn/GtaFaNX+vhzIdr6VrzUobu9bEww2+GlbWHDc3 5bjiprBp74lQtP3nar533z3S3mtMAsTonK51bgAAtM3pH1ddx+vivP3E5GOz Llyzfix8/7ZGxydVnz91ZYPz/A5trF4T+7I7fthyK6nvGDOtq92gE7zRyrlu 0zv60uert6fF/tOZXatSfexdV/PrZ7di/l4PulYKZe5a51TCoV3bwvpVt4al dY1rcbhx1fqwbe/RSevBHQtfW9TubQBon07oWjeu+VZ4YPWN4X/UtQCAdqq9 ttz5ufCJ7X816c8unYd2/KXJ548tDa8Oh4l55eQ2dv3T9R2k9tp3f/DFH7W8 qW3pWm08N6j2XLqZ1/uqVp6u1f7tmr/Xg66VQvm7VrWxsUqoVIoxRX2t+R04 87GkAPMrddfavXt36Ovrm/j3B7/5jdS7AwBYUE6FJ2rOISyOQdi++iON5/In qtfY+uu+Yt79ZtW8stExUe047+xMXcf4XDjc4nmI7exajc5DbOU5dWbXqv9e XbXmR3P+Nebu9ZBx12ppba/2WmhdayYf7qu5PmfN9WIBUuuormXdeACgzV5f /4eT5sLfHp+PnQyrp5xbv1d1vs2V978Zzpz4XtU5Oi8Onq37GrXH50w+BqxZ 9Y/R+rrx7exaVce0zaIjlKVrFd+rdmeC+Xs9ZNy1LvtGS9cxaKe8ulYlvLCy +vt2/aZ5eu4ATdK1AICFrPq6cp8Le/u3haUX//vmujni62s/XjVvH+j/1oxz yrNH668z9szAv7SwlR9UH1c2Pv7tjMcRzW3Xqj8P7vx5mU3q1K5Vd+zJ+Hjq YPvWJSvM3+shbo21/prGV6quNeN5unMnq65Vc53You3//VB92wdISdcCABay 0wcm95nPhg1P3FF1/FbtFPHDfV+fdPubw5btj12a1131SDjZ8Kv8Q/U6XsVo YZ31M1Xt7Nz4675fz3Cvue1aZ49/p26bGq0tNpXa8xg7pWuF07VrBZ07Fq3V 46mmN1+vhw/Ck0uqb9fsemFnjn5vUt8tQdeq+74tPX+9h/mXT9caC9tXfaT6 tegcRKAD6VoAwEJ29vj3qo43mPzvDTtNzTUUq/tHfQe7oPq4sPPz9hnbVLGB h2uuNVaMe2ZYW6swt12r0eNfunbk9N7f99/q9kXHdK1Qc0zexe1rbV38oz3f DF99furON1+vh33ra9ZB67p3xvPzGjWtju9aZ38eVtZs7y3P/6L5+7dRmbvW 8OBQ03316Aufr3uNPNrGa64CtIuuBQAsaHXX8uoKi853g6cGTje4w6RzwBa3 MO8/82bdvHtiHtj3j1Pfp3I4rF9Sf58vvPzLJp7YXHetED58/et121Yc87Zn eKrzkCph37NfaNgEO6lrTdUur7r7ufDeDAejjI0cDhtXXXnxPt89cqbxDefp 9XC0dh2u8XHDg7unbBdFj2vYbDu9axXHDq2uOXao6+bQ18K5se0yr13r7Js1 Xevm8NYsr0V4fPtXzr3O12wNJ6d9jLFw4Nnb618jNzyXbK1+gOnoWgDAwnYy PNygFRR95p0pGkajY22KcccMx4ec2PmVhvf741UPh76Dx8NIpTL+OakSRoYO h52b72t4zMx0x4RVm/uuNfW+6wprNu8MQyOjE89ndGQo7O/dFFYubXzbjuta oVgXv/H3qlg/6O7HXwj7BwbDyGhl4nNtZXQkDB7sCxvXrmhw+3vCsam+xny8 Hj58rfH9rr037Ci+xuhoGBk+Fvbvej6sXnb5lN+fzu9axTnF9WujFecjPtaz 7/xrsbjV+PerMhqGB98JPZsfm3hNfvL+n7T0dWbS3q5VCfu2PB0e37AhbKgb m8OGx9fUrG/VFVY8tDFsbnT7xx8Pz+890fCr1B9DuTSsefylcHDw/TBaGTv3 Ohx/nezteXqKn+Obw55E530CzETXAgAWtlPh2eUN5mkrtk65TsyZQ3/bcN7f zJrc/Y2Oc2h2XH5vONz04jXz0bVCOHvi1anPy2xhdFrXKhxqcJ5Vq2PFY7un XW9oPl4PO7/2e60/9g3fDkPvVx+31uldq9F6+s2Nmc/NbEV7u9apujXSYkZx Ddd69dc0bG1cF15ucB1YgE6hawEAC13tdd+KMe3aPA3W8mnleoDHX/9vdcdY zDSKc+Aar0k/lVN1c/y56FqFom3d1MJzWfHYT8JYzT7sxK5V+PDgiy09t0vj 5vD8/veb+hpz/noYO9bw/MWpxjVrvn+uR9V0qma6VlXjnPeuVWzDz8PquvXH Zh5PtXQ9yum1u2vVr2MX0bWm/B5Wwr4Nf9n6Y159T3jDcVpAh9O1AICFrv6c s8Xhu9MefzAWXlr10bqO0dJ6zaPHwksPfXHGnnH1jV8LLx9sfO7Q9OqPQ3t0 jrrWhLH3xp/PHdM+n6tv/EboO3J+zbKa9aVmOoczrVPhQM/T4a4ZztMrxhXL Voane/pbX2dozl8PJ8ML6xqdJzlpXHtX2Db5sWu61i2bZmg1Z2rWeromrmvN /vV6csbX4sX9ufyu8NiWnWGojQtDdXLXmmltvsrwWxPn08607yZe5739rn0I lIKuBQAwlyoTa/3s7e0J3Vu2hC3jo7unN+w9eCQMj85yAeiUxiphaOCN0NvT PfFctmzpDj27DoTBkYUxAx4bHQ5HDu4ff34955/f+Peruyfs3T8QhtryHOf4 9VAZGd/+PaGnu/vi9vf07gtHhhpdI6HkitfikbfCrsn7cvx71Tv+ehwYHAqj c/SSnNd14+fK2Gjdvtsyvu92te11DjB/dC0AAIDmLIiuBbCA6FoAAADN0bUA OouuBQAA0BxdC6Cz6FoAAADN0bUAOouuBQAA0BxdC6Cz6FoAAADN0bUAOouu BQAA0BxdC6Cz6FoAAADN0bUAOouuBQAA0BxdC6Cz6FoAAADN0bUAOouuBQAA 0BxdC6Cz6FoAAADN0bUAOouuBQAA0BxdC6Cz6FoAAADN0bUAOouuBQAA0Bxd C6Cz6FoAAADN0bUAOouuBQAA0BxdC6Cz6FoAAADN0bUAOouuBQAA0BxdC6Cz 6FoAAADN0bUAOouuBQAA0BxdC6Cz6FqQjwufwwzDMAzDMAzDMMo2oBFdC/KR +n3IMAzDMAzDMAxjtgMa0bUAAACaY34N0Fl0LQAAgOboWgCdRdcCAABojq4F 0Fl0LQAAgOboWgCdRdcCAABojq4F0Fl0LQAAgOboWgCdRdcCgIWtf8PtoWvR orBkyZKwdFFXWPH026k3CTrcqfD6hq+O/7wsCl1dXeFj194VXh74MPVG0SF0 LYDOomsBwMLW/8SnJ+bmF8YnH/xZ6k2Cjnbo2U9V/cycG0vDq8NnU28aHUDX AugsuhZA+YxVRsPIyHAYHh4e/+doGEu9QXQ0XQtacSpsXFbbtM6NL7z8j6k3 jg4wn11rvt7vF9rnCvttdhba8yEfuhaQh0ro790U1q1bNz7Whvuf3hlGIx7t eO9TYe3adecfr8Wxdm3Y1He85a85NnIsbN/w1bBsyRUN5luLw42r1ocdB09E PCsWKl0LWnEqPDFF17reObyEue9a8/V+v9A+V9hvs9P251M5FjaOf9ad1Wfk KT43P73j6NztABYEXQtYsCqjYXBgT3j2obvD0gbnk+yJCFv9T3yi4Zyn6XHZ I2Gkla+35a+bf+wbHwmHK7N/biw8uha0YixsX/WRhr9fnzlyJvXGdaT+jZ+Z 2D+Lx8dVd78SFvpb0Fx2rfl6v19onyvst9mZk+dz+qfhupjPyA3GlT63MANd C5jKWKUSKuNjdHR0YlTKcDDy2LHw7Nq7w/JlV8/wHnldeGPWXetUeHZ55Hv0 NU82fbzYgZom0dy4J7zT4Z+lmD+6FrSocjisrzlm647Hdi/4XjNbr6/9+KV9 ddWTLf29TRnNVdear/f7hfa5wn6bnTl7Pmd+Gm5qd9e6/yfzsk8oL10LuKAy cizs6n46fO22G8OiRY3fV65etjI8uHlnODbaoWvnNv13RHFda6pzVJoeTX7u P779Kw3vf+u6jWHX3v1h//79oXfLY2Flo+/XNU+Gk7N9iiwouhbMzujwSBgd HQkjo2X4i51UPghPLql+f4s5z78M5qJrzdf7/UL7XGG/zc6cPp8z7T9e64G+ X8/XrqGkdC0gjLwTNn7pk43fSxYtCovOX+e8dqx48KVwstM+6p/+cYNzDtvf tarXFL4u7Bk5G0LN78GZRjPPpe5zweX3hLdGGjXFsbBv43+ue57Xb3K9JnQt YC7VvCfqWq2br/f7hfa5wn6bnXl4Pq18Hr40inueDA8vqf5aK6xrSBN0Lcjb +/u+NbEexsX3jyuumzge68jQSM15h2NhdGQoHOjZFO6qer+5Lmwb+DDV5jdw KhwZOBgGBgYmjSNh4MB3a3pXTNf6oOY997qotbqmUr+G12dn3ObX1/9fNff5 XDjcae2ReadrAXOnZh7awnn2ZdXurjVf7/ed8bmiEoaHBsPg4FAYjjwO0n6b nc54Po3VnRt55/ed/01TdC3I19GXPj/pvWNxeHBbf9PvHcf3PVP1dz0P9HX4 tc/PvFlzrn9E16o91/Gq1taAb86xsLrm78bu2/ObObxfLsbCyNDhsH/vjtDT 0x26u7tDT++usH9gMIzM0wJyo8ND4eDeXaGn+/zX7+kNe/cPhKGR2X1yG6uM hCMH94TenkuPVzyfyU+nHV2r+DqDR94Ke3f11mz7wTA4PFL6a4FPvC4mPbfe XXsn+n7bntdYJQwdGajaf729e8PAkaF5Wbuw3a+7+VJcp2tvb8/ENnd394a3 hk7X36hycvx79/LEbbZs6Q59JboOWRgrrm/yxsWf3+6enrBr78Hx70uJytC8 vCfWSPzz1N6uNV/v9+k/V5w+9GLduksrZr1unf3W2futdaf7v1XTzu7xd7M0 TdeCPJ3YOem8+mu/Ed6ZzUfosWPhiYvrpy8Nrw63fTPbp24Ny4iuVftYc/B3 02cO/W31e/vl94b3mrzv0Rf+vOq+l93xw4TNYfL5KYvPfQ5qyxoJlfDSqv8w 8Xjnjje8OewYmmbNt8p7YfvjX53xHNVri2tZD7w/i+0Zf56TriVw1Zof1ezz sXB01zNh5ZKPTfv1L7tza9OfUytDb4SHV10zzeMtDms2vT7xeEc3fmqWXWt8 u/d+N6xe/sfTbveF3wF3rns2vDHYScdvnnfhZ/b8OdWPvvHb8/+jEvp7Hg03 TbGe4MQojmHd1j/rn6Hi+7Rx7Yrq42IbfK9uXbMxvDXc6rqF8/+6myv951+j E/vpmm9PbE//5i803N4b7v/Rxe09se+phvv2sjufm3L9lwtzp8UTv5OaGOdf Nzc8uLu110Ht6+7gby/9v/HfSS89dMe0r4uPXbs67DjSoOPVqX4dFL8P+1p4 LVXt+/HxxW2/aPx0jn4v3LZ8+cRYtmxZWLZkSViy5Iop1uNcPMP+Pfc7Y1uL 15ec25+n5rWza83X+33yzxUfTr1OxGzO0bPfOnu/tezs4XBXzfN7ZuBf2vXo ZEDXggx9+NrF98j/v71zcY7iuvc8f8qt+4gTIHirdrcqXpsYc1NJbMfGlZvc lMHx5pZtwLkbwNm7NuCNzcM2rxjbgA12FoRthM3DgGyMxEMSSGAkQAQJgYSR jIbVUEiAKMtbJVKi6rfqkaan+/Tp10zPTI/m86n6lSjUMz3fo+4+53znd37H mM+4ezJj97Tnm/XK6vT6g5l7ij43ciVSX0vJ/RqZg0Xta53P2ocY4cYhZcxf zLWIw1Kz+B9tWrz2tEnUvieLFi2TZcuWyaKF66TVtWGvyHLbXGq6HHNJEDDW 2garuZaJx5Z+ETLfQNlLwJKvcDf5lSx+KOC5Z34S6B4KtS/34y/I4qcmhr+e hi7Luiz3/Zz03Bo5mQw3X80rSg3bJ7dckjvXjurr4brFcx+GrPs7JI3vO2uS +MWKA3pPQU9hr7t8YsspHGnrszXe1/iKk/9P7pzf4K1r/hfa/us7v9e5Rdg8 JOW6m7dz9G97+7y6Lt47Nrf45UQ49zJ5K0QehZrPOdXl+ZB1u3nEW77a0hTi fgpOlL5Wofr7Yo8r1OvMFhPXhK6rTrvFu93CYttTNeznAhB8LYDyY1g+X/BP Zn+o+47mdsdhWT3bngfywxlzZEttZ+r3ncZ6j9qzppdzt/sj87jYfrcSoa91 99oeW78efd/7rWxX/ISPQ32nrdbcnC7HiphLl/j83+3jMNf8tiGH7hVNLrld Fm/Wa2zXuft/2c8dJh5fI1cCj9f0dZPvdH7qk1dgj/S814vmrPbltof/NXvL e8/PKVPkoYce8tUW7rrNI1HtOf7cJwE97F5LLqsu7nXdj8OIZ7YFrZFbuOsu 33jO3bKOe+XLpPNc3519M7v3C1sPXbnuntzyV+mueyOLcz/t01+pe5mE8YuC r1POut084o1An7NQ91NwovO1CtXfF39c4X2Ph61TSrvFu93Cocshu5L720KZ ga8FUF7cTewx+43N1jURKYYd34c+NGOGTLfkNMxatmhsvjTd0pdmcnKmvu2e i1NUIvS1vjtr/87ayP0wMOoPJbu6pK2tbSw6pCfZL+HLeyp7pmfxWdVxUJg5 TtRYfc/0HK1Vlxxy94LMUcZsbrldt5X51Q9eqnce06yfg017brUcaemWgcEh GRoalP6ei1JTsUTvAwTOY1HmlSOvG7hxVJuT8fhzy6Wyqk5ajGukpUlqq7bJ 8jEfeW+P97qZay77ck94/GXZ13A+VZNncHBAejpOytZVz7qOhf18LYcXmTrH a3KkLSGDSvGaoYF+aWvYN6Lhx/a/ycKDRc8BMvHxtaaN/E0ONBntN5Bqv662 Y/L+Av0esX/Yd9XnZCPzhjm68zwtW6rP2upZGc8MYx2kbj/0zR0B158V4Lor BG5zt5krP5Ou/n45/7l7/paxN2/byLO3cbtz3eKTmn20jFy2iooKqays9Ihd 8v6ymfb3y9HXcsa9Mv+d3dLS0SX9I9ee8Swy1ibqjn3Gc71RYXwt13ZTn58/ /K1s8mzb0TDeyz+vs5D3U3Ci87UK1d8Xf1xxdt3DHvfCXP24wBXaLd7tFgbn /ofFHLNC6YKvBVBeNK6+z5z/2LvCYalbnckBnrnyoPQPZX7XXbfWPm4dGd9b 12OYXk9c90GK0tdyrMV4QhbN9q4/NG3WYtnW0Blsnq/W4HV8bzUs56vekhmp uiZTZNb89+WyosUx7ihm7XiNX6X7fvBu96fOtlOuszSqPofXMHJOtU5Dqh2O eHgSg+dkuWbd1pIjQfZEcM4r1Xhs4Ydysd99Djc87GOAOvY+GI15HrkIwwOt slrzubx9LUtOZzoe0/8dVG53HZPFqfO9HCLXrQC4+gtz5YBHPbVrjWs1r/Gu RZL43Jkj+OOFn3m337CRj/IDpc2DrG8uwHVXIHS+1i/ePm47xrFP1gRnLk7d on8Ica17c1fNIYjQ15r03AeO53Yao0a0w5v0rIFTGF/LlbvOtflRedqFvZ+C E5mvVaj+PgbjCltdVzXCroWm3eLdbiG40fh6Xu9VKB/wtQDKiV6zJpHaD1lz W+bt1I/VrDkcU1fa5xuZHOKw3x0ViAh9Ld+aLl4x7WU56VXfXPdZFa/wWt1/ ON9XqfsSxf530aHWNNbnvCR2KzlC947+nZw59s71iqpP1rn93xxtFMif0vph QWqqevsLK7z8tIB0KjUxRuf0QeZV38puxafyvh6ctXrC7Xk0LENxewbo/IVZ H0hvAEtHdy1l6s4raDzciYH3KP/ace3555jk/7orFA5fS+PjOJ69mvmPulbO q56fH47vMCLytZ7c6F9/vttx3XmtNyqyr6XqDNtObhT8fgpOZL5Wofr7WIwr brnk3t0bev8A2i3m7RZCm5qr9Z5jLQlAMIrtax06dEiqD9fhawEUghuHxr4D VsfHmVo6xtohVyx7lTg8AjOXZPz7Wn51YIzvuPz2atrb4zEW8ZwjOGsj6OY8 6lrJYtffVNvs+0vrlSOsOULTZcGcTP6bw0NweE/qNefci3rCs8H3e9PVkPH3 ddz9hRWB8r380GhyyWXTEa5OrNPXisN+eTmh3lMh9n/Sza2d1+8oDm825POw W3m9W/3uDPm+7gqH+oxYckRTW0/JNdB5NzovKtweEN7vlauv9eyWgM/i24eU nC2vPmt8+lqFv5+CkzdfK1/9fWzGFUNytuo9WTB7tsweiYUrt8vFgSzWQdNu 8W63gKT3ps18npB7cwBYKLavZVzDU+ZsxtcCKADmfF0Z52dyre6VvZ65RH1j ex8atXiV48y+cq5cjOMEOEJf68bZ/2P3rabNGavzMWj5Dn5YBvsvS03FS9o5 p+e82nPcodZGcBl3nI+Xr6XWw3KOXSy+zWPrpdFSS+fRjfZ1RmrdfjVn427C uZ4x3Pd/fZk9PtPzoaXHfV6j9xd+EVG9OZ2mMDlUYeet2noes9bIyS73NXux xuc7aj/qlH2a9GNvZ15isHw6C999ZfNtjO8ZvPN68nvdFRL1GtXmxCl/x0C+ Vg5r4yP3tUK9fuSZqOzX6f4cG4++VjHup+AUxteKsL8fb+MK2i07YqXHWfPA v34lgDux8LX+gK8FUAjMvkjxtcy17X7fk4yMEUe/P9bs61tGvlaKwcuyfdUq 2dmUCHDsRW2Noz/sc9mDzGeOoNaP0elR1+sU29dy7F+otv+1/Rmvat4huW2t taX4VmotBlWb+h19FPtg+8/TNP7Cg+HP64ZDU5h8I8li3nrngmNObca0ObJx V6P09JdQBYwc590OX1bnlWjqn+0Iu0ZEmYf7f3ed3+uukASqRZyNr5WDxxK5 rxXKYwvjVY1DX6so91NwCuNrRdjfj7dxBe2WHXHS4xgXuuwpBBCQOPhaM1/f ja8FUADSY3T1O8t0boZf32T6CZo1XXc6P8pi3F5Aova1wmJZw2kdT2jH2D5z obvXDjtqCj+50f63U2sCRbn+Ijv6ZLVH7sENS13U0f0lz1nmI/axTrOSS6Tm LZ19/+fB2tkD594AfnXQnfPKcDWpvHHkT4WcN2Y1bx28qK2jb4sfPiHzV70v R1o6ZSDO49Ec592668Hd28827nX+XxZ+apTXXSEpC18r1OvL3dcqxv0UnELV 14qsvx9v4wraLTtipOdajVLLa96hyPIpoTwptq/1n55ZT914gAJhjtGV/Jf0 mNZ7LJup1a3bN93csyjCcWOkFNvXEsO7UfZ8casDrO5X8+P1zvyLwSvSUF0r DbXVcqzNuTZMnaesOKapVVNQhqVu0f22z2RdU9JoWef1Vmr9kX0t4OaOv40d qdZ+mi6H++1n6txqH3NNzGKspNvz0r1m8+jncswr3WqLZ0G3uifY/C9Cacp+ 3mrU9HjLuTebS8xatE6OeewvWDQi97U018MNtR5SBOH7PUF+r7tCgq+lUua+ VlHup+DkbT/EfPX3421cQbtlR2z0DMsXs+3354sHSqsmJMSPYvtae9kPEaBg ZHytD7S+llrHyMrd7o/MvsdZ9yTjeYWuf1EoYuBrOddVuH2GPmV/mPCfVV1H F2aOky8SyndzE01vxuphPSHHUslVw1Kz+B/NY83rSm1DzXo89bvEH7xUH/qz RuJrRdjmjvrHvvW+7OS+f9G30tG0T1YvmBVo/jh51ho5kwy5ZiiflKqvNTH8 OsQ43OvZgK+lgq9V+PspOJH5WgXr78fbuIJ2y46Y6HGsYdDU7QUISbF9reP4 WgAFI1Mf3r6GJj2mdc1rGel/lk/J9IHqfO6OuZ/J9DFPIobEwdf6rt4xTteP B9Q5Stj+fkh22/aEnh6L8YKj9nnak7ptqYFiqYWVsOYoja19vWPxV1OhyVuK Yh2iWj9CW1PORn79Bd06xDCaIt2Xe3hIkl2tUrtro7zw1INKO9mv29D1cPJF 1L6Wrr6ZZt3Uxx03ZHBgQPr7+7OLAb9Pia+lgq8V/jqI3NeKIi+qKPdTcKLz tQrV34+3cQXtlh3x0HM3oez/4zvGAvAHXwugjDBzXez9mHU/xH3KPPTOtaPK HvdPyxlLHZ07iS9NT2LqynA5JAUlDr7WHSX/22M8oHozz+x0qTGvQ62VG3Jv 9Lxx94JyLT0hX418rjuWPaO/v7Q+c7jNB3tZroz8322lZvwz25ztouZrZVMr 2PkeWawHi9BfcNShCDlvjNTXUhgauCyfb3pJGaPGbKyao68VaB8BzTz8vda/ 6d4uQvC1VPC1YuBrTVwTal+LQO9ZkPspONH5WoXr78fbuIJ2y4446Llmqak6 Oqb5MJ41TKCkwNcCKCcyY197jaxblppF98rSyhppaqqVrauezYxzVx6UurGx r7HGqLalKTWXNfukmR/Gew+uOPhaN/Yrc3/3tW3fOfZfC97nq/sFGrlOcbAW rOtV07G562/SbfEMbPUVbHnq98rhAZHO9+3+QqbuluVlak7XBON7/jDzoVtK DS+736Ynv/6Ccx2cs66YF/n0tUyGe2Xr7HscbW/dH6Bo5OQvqOs23Dx8tfab 0c6notOgBV9LBV9r7NgQddbOK/PcnH0t33XbQSjG/RScKH2tQvX3cRlXDPVf lNrqKqmqqpKGlkTW70O7ZUcc9DSvtuegF39vIxgP4GsBlBeZtV1z5aL1O5ah y7JO8RzSfsLKfe2j/dbtr7T7E81ceTD+37NE5msNSbI/O7XW2uijMZqDpMWR 2zRBdvQEyfV2zm/iVItTnbvO23VKdi/4J/Na22vTaM93X9HULZ+bxxphzx3M 8LVz78kQddYz62oz8apvXdT8+guONZwT9Ps3uKGuY8zfPuNXZPGU/LVD1jjW SX3o2NPV9aUOT9F9z8FONa8rlRsbnQwn+Foq5elr3ZIPFO/10Y3B7vE73Xsc 6+NDPx/UWtQR1SQo/P0UnCh9rYL19zEYV3TuVvZAMeLxNT77DbtAu8W73Tze R/WslxyJzzgVShd8LYAyw5IDo/vuM9lxMvVdUFVVtTQ0dcqA2mcO9UrD2PdF VdW10pH8rjCfO1ci8rXS65GW7As3nr199l3HmMRv3abDB3vQf22HWl885f3E yHT87qx9nvjYotXygjkfc65Zs64HfGzZ+7LcOhbyqDHlWDdmzAmD7NljqyWX jpcDrKXLt7/gfP9MjX1vbjQ7rz2/eWvnrldl4cbjWfgBzvFqLHwWx/3/tBwL UhNk+Ir2erjidrxjjcbofZvV3CMQ+Foq5elrOfMfJkzQ1IBTP57G08rK19LM k0OtbXKj4PdTcCL1taRw/X0xxxWO+piW8M+J1kO71Yd/Qyn2+PKWIwfauR8V QHjwtQDKD2utnhVHrhb74xSGu+pehE9La8ixsepNPTj/Q7k44D837q5eqxmP TJdjPuvIjLqajtc9577e81rd647jY1fzTDdPScdYbXgrmdpvzpi60mNNyp1z jnlWaux0zOM7waHLln0ZM/HigSD3SP79BbW22GjMlZP9btfgkDRvf1Hbdl7z 1judljH05LmyryUR+DMmal5xnGtHTwxqx2tq9Ri5H29Xd7rn8Q2ek+Wa62Ge z3zdUZst1Y5/lJNB9occviXNlUtkyqQgXqoBvpZKufpa3Zrrbubbx12vb32/ 5P980GPfvzbdx/r1cUEo7P0UnKh9rUL198UcVzj2P7GFx/cFMdBDu0U4vnTk d5ZuvwXxAl8LoBz51ra+a96WU4HX5MSXkTn8ri2yqaJCKhxRKRWbljrqWj/7 zlap1B2/aZPsbLrmeP9PHPkyozFr/jo50HRekv0DMjRkPAOHZLA/KS21O2Xx jEna1wT9LrtZN56Z9rIc6bphzleGB3ul5p1nNOcpfn1SJ31a78iIJ7dp5gh3 VD8yE3556466pGPx4IJ1cqwtIQNDQ6m/1UDystRVrtDvKR+47kQh/AVnnad0 LK2sk+TA4Oi1N2Bce9tkznS3cbDHvPXuZa0fOOGh38rGXXXS0dMvQ4754bD0 95yRrcuedL4uivrRUaD6C1OmWO6nObKxqlG6kiPahkbbr3HXCn0dfMt+ne70 OXLWzGfF0q1j116mEYeHBiXZdUZ2v2Ovvf+M7n5wgK+lUq6+ltw+qn+GPf6a HDGuucFBGei/Ii0N7v2S7/PBA0fNnlRMl43VzWPPJuOo4ZF7bHDkeXFRqis3 pp5Rv/D6fiJFIe+n4ETtaxkUqr8v1rhCvcfVayXbmmy0W3bvW7TxpWb9RGz3 UoeSAl8LoFy5JdutNZ6n/TGVlxGmmxoaHJDBGKwHGOVbR32RXGLqynOac/TJ 9gVTc37vHy+tD1Fn85Zs1dY98wvn3pZxwVlnbDQ2a+uL69bfjeoLsrf0+e3/ I/u/1aTX5HLgG6Iw/sLda4fd891ChPu89VtprNDneFljypTp8tCMGTJjxjSX fRBHx9vF3c/cgnUcfW+27fa0nAw69h6+Iutc5uJhzuc/b8DXUilbX2uEuuV/ H/46m/mhJG/Y82izq7/n3G8jWPivlyzc/RScfPhahevvizOu8M47ymXvXNot O4o0vryt5u0XYR8nGJfgawGUM8PSXPEHR3/13KLVUllVLU0tbdLR1SVdXR3S 1tYiDbXVsqtyoyxbtEBmPPTD1PGvutRPLjxu/kd24bU3S2f1e/rvxQPEypB1 uUbp0+4z5x7TZUdHfOueWdfBWucc+hrwbt9VBl9Xkmh818N70cePF34Scn/P wtWVMrwttxw2XTy78ZQMK/Vv/OatwwOXZbsu/ypwzJUjcVh/mEb1Fyb/UTat eza4nkkvy5nQ3yd/K3Wb1OdrwJj2RznQpuaM6s8Ry3pmWRDI11LWr2h9rbOq F7XetQ6fH1H4Wk9k/fosPMvhK675sLp4bOkXo59HuT+y3lfizgXHvhFBQrev ra498n8/BSc/vpZBofr7wo8rvtPsyWLGwoM5vTftli1F0OPI7cTXgmjA1wKA oeQZeX/RzKzGiy/tzMe4Lhui9bV8ayoN35Kz1VvkhRnTAo0DFr79uVzJqd8e ls7azfJbnznDc6u2y+WYjw+Mug4On+kx9/meY55qhKYWlyeDV+RzZV2KLqbN Wp7l/Odb2a587/lePv2F4d4RPfM89UybtUaOdY2NP5V6Y341oszTDPZK466N MmfG5ED3zQ+NNX3VZ+O3P6rLfoi3Ow7L8qce9Lx3V25rzknPUH+rbF/l/bdK x+MLVo9cf2H2by/wdZdHOrfa6yht1s2dlOtYp1V9voTLj1VO163sQ+rxnNK/ gbKOOtTrnX1asL9tn+xe5ePZPv6C7LM+55T7I7c1e32+zybzGfXUC6n1zckQ jZrf+yk4+fO1DArV3xd+XHG2QpND/eBr9v25s4Z2y47C6jH2d7bfv/Ha3whK F3wtADAZGpCutpNmTtbs2bNl0bJlsmDk5+wFC0b+vUo2VeyW2oaz0pMcyMtY sRQZHmm3no62VD5bVdUu2bXLiKpUOxk1e6JuJ6MeVJORO2fsWVm7L/Wzqa0r RmtC48xQqraL0X5Vu0b/Vsa+nkb79ZdiAw4PSbLjjNRWV5nXXbVxfw5EX1ht eFB/nVePtF9Lqv1iV8wtg2Y9mDWHZ2igV9qajpjXRHVtQ6qWWLRXxMi1l+yS loZae/uNnKutK8n9C9Ey1p9XV6WfDcZ13TzSJxUol9d4NnW1jj4v0s/akb7K 6Bc7ekau95wfF8W9n/Lra2UoVH9fyHHFYE+rVI9dEweaOvNS35V2yw7Gl1DK 4GsBAADAuCanOkcAAHYK5WsBAEAw8LUAAABgXIOvBQARgq8FABAv8LUAAABg XIOvBQARgq8FABAv8LUAAABgXIOvBQARgq8FABAv8LUAAABgXIOvBQARgq8F ABAv8LUAAABgXIOvBQARgq8FABAv8LUAAABgXPPdaXnC6ms9hq8FANmDrwUA EC/wtQAAAGBcc/eyLJ6CrwUA0YCvBQAQL/C1AAAAAAAAgoGvBQAQL/C1AAAA AAAAgoGvBQAQL/C1AAAAAAAAgoGvBQAQL/C1AAAAAAAAAACgFMHXAgAAAAAA AACAUgRfCwAAAAAAAAAAShF8LQAAAAAAAAAAKEXwtQAAAAAAAAAAoBTB1wIA AAAAAAAAgFIEXwsAAAAAAAAAAEoRfC0AAAAAAAAAAChF8LUAAAAAAAAAAKAU wdcCAAAAAAAAAIBSBF8LAAAAAAAAAABKEXwtAAAAAAAAAAAoRfC1AAAAAAAA AACgFMHXAgAAAAAAAACAUgRfCwAAAAAAAAAAShF8LQAAAAAAAAAAKEXwtQAA AAAAAAAAoBTB1wIAAAAAAAAAgFIkDr5WQ0MDvhYAAAAAAAAAAIQCXwsAAAAA AAAAAEoRfC0AAAAAAAAAAChF4uJrVVdX42sBAAAAAAAAAEBgiulrGV4WvhYA AAAAAAAAAGQDvhYAAAAAAAAAAJQi+FoAAAAAAAAAAFCK4GsBAAAAAAAAAEAp gq8FAAAAAAAAAAClSJx8rXfeeafYzQEAAAAAAAAAACVCsXwtw8PC1wIAAAAA AAAAgGzB1wIAAAAAAAAAgFIEXwsAAAAAAAAAAEoRfC0AAAAAAAAAAChF8LUA AAAAAAAAAKAUwdcCAAAAAAAAAIBSBF8LAAAAAAAAAABKEXwtAAAAAAAAAAAo RYrta504cQJfCwAAAAAAAAAAQoOvBQAAAAAAAAAApQi+FgAAAAAAAAAAlCJx 8LUaGxvxtQAAAAAAAAAAIBRx8bVqamrwtQAAAAAAAAAAIDDF9LUMLwtfCwAA AAAAAAAAsiFOvta6devk4sWLBEEQBEEQBEEQRIgw5nUEQRDlGDdv3ixKGB4W vhZBEARBEARBEETuYeQqEARBlGPE1ddK53UZYRyf/mn9t3nMTcvPm8r/RRC+ 58/x+JzPj370ox/96Ec/+tGPfvSjvyz1p+dPxvobgiCIcoz0s7LQEcTXyrZf UPsBNUZ/1yuXLlyQCxcuSa/1+J6/yrb1b8qb7++TzuvG/6XfM8D5erukvb1d LlxKePa7qd/ddNeXa78YTL/7+W6any2o/uuSSCSkp7dXrgcYd4w//eHGXehH P/rRj370ox/96Ed/VPrT86d0TRmCIIhyC7dnf77Dz9fy7nec0Xm6RtYunCMP P/CAPDAWj/z6eVlXeVi6+5zP/6vHV8uECRNS8XrdFfP/Dyz6O/P/f/rn44H6 lfTvGlf857HXTpXannz2u/Zob9gj27Ztk20VO+VUzy3fzxt2XOD+fj2y7835 MmmsvVJt9vrRwO2l03Jy/w6pqKwc1fNls/QF/Pt7tV/+9EdzfK5/f/SjH/3o Rz/60Y9+9JevfnwtgiDKPYL2FVFH2tf66quvfNchekbytKyd+yPTV9HHI7Kl odvWbyQaM77Wa3XfmP3Gruczr/vRG0dD9UPH1z5hnq82MRBZP+seXbJryS9t Wl85eCXnfjNov1q/4p8dbW20Wdh+Ph3Xmt+2v989q6Q7gnFJvvRn+375DvSj H/3oRz/60Y9+9JeP/vT8KZu9vwiCIMZDuD2r8x1BfC2zX7Dk7trXz/fJ9uft vsr9v3pBVry5Xt5YOEem2jyXqbLnQr/5/Lfma1l9reS5z2Th3Bdk7pwlUtvd H6pPyfhaj6Z8rcj6RY3+ZPsX8vwkp4dn1ZLtOCDY6ztlqXn+38i2ujbpvnRJ EprcuED6b/1V/qj6kfe9JT2ef/9oxhH5Hofk4++PfvSjH/3oRz/60Y9+9Bs/ 8bUIgij3cHvW5jusvtbx48fl4MGDgdchpv898PVnFu/qN7LjzFXl+Muya8lP Mj7J7N3mujZ1HaKtH/NZD+/WL2Wbr+XXr6q/b658xTU3zaolcL+pfr4g+pNH 5JGxc/7szyfCvb9G/+GVP3Hque8tSWT5fnnXH2Zcku/Pi370ox/96Ec/+tGP /rLVj69FEES5h9uzOt9heFiGl2X1tdavXx9oHWL6mZ6oX2Z6IC9+8bX+uT9w Sn5neiXLzHVtbvla6Xry7e2dKQ9Md/7rXX+VQ1/ulb1798r+g3XS2p1MvdaR r6X5fqW79aTs3zv62r1798vJ9oRvv2ePLlnxQMb7efHjZuluelurJdj7jR3b 1yUn674Y+1yGrga5kOjTHN8nXZ1dcqn5Y7Ou1j1zPpHOrs5UDf5UvpYyLrCN FTT99LWW98zP/70Fn8iBD2bZfC2/cYDfOCOQ/gjHIWH15/p50Y9+9KMf/ehH P/rRX7768bUIgij3cOsb8h2Gh+Xla3n1U+l/W2tk/anmG9d+oPP0Mamrq5OG 05e0r7V6QYnGtFc2VQ6OrSXMfIbrcmj9c9o8qX95Y7fsW/tUJl+rR+m3ek7J yt99T/va++b/Rdr7gvbTPbJiovG6f5M950b3XXSrgR+0Hz2zd41Mdsn/WrDu gH2/yOQRZX2nPf400pbhxhntsmRipg5a7fVb0rThCfs6RJe/f1TjkKh/H3ac Ffb16Ec/+tGPfvSjH/3oR3/6J74WQRDlHm7P0nxHEF/LrR9Ix9X65RlP5Qe/ l/3nrmrzhnX9ilu+VsbvesRWI8vIUzqw9L/61KdPh1Jfq+eIJWfMJf7bMjkf qB/skzOHDqV8MFNLo2ZNpY/+dNSbOWbpmOT0uOZ8KMn0a64dk3/10LGm9v+G Glc0r59lvnbex22p/zfz3lzytRzhkzee67gn18h13IR+9KMf/ehHP/rRj370 u+nH1yIIotwj/SwtdITxtdTnvhl9J+R5xVd5+L8vkoqdh6X1UsKz33DP13L6 Wsb/91vWyqXyknY2pfKYjByulgNrzDV5zvpa12XX3L/P5GYt+Iu5vi95qUGW PpJ53VNbWgL1e2pkm6/V3/aR5TNPltfHNBm/b2/4SB61aHpl/+XMOa/flOvd n5t5Wz96tVquj/x/X19fqH564OInGQ/t5++mcrOM41Rfy09/ruOWsL/3O3/Y cUrU50c/+tGPfvSjH/3oR3/56MfXIgii3MPtWZnvSPtaJ0+ezDpfy4irzR+7 r4ub+KgsWLJBalu/cfQjbnXjM///qMXXsntTr+y57Ph8V+tXa32tvgufZryb p/+Synuy9VNWb+6examcLb9+UA03j867H+2TXS/8XcanO/i147iBix9pfafU eySPmHlbP3vjaBb9dI9s+HUmR2xHe595fNh8rajHEfk+PtdxWtz0oB/96Ec/ +tGPfvSjv3j68bUIgij3cHu25jtUX+vQoUOOuvFB+4VbyXapfGO+TJ3svj7u X17ZbfNlEo36HCebr9WTPlePrH147L2+v1jatXnPVp9m9LX295sgaxqda/SM qDf3Anw0VdMrbL/o5tF595tXZG06V+yeZdKp7SevS6Xp51nWZRq6r2V8rZ++ fjRU3rcRF/f9h/mZf/nnE7bfNa7Nrb5WruMG33FMjnnvuY7T0I9+9KMf/ehH P/rRj/70T3wtgiDKPdye/fkOw8MyvCzD1zpx4oTW18qm3+i+1CqHdm6RJS88 7fC2fvTqEfO4QPW10r7WwDlZNNH5Hmo/07jhCYevZfVvjLykiRMnyqRJmZ+T HpjorMsVst/0W4eoj3ZZNGlM0+uHXccBpsek1htTfa0w/XDypKXe2P+Uc8pn M/O1fvaWJPIwbvAbR0Q9DvIdJ6mR53ET+tGPfvSjH/3oRz/6x49+fC2CIMo9 3J7l+Q6dr7Vhw4bQ6xA9+6Xe81L56i/tvlHPaD6Uttb6Lf06xFtXa8xaUz/7 81HXfuq44gEZ/1e/4p9dc8icMVVqem7593tKqOsQHf2ypW80/52okUc0mtRo 2fqsZl3mTZuvZaxDDNOPH7K0yWs1zs9bv/YnZr5WdxTjEp3+HMZJuY5jch1H oR/96Ec/+tGPfvSjH/3pn/haBEGUe7g9W/MdhocV1NfKrR/ok+1z/8G2zs/4 f7ccJ/06xE5Z8cDosd97qcq138r4WhkP6JvDr5nnWXeoRS60tkqrEufOnRv7 2W7WbQ+jP7t8rS5ZOabpvhFNbv2kNV/rYEBfy++8ax+wenmTZVJqD8bJo/ls k1Svb3Lq5ztNVyMbB+R73JLv86Ef/ehHP/rRj370ox/96Z/4WgRBlHu4PSvz HX6+lv9zPpmp/XTPMunw6AeaNmS8mZoxr8otx0m/H+IVixfzezmt/TydssQ8 xlJfq365eZ4X93wdqF8O28+Fra81GnZNp7Sfx1oz7DdyrNdy7mS26xCvyIqJ QfPXMvGnmm+ybp+wkevfI9dxWb7Ph370ox/9cfk86Ec/+tGP/tzPh69FEES5 R7bP/lwj7Ws1NTW5+lrez/Fe+eDXGd/jlT0dZp5x6nXpn9eOyfOTMt5MbTJE vpYlP+mwWdt9gvx23QlbP2NEy/Y/WHyYzDrEm93V5hpGo5bU6T71+5o+2ffm fHnkkfvl/l+tstVvD9rPqWsqbfo9ol7RpP7+a0uu2YQ5n8h16/mz3g+xT1q+ 3CEVlZVSqYmdOytl6a/vMf9em3bulG0VO+V0ot9Vv1qPIKj+oOHX/rken/P5 0Y9+9KMf/ehHP/rRX7b60/On4eFhgiCIsoz0s7LQYfW1vvrqKzl8+LC8++67 gfK10vH1gf9ty+n51cINUnfmgvT09kqi+5LU71xn1pAa9Wa2p7wZ47Vqvlb6 HPa68YY3NXa+S5/JZMt7/fylD+XMpe5Unfpdbzyl5Bdl8rWMOLzkv2R+9/1/ kx0NrZLoSUj76VrZsOCnmd/N3i19WfSL2e2HeNNWNyzlT41oOt3eKZ2drfLl +nk2Te+cvGY/b4i68WHrYJr5dT97V7suM+w4wFW/6/G3LD/Tx0Q37vLTn+u4 CP3oRz/60Y9+9KMf/eWjH1+LIIhyD7dnf77D8LAML8vqa23atEk6OjpC1Ne6 Ll+++hPFU3KL30tDMrOf39X6MPW1Rn/ac7Kc8fDD95uvremx9jftsvIRv8/3 G6npsp8vaD/t5tEF6Qe/PvCab9v9dpMzP+3W1SOmJ+bra4UcdxxfO1ZX/r63 JBHgeL9xS9gIO67I9fjw4y70ox/96Ec/+tGPfvSjfzTwtQiCKPcI2ldEHYaH ZfW1amtrZfPmzdLW1uZYh+gXLV9ulH911BtPxySZ8/pu6bxu7zeSrR/KVDMX KWH2G8kz72XWLFrrpI/9vFC/0cxTsuZn/XlPq1xtSb/293IyOaD0U1fkwPr5 tpyvdF30p1/dKqcTA6E0W+Oaed5MffUw/Wby3OeyyFz7Z4n7fyfbGr/Wv1/f CXl+7LinNp3y7IfDjjPMPRh//m7K18p1XBJ23BB2XBH2/fId6Ec/+tGPfvSj H/3oLx/9+FoEQZR7uD2r8xm9vb0pD8vwsgxfy6gdX19fL9u2bUv9dKxDtOTu 6tbPp/uMrvZTUnfwYGp948H9B6WxqVUSjnpW/v2gfz/UJ5cuXJDuRLdcutSd WjsY+P2v90hne7u0G9HZJb3XA/SLAfVn24+mj+3t6kx9pkT3hZGfPfEZZxRI f77GIehHP/rRj370ox/96Ed/vvRTN54giHIPt2dtPqOlpcX0sJqbm1O+VkND g3z22Wfy6aef+q5D9Ot3/I73fT+f9fCh+6V8f170ox/96Ec/+tGPfvSjH/1l qR9fiyCIcg+3Z3U+Y9++fSkPy/CyDF/LyNk6fvy4VFdXy5YtW1K+l1sfoHvO +/UzfhF1P6T2i7b/y+J86Ec/+tGPfvSjH/3oRz/60a/Tjq9FEES5h1vfkK/4 5ptvZOvWrSkPy/Cy0r6WUWPLyN/asWNHKmfLq5+Kuh+K+vdh+9mwr0c/+tGP fvSjH/3oRz/60Y9+4ye+FkEQ5R5uz9J8RVVVVcq7Mjwsw8syfK30WkTD56qp qUnlbBm/d+sHHOGTN5xrv5dr5Npvoh/96Ec/+tGPfvSjH/3oR79OP74WQRDl HulnaSHC8KoMz8rwrgwPy/CyTp06Zfpahs917Ngx2b9/v1RUVMjRo0e1z301 cu23wv7e7/xh+6moz49+9KMf/ehHP/rRj370o7889ONrEQRR7uH2rIw6DE/L 8KoMz8rwrgwPy/Cy/j9skkPr "], {{0, 1044}, {1206, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{389.76171875, Automatic}, ImageSizeRaw->{1206, 1044}, PlotRange->{{0, 1206}, {0, 1044}}]], "Print", TaggingRules->{}, GraphicsBoxOptions->{ImageSize->225}, CellID->757996778] }, Open ]], Cell["The auto-generated output files:", "Text", CellChangeTimes->{{3.7734178352993727`*^9, 3.773417850090559*^9}, { 3.773418804774487*^9, 3.773418808764525*^9}}, CellID->644936672], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"files", "=", RowBox[{"FileNames", "[", RowBox[{"\"\\"", ",", "$TemporaryDirectory"}], "]"}]}]], "Input", CellChangeTimes->{{3.773417852851303*^9, 3.773417898367087*^9}, { 3.773417966939502*^9, 3.773417970754127*^9}}, CellLabel->"In[550]:=", CellID->783633842], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"/private/var/folders/0m/xs08c2td1y38x1hxbb6qm4w80000gn/T/\ documentPrompter-600x500.nb\"\>", ",", "\<\"/private/var/folders/0m/xs08c2td1y38x1hxbb6qm4w80000gn/T/\ documentPrompter.pdf\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.773417899467408*^9, {3.773417946405634*^9, 3.77341797167581*^9}, 3.7734203042227*^9, 3.773425913500964*^9, 3.773425966322321*^9, 3.77342607555011*^9}, CellLabel->"Out[550]=", CellID->355183235] }, Open ]], Cell["\<\ Open the output PDF file in the default PDF viewer on your system:\ \>", "Text", CellChangeTimes->{{3.773417702727846*^9, 3.7734177512014713`*^9}, { 3.7734179878010893`*^9, 3.773417988720397*^9}}, CellID->437691262], Cell[BoxData[ RowBox[{"SystemOpen", "[", RowBox[{"Last", "[", "files", "]"}], "]"}]], "Input", CellChangeTimes->{{3.773417755145218*^9, 3.773417772672624*^9}, { 3.7734180101351624`*^9, 3.77341802114174*^9}}, CellLabel->"In[551]:=", CellID->320841594], Cell["\<\ Clean up by closing the prompter notebook and deleting the temporary files:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.773418105071897*^9, 3.773418128126252*^9}, { 3.773426001906764*^9, 3.7734260139687347`*^9}, {3.773426246305943*^9, 3.7734262470480337`*^9}, 3.77823388907282*^9, 3.778405240079883*^9}, CellID->408622710], Cell[BoxData[ RowBox[{"NotebookClose", "[", "nb", "]"}]], "Input", CellChangeTimes->{{3.773426020203739*^9, 3.773426035761115*^9}}, CellLabel->"In[552]:=", CellID->942238498], Cell[BoxData[ RowBox[{"DeleteFile", "[", RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"file", ",", "files"}], "}"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.773417907100926*^9, 3.7734179194371023`*^9}, { 3.773418233762816*^9, 3.7734182588183527`*^9}}, CellLabel->"In[553]:=", CellID->363927471] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Source & Additional Information", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source & Additional Information"}, CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[TextData[{ "Contributed By", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Contributed By", Cell[ BoxData[ FrameBox[ Cell[ "Enter the name of the person, people or organization that should be \ publicly credited with contributing this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoContributedBy"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Contributed By"}, DefaultNewCellStyle->"Text", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell["Wolfram Staff", "Text", CellID->95771488] }, 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["talk", "Item", CellID->214830532], Cell["presentation", "Item", CellID->252200675], Cell["slideshow", "Item", CellID->578428608], Cell["prompter", "Item", CellID->536571779] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Categories"}, DefaultNewCellStyle->"Item", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "3D Visualization"}], "\" \"", "\"3D Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Accessibility"}], "\" \"", "\"Accessibility\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Accessing External Services & APIs"}], "\" \"", "\"Accessing External Services & APIs\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Associations"}], "\" \"", "\"Associations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Astronomical Computation & Data"}], "\" \"", "\"Astronomical Computation & Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Background & Scheduled Tasks"}], "\" \"", "\"Background & Scheduled Tasks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Calculus"}], "\" \"", "\"Calculus\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Calling External Programs"}], "\" \"", "\"Calling External Programs\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Functions & Deployment"}], "\" \"", "\"Cloud Functions & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Code as Data"}], "\" \"", "\"Code as Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Color Processing"}], "\" \"", "\"Color Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computational Geometry"}], "\" \"", "\"Computational Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computation on Graphs"}], "\" \"", "\"Computation on Graphs\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Computer Vision"}], "\" \"", "\"Computer Vision\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Control Objects"}], "\" \"", "\"Control Objects\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Core Language & Structure"}], "\" \"", "\"Core Language & Structure\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Creating Form Interfaces & Apps"}], "\" \"", "\"Creating Form Interfaces & Apps\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cryptography"}], "\" \"", "\"Cryptography\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cultural Data"}], "\" \"", "\"Cultural Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Structures"}], "\" \"", "\"Data Structures\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Transforms and Smoothing"}], "\" \"", "\"Data Transforms and Smoothing\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Visualization"}], "\" \"", "\"Data Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Date & Time"}], "\" \"", "\"Date & Time\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Decorations"}], "\" \"", "\"Decorations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Differential Geometry"}], "\" \"", "\"Differential Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Dimension Reduction"}], "\" \"", "\"Dimension Reduction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Discrete Mathematics"}], "\" \"", "\"Discrete Mathematics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Dynamic Interactivity Language"}], "\" \"", "\"Dynamic Interactivity Language\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Error Handling"}], "\" \"", "\"Error Handling\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Expressions"}], "\" \"", "\"Expressions\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Interfaces & Connections"}], "\" \"", "\"External Interfaces & Connections\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Language Interfaces"}], "\" \"", "\"External Language Interfaces\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "File Operations"}], "\" \"", "\"File Operations\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox["Front End Utilities", {False, "Front End Utilities"}], "\" \"", "\"Front End Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Functional Programming"}], "\" \"", "\"Functional Programming\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Function Visualization"}], "\" \"", "\"Function Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Games"}], "\" \"", "\"Games\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data and Entities"}], "\" \"", "\"Geographic Data and Entities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data & Computation"}], "\" \"", "\"Geographic Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Visualization"}], "\" \"", "\"Geographic Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometric Region Properties"}], "\" \"", "\"Geometric Region Properties\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometric Transforms"}], "\" \"", "\"Geometric Transforms\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometry"}], "\" \"", "\"Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Construction & Representation"}], "\" \"", "\"Graph Construction & Representation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Properties & Measurements"}], "\" \"", "\"Graph Properties & Measurements\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graph Visualization"}], "\" \"", "\"Graph Visualization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Handling Arrays of Data"}], "\" \"", "\"Handling Arrays of Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Higher Mathematical Computation"}], "\" \"", "\"Higher Mathematical Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Image Filtering & Neighborhood Processing"}], "\" \"", "\"Image Filtering & Neighborhood Processing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Image Processing & Analysis"}], "\" \"", "\"Image Processing & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Importing and Exporting"}], "\" \"", "\"Importing and Exporting\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Interactive Manipulation"}], "\" \"", "\"Interactive Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Iterated Maps & Fractals"}], "\" \"", "\"Iterated Maps & Fractals\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Just For Fun"}], "\" \"", "\"Just For Fun\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Knowledge Representation & Natural Language"}], "\" \"", "\"Knowledge Representation & Natural Language\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Layout & Tables"}], "\" \"", "\"Layout & Tables\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Life Sciences & Medicine: Data & Computation"}], "\" \"", "\"Life Sciences & Medicine: Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Linguistic Data"}], "\" \"", "\"Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "List Manipulation"}], "\" \"", "\"List Manipulation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Logic & Boolean Algebra"}], "\" \"", "\"Logic & Boolean Algebra\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Low-Level Notebook Programming", { 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["Notebook Basics", {False, "Notebook Basics"}], "\" \"", "\"Notebook Basics\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ "Notebook Document Generation", { False, "Notebook Document Generation"}], "\" \"", "\"Notebook Document Generation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Notebook Documents & Presentation", { False, "Notebook Documents & Presentation"}], "\" \"", "\"Notebook Documents & Presentation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Formatting & Styling"}], "\" \"", "\"Notebook Formatting & Styling\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Number Theory"}], "\" \"", "\"Number Theory\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Numeric Approximation"}], "\" \"", "\"Numeric Approximation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Optimization"}], "\" \"", "\"Optimization\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Computing"}], "\" \"", "\"Parallel Computing\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[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[ "User Interface Construction", { 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" -> "OEM6eJxlkN1KAzEQhUFs3YrohZeKxBvv9iHW/kihWOnYB0jT0zU0myyZibJvb7aVong1w5z5+\ c5URUkDks6BhsskbZKSLsYfMHtsd0M+X1gWup3F4EVN/VatxTorFkwPi/\ BVLvAJp16DYBPCXr3FUEfdNNbXdHOqPmu2hun+VJgEkxrkjS/\ wiFps8PT4T2X1lBeCc3psuVszopp7QdxpAzUOniUm04vZxVzQMI+\ qJKHJA6akIvO0iNLR5VgL6hAzePa3bPsR3p0d/fVxlRy4mG6t6E3OBjPtGCdhNIHDb6V/\ UnCp8X8PXh/g2ogf4lHlO0obRv7q1QocUjR471pQMUv+AP4NieeJGw=="}, CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->793652481] }, 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["CreateNotebook", "Item", CellID->209786771] }, 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["Resource Name (resources from any Wolfram repository)", "Item", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->873143661] }, 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->"ToPrompterNotebook | 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.859308176240284`16.339084448710036*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}, "DefaultContentMethod" -> "Legacy"}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.859308176290582`16.339084448715695*^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[634, 23, 101, 2, 70, "Title",ExpressionUUID->"c1738715-421d-4792-a14a-eed0b003720b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->282550582]}, "TemplateCell"->{ Cell[634, 23, 101, 2, 70, "Title",ExpressionUUID->"c1738715-421d-4792-a14a-eed0b003720b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->282550582], Cell[738, 27, 124, 2, 70, "Text",ExpressionUUID->"248f6582-1569-46da-862e-aae3fb6c2d12", CellTags->{"Description", "TemplateCell"}, CellID->408261290]}, "Title"->{ Cell[634, 23, 101, 2, 70, "Title",ExpressionUUID->"c1738715-421d-4792-a14a-eed0b003720b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->282550582]}, "Description"->{ Cell[738, 27, 124, 2, 70, "Text",ExpressionUUID->"248f6582-1569-46da-862e-aae3fb6c2d12", CellTags->{"Description", "TemplateCell"}, CellID->408261290]}, "Definition"->{ Cell[887, 33, 1206, 29, 70, "Section",ExpressionUUID->"44d6c844-21c8-4901-b15b-aa92de52be30", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "Function"->{ Cell[887, 33, 1206, 29, 70, "Section",ExpressionUUID->"44d6c844-21c8-4901-b15b-aa92de52be30", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "TemplateCellGroup"->{ Cell[887, 33, 1206, 29, 70, "Section",ExpressionUUID->"44d6c844-21c8-4901-b15b-aa92de52be30", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[50238, 1076, 1980, 50, 70, "Subsection",ExpressionUUID->"aa00fee0-7244-41b7-b095-25025292bfcf", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[53099, 1163, 1429, 32, 70, "Subsection",ExpressionUUID->"5cbcbce2-460d-402c-b012-d2f2db677c9d", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[55237, 1225, 7029, 152, 70, "Section",ExpressionUUID->"160107cb-b403-42fb-b3be-ed090b4deb87", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[126778, 2512, 1026, 26, 70, "Subsection",ExpressionUUID->"45a8545a-a063-42ea-8919-1b5c06907485", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[127892, 2546, 996, 26, 70, "Subsection",ExpressionUUID->"7c8c4289-9baa-451f-b324-30fd68390669", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[129114, 2589, 221, 6, 70, "Subsection",ExpressionUUID->"e52699e6-40f3-4313-a0f1-007f6bbe7ab4", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[158292, 3583, 980, 26, 70, "Subsection",ExpressionUUID->"3344258f-a616-40a4-be28-d0b2800bba4d", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[159362, 3617, 1039, 26, 70, "Subsection",ExpressionUUID->"828339c7-ba26-4749-9ecf-4c0c94c5b219", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[160969, 3658, 1084, 26, 70, "Subsection",ExpressionUUID->"a2685874-16be-44a2-8075-367ab722f987", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[162609, 3699, 923, 26, 70, "Subsection",ExpressionUUID->"789502e9-7f33-46c5-a961-f2aabac95bad", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[164077, 3740, 1874, 45, 70, "Subsection",ExpressionUUID->"e1cd80ae-fba0-46da-9f05-ed29726f465f", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[166308, 3806, 955, 25, 70, "Subsection",ExpressionUUID->"3e3db948-a2fb-40c4-bc46-937d7a92408c", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[167288, 3835, 1174, 31, 70, "Subsubsection",ExpressionUUID->"b830e10a-1aa6-49cd-8b0b-8aa82d4c9df6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[168591, 3875, 1113, 29, 70, "Subsubsection",ExpressionUUID->"cc9227e6-6fd6-4088-b87b-9872bb743ccf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[171065, 3951, 1280, 33, 70, "Subsubsection",ExpressionUUID->"f351aeef-b419-44bb-82ff-1812e2383063", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[173750, 4032, 1913, 46, 70, "Subsubsection",ExpressionUUID->"d43ac133-01b2-4f8e-a03d-dcb40587aecf", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[178599, 4168, 1071, 27, 70, "Subsubsection",ExpressionUUID->"34752ce6-16b2-4f13-87bf-fd48873e163d", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[180672, 4232, 1155, 28, 70, "Section",ExpressionUUID->"9624286a-8398-40a3-b180-f8c6d079c6a0", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[182396, 4275, 1033, 26, 70, "Section",ExpressionUUID->"798410f2-c48a-484d-847c-e56d4ab8b5ab", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]}, "Documentation"->{ Cell[50018, 1067, 195, 5, 70, "Section",ExpressionUUID->"5814d041-ed7f-4f6c-98ec-0afd679e03e9", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307]}, "TemplateSection"->{ Cell[50018, 1067, 195, 5, 70, "Section",ExpressionUUID->"5814d041-ed7f-4f6c-98ec-0afd679e03e9", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[126504, 2503, 249, 5, 70, "Section",ExpressionUUID->"2ec5ef8f-8153-4cd9-836d-980b9e6c306d", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Usage"->{ Cell[50238, 1076, 1980, 50, 70, "Subsection",ExpressionUUID->"aa00fee0-7244-41b7-b095-25025292bfcf", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310]}, "Details & Options"->{ Cell[53099, 1163, 1429, 32, 70, "Subsection",ExpressionUUID->"5cbcbce2-460d-402c-b012-d2f2db677c9d", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Notes"->{ Cell[53099, 1163, 1429, 32, 70, "Subsection",ExpressionUUID->"5cbcbce2-460d-402c-b012-d2f2db677c9d", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "TabNext"->{ Cell[54531, 1197, 263, 7, 70, "Notes",ExpressionUUID->"90b341ee-9bfe-40dd-b0a6-709dfde912d9", CellTags->"TabNext", CellID->817001668], Cell[55051, 1215, 137, 4, 70, "Notes",ExpressionUUID->"0cea8c8e-b82c-4c9f-be1f-ddcc324927a7", CellTags->"TabNext", CellID->255029330], Cell[160404, 3645, 528, 8, 70, "Item",ExpressionUUID->"c90c5c29-41c6-48dd-acff-73db62b246f2", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661], Cell[162056, 3686, 516, 8, 70, "Text",ExpressionUUID->"4ed07842-23aa-4724-885f-ab3966efd6c0", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[163535, 3727, 505, 8, 70, "Item",ExpressionUUID->"c5b876c0-3a5a-4315-8ce0-fc6e086289da", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746], Cell[181830, 4262, 529, 8, 70, "Text",ExpressionUUID->"79be29b3-e05f-405a-9169-0af43d2f4de8", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[183432, 4303, 515, 8, 70, "Text",ExpressionUUID->"53055c67-2905-4dbc-8434-1ab5c3f57630", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Examples"->{ Cell[55237, 1225, 7029, 152, 70, "Section",ExpressionUUID->"160107cb-b403-42fb-b3be-ed090b4deb87", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011]}, "Source & Additional Information"->{ Cell[126504, 2503, 249, 5, 70, "Section",ExpressionUUID->"2ec5ef8f-8153-4cd9-836d-980b9e6c306d", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Contributed By"->{ Cell[126778, 2512, 1026, 26, 70, "Subsection",ExpressionUUID->"45a8545a-a063-42ea-8919-1b5c06907485", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "ContributorInformation"->{ Cell[126778, 2512, 1026, 26, 70, "Subsection",ExpressionUUID->"45a8545a-a063-42ea-8919-1b5c06907485", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "Keywords"->{ Cell[127892, 2546, 996, 26, 70, "Subsection",ExpressionUUID->"7c8c4289-9baa-451f-b324-30fd68390669", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425]}, "Categories"->{ Cell[129114, 2589, 221, 6, 70, "Subsection",ExpressionUUID->"e52699e6-40f3-4313-a0f1-007f6bbe7ab4", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[129338, 2597, 28917, 981, 70, "Output",ExpressionUUID->"528431fa-5572-4574-8b02-22d3dae27468", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->793652481]}, "Categories-Checkboxes"->{ Cell[129338, 2597, 28917, 981, 70, "Output",ExpressionUUID->"528431fa-5572-4574-8b02-22d3dae27468", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->793652481]}, "CheckboxCell"->{ Cell[129338, 2597, 28917, 981, 70, "Output",ExpressionUUID->"528431fa-5572-4574-8b02-22d3dae27468", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->793652481], Cell[169707, 3906, 1321, 40, 70, "Output",ExpressionUUID->"8c6852a0-ffef-4d1a-8dc5-60e0b075606d", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524], Cell[172348, 3986, 1365, 41, 70, "Output",ExpressionUUID->"115fd754-b177-48d2-b8d8-d7b5f9819bb5", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059], Cell[175666, 4080, 2896, 83, 70, "Output",ExpressionUUID->"a8fcdd48-85b5-473d-af47-67b8e5f045dd", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308], Cell[179673, 4197, 938, 28, 70, "Output",ExpressionUUID->"91775bc9-bdde-49d9-afef-0a99d4499fe2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Related Symbols"->{ Cell[158292, 3583, 980, 26, 70, "Subsection",ExpressionUUID->"3344258f-a616-40a4-be28-d0b2800bba4d", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169]}, "Related Resource Objects"->{ Cell[159362, 3617, 1039, 26, 70, "Subsection",ExpressionUUID->"828339c7-ba26-4749-9ecf-4c0c94c5b219", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472]}, "DefaultContent"->{ Cell[160404, 3645, 528, 8, 70, "Item",ExpressionUUID->"c90c5c29-41c6-48dd-acff-73db62b246f2", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661], Cell[162056, 3686, 516, 8, 70, "Text",ExpressionUUID->"4ed07842-23aa-4724-885f-ab3966efd6c0", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[163535, 3727, 505, 8, 70, "Item",ExpressionUUID->"c5b876c0-3a5a-4315-8ce0-fc6e086289da", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746], Cell[165976, 3789, 158, 5, 70, "Input",ExpressionUUID->"8dc217d2-01a2-467c-961f-622cb9bac702", CellTags->"DefaultContent", CellID->946203791], Cell[166137, 3796, 122, 4, 70, "Output",ExpressionUUID->"408f6eff-d737-4864-af90-42e4de1aab30", CellTags->"DefaultContent", CellID->168370258], Cell[168465, 3868, 89, 2, 70, "Text",ExpressionUUID->"6673cadb-9348-4614-b598-1e71637d05ea", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768], Cell[181830, 4262, 529, 8, 70, "Text",ExpressionUUID->"79be29b3-e05f-405a-9169-0af43d2f4de8", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[183432, 4303, 515, 8, 70, "Text",ExpressionUUID->"53055c67-2905-4dbc-8434-1ab5c3f57630", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Source/Reference Citation"->{ Cell[160969, 3658, 1084, 26, 70, "Subsection",ExpressionUUID->"a2685874-16be-44a2-8075-367ab722f987", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552]}, "Links"->{ Cell[162609, 3699, 923, 26, 70, "Subsection",ExpressionUUID->"789502e9-7f33-46c5-a961-f2aabac95bad", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773]}, "Tests"->{ Cell[164077, 3740, 1874, 45, 70, "Subsection",ExpressionUUID->"e1cd80ae-fba0-46da-9f05-ed29726f465f", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "VerificationTests"->{ Cell[164077, 3740, 1874, 45, 70, "Subsection",ExpressionUUID->"e1cd80ae-fba0-46da-9f05-ed29726f465f", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "Compatibility"->{ Cell[166308, 3806, 955, 25, 70, "Subsection",ExpressionUUID->"3e3db948-a2fb-40c4-bc46-937d7a92408c", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822]}, "CompatibilityWolframLanguageVersionRequired"->{ Cell[167288, 3835, 1174, 31, 70, "Subsubsection",ExpressionUUID->"b830e10a-1aa6-49cd-8b0b-8aa82d4c9df6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "Wolfram Language Version"->{ Cell[167288, 3835, 1174, 31, 70, "Subsubsection",ExpressionUUID->"b830e10a-1aa6-49cd-8b0b-8aa82d4c9df6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "ScrapeDefault"->{ Cell[168465, 3868, 89, 2, 70, "Text",ExpressionUUID->"6673cadb-9348-4614-b598-1e71637d05ea", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768]}, "CompatibilityOperatingSystem"->{ Cell[168591, 3875, 1113, 29, 70, "Subsubsection",ExpressionUUID->"cc9227e6-6fd6-4088-b87b-9872bb743ccf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[169707, 3906, 1321, 40, 70, "Output",ExpressionUUID->"8c6852a0-ffef-4d1a-8dc5-60e0b075606d", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "Operating System"->{ Cell[168591, 3875, 1113, 29, 70, "Subsubsection",ExpressionUUID->"cc9227e6-6fd6-4088-b87b-9872bb743ccf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406]}, "CompatibilityOperatingSystem-Checkboxes"->{ Cell[169707, 3906, 1321, 40, 70, "Output",ExpressionUUID->"8c6852a0-ffef-4d1a-8dc5-60e0b075606d", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524]}, "CompatibilityFeatures"->{ Cell[171065, 3951, 1280, 33, 70, "Subsubsection",ExpressionUUID->"f351aeef-b419-44bb-82ff-1812e2383063", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[172348, 3986, 1365, 41, 70, "Output",ExpressionUUID->"115fd754-b177-48d2-b8d8-d7b5f9819bb5", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "Required Features"->{ Cell[171065, 3951, 1280, 33, 70, "Subsubsection",ExpressionUUID->"f351aeef-b419-44bb-82ff-1812e2383063", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156]}, "CompatibilityFeatures-Checkboxes"->{ Cell[172348, 3986, 1365, 41, 70, "Output",ExpressionUUID->"115fd754-b177-48d2-b8d8-d7b5f9819bb5", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059]}, "CompatibilityEvaluationEnvironment"->{ Cell[173750, 4032, 1913, 46, 70, "Subsubsection",ExpressionUUID->"d43ac133-01b2-4f8e-a03d-dcb40587aecf", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[175666, 4080, 2896, 83, 70, "Output",ExpressionUUID->"a8fcdd48-85b5-473d-af47-67b8e5f045dd", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Environments"->{ Cell[173750, 4032, 1913, 46, 70, "Subsubsection",ExpressionUUID->"d43ac133-01b2-4f8e-a03d-dcb40587aecf", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563]}, "CompatibilityEvaluationEnvironment-Checkboxes"->{ Cell[175666, 4080, 2896, 83, 70, "Output",ExpressionUUID->"a8fcdd48-85b5-473d-af47-67b8e5f045dd", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308]}, "Cloud Support"->{ Cell[178599, 4168, 1071, 27, 70, "Subsubsection",ExpressionUUID->"34752ce6-16b2-4f13-87bf-fd48873e163d", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371]}, "CompatibilityCloudSupport"->{ Cell[178599, 4168, 1071, 27, 70, "Subsubsection",ExpressionUUID->"34752ce6-16b2-4f13-87bf-fd48873e163d", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[179673, 4197, 938, 28, 70, "Output",ExpressionUUID->"91775bc9-bdde-49d9-afef-0a99d4499fe2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "CompatibilityCloudSupport-Checkboxes"->{ Cell[179673, 4197, 938, 28, 70, "Output",ExpressionUUID->"91775bc9-bdde-49d9-afef-0a99d4499fe2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203]}, "Author Notes"->{ Cell[180672, 4232, 1155, 28, 70, "Section",ExpressionUUID->"9624286a-8398-40a3-b180-f8c6d079c6a0", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591]}, "Submission Notes"->{ Cell[182396, 4275, 1033, 26, 70, "Section",ExpressionUUID->"798410f2-c48a-484d-847c-e56d4ab8b5ab", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 307364, 6654}, {"TemplateCell", 307547, 6658}, {"Title", 307883, 6665}, {"Description", 308065, 6669}, {"Definition", 308243, 6673}, {"Function", 308439, 6677}, {"TemplateCellGroup", 308644, 6681}, {"Documentation", 312501, 6742}, {"TemplateSection", 312696, 6746}, {"Usage", 313072, 6753}, {"Details & Options", 313268, 6757}, {"Notes", 313473, 6761}, {"TabNext", 313680, 6765}, {"Examples", 314797, 6787}, {"Source & Additional Information", 315008, 6791}, {"Contributed By", 315221, 6795}, {"ContributorInformation", 315457, 6799}, {"Keywords", 315679, 6803}, {"Categories", 315871, 6807}, {"Categories-Checkboxes", 316270, 6814}, {"CheckboxCell", 316485, 6818}, {"Related Symbols", 317608, 6834}, {"Related Resource Objects", 317821, 6838}, {"DefaultContent", 318034, 6842}, {"Source/Reference Citation", 319353, 6867}, {"Links", 319558, 6871}, {"Tests", 319742, 6875}, {"VerificationTests", 319960, 6879}, {"Compatibility", 320174, 6883}, {"CompatibilityWolframLanguageVersionRequired", 320404, 6887}, {"Wolfram Language Version", 320677, 6891}, {"ScrapeDefault", 320939, 6895}, {"CompatibilityOperatingSystem", 321143, 6899}, {"Operating System", 321613, 6906}, {"CompatibilityOperatingSystem-Checkboxes", 321878, 6910}, {"CompatibilityFeatures", 322135, 6914}, {"Required Features", 322587, 6921}, {"CompatibilityFeatures-Checkboxes", 322839, 6925}, {"CompatibilityEvaluationEnvironment", 323096, 6929}, {"Environments", 323576, 6936}, {"CompatibilityEvaluationEnvironment-Checkboxes", 323849, 6940}, {"Cloud Support", 324110, 6944}, {"CompatibilityCloudSupport", 324355, 6948}, {"CompatibilityCloudSupport-Checkboxes", 324833, 6955}, {"Author Notes", 325075, 6959}, {"Submission Notes", 325275, 6963} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[634, 23, 101, 2, 70, "Title",ExpressionUUID->"c1738715-421d-4792-a14a-eed0b003720b", CellTags->{"Name", "TemplateCell", "Title"}, CellID->282550582], Cell[738, 27, 124, 2, 70, "Text",ExpressionUUID->"248f6582-1569-46da-862e-aae3fb6c2d12", CellTags->{"Description", "TemplateCell"}, CellID->408261290], Cell[CellGroupData[{ Cell[887, 33, 1206, 29, 70, "Section",ExpressionUUID->"44d6c844-21c8-4901-b15b-aa92de52be30", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[2096, 64, 47885, 998, 70, "Input",ExpressionUUID->"0ce1f68e-6a36-4641-994a-3f0d06e9469d", InitializationCell->True, CellID->806649043] }, Open ]], Cell[CellGroupData[{ Cell[50018, 1067, 195, 5, 70, "Section",ExpressionUUID->"5814d041-ed7f-4f6c-98ec-0afd679e03e9", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[50238, 1076, 1980, 50, 70, "Subsection",ExpressionUUID->"aa00fee0-7244-41b7-b095-25025292bfcf", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[52243, 1130, 324, 10, 70, "UsageInputs",ExpressionUUID->"56391acc-8b1c-481d-adda-b235e2ae6bc5", CellID->910678914], Cell[52570, 1142, 480, 15, 70, "UsageDescription",ExpressionUUID->"dc0be6bd-4dd9-414f-aff0-c38fafb19567", CellID->207436913] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[53099, 1163, 1429, 32, 70, "Subsection",ExpressionUUID->"5cbcbce2-460d-402c-b012-d2f2db677c9d", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[54531, 1197, 263, 7, 70, "Notes",ExpressionUUID->"90b341ee-9bfe-40dd-b0a6-709dfde912d9", CellTags->"TabNext", CellID->817001668], Cell[54797, 1206, 251, 7, 70, "Notes",ExpressionUUID->"261e909e-e534-46ab-a808-539cb0f2a5a5", CellID->310159459], Cell[55051, 1215, 137, 4, 70, "Notes",ExpressionUUID->"0cea8c8e-b82c-4c9f-be1f-ddcc324927a7", CellTags->"TabNext", CellID->255029330] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[55237, 1225, 7029, 152, 70, "Section",ExpressionUUID->"160107cb-b403-42fb-b3be-ed090b4deb87", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell[62291, 1381, 56, 1, 70, "Subsection",ExpressionUUID->"4d227205-ee5b-4eeb-ae42-e15605bb80ac", CellID->462042388], Cell[62350, 1384, 464, 8, 70, "Text",ExpressionUUID->"0dc536d4-67ac-4d04-9923-992b9655cad2", CellID->147530393], Cell[62817, 1394, 722, 18, 70, "Input",ExpressionUUID->"1b48f27a-f391-46a1-8567-9002e128184c", CellID->908698068], Cell[CellGroupData[{ Cell[63564, 1416, 549, 12, 70, "Input",ExpressionUUID->"ce93c724-7a42-4c2d-bcf5-51d94dafb4f6", CellID->393813471], Cell[64116, 1430, 528, 13, 70, "Output",ExpressionUUID->"ee9d5b9a-3eaa-4fad-9a83-5c129ba63a5a", CellID->386345978], Cell[64647, 1445, 59416, 980, 70, "Print",ExpressionUUID->"789784b6-9381-4eb0-b93b-459ca6318f1e", CellID->757996778] }, Open ]], Cell[124078, 2428, 185, 3, 70, "Text",ExpressionUUID->"a4b16f2a-8efd-405a-ab48-154664dd3fe3", CellID->644936672], Cell[CellGroupData[{ Cell[124288, 2435, 319, 8, 70, "Input",ExpressionUUID->"996aeef9-b2c4-4076-a159-780399ab6519", CellID->783633842], Cell[124610, 2445, 484, 11, 70, "Output",ExpressionUUID->"1b10f348-560e-43ac-9f47-df731187eec8", CellID->355183235] }, Open ]], Cell[125109, 2459, 229, 5, 70, "Text",ExpressionUUID->"09b1da67-af7f-4433-9fd0-b0c35a67e7bf", CellID->437691262], Cell[125341, 2466, 259, 6, 70, "Input",ExpressionUUID->"d77f2802-f9bb-45a1-af15-4104530e1faa", CellID->320841594], Cell[125603, 2474, 351, 7, 70, "Text",ExpressionUUID->"166ac4ae-cb99-429f-b80a-d537a85eed93", CellID->408622710], Cell[125957, 2483, 178, 4, 70, "Input",ExpressionUUID->"f10d8d0c-1c57-46e6-adf3-3074e2ce66c8", CellID->942238498], Cell[126138, 2489, 317, 8, 70, "Input",ExpressionUUID->"3e490301-3fc3-4f79-a7b1-87f5eb987e6c", CellID->363927471] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[126504, 2503, 249, 5, 70, "Section",ExpressionUUID->"2ec5ef8f-8153-4cd9-836d-980b9e6c306d", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[126778, 2512, 1026, 26, 70, "Subsection",ExpressionUUID->"45a8545a-a063-42ea-8919-1b5c06907485", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[127807, 2540, 48, 1, 70, "Text",ExpressionUUID->"37cf992c-0099-4498-b6a3-b5656364ddc9", CellID->95771488] }, Open ]], Cell[CellGroupData[{ Cell[127892, 2546, 996, 26, 70, "Subsection",ExpressionUUID->"7c8c4289-9baa-451f-b324-30fd68390669", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[128891, 2574, 40, 1, 70, "Item",ExpressionUUID->"99a79232-b262-46cf-9756-c37387fc1225", CellID->214830532], Cell[128934, 2577, 48, 1, 70, "Item",ExpressionUUID->"d12465d1-9ce8-4886-9d57-705825a5b7ea", CellID->252200675], Cell[128985, 2580, 45, 1, 70, "Item",ExpressionUUID->"88715193-5253-41e7-b611-c7814230becd", CellID->578428608], Cell[129033, 2583, 44, 1, 70, "Item",ExpressionUUID->"35855a5c-9a93-45f4-8158-f8b8f53b9447", CellID->536571779] }, Open ]], Cell[CellGroupData[{ Cell[129114, 2589, 221, 6, 70, "Subsection",ExpressionUUID->"e52699e6-40f3-4313-a0f1-007f6bbe7ab4", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[129338, 2597, 28917, 981, 70, "Output",ExpressionUUID->"528431fa-5572-4574-8b02-22d3dae27468", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->793652481] }, Open ]], Cell[CellGroupData[{ Cell[158292, 3583, 980, 26, 70, "Subsection",ExpressionUUID->"3344258f-a616-40a4-be28-d0b2800bba4d", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[159275, 3611, 50, 1, 70, "Item",ExpressionUUID->"d1844928-2494-473c-be0b-af9ecbb971a9", CellID->209786771] }, Open ]], Cell[CellGroupData[{ Cell[159362, 3617, 1039, 26, 70, "Subsection",ExpressionUUID->"828339c7-ba26-4749-9ecf-4c0c94c5b219", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[160404, 3645, 528, 8, 70, "Item",ExpressionUUID->"c90c5c29-41c6-48dd-acff-73db62b246f2", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661] }, Open ]], Cell[CellGroupData[{ Cell[160969, 3658, 1084, 26, 70, "Subsection",ExpressionUUID->"a2685874-16be-44a2-8075-367ab722f987", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[162056, 3686, 516, 8, 70, "Text",ExpressionUUID->"4ed07842-23aa-4724-885f-ab3966efd6c0", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[162609, 3699, 923, 26, 70, "Subsection",ExpressionUUID->"789502e9-7f33-46c5-a961-f2aabac95bad", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[163535, 3727, 505, 8, 70, "Item",ExpressionUUID->"c5b876c0-3a5a-4315-8ce0-fc6e086289da", CellTags->{"DefaultContent", "TabNext"}, CellID->132505746] }, Open ]], Cell[CellGroupData[{ Cell[164077, 3740, 1874, 45, 70, "Subsection",ExpressionUUID->"e1cd80ae-fba0-46da-9f05-ed29726f465f", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[165976, 3789, 158, 5, 70, "Input",ExpressionUUID->"8dc217d2-01a2-467c-961f-622cb9bac702", CellTags->"DefaultContent", CellID->946203791], Cell[166137, 3796, 122, 4, 70, "Output",ExpressionUUID->"408f6eff-d737-4864-af90-42e4de1aab30", CellTags->"DefaultContent", CellID->168370258] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[166308, 3806, 955, 25, 70, "Subsection",ExpressionUUID->"3e3db948-a2fb-40c4-bc46-937d7a92408c", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[167288, 3835, 1174, 31, 70, "Subsubsection",ExpressionUUID->"b830e10a-1aa6-49cd-8b0b-8aa82d4c9df6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[168465, 3868, 89, 2, 70, "Text",ExpressionUUID->"6673cadb-9348-4614-b598-1e71637d05ea", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[168591, 3875, 1113, 29, 70, "Subsubsection",ExpressionUUID->"cc9227e6-6fd6-4088-b87b-9872bb743ccf", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[169707, 3906, 1321, 40, 70, "Output",ExpressionUUID->"8c6852a0-ffef-4d1a-8dc5-60e0b075606d", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->40078524] }, Closed]], Cell[CellGroupData[{ Cell[171065, 3951, 1280, 33, 70, "Subsubsection",ExpressionUUID->"f351aeef-b419-44bb-82ff-1812e2383063", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[172348, 3986, 1365, 41, 70, "Output",ExpressionUUID->"115fd754-b177-48d2-b8d8-d7b5f9819bb5", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->396992059] }, Closed]], Cell[CellGroupData[{ Cell[173750, 4032, 1913, 46, 70, "Subsubsection",ExpressionUUID->"d43ac133-01b2-4f8e-a03d-dcb40587aecf", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[175666, 4080, 2896, 83, 70, "Output",ExpressionUUID->"a8fcdd48-85b5-473d-af47-67b8e5f045dd", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->62394308] }, Closed]], Cell[CellGroupData[{ Cell[178599, 4168, 1071, 27, 70, "Subsubsection",ExpressionUUID->"34752ce6-16b2-4f13-87bf-fd48873e163d", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[179673, 4197, 938, 28, 70, "Output",ExpressionUUID->"91775bc9-bdde-49d9-afef-0a99d4499fe2", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->454919203] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[180672, 4232, 1155, 28, 70, "Section",ExpressionUUID->"9624286a-8398-40a3-b180-f8c6d079c6a0", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[181830, 4262, 529, 8, 70, "Text",ExpressionUUID->"79be29b3-e05f-405a-9169-0af43d2f4de8", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[182396, 4275, 1033, 26, 70, "Section",ExpressionUUID->"798410f2-c48a-484d-847c-e56d4ab8b5ab", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell[183432, 4303, 515, 8, 70, "Text",ExpressionUUID->"53055c67-2905-4dbc-8434-1ab5c3f57630", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)