(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 12.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 930749, 18710] NotebookOptionsPosition[ 793524, 16042] NotebookOutlinePosition[ 906914, 18215] CellTagsIndexPosition[ 905936, 18184] WindowTitle->PacletizeResourceFunction | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell["PacletizeResourceFunction", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->596409992], Cell["\<\ Convert a resource function into a paclet with local documentation\ \>", "Text", CellTags->{"Description", "TemplateCell"}, CellID->310250415], Cell[CellGroupData[{ Cell[TextData[{ "Definition", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Definition", 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoDefinition"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, DefaultNewCellStyle->"Input", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->858465241], Cell[CellGroupData[{ Cell["Utilities", "Subsection", TaggingRules->{}, CellChangeTimes->{{3.8138343004466047`*^9, 3.813834305611805*^9}}, CellLabel->"In[2]:=", CellID->997366146], Cell[BoxData[ RowBox[{ RowBox[{"AutoName", "[", "base_", "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"id", "=", "0"}], ",", "\[IndentingNewLine]", RowBox[{"installed", "=", RowBox[{"Through", "[", RowBox[{ RowBox[{"PacletFind", "[", RowBox[{"base", "<>", "\"\<*\>\""}], "]"}], "[", "\"\\"", "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"name", "=", "base"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"While", "[", RowBox[{"MemberQ", "[", RowBox[{"installed", ",", RowBox[{"name", "=", RowBox[{ RowBox[{"StringTemplate", "[", "\"\<````\>\"", "]"}], "[", RowBox[{"base", ",", RowBox[{"++", "id"}]}], "]"}]}]}], "]"}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "name"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{"AttachedInlineCell" -> CellObject[186465]}, CellChangeTimes->{{3.8138343069102707`*^9, 3.813834507862091*^9}, { 3.81383472913524*^9, 3.8138347312462196`*^9}, 3.8138464667501435`*^9, 3.81593843440886*^9}, CellID->163640191], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Attributes", "[", "MyHold", "]"}], "=", RowBox[{"{", "HoldAll", "}"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8144519906104474`*^9, 3.814452002265251*^9}}, CellLabel->"In[2]:=", CellID->81076531], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "fix", " ", "for", " ", "spurios", " ", "removed", " ", "symbols", " ", "in", " ", "the", " ", "documentation", " ", "notebooks", " ", RowBox[{"(", RowBox[{ "seems", " ", "to", " ", "happen", " ", "in", " ", "11.3", " ", "with", " ", "some", " ", "of", " ", "the", " ", "Cell", " ", "option", " ", "symbols"}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RestoreRemoved", "[", "expr_", "]"}], ":=", "\[IndentingNewLine]", RowBox[{ RowBox[{"expr", "/.", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"s", ":", RowBox[{"HoldPattern", "@", RowBox[{"Except", "[", RowBox[{ RowBox[{ RowBox[{"Symbol", "[", "___", "]"}], "|", "Internal`$EFAIL"}], ",", "_Symbol"}], "]"}]}]}], "/;", "\[IndentingNewLine]", RowBox[{"Internal`RemovedSymbolQ", "@", RowBox[{"Unevaluated", "@", "s"}]}]}], "\[RuleDelayed]", "\[IndentingNewLine]", RowBox[{"RuleCondition", "@", RowBox[{"ToExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Context", "@", "s"}], "<>", RowBox[{"SymbolName", "@", RowBox[{"Unevaluated", "@", "s"}]}]}], ",", "\[IndentingNewLine]", "InputForm", ",", "\[IndentingNewLine]", "MyHold"}], "\[IndentingNewLine]", "]"}]}]}]}], "/.", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"MyHold", "[", "x_", "]"}], "\[RuleDelayed]", "x"}], "}"}]}]}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8144519698378572`*^9, 3.814452074408314*^9}, { 3.814452113374798*^9, 3.8144521149047365`*^9}, {3.8144522081983647`*^9, 3.8144522512200394`*^9}, {3.814624316481859*^9, 3.8146243278536835`*^9}, { 3.8146243707955866`*^9, 3.8146243713155355`*^9}, {3.814624456179701*^9, 3.814624491625621*^9}}, CellLabel->"In[3]:=", CellID->38370286] }, Open ]], Cell[CellGroupData[{ Cell["Documentation utilities", "Subsection", TaggingRules->{}, CellChangeTimes->{{3.8120227428783255`*^9, 3.8120227522691603`*^9}, { 3.8120230276532907`*^9, 3.8120230384511395`*^9}}, CellLabel->"In[4]:=", CellID->162410456], Cell[BoxData[ RowBox[{ RowBox[{"fixNDI", "[", "]"}], ":=", RowBox[{"(", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ "DownValues", "[", "DocumentationSearch`NewDocumentationNotebookIndexer", "]"}], "=", RowBox[{ RowBox[{ "DownValues", "[", "DocumentationSearch`NewDocumentationNotebookIndexer", "]"}], "/.", RowBox[{ RowBox[{"HoldPattern", "@", RowBox[{"JLink`AddToClassPath", "[", "p_", "]"}]}], "\[RuleDelayed]", RowBox[{"JLink`AddToClassPath", "[", RowBox[{"p", ",", RowBox[{"Prepend", "\[Rule]", "True"}]}], "]"}]}]}]}], ";"}], "\[IndentingNewLine]", ")"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8090870076489096`*^9, 3.809087122024091*^9}, { 3.8090871526043415`*^9, 3.8090871554455976`*^9}, 3.8101228290134945`*^9, 3.810123608210802*^9, {3.8101237125860777`*^9, 3.8101237760984826`*^9}, { 3.810223522605892*^9, 3.8102235238478823`*^9}, {3.8102243335906515`*^9, 3.8102243346186695`*^9}, {3.810224441145228*^9, 3.8102244458803263`*^9}, { 3.8149798585606723`*^9, 3.814979862487295*^9}, {3.8149810188417573`*^9, 3.814981019703781*^9}}, CellLabel->"In[1]:=", CellID->657480657], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"PacletizeResourceFunction", "::", "indexFailed"}], "=", "\"\\""}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.814624852685087*^9, 3.814624895173869*^9}, 3.8146315077195377`*^9}, CellLabel->"In[2]:=", CellID->40725774], Cell[BoxData[ RowBox[{ RowBox[{"IndexDocumentation", "[", "dir_", "]"}], ":=", RowBox[{"Internal`InheritedBlock", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "DocumentationSearch`NewDocumentationNotebookIndexer", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"fixNDI", "[", "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"And", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"StringQ", "@", "DocumentationSearch`Private`$indexName"}], ",", "\[IndentingNewLine]", RowBox[{"MatchQ", "[", RowBox[{ RowBox[{"JLink`Package`getDefaultJVM", "[", "]"}], ",", "_JLink`JVM"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"MatchQ", "[", RowBox[{"JLink`Package`$currentClassPath", ",", RowBox[{"{", "___String", "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ "StringQ", "@", "DocumentationSearch`Private`$indexVersion"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResourceFunctionMessage", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResourceFunctionMessage", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{ LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"2.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/ResourceFunctionMessage"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "ResourceFunctionMessage"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction[ ResourceObject[ Association[ "Name" -> "ResourceFunctionMessage", "ShortName" -> "ResourceFunctionMessage", "UUID" -> "99f3bbb5-c9d2-4eaf-8c12-420ceb643e09", "ResourceType" -> "Function", "Version" -> "2.0.0", "Description" -> "Print a labeled message from ResourceFunction with contexts \ hidden", "RepositoryLocation" -> URL["https://www.wolframcloud.com/objects/resourcesystem/api/1.\ 0"], "SymbolName" -> "FunctionRepository`$f87e9220a85a49b3ad4ed8a02d934a48`\ ResourceFunctionMessage", "FunctionLocation" -> CloudObject[ "https://www.wolframcloud.com/objects/21023216-81de-4487-80a4-\ 0a264c4b217c"]], ResourceSystemBase -> Automatic]], Selectable->False], "[", RowBox[{"Unevaluated", "@", RowBox[{"PacletizeResourceFunction", "::", "indexFailed"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Return", "[", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"indexDirectory", "=", RowBox[{"FileNameJoin", "@", RowBox[{"{", RowBox[{ RowBox[{"Directory", "[", "]"}], ",", "dir", ",", "\"\\""}], "}"}]}]}], ",", RowBox[{"spellDirectory", "=", RowBox[{"FileNameJoin", "@", RowBox[{"{", RowBox[{ RowBox[{"Directory", "[", "]"}], ",", "dir", ",", "\"\\""}], "}"}]}]}], ",", RowBox[{"searchDirectory", "=", RowBox[{"FileNameJoin", "@", RowBox[{"{", RowBox[{ RowBox[{"Directory", "[", "]"}], ",", "dir", ",", "DocumentationSearch`Private`$indexName"}], "}"}]}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{"dirs", "=", RowBox[{"{", RowBox[{ "indexDirectory", ",", "spellDirectory", ",", "searchDirectory"}], "}"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"oldJVM", "=", RowBox[{"JLink`Package`getDefaultJVM", "[", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"oldCP", "=", RowBox[{"JLink`JavaClassPath", "[", "]"}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Internal`WithLocalSettings", "[", RowBox[{"(*", RowBox[{ RowBox[{ "use", " ", "separate", " ", "JVM", " ", "for", " ", "indexer"}], ",", RowBox[{ "as", " ", "old", " ", "lucene", " ", "library", " ", "breaks", " ", "help", " ", "center"}]}], "*)"}], RowBox[{ RowBox[{"JLink`InstallJava", "[", RowBox[{ RowBox[{"JLink`ForceLaunch", "\[Rule]", "True"}], ",", RowBox[{"Default", "\[Rule]", "True"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{"indexer", "=", RowBox[{ "DocumentationSearch`NewDocumentationNotebookIndexer", "@", "indexDirectory"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ "DocumentationSearch`AddDocumentationNotebook", "[", RowBox[{"indexer", ",", "#"}], "]"}], "&"}], "/@", RowBox[{"FileNames", "[", RowBox[{"\"\<*.nb\>\"", ",", "dir", ",", "\[Infinity]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ "DocumentationSearch`CloseDocumentationNotebookIndexer", "@", "indexer"}], ";", "\[IndentingNewLine]", RowBox[{"DocumentationSearch`CreateSpellIndex", "[", RowBox[{"indexDirectory", ",", "spellDirectory"}], "]"}], ";"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"JLink`UninstallJava", "[", "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "reset", " ", "classpath", " ", "to", " ", "ensure", " ", "new", " ", "lucene", " ", "is", " ", "found", " ", "on", " ", "new", " ", "JVMs"}], "*)"}], "\[IndentingNewLine]", RowBox[{"JLink`Package`$currentClassPath", "=", "oldCP"}], ";", "\[IndentingNewLine]", RowBox[{"JLink`Package`setDefaultJVM", "[", "oldJVM", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"CreateDirectory", "@", "searchDirectory"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"First", "[", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "get", " ", "the", " ", "JavaObject", " ", "of", " ", "the", " ", "newly", " ", "created", " ", "search", " ", "index", " ", "to", " ", "close", " ", "it"}], "*)"}], RowBox[{"TextSearch`PackageScope`createHandle", "[", RowBox[{"Quiet", "@", RowBox[{ "DocumentationSearch`CreateDocumentationIndex", "[", RowBox[{ "dir", ",", "searchDirectory", ",", "DocumentationSearch`Private`$indexVersion"}], "]"}]}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "]"}], "@", RowBox[{"close", "[", "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{"AttachedInlineCell" -> CellObject[31201]}, CellChangeTimes->{{3.8090870076489096`*^9, 3.809087122024091*^9}, { 3.8090871526043415`*^9, 3.8090871554455976`*^9}, 3.8101228290134945`*^9, 3.810123608210802*^9, {3.810123752952334*^9, 3.810123856921603*^9}, 3.8102171862545633`*^9, {3.814624553732857*^9, 3.814624575556863*^9}, 3.8146246286402564`*^9, {3.8146247396209793`*^9, 3.814624759460991*^9}, { 3.814624790663687*^9, 3.814624845132236*^9}, {3.8146249049238796`*^9, 3.814624966247274*^9}, {3.814631060874015*^9, 3.8146311453886385`*^9}, { 3.8146314262605624`*^9, 3.8146314275189223`*^9}, {3.8146316998492613`*^9, 3.814631728555724*^9}, {3.814631787207525*^9, 3.81463182218021*^9}, { 3.814631879982542*^9, 3.8146318810887747`*^9}, {3.814632124565563*^9, 3.814632136383889*^9}, {3.814636658029643*^9, 3.8146366626323647`*^9}, { 3.8146367973759756`*^9, 3.8146368017697563`*^9}, {3.814636867628211*^9, 3.8146368696252575`*^9}, {3.8146369099425373`*^9, 3.8146369338861427`*^9}, 3.8146371853180857`*^9, {3.8146372516009884`*^9, 3.8146372523849697`*^9}, { 3.8146372841422553`*^9, 3.8146372924503465`*^9}, {3.8146373334067535`*^9, 3.814637339334405*^9}, {3.814979864138419*^9, 3.814979865953947*^9}, 3.814980062662629*^9, {3.8149807492134223`*^9, 3.8149807904535356`*^9}, { 3.814980889240365*^9, 3.8149809121308155`*^9}, 3.81498094920973*^9, 3.814981000904643*^9}, CellLabel->"In[3]:=", CellID->780379110], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{ "maps", " ", "the", " ", "given", " ", "function", " ", "over", " ", "all", " ", "registered", " ", "instances", " ", "of", " ", "TextSearchIndex"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ApplyToTextSearchIndexInstances", "[", "func_", "]"}], ":=", "\[IndentingNewLine]", RowBox[{"JLink`JavaBlock", "[", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"first", ",", RowBox[{ "get", " ", "the", " ", "Class", " ", "object", " ", "for", " ", "the", " ", "TextSearchIndex", " ", "class"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "JLink`LoadJavaClass", "[", "\"\\"", "]"}], ";", "\[IndentingNewLine]", RowBox[{"indexClass", "=", RowBox[{ RowBox[{"Symbol", "[", "\"\\"", "]"}], "[", "\"\\"", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"get", " ", RowBox[{"java", ".", "lang", ".", "reflect", ".", "Field"}], " ", "references", " ", "to", " ", "the", " ", "private", " ", "fields", " ", "we", " ", "need", " ", "and", " ", "make", " ", "them", " ", "accessible"}], "*)"}], "\[IndentingNewLine]", RowBox[{"instances", "=", RowBox[{"indexClass", "@", RowBox[{"getDeclaredField", "[", "\"\\"", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"directories", "=", RowBox[{"indexClass", "@", RowBox[{"getDeclaredField", "[", "\"\\"", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"paths", "=", RowBox[{"indexClass", "@", RowBox[{"getDeclaredField", "[", "\"\\"", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ "Symbol", "[", "\"\\"", "]"}], "[", RowBox[{ RowBox[{"{", RowBox[{"instances", ",", "directories", ",", "paths"}], "}"}], ",", "True"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Map", "[", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "we", " ", "supply", " ", "the", " ", "function", " ", "with", " ", "the", " ", "object", " ", "and", " ", "the", " ", "value", " ", "of", " ", "the", " ", "two", " ", "private", " ", RowBox[{"files", "'"}], RowBox[{"directories", "'"}], " ", RowBox[{"and", "'"}], RowBox[{"paths", "'"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"func", "[", RowBox[{"#", ",", RowBox[{"directories", "@", RowBox[{"get", "[", "#", "]"}]}], ",", RowBox[{"paths", "@", RowBox[{"get", "[", "#", "]"}]}]}], "]"}], "&"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"get", " ", "the", " ", "instance", " ", "map", " ", RowBox[{"(", RowBox[{ RowBox[{"Map", "<", "Path"}], ",", RowBox[{ RowBox[{"WeakReference", "<", "TextSearchIndex"}], ">>"}]}], ")"}], " ", "and", " ", "get", " ", "the", " ", "dereferenced", " ", "values"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"#", "@", RowBox[{"get", "[", "]"}]}], "&"}], "/@", RowBox[{"JLink`JavaObjectToExpression", "@", RowBox[{"instances", "@", RowBox[{ RowBox[{"get", "[", "Null", "]"}], "@", RowBox[{"values", "[", "]"}]}]}]}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.810127969319699*^9, 3.8101279996712875`*^9}, { 3.8101280310454197`*^9, 3.810128038107797*^9}, {3.8101280711709824`*^9, 3.8101281195913258`*^9}, {3.8120309451633053`*^9, 3.812030950106311*^9}, { 3.8120312422969155`*^9, 3.8120312482504005`*^9}, 3.8149804945500965`*^9, { 3.8149806175022893`*^9, 3.814980634391814*^9}}, CellLabel->"In[4]:=", CellID->474406220], Cell[BoxData[ RowBox[{ RowBox[{"UnloadPacletDocumentation", "[", "paclet_", "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Quiet", "@", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"basePath", "=", RowBox[{"FindFile", "[", RowBox[{"paclet", "<>", "\"\<`\>\""}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"FailureQ", "@", "basePath"}]}], ",", "\[IndentingNewLine]", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"path", "=", RowBox[{"DirectoryName", "@", "basePath"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "we", " ", "have", " ", "to", " ", "carefully", " ", "remove", " ", "the", " ", "paths", " ", "from", " ", "the", " ", "TextSearchIndex", " ", "instances", " ", "via", " ", "JLink", " ", "and", " ", "reflection"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"ApplyToTextSearchIndexInstances", "[", RowBox[{"(*", RowBox[{"map", " ", "over", " ", "all", " ", "instances"}], "*)"}], "\[IndentingNewLine]", RowBox[{"Function", "[", RowBox[{ RowBox[{"{", RowBox[{"index", ",", "directories", ",", "paths"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Map", "[", RowBox[{"(*", RowBox[{ "go", " ", "through", " ", "all", " ", "directories", " ", "add", " ", "to", " ", "the", " ", "TextSearchIndex"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{"(*", RowBox[{ RowBox[{ "if", " ", "a", " ", "directory", " ", "lies", " ", "within", " ", "the", " ", "paclet", " ", "directory"}], "..."}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"StringStartsQ", "[", RowBox[{ RowBox[{"#", "@", RowBox[{ RowBox[{"getDirectory", "[", "]"}], "@", RowBox[{ RowBox[{"toAbsolutePath", "[", "]"}], "@", RowBox[{"toString", "[", "]"}]}]}]}], ",", "path"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "remove", " ", "it", " ", "both", " ", "from", " ", "directories", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"List", "<"}], "..."}], ">"}], ")"}], " ", "and", " ", "paths", " ", RowBox[{"(", RowBox[{"Set", "<", "Path", ">"}], ")"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"directories", "@", RowBox[{"remove", "[", "#", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"paths", "@", RowBox[{"remove", "[", RowBox[{"#", "@", RowBox[{"getDirectory", "[", "]"}]}], "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], "&"}], ",", "\[IndentingNewLine]", RowBox[{ "JLink`JavaObjectToExpression", "@", "directories"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"call", " ", RowBox[{"index", ".", "finalizeWrites"}], RowBox[{"(", ")"}]}], "-", RowBox[{"this", " ", "closes", " ", RowBox[{"the", ".", "indexReader"}], " ", "to", " ", "release", " ", "the", " ", "lock"}]}], "*)"}], RowBox[{"(*", RowBox[{ RowBox[{"it", " ", "also", " ", "resets", " ", RowBox[{"both", ".", "indexReader"}], " ", RowBox[{"and", ".", "indexSearcher"}], " ", "to", " ", "null"}], ",", RowBox[{ "so", " ", "that", " ", "they", " ", "will", " ", "be", " ", "recreated", " ", "upon", " ", "the", " ", "next", " ", "call", " ", RowBox[{"to", ".", "search"}]}]}], "*)"}], RowBox[{"index", "@", RowBox[{"finalizeWrites", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "if", " ", "the", " ", "list", " ", "of", " ", "directories", " ", "is", " ", "now", " ", "empty"}], ",", RowBox[{ "close", " ", "the", " ", "index", " ", "and", " ", "release", " ", "the", " ", "object"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "this", " ", "happens", " ", "in", " ", "11.2", " ", "for", " ", "the", " ", "TextSearchIndex", " ", "instance", " ", "that", " ", "creates", " ", "the", " ", "TextSearchIndex", " ", "directory", " ", "upon", " ", "updating", " ", "of", " ", "the", " ", "old", " ", "index"}], "*)"}], RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"directories", "@", RowBox[{"size", "[", "]"}]}], "\[Equal]", "0"}], ",", RowBox[{"(*", RowBox[{"close", " ", "the", " ", RowBox[{"instance", ".", " ", "This"}], " ", "also", " ", "removes", " ", "it", " ", "from", " ", RowBox[{"the", ".", "instances"}], " ", "map", " ", "on", " ", "the", " ", "java", " ", "side"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"index", "@", RowBox[{"close", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "release", " ", "the", " ", "object", " ", "in", " ", "order", " ", "to", " ", "invalidate", " ", "the", " ", "entry", " ", "cached", " ", "by", " ", RowBox[{"Mathematica", ".", " ", "This"}], " ", "ensures", " ", "that", " ", "a", " ", "new", " ", "instance", " ", "is", " ", "created", " ", "when", " ", "updating", " ", "the", " ", "index", " ", "the", " ", "next", " ", "time"}], "*)"}], "\[IndentingNewLine]", RowBox[{"JLink`ReleaseJavaObject", "@", "index"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.810127969319699*^9, 3.8101279996712875`*^9}, { 3.8101280310454197`*^9, 3.810128038107797*^9}, {3.8101282379896755`*^9, 3.810128408743436*^9}, {3.8119312181627855`*^9, 3.811931228069315*^9}, { 3.8146313950810995`*^9, 3.8146313961560707`*^9}, 3.814980495604663*^9, { 3.814980564800004*^9, 3.8149805766875415`*^9}}, CellLabel->"In[5]:=", CellID->941234981], Cell[BoxData[ RowBox[{ RowBox[{"LoadPacletDocumentation", "[", "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "$ContextPath", "}"}], ",", "\[IndentingNewLine]", RowBox[{"Get", "[", "\"\\"", "]"}]}], " ", "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.810127969319699*^9, 3.8101279996712875`*^9}, { 3.814631518224027*^9, 3.814631528875086*^9}}, CellLabel->"In[6]:=", CellID->572445029] }, Closed]], Cell[CellGroupData[{ Cell["File creation", "Subsection", TaggingRules->{}, CellChangeTimes->{{3.8120227618283467`*^9, 3.8120227643894987`*^9}}, CellLabel->"In[7]:=", CellID->988897517], Cell[CellGroupData[{ Cell["Documentation creation", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.8120227788613715`*^9, 3.812022781836993*^9}}, CellLabel->"In[1]:=", CellID->482156118], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Attributes", "[", "InputCell", "]"}], "=", RowBox[{"{", "HoldAllComplete", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"InputCell", "[", "expr_", "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Cell", "[", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"MakeBoxes", "[", RowBox[{"expr", ";"}], "]"}]}], ",", "\"\\""}], "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.810124502703328*^9, 3.810124544699927*^9}, 3.8101249768955593`*^9}, CellLabel->"In[1]:=", CellID->173684637], Cell[BoxData[ RowBox[{ RowBox[{"DocumentationURI", "[", RowBox[{"symName_", ",", "package_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{ "\"\\"", "<>", "package", "<>", "\"\\"", "<>", "symName"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.812026737640129*^9, 3.8120267738787932`*^9}}, CellLabel->"In[3]:=", CellID->536236157], Cell[BoxData[{ RowBox[{ RowBox[{"DocumentationLink", "[", RowBox[{"symName_", ",", "package_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"DocumentationLink", "[", RowBox[{"symName", ",", RowBox[{"DocumentationURI", "[", RowBox[{"symName", ",", "package"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"DocumentationLink", "[", RowBox[{"symName_", ",", "link_"}], "]"}], "/;", RowBox[{"StringStartsQ", "[", RowBox[{"link", ",", "\"\\""}], "]"}]}], ":=", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"BoxData", "[", "\[IndentingNewLine]", RowBox[{"TagBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ButtonBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"StyleBox", "[", RowBox[{"symName", ",", "\"\\"", ",", RowBox[{"FontFamily", "\[Rule]", "\"\\""}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"Dynamic", "@", RowBox[{"If", "[", RowBox[{ RowBox[{"CurrentValue", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"FontColor", "\[Rule]", RowBox[{"RGBColor", "[", RowBox[{"0.854902", ",", "0.396078", ",", "0.145098"}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", "\"\\"", "}"}]}], "\[IndentingNewLine]", "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"ButtonData", "\[Rule]", "link"}], ",", "\[IndentingNewLine]", RowBox[{"ContentPadding", "\[Rule]", "False"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"MouseAppearanceTag", "[", "\"\\"", "]"}]}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\"\\"", ",", "\"\\"", ",", RowBox[{"FontFamily", "\[Rule]", "\"\\""}]}], "\[IndentingNewLine]", "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.810125678323811*^9, 3.8101257393037415`*^9}, { 3.8101258865366907`*^9, 3.810125917930662*^9}, {3.8101260621657696`*^9, 3.810126097741684*^9}, {3.8109185638355317`*^9, 3.8109185882072077`*^9}, { 3.8120212006962295`*^9, 3.812021211362656*^9}, {3.812026779782823*^9, 3.81202678599703*^9}, {3.812030252517316*^9, 3.8120302624825926`*^9}}, CellLabel->"In[4]:=", CellID->501615251], Cell[BoxData[ RowBox[{ RowBox[{"$MenuArrow", "=", "\[IndentingNewLine]", RowBox[{"Cell", "@", RowBox[{"BoxData", "@", RowBox[{"GraphicsBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {GrayLevel[0.66667], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->GrayLevel[0.4444466666666666], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"GrayLevel", "[", "0.66667`", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.66667]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], GrayLevel[0.66667], Editable->False, Selectable->False], ",", RowBox[{"Thickness", "[", "0.13", "]"}], ",", "\[IndentingNewLine]", RowBox[{"LineBox", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1.8"}], ",", "0.5"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1.8", ",", "0.5"}], "}"}]}], "}"}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", "\[IndentingNewLine]", RowBox[{"ImageSize", "\[Rule]", "20"}], ",", "\[IndentingNewLine]", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}]}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8144694241417403`*^9, 3.814469429242074*^9}}, CellLabel->"In[10]:=", CellID->107922010], Cell[BoxData[ RowBox[{ RowBox[{"CreateURLMenu", "[", RowBox[{"uri_", ",", "url_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"TagBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ActionMenuBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FrameBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "@", RowBox[{"TextData", "@", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\< \>\"", ",", "$MenuArrow"}], "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"StripOnInput", "\[Rule]", "False"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\"\<\\\"\>\"", "<>", "uri", "<>", "\"\<\\\"\>\""}], "\[RuleDelayed]", "None"}], ",", "\[IndentingNewLine]", RowBox[{ "\"\<\\\"Copy Wolfram Documentation Center URL\\\"\>\"", "\[RuleDelayed]", RowBox[{"CopyToClipboard", "[", "uri", "]"}]}], ",", "\[IndentingNewLine]", "Delimiter", ",", "\[IndentingNewLine]", RowBox[{"\"\<\\\"Copy web URL\\\"\>\"", "\[RuleDelayed]", RowBox[{"CopyToClipboard", "[", "url", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\<\\\"Go to web URL\\\"\>\"", "\[RuleDelayed]", RowBox[{"NotebookLocate", "[", RowBox[{"{", RowBox[{ RowBox[{"URL", "[", "url", "]"}], ",", "None"}], "}"}], "]"}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"Appearance", "\[Rule]", "None"}], ",", "\[IndentingNewLine]", RowBox[{"MenuAppearance", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", RowBox[{"MenuStyle", "\[Rule]", "\"\\""}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"MouseAppearanceTag", "[", "\"\\"", "]"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"LineSpacing", "\[Rule]", RowBox[{"{", RowBox[{"1.4", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8144681418620834`*^9, 3.81446816398435*^9}, { 3.8144682660424194`*^9, 3.8144683142754593`*^9}, {3.8144686700382957`*^9, 3.8144686705441017`*^9}, {3.814469433338419*^9, 3.8144694417650394`*^9}, { 3.8144696978456974`*^9, 3.814469713691594*^9}}, CellLabel->"In[11]:=", CellID->915815287], Cell[BoxData[ RowBox[{ RowBox[{"CreateDocumentationNotebook", "[", RowBox[{ "rf_", ",", "symName_", ",", "package_", ",", "context_", ",", "hasGuide_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"Internal`InheritedBlock", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"NotebookPut", ",", "Notebooks"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Unprotect", "[", RowBox[{"NotebookPut", ",", "Notebooks"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Notebooks", "[", "]"}], "=", RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"NotebookPut", "=", RowBox[{"#", "&"}]}], ";", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"nb", "=", RowBox[{"nb", "/.", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"StyleBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"RowBox", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"StyleBox", "[", RowBox[{ "\"\\"", ",", "\"\\""}], "]"}], ",", "\"\<[\>\"", ",", "\[IndentingNewLine]", RowBox[{"StyleBox", "[", RowBox[{ RowBox[{ "\"\<\\\"\\<\>\"", "<>", "symName", "<>", "\"\<\\>\\\"\>\""}], ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", "\"\<]\>\""}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}], "\[Rule]", RowBox[{"DocumentationLink", "[", RowBox[{"symName", ",", "package"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"InterpretationBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"TagBox", "[", RowBox[{"_", ",", RowBox[{ RowBox[{"PatternSequence", "[", RowBox[{"_", ",", RowBox[{ "TagBoxNote", "\[Rule]", "\"\\""}]}], "]"}], "|", RowBox[{"{", RowBox[{"\"\\"", ",", "__"}], "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", "symName", "]"}], ",", "\[IndentingNewLine]", RowBox[{"BoxID", "\[Rule]", "symName"}], ",", "\[IndentingNewLine]", RowBox[{"Selectable", "\[Rule]", "False"}]}], "\[IndentingNewLine]", "]"}], "\[RuleDelayed]", "symName"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"CellGroupData", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"c", ":", RowBox[{"Cell", "[", RowBox[{ RowBox[{"TextData", "[", RowBox[{"{", RowBox[{ "_", ",", "_", ",", "\"\\"", ",", "_", ",", "_"}], "}"}], "]"}], ",", "\"\\"", ",", "__"}], "]"}]}], ",", "___"}], "}"}], ",", "\[IndentingNewLine]", "rest___"}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "rest2___"}], "\[IndentingNewLine]", "]"}], "\[RuleDelayed]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"CellGroupData", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Delete", "[", RowBox[{"c", ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", RowBox[{"-", "1"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"TextData", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "\"\\ \"", ",", "\[IndentingNewLine]", RowBox[{"DocumentationLink", "[", RowBox[{ "\"\\"", ",", "\"\\""}], "]"}], ",", "\"\<:\>\""}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"InputCell", "@", RowBox[{"ResourceObject", "@", RowBox[{"ResourceFunction", "@", "symName"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"res", "=", RowBox[{"ResourceObject", "@", RowBox[{"ResourceFunction", "@", "symName"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"MakeBoxes", "[", "res", "]"}]}], ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", "rest"}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "rest2"}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"c", ":", RowBox[{"Cell", "[", RowBox[{"___", ",", "\"\\""}], "]"}]}], "\[RuleDelayed]", RowBox[{"(", "\[IndentingNewLine]", RowBox[{"c", "/.", RowBox[{"_ButtonBox", "\[RuleDelayed]", RowBox[{"StyleBox", "[", "\[IndentingNewLine]", RowBox[{"symName", ",", "\[IndentingNewLine]", RowBox[{"FontFamily", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FontSize", "\[Rule]", "37"}], ",", "\[IndentingNewLine]", RowBox[{"FontWeight", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FontColor", "\[Rule]", RowBox[{"GrayLevel", "[", "0.2", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", ")"}]}]}], "\[IndentingNewLine]", "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"Replace", "[", "\[IndentingNewLine]", RowBox[{"nb", ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"(", "\[IndentingNewLine]", RowBox[{"StyleDefinitions", "\[Rule]", RowBox[{"Notebook", "[", RowBox[{ RowBox[{"defs", ":", RowBox[{"{", RowBox[{ RowBox[{"Cell", "[", RowBox[{"StyleData", "[", RowBox[{ "StyleDefinitions", "\[Rule]", "\"\\""}], "]"}], "]"}], ",", "___"}], "}"}]}], ",", "rest___"}], "]"}]}], "\[IndentingNewLine]", ")"}], "\[RuleDelayed]", RowBox[{"(", "\[IndentingNewLine]", RowBox[{"StyleDefinitions", "\[Rule]", RowBox[{"Notebook", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Join", "[", "\[IndentingNewLine]", RowBox[{"defs", "/.", RowBox[{ RowBox[{"Cell", "[", RowBox[{ RowBox[{"StyleData", "[", RowBox[{"All", ",", "\"\\""}], "]"}], ",", "___"}], "]"}], "\[RuleDelayed]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"StyleData", "[", RowBox[{"All", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"DockedCells", "\[Rule]", RowBox[{"FEPrivate`FrontEndResource", "[", RowBox[{ "\"\\"", ",", "\"\\""}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"Cell", "[", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "rest"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", ")"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"(", RowBox[{"TaggingRules", "\[Rule]", RowBox[{"{", "rules__", "}"}]}], ")"}], "\[RuleDelayed]", RowBox[{"(", "\[IndentingNewLine]", RowBox[{"TaggingRules", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"rules", ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "symName"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\<\>\""}], ",", "\[IndentingNewLine]", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "context"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "package"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "symName"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{ "package", "<>", "\"\\"", "<>", "symName"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"ResourceFunction", "[", RowBox[{"symName", ",", "\"\\""}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "}"}]}]}], "\[IndentingNewLine]", "}"}]}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", ")"}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", "1"}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"Insert", "[", "\[IndentingNewLine]", RowBox[{"nb", ",", "\[IndentingNewLine]", RowBox[{"WindowTitle", "\[Rule]", "symName"}], ",", "\[IndentingNewLine]", "2"}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"Insert", "[", "\[IndentingNewLine]", RowBox[{"nb", ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"GridBox", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"GridBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"ItemBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{"BoxData", "@", RowBox[{"RowBox", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"TemplateBox", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ "\"\\"", ",", "\[IndentingNewLine]", RowBox[{"Editable", "\[Rule]", "False"}], ",", "\[IndentingNewLine]", RowBox[{"CellFrameMargins", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"25", ",", "Automatic"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "10"}], "}"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{ "FontFamily", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FontSize", "\[Rule]", "12"}], ",", "\[IndentingNewLine]", RowBox[{"FontTracking", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FontColor", "\[Rule]", RowBox[{"GrayLevel", "[", "1", "]"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"TemplateBox", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "}"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Background", "\[Rule]", RowBox[{"Darker", "@", "Blue"}]}], ",", "\[IndentingNewLine]", RowBox[{"ItemSize", "\[Rule]", "Full"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\"\<\>\""}], "\[IndentingNewLine]", "}"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"GridBoxAlignment", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", "Center", "}"}], "}"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"GridBoxItemSize", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"Full", ",", RowBox[{"Scaled", "[", "0.02", "]"}]}], "}"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", "2.5", "}"}], "}"}]}]}], "}"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"TextData", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{"hasGuide", ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"TagBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ActionMenuBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FrameBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "@", RowBox[{"TextData", "@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\< \>\"", ",", "$MenuArrow"}], "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"StripOnInput", "\[Rule]", "False"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"package", "\[RuleDelayed]", RowBox[{"Documentation`HelpLookup", "[", "#", "]"}]}], "&"}], "[", RowBox[{ "\"\\"", "<>", "package", "<>", "\"\\"", "<>", "package"}], "]"}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"Appearance", "\[Rule]", "None"}], ",", "\[IndentingNewLine]", RowBox[{"MenuAppearance", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", RowBox[{ "MenuStyle", "\[Rule]", "\"\\""}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{ "MouseAppearanceTag", "[", "\"\\"", "]"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"LineSpacing", "\[Rule]", RowBox[{"{", RowBox[{"1.4", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "Nothing"}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\"\<\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\ \[ThickSpace]\[ThickSpace]\>\"", ",", "\[IndentingNewLine]", RowBox[{"CreateURLMenu", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"DocumentationURI", "[", RowBox[{"symName", ",", "package"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"First", "@", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"Editable", "\[Rule]", "False"}], ",", "\[IndentingNewLine]", RowBox[{"CellMargins", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "24"}], "}"}], ",", RowBox[{"{", RowBox[{"20", ",", "4"}], "}"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"TextAlignment", "\[Rule]", "Right"}], ",", "\[IndentingNewLine]", RowBox[{"FontFamily", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FontSize", "\[Rule]", "11"}], ",", "\[IndentingNewLine]", RowBox[{"FrameBoxOptions", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ "FontFamily", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FontSize", "\[Rule]", "14"}], ",", "\[IndentingNewLine]", RowBox[{"FontColor", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.85098, 0.396078, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[0.56732, 0.264052, 0.], FrameTicks->None, ImageSize-> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.85098`", ",", "0.396078`", ",", "0.`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.85098, 0.396078, 0.]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.85098, 0.396078, 0.], Editable->False, Selectable->False]}], ",", "\[IndentingNewLine]", RowBox[{"Background", "\[Rule]", "None"}], ",", "\[IndentingNewLine]", RowBox[{"FrameBoxOptions", "\[Rule]", RowBox[{"{", RowBox[{"FrameStyle", "\[Rule]", RowBox[{"{", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {GrayLevel[1], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->GrayLevel[0.6666666666666667], FrameTicks->None, ImageSize->Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], GrayLevel[1], Editable->False, Selectable->False], "}"}]}], "}"}]}]}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"FrameMargins", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "2"}], "}"}]}], "}"}]}]}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"PopupMenuBoxOptions", "\[Rule]", RowBox[{"{", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontSize", "\[Rule]", "9"}], "}"}]}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], "\[IndentingNewLine]", "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"Editable", "\[Rule]", "False"}], ",", "\[IndentingNewLine]", RowBox[{"ShowCellBracket", "\[Rule]", "False"}], ",", "\[IndentingNewLine]", RowBox[{"CellMargins", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"24", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"26", ",", RowBox[{"-", "2"}]}], "}"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"Deployed", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", RowBox[{"FontFamily", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"FontSize", "\[Rule]", "11"}], ",", "\[IndentingNewLine]", RowBox[{"GridBoxOptions", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"GridBoxAlignment", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", RowBox[{"Left", ",", "Right"}], "}"}], "}"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"GridBoxItemSize", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Scaled", "[", "0.37", "]"}], ",", RowBox[{"{", RowBox[{"Scaled", "[", "0.6", "]"}], "}"}]}], "}"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", "1.5", "}"}], "}"}]}]}], "}"}]}]}], "\[IndentingNewLine]", "}"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Quiet", "@", RowBox[{ "CreateDirectory", "@", "\"\<./Documentation/English/ReferencePages/Symbols\>\""}]}], ";", "\[IndentingNewLine]", RowBox[{"Export", "[", RowBox[{ RowBox[{ "\"\<./Documentation/English/ReferencePages/Symbols/\>\"", "<>", "symName", "<>", "\"\<.nb\>\""}], ",", RowBox[{"RestoreRemoved", "@", "nb"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8101254155957026`*^9, 3.810125422429599*^9}, { 3.810125453765216*^9, 3.81012562692065*^9}, {3.810125656956068*^9, 3.8101256755365086`*^9}, {3.810125943907462*^9, 3.810126010636451*^9}, { 3.8101261147524047`*^9, 3.810126275037456*^9}, {3.810126347833329*^9, 3.810126455257913*^9}, 3.8101271170716166`*^9, {3.810127154141678*^9, 3.810127241477024*^9}, {3.8101272741113605`*^9, 3.8101272769603624`*^9}, { 3.810918512501047*^9, 3.810918557050578*^9}, {3.810918605922906*^9, 3.8109186130080805`*^9}, {3.8120047373399534`*^9, 3.812004754671232*^9}, { 3.81201383456003*^9, 3.8120138357669716`*^9}, {3.8120212255933046`*^9, 3.8120212507437196`*^9}, {3.8123483613235464`*^9, 3.8123483954458814`*^9}, {3.8144502281608295`*^9, 3.814450272229562*^9}, { 3.8144503027051706`*^9, 3.814450330765732*^9}, {3.814450544094939*^9, 3.814450548494625*^9}, {3.8144520824826207`*^9, 3.8144520867976265`*^9}, { 3.814468472896347*^9, 3.814468474236394*^9}, {3.8144685150076137`*^9, 3.814468531141958*^9}, {3.814468578375373*^9, 3.8144685826772194`*^9}, { 3.814468615967676*^9, 3.814468643645343*^9}, {3.8144686798449097`*^9, 3.814468681791644*^9}, {3.8144689627060575`*^9, 3.8144690604357834`*^9}, { 3.8144692164465704`*^9, 3.814469272869215*^9}, {3.8144693483899045`*^9, 3.8144694176958804`*^9}, {3.8144694538110905`*^9, 3.8144694565203075`*^9}, 3.814469797504727*^9, {3.814470396107428*^9, 3.8144704167917223`*^9}}, CellLabel->"In[12]:=", CellID->463311532], Cell[BoxData[ RowBox[{ RowBox[{"CreateMainDocPage", "[", RowBox[{"rfs_", ",", "symNames_", ",", "package_", ",", "context_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{"desc", "=", RowBox[{ "\"\\"", "<>", "package", "<>", "\"\<. It was created using the resource function \ PacletizeResourceFunction.\>\""}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Quiet", "@", RowBox[{ "CreateDirectory", "@", "\"\<./Documentation/English/ReferencePages/Guides\>\""}]}], ";", "\[IndentingNewLine]", RowBox[{"Export", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ "\"\<./Documentation/English/ReferencePages/Guides/\>\"", "<>", "package", "<>", "\"\<.nb\>\""}], ",", "\[IndentingNewLine]", RowBox[{"Notebook", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"GridBox", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"GridBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"ItemBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"RowBox", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"TemplateBox", "[", RowBox[{ RowBox[{"{", "12", "}"}], ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", RowBox[{ "\"\\"", ",", "\"\\"", ",", RowBox[{"TextAlignment", "\[Rule]", "Center"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"TemplateBox", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"TextAlignment", "\[Rule]", "Center"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Background", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.85098, 0.396078, 0], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[0.56732, 0.264052, 0.], FrameTicks->None, ImageSize->Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.85098`", ",", "0.396078`", ",", "0"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.85098, 0.396078, 0]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.85098, 0.396078, 0], Editable->False, Selectable->False]}], ",", "\[IndentingNewLine]", RowBox[{"ItemSize", "\[Rule]", "Full"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\"\<\>\""}], "\[IndentingNewLine]", "}"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"GridBoxAlignment", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", "Center", "}"}], "}"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"GridBoxItemSize", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"Full", ",", RowBox[{"Scaled", "[", "0.02", "]"}]}], "}"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"{", "2.5", "}"}], "}"}]}]}], "}"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"TextData", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"TagBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ActionMenuBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FrameBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "@", RowBox[{"TextData", "@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\< \>\"", ",", "$MenuArrow"}], "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"StripOnInput", "\[Rule]", "False"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "\[RuleDelayed]", RowBox[{"Documentation`HelpLookup", "[", "#2", "]"}]}], "&"}], "[", RowBox[{"#", ",", RowBox[{"DocumentationURI", "[", RowBox[{"#", ",", "package"}], "]"}]}], "]"}], "&"}], "/@", "symNames"}], ",", "\[IndentingNewLine]", RowBox[{"Appearance", "\[Rule]", "None"}], ",", "\[IndentingNewLine]", RowBox[{"MenuAppearance", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", RowBox[{ "MenuStyle", "\[Rule]", "\"\\""}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{ "MouseAppearanceTag", "[", "\"\\"", "]"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"LineSpacing", "\[Rule]", RowBox[{"{", RowBox[{"1.4", ",", "0"}], "}"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\"\<\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\ \[ThickSpace]\[ThickSpace]\>\"", ",", "\[IndentingNewLine]", RowBox[{"CreateURLMenu", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ "\"\\"", "<>", "package", "<>", "\"\\"", "<>", "package"}], ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "}"}], "\[IndentingNewLine]", "}"}]}]}], ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{"CellGroupData", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", RowBox[{"package", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ "desc", ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", RowBox[{ "\"\<\\t\>\"", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Sequence", "@@", RowBox[{"MapThread", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"TextData", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Cell", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"BoxData", "@", "\[IndentingNewLine]", RowBox[{"TemplateBox", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Cell", "[", RowBox[{"TextData", "[", "#", "]"}], "]"}], ",", RowBox[{"DocumentationURI", "[", RowBox[{"#", ",", "package"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", "\"\\"", ",", "\[IndentingNewLine]", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", "\"\\"", "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\"\< \>\"", ",", "\[IndentingNewLine]", RowBox[{"StyleBox", "[", RowBox[{ "\"\<\[LongDash]\>\"", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", "\"\< \>\"", ",", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", RowBox[{"#2", ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}], "&"}], ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"symNames", ",", "\[IndentingNewLine]", "rfs"}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", "Open"}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Cell", "[", RowBox[{"\"\< \>\"", ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"Saveable", "\[Rule]", "False"}], ",", "\[IndentingNewLine]", RowBox[{"WindowTitle", "\[Rule]", "package"}], ",", "\[IndentingNewLine]", RowBox[{"DockedCells", "\[Rule]", RowBox[{"FEPrivate`FrontEndResource", "[", RowBox[{ "\"\\"", ",", "\"\\""}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"StyleDefinitions", "\[Rule]", RowBox[{"FrontEnd`FileName", "[", RowBox[{ RowBox[{"{", "\"\\"", "}"}], ",", "\"\\"", ",", RowBox[{"CharacterEncoding", "\[Rule]", "\"\\""}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"TaggingRules", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "package"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\<\>\""}], ",", "\[IndentingNewLine]", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "context"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "package"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "package"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{ "package", "<>", "\"\\"", "<>", "package"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "desc"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "}"}]}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "}"}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8120105502487497`*^9, 3.812010863750401*^9}, { 3.812010900258112*^9, 3.812010990212903*^9}, {3.812012833980935*^9, 3.812013427883864*^9}, {3.812013700106846*^9, 3.8120137044904437`*^9}, { 3.812013843721571*^9, 3.8120138466165648`*^9}, {3.812021286395047*^9, 3.8120213590834165`*^9}, {3.812026794855336*^9, 3.8120268004620433`*^9}, { 3.8144683392695293`*^9, 3.814468373161558*^9}, 3.814468486108053*^9, 3.814468686305934*^9, {3.814468880287626*^9, 3.814468886299433*^9}, { 3.81446933041252*^9, 3.814469330738975*^9}, {3.814469464453898*^9, 3.81446946901155*^9}}, CellLabel->"In[13]:=", CellID->293629521] }, Open ]], Cell[CellGroupData[{ Cell["Definition creation", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.8120227900390606`*^9, 3.8120227937480593`*^9}}, CellLabel->"In[14]:=", CellID->792146519], Cell[BoxData[ RowBox[{ RowBox[{"CreateDefinitionNotebook", "[", RowBox[{"rf_", ",", "context_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"nb", "=", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}]}], ",", "\[IndentingNewLine]", "needIResourceFunction", ",", "\[IndentingNewLine]", "defNb"}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"FailureQ", "@", "nb"}], ",", "\[IndentingNewLine]", RowBox[{"Throw", "[", RowBox[{ RowBox[{"Failure", "[", "\[IndentingNewLine]", RowBox[{"\"\\"", ",", "\[IndentingNewLine]", RowBox[{"<|", "\[IndentingNewLine]", RowBox[{ RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"<|", RowBox[{"\"\\"", "\[Rule]", RowBox[{"ToString", "[", RowBox[{"rf", ",", "StandardForm"}], "]"}]}], "|>"}]}]}], "\[IndentingNewLine]", "|>"}]}], "\[IndentingNewLine]", "]"}], ",", "PacletizeResourceFunction"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"Import", "[", "nb", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"needIResourceFunction", "=", RowBox[{"MemberQ", "[", RowBox[{"nb", ",", RowBox[{"RowBox", "@", RowBox[{"{", RowBox[{"___", ",", "\"\\"", ",", "___"}], "}"}]}], ",", "All"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"nb", "//.", RowBox[{ RowBox[{"RowBox", "@", RowBox[{"{", RowBox[{"pre___", ",", "\"\\"", ",", "post___"}], "}"}]}], "\[RuleDelayed]", RowBox[{"RowBox", "@", RowBox[{"{", RowBox[{"pre", ",", RowBox[{"context", "<>", "\"\\""}], ",", "post"}], "}"}]}]}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"nb", "=", RowBox[{"NotebookPut", "[", RowBox[{ RowBox[{"DeleteCases", "[", RowBox[{"FrontEndVersion", "\[Rule]", "_"}], "]"}], "@", RowBox[{"Insert", "[", RowBox[{"nb", ",", RowBox[{"Visible", "\[Rule]", "False"}], ",", "2"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SelectionMove", "[", RowBox[{ RowBox[{"First", "@", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellTags", "\[Rule]", "\"\\""}]}], "]"}]}], ",", "All", ",", "CellGroup"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"defNb", "=", RowBox[{"Notebook", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"NotebookRead", "@", "nb"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Visible", "\[Rule]", "False"}], ",", "\[IndentingNewLine]", RowBox[{"AutoGeneratedPackage", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", RowBox[{"Options", "@", "nb"}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NotebookClose", "[", "nb", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"defNb", ",", "needIResourceFunction"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.810124284841243*^9, 3.810124434042287*^9}, { 3.8101246578355927`*^9, 3.8101246580415945`*^9}, {3.8109187643084927`*^9, 3.8109187699404697`*^9}, {3.8120258139469213`*^9, 3.8120258301711655`*^9}, {3.8123447565521383`*^9, 3.812344902437289*^9}, { 3.812344965905137*^9, 3.8123449699750724`*^9}, {3.814440978052516*^9, 3.8144409797151833`*^9}, {3.814441098525082*^9, 3.8144411043092585`*^9}, 3.814441245611429*^9, {3.8144412819335804`*^9, 3.8144412902323184`*^9}}, CellLabel->"In[1]:=", CellID->430497382], Cell[BoxData[ RowBox[{ RowBox[{"GetUsage", "[", RowBox[{"rf_", ",", "symName_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"StringReplace", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"$VersionNumber", "<", "12"}], ",", "\[IndentingNewLine]", RowBox[{"FirstCase", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Reap", "[", "\[IndentingNewLine]", RowBox[{"Block", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"NotebookWrite", ",", "CellPrint"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"NotebookWrite", "[", RowBox[{"_", ",", "content_", ",", "___"}], "]"}], ":=", RowBox[{"Sow", "@", "content"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"CellPrint", "[", "content_", "]"}], ":=", RowBox[{"Sow", "@", "content"}]}], ";", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "]"}], ",", RowBox[{ RowBox[{"BoxData", "@", RowBox[{"RowBox", "@", RowBox[{"{", "u_String", "}"}]}]}], "\[RuleDelayed]", RowBox[{"ToExpression", "@", "u"}]}], ",", "\"\<\>\"", ",", "All"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ "\"\\"", "<>", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}], "<>", "\[IndentingNewLine]", "\"\<\\\\\\\"\\\", \\\"ResourceFunctionName\\\"], \\\"]\\\"}], \ \\\"ResourceFunctionHandle\\\"]\>\""}], "\[Rule]", "\[IndentingNewLine]", "symName"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8101248226769753`*^9, 3.8101249061118994`*^9}, { 3.8119323879909754`*^9, 3.8119323946072984`*^9}, {3.811932662492978*^9, 3.8119327043146124`*^9}, {3.8119327359318604`*^9, 3.8119327582217293`*^9}, {3.8119328639100013`*^9, 3.8119328663560038`*^9}, {3.811932949449361*^9, 3.81193301117912*^9}, { 3.8119333471423583`*^9, 3.8119333594671917`*^9}, {3.8144357307902937`*^9, 3.81443574070426*^9}, {3.814435772586059*^9, 3.8144357808283854`*^9}, { 3.814435836424567*^9, 3.8144358366674633`*^9}, 3.81443601609128*^9, { 3.814436055708277*^9, 3.8144360558932104`*^9}, {3.814436098140493*^9, 3.814436100522966*^9}}, CellLabel->"In[2]:=", CellID->299783477], Cell[BoxData[ RowBox[{ RowBox[{"CreateDefinitionFile", "[", RowBox[{"defNb_", ",", "rf_", ",", "sym_", ",", "symName_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"nb", "=", RowBox[{"NotebookPut", "@", RowBox[{ RowBox[{"DeleteCases", "[", RowBox[{"FrontEndVersion", "\[Rule]", "_"}], "]"}], "@", "defNb"}]}]}], ",", "\[IndentingNewLine]", "write"}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"write", "=", RowBox[{"Function", "[", RowBox[{"expr", ",", RowBox[{"NotebookWrite", "[", RowBox[{"nb", ",", RowBox[{"InputCell", "[", "expr", "]"}]}], "]"}], ",", "HoldAllComplete"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"SelectionMove", "[", RowBox[{"nb", ",", "Before", ",", "Notebook"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"write", "[", "sym", "]"}], ";", "\[IndentingNewLine]", RowBox[{"write", "[", RowBox[{"Begin", "[", RowBox[{"\"\<`\>\"", "<>", "symName", "<>", "\"\<`Private`\>\""}], "]"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"SelectionMove", "[", RowBox[{"nb", ",", "After", ",", "Notebook"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"With", "[", RowBox[{"(*", " ", RowBox[{ RowBox[{"declare", " ", "usage", " ", "here"}], ",", " ", RowBox[{ "for", " ", "cases", " ", "where", " ", "ClearAll", " ", "is", " ", "called", " ", "in", " ", "the", " ", "user", " ", "defined", " ", "code", " ", "above"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"usage", "=", RowBox[{"GetUsage", "[", RowBox[{"rf", ",", "symName"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"write", "[", RowBox[{ RowBox[{"sym", "::", "usage"}], "=", "usage"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"write", "[", RowBox[{"End", "[", "]"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"#", ",", RowBox[{"InitializationCell", "\[Rule]", "True"}]}], "]"}], "&"}], "/@", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellStyle", "\[Rule]", RowBox[{"{", "\"\\"", "}"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"NotebookSave", "[", RowBox[{"nb", ",", RowBox[{"FileNameJoin", "@", RowBox[{"{", RowBox[{ RowBox[{"Directory", "[", "]"}], ",", "\"\\"", ",", RowBox[{"symName", "<>", "\"\<.nb\>\""}]}], "}"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"NotebookClose", "[", "nb", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8101246675807257`*^9, 3.810124772400036*^9}, { 3.8101248125426064`*^9, 3.8101248133676023`*^9}, {3.810124918815072*^9, 3.8101250003437405`*^9}, {3.810125044109743*^9, 3.810125135065607*^9}, { 3.810125176304531*^9, 3.810125205861388*^9}, {3.8101252416762877`*^9, 3.8101253212427044`*^9}, {3.8101286589461904`*^9, 3.8101286706241255`*^9}, {3.811931146135147*^9, 3.811931146477151*^9}, { 3.81200472684001*^9, 3.8120047282605095`*^9}, {3.8120051167134748`*^9, 3.81200513481688*^9}, {3.8120143879630337`*^9, 3.8120144007632637`*^9}, { 3.8120209123234987`*^9, 3.8120209131605277`*^9}, {3.8120209542051706`*^9, 3.812020989681993*^9}, {3.8120210331865*^9, 3.812021073765854*^9}, { 3.8120385498239193`*^9, 3.812038552454758*^9}, {3.812288413539601*^9, 3.812288473408466*^9}, 3.812289233806507*^9, {3.8144411399125166`*^9, 3.81444114649432*^9}, {3.8144413921083193`*^9, 3.8144413971338167`*^9}}, CellLabel->"In[3]:=", CellID->144722475] }, Open ]], Cell[CellGroupData[{ Cell["Paclet file creation", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.812022803948485*^9, 3.8120228082284575`*^9}}, CellLabel->"In[4]:=", CellID->381401682], Cell[BoxData[ RowBox[{ RowBox[{"CreateIResourceFunctionDefinition", "[", RowBox[{"syms_", ",", "symNames_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"symNameAlternatives", "=", RowBox[{"Alternatives", "@@", "symNames"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"HoldComplete", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"With", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"funcs", "=", RowBox[{"<|", RowBox[{"MapThread", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"#2", "\[Rule]", RowBox[{"ResourceFunction", "[", "\[IndentingNewLine]", RowBox[{"<|", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "#2"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "#"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "adding", " ", "a", " ", "DefinitionList", " ", "like", " ", "this", " ", "causes", " ", "ResourceFunction", " ", "to", " ", "not", " ", "create", " ", "a", " ", "dummy", " ", "symbol", " ", "with", " ", "a", " ", "copy", " ", "of", " ", "all", " ", "definitions"}], ",", " ", RowBox[{ "but", " ", "to", " ", "use", " ", "the", " ", "original", " ", "symbol", " ", "instead"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"BinarySerialize", "@", RowBox[{"<|", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"Language`DefinitionList", "@", RowBox[{"Evaluate", "[", RowBox[{ RowBox[{"HoldForm", "@", "#"}], "\[Rule]", RowBox[{"{", RowBox[{"Attributes", "\[Rule]", RowBox[{"Attributes", "@", "#"}]}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "|>"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}]}], "\[IndentingNewLine]", "|>"}], "\[IndentingNewLine]", "]"}]}], "&"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"syms", ",", "symNames"}], "}"}]}], "\[IndentingNewLine]", "]"}], "|>"}]}], ",", "\[IndentingNewLine]", RowBox[{"prot", "=", RowBox[{"Unprotect", "@", "ResourceFunction"}]}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"HoldPattern", "@", RowBox[{"iResourceFunction", "[", RowBox[{"sym", ":", "symNameAlternatives"}], "]"}]}], ":=", "\[IndentingNewLine]", RowBox[{"funcs", "[", "sym", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"FormatValues", "[", "ResourceFunction", "]"}], "=", RowBox[{"Join", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"MapThread", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"HoldPattern", "@", RowBox[{"MakeBoxes", "[", RowBox[{"#", ",", "_"}], "]"}]}], "\[RuleDelayed]", "#2"}], "&"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"Values", "@", "funcs"}], ",", "symNames"}], "}"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"FormatValues", "[", "ResourceFunction", "]"}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Protect", "/@", "prot"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"HoldPattern", "@", RowBox[{"iResourceFunction", "[", "args___", "]"}]}], ":=", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", "args", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"HoldPattern", "@", RowBox[{"f_", "[", RowBox[{"pre___", ",", RowBox[{"iResourceFunction", "[", "args___", "]"}], ",", "post___"}], "]"}]}], "^:=", RowBox[{"f", "[", RowBox[{"pre", ",", RowBox[{"ResourceFunction", "[", "args", "]"}], ",", "post"}], "]"}]}], ";"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8101250222203207`*^9, 3.8101250385080104`*^9}, { 3.8101251382369843`*^9, 3.8101251702383776`*^9}, {3.810125229618392*^9, 3.8101252327064586`*^9}, {3.812004990449026*^9, 3.812004992190029*^9}, { 3.8120218954977813`*^9, 3.8120219210132213`*^9}, {3.812021969178379*^9, 3.812022031255937*^9}, {3.812022083578949*^9, 3.8120222491734657`*^9}, { 3.8120224494081717`*^9, 3.8120224512694054`*^9}, {3.8120229979798546`*^9, 3.812023016158677*^9}, {3.8120259456929536`*^9, 3.8120259726832895`*^9}, { 3.812026268875252*^9, 3.812026269573253*^9}, {3.814814306143507*^9, 3.8148143985780687`*^9}, {3.8149853634918795`*^9, 3.814985365244828*^9}, { 3.814985656198037*^9, 3.814985726413797*^9}, 3.814987641637722*^9}, CellLabel->"In[3]:=", CellID->602732145], Cell[BoxData[ RowBox[{ RowBox[{"CreatePacletFile", "[", RowBox[{ "needIRF_", ",", "syms_", ",", "symNames_", ",", "package_", ",", "context_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Export", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\<./\>\"", "<>", "package", "<>", "\"\<.wl\>\""}], ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"HoldComplete", "[", RowBox[{"BeginPackage", "[", "context", "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"Or", "@@", "needIRF"}], ",", "\[IndentingNewLine]", RowBox[{"Sequence", "@@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"HoldComplete", "[", RowBox[{"Begin", "[", "\"\<`Private`\>\"", "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"CreateIResourceFunctionDefinition", "[", RowBox[{ RowBox[{"Pick", "[", RowBox[{"syms", ",", "needIRF"}], "]"}], ",", RowBox[{"Pick", "[", RowBox[{"symNames", ",", "needIRF"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"HoldComplete", "[", RowBox[{ RowBox[{"End", "[", "]"}], ";"}], "]"}]}], "\[IndentingNewLine]", "}"}]}], ",", "\[IndentingNewLine]", "Nothing"}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"HoldComplete", "[", RowBox[{"Quiet", "[", RowBox[{ RowBox[{ RowBox[{"Get", "[", "#", "]"}], ";"}], ",", RowBox[{"{", RowBox[{"Syntax", "::", "com"}], StyleBox["}", "MessageName"]}]}], "]"}], "]"}], "&"}], "[", RowBox[{"\"\<`Functions`\>\"", "<>", "#", "<>", "\"\<`\>\""}], "]"}], "&"}], "/@", "symNames"}], ",", "\[IndentingNewLine]", RowBox[{"HoldComplete", "[", RowBox[{ RowBox[{"EndPackage", "[", "]"}], ";"}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8101246675807257`*^9, 3.810124772400036*^9}, { 3.8101248125426064`*^9, 3.8101248133676023`*^9}, {3.810124918815072*^9, 3.8101250003437405`*^9}, {3.810125044109743*^9, 3.810125135065607*^9}, { 3.810125176304531*^9, 3.810125205861388*^9}, {3.8101252416762877`*^9, 3.8101253212427044`*^9}, {3.8101286589461904`*^9, 3.8101286706241255`*^9}, { 3.811931146135147*^9, 3.811931146477151*^9}, {3.812004597579275*^9, 3.812004616852986*^9}, {3.8120046812668114`*^9, 3.812004721193937*^9}, { 3.8120048226355534`*^9, 3.812005075256976*^9}, {3.8120205834301524`*^9, 3.8120205843415194`*^9}, {3.812021260548895*^9, 3.812021273945652*^9}, { 3.812021736776338*^9, 3.812021746570531*^9}, {3.8120224746627035`*^9, 3.8120225308227224`*^9}, {3.812026409007736*^9, 3.8120264234691033`*^9}, { 3.812038570947817*^9, 3.812038574492635*^9}, {3.8148146551427317`*^9, 3.8148146757539244`*^9}}, CellLabel->"In[4]:=", CellID->803450804], Cell[BoxData[{ RowBox[{ RowBox[{"CreatePacletInfo", "[", RowBox[{ "package_", ",", "context_", ",", "desc_", ",", "creator_", ",", "url_", ",", "ver_", ",", "mainPage_", ",", "symNames_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Export", "[", "\[IndentingNewLine]", RowBox[{"\"\<./PacletInfo.m\>\"", ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ "StringTemplate", "[", "\"\\\\"`package`\\\",\nDescription->\\\"`desc`\\\",\n\ Creator->\\\"`creator`\\\",\nURL->\\\"`url`\\\",\nVersion->\\\"`ver`\\\",\n\ MathematicaVersion->\\\"11.3+\\\",\nExtensions->{\n\ {\\\"Documentation\\\",Language->\\\"English\\\",\\\"MainPage\\\"->\\\"`\ mainPage`\\\"},\n\ {\\\"Kernel\\\",Context->{\\\"`context`\\\"},Symbols->{`symbols`}}\n},\n\ Loading->Automatic\n]\>\"", "]"}], "@", RowBox[{"<|", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "package"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "desc"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "creator"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "url"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "ver"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "mainPage"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", "context"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"Row", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ "\"\<\\\"\>\"", "<>", "context", "<>", "#", "<>", "\"\<\\\"\>\""}], "&"}], "/@", "symNames"}], ",", "\"\<,\>\""}], "]"}]}]}], "\[IndentingNewLine]", "|>"}]}], ",", "\n", "\"\\""}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"CreatePacletInfo", "[", RowBox[{ RowBox[{"{", "rf_", "}"}], ",", RowBox[{"{", "symName_", "}"}], ",", "package_", ",", "context_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"CreatePacletInfo", "[", "\[IndentingNewLine]", RowBox[{ "package", ",", "\[IndentingNewLine]", "context", ",", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"<|", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}], "|>"}], "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"First", "@", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"ResourceFunction", "[", RowBox[{"rf", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "<>", "symName"}], ",", "\[IndentingNewLine]", RowBox[{"{", "symName", "}"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"CreatePacletInfo", "[", RowBox[{"rfs_", ",", "symNames_", ",", "package_", ",", "context_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"CreatePacletInfo", "[", "\[IndentingNewLine]", RowBox[{ "package", ",", "\[IndentingNewLine]", "context", ",", "\[IndentingNewLine]", RowBox[{ "\"\\"", "<>", RowBox[{"StringRiffle", "[", RowBox[{"symNames", ",", "\"\<, \>\""}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"StringRiffle", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"<|", RowBox[{"ResourceFunction", "[", RowBox[{"#", ",", "\"\\""}], "]"}], "|>"}], "[", "\"\\"", "]"}], "&"}], "/@", "rfs"}], ",", "\"\<, \>\""}], "]"}], ",", "\[IndentingNewLine]", "\"\\"", ",", "\[IndentingNewLine]", "\"\<1.0.0\>\"", ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "<>", "package"}], ",", "\[IndentingNewLine]", "symNames"}], "\[IndentingNewLine]", "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.8101272962996187`*^9, 3.810127360593144*^9}, { 3.810129045820749*^9, 3.810129051740373*^9}, {3.8109184527984333`*^9, 3.8109184780902414`*^9}, {3.812004763249707*^9, 3.812004767171586*^9}, { 3.812009672799303*^9, 3.8120097677689714`*^9}, {3.81200981255632*^9, 3.8120098810898952`*^9}, {3.8120134643045006`*^9, 3.8120136331645603`*^9}, {3.812014347934222*^9, 3.8120143516775928`*^9}, { 3.812021371395061*^9, 3.812021419425525*^9}, {3.8121819857163258`*^9, 3.8121819990799217`*^9}, {3.814459667306625*^9, 3.8144596937200556`*^9}, { 3.814459859132719*^9, 3.814460111445736*^9}, 3.8144670001688213`*^9, { 3.8144670667071133`*^9, 3.8144672273134127`*^9}, 3.8144672747868032`*^9, { 3.8144673571758537`*^9, 3.8144673616379423`*^9}, {3.8144702609481144`*^9, 3.814470290444501*^9}}, CellLabel->"In[5]:=", CellID->69179625] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Main function", "Subsection", TaggingRules->{}, CellChangeTimes->{{3.8120228581207952`*^9, 3.8120228607649307`*^9}}, CellLabel->"In[8]:=", CellID->9456133], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Attributes", "[", "PacletizeResourceFunction", "]"}], "=", RowBox[{"{", "HoldFirst", "}"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8102274878190727`*^9, 3.8102274994728594`*^9}}, CellLabel->"In[1]:=", CellID->901195185], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Options", "[", "PacletizeResourceFunction", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "Automatic"}], ",", RowBox[{"\"\\"", "\[Rule]", "True"}]}], "}"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.810917888258067*^9, 3.810917908022131*^9}, 3.811930943753903*^9, {3.8120145048496914`*^9, 3.8120145250639772`*^9}}, CellLabel->"In[2]:=", CellID->725142241], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"HoldPattern", "@", RowBox[{"PacletizeResourceFunction", "[", RowBox[{ RowBox[{ "System`PacletUninstall", "|", "PacletManager`PacletUninstall"}], ",", "paclet_", ",", RowBox[{"OptionsPattern", "[", "]"}]}], "]"}]}], ":=", "\[IndentingNewLine]", RowBox[{"(", "\[IndentingNewLine]", RowBox[{ RowBox[{"UnloadPacletDocumentation", "[", "paclet", "]"}], ";", "\[IndentingNewLine]", RowBox[{"PacletUninstall", "/@", RowBox[{"PacletFind", "[", "paclet", "]"}]}], ";"}], "\[IndentingNewLine]", ")"}]}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "work", " ", "around", " ", "the", " ", "fact", " ", "that", " ", RowBox[{"ResourceFunction", "[", "\[Ellipsis]", "]"}], " ", "replaces", " ", "itself", " ", "with", " ", "the", " ", "symbol", " ", "name", " ", "when", " ", "inside", " ", "another", " ", RowBox[{ RowBox[{"ResourceFunction", "[", "\[Ellipsis]", "]"}], "[", "\[Ellipsis]", "]"}], " ", "evaluation"}], ",", " ", RowBox[{"so", " ", RowBox[{ RowBox[{ "ResourceFunction", "[", "\"\\"", "]"}], "[", RowBox[{"ResourceFunction", "[", "\[Ellipsis]", "]"}], "]"}], " ", RowBox[{"wouldn", "'"}], "t", " ", "work"}]}], " ", "*)"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"HoldPattern", "@", RowBox[{"PacletizeResourceFunction", "[", RowBox[{ RowBox[{ RowBox[{"{", "rfs___", "}"}], "|", "rf_"}], ",", RowBox[{"Shortest", "[", RowBox[{"outfile_", ":", "None"}], "]"}], ",", RowBox[{"opts", ":", RowBox[{"OptionsPattern", "[", "]"}]}]}], "]"}]}], ":=", "\[IndentingNewLine]", RowBox[{"Block", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"FunctionResource`Private`$stackLength", "=", "0"}], "}"}], ",", RowBox[{"iPacletizeResourceFunction", "[", RowBox[{ RowBox[{"{", RowBox[{"rf", ",", "rfs"}], "}"}], ",", "outfile", ",", "opts"}], "]"}]}], "\[IndentingNewLine]", "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.810227510410666*^9, 3.810227516658742*^9}, { 3.810227555558936*^9, 3.8102275638433533`*^9}, {3.8102276056353703`*^9, 3.810227617096346*^9}, {3.8102276736576333`*^9, 3.81022770706384*^9}, { 3.810227748216758*^9, 3.810227756502845*^9}, {3.811932187510046*^9, 3.811932214733261*^9}, {3.812004193902733*^9, 3.8120042091230354`*^9}, { 3.8120042484660254`*^9, 3.812004258422876*^9}, {3.8122984748598595`*^9, 3.8122984760668592`*^9}, {3.8122985519713945`*^9, 3.812298557701381*^9}, { 3.8123546447578807`*^9, 3.81235471767173*^9}, 3.812355400091587*^9, { 3.8123557424348707`*^9, 3.8123557447231026`*^9}, {3.8123558486642013`*^9, 3.8123558536267185`*^9}, {3.813833834452325*^9, 3.813833903797077*^9}, { 3.814503366665611*^9, 3.8145033683945465`*^9}, {3.8145521744297647`*^9, 3.814552180237671*^9}, 3.814560008868867*^9, 3.8145601248944473`*^9, { 3.8145610299753385`*^9, 3.8145610347930703`*^9}, {3.814636765092292*^9, 3.8146367685738897`*^9}, {3.814899975139979*^9, 3.81489998021159*^9}, { 3.8149004545923367`*^9, 3.8149004654655495`*^9}}, CellLabel->"In[3]:=", CellID->522889070], Cell[BoxData[ RowBox[{ RowBox[{"iPacletizeResourceFunction", "[", RowBox[{"rfs_", ",", "outfile_", ",", RowBox[{"OptionsPattern", "[", "PacletizeResourceFunction", "]"}]}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"step", "=", "\"\\""}], ",", RowBox[{"i", "=", "0"}], ",", "\[IndentingNewLine]", "procRFs", ",", "\[IndentingNewLine]", "syms", ",", "\[IndentingNewLine]", "symNames", ",", "\[IndentingNewLine]", "oldContextPath", ",", "\[IndentingNewLine]", "oldContext", ",", "\[IndentingNewLine]", "package", ",", "\[IndentingNewLine]", "context", ",", "\[IndentingNewLine]", "defNb", ",", "\[IndentingNewLine]", "needIRF", ",", RowBox[{"needIResourceFunction", "=", RowBox[{"{", "}"}]}], ",", "\[IndentingNewLine]", "paclet", ",", "\[IndentingNewLine]", RowBox[{"success", "=", "True"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Block", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "$ContextPath", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Needs", "/@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Catch", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{ RowBox[{"AnyTrue", "[", RowBox[{ RowBox[{ RowBox[{"Order", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "18"}], "}"}], ",", RowBox[{"FromDigits", "/@", RowBox[{"StringSplit", "[", RowBox[{"#", ",", "\"\<.\>\""}], "]"}]}]}], "]"}], "\[GreaterEqual]", "0"}], "&"}], "]"}], "@", RowBox[{"Through", "@", RowBox[{ RowBox[{"PacletFind", "[", "\"\\"", "]"}], "[", "\"\\"", "]"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{"Throw", "[", RowBox[{ RowBox[{"Failure", "[", "\[IndentingNewLine]", RowBox[{ "\"\\"", ",", "\[IndentingNewLine]", RowBox[{"<|", "\[IndentingNewLine]", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], "\[IndentingNewLine]", "|>"}]}], "\[IndentingNewLine]", "]"}], ",", "PacletizeResourceFunction"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Internal`WithLocalSettings", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"oldContextPath", "=", "$ContextPath"}], ";", "\[IndentingNewLine]", RowBox[{"oldContext", "=", "$Context"}], ";", "\[IndentingNewLine]", RowBox[{"SetDirectory", "@", RowBox[{"CreateDirectory", "[", "]"}]}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"$ContextPath", "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Context", "@", "PacletizeResourceFunction"}], "<>", "\"\\""}], ",", "\"\\""}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"$Context", "=", RowBox[{"First", "@", "$ContextPath"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"procRFs", "=", RowBox[{"Replace", "[", RowBox[{"rfs", ",", RowBox[{"n_String", "\[RuleDelayed]", RowBox[{"ResourceFunction", "[", "n", "]"}]}], ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"AnyTrue", "[", "FailureQ", "]"}], "@", "procRFs"}], ",", "\[IndentingNewLine]", RowBox[{"Throw", "[", RowBox[{ RowBox[{"Failure", "[", "\[IndentingNewLine]", RowBox[{"\"\\"", ",", "\[IndentingNewLine]", RowBox[{"<|", "\[IndentingNewLine]", RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], "\[IndentingNewLine]", "|>"}]}], "\[IndentingNewLine]", "]"}], ",", "PacletizeResourceFunction"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"symNames", "=", RowBox[{ RowBox[{ RowBox[{"ResourceFunction", "[", RowBox[{"#", ",", "\"\\""}], "]"}], "&"}], "/@", "procRFs"}]}], ";", "\[IndentingNewLine]", RowBox[{"syms", "=", RowBox[{"Symbol", "/@", "symNames"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"package", "=", RowBox[{"Replace", "[", RowBox[{ RowBox[{"OptionValue", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Automatic", "\[Rule]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "@", "rfs"}], "\[Equal]", "1"}], ",", "\[IndentingNewLine]", RowBox[{"First", "@", "symNames"}], ",", "\[IndentingNewLine]", RowBox[{ "AutoName", "@", "\"\\""}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"context", "=", RowBox[{"package", "<>", "\"\<`\>\""}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"CreateDirectory", "[", "\"\<./Functions/\>\"", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"OptionValue", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Monitor", "[", RowBox[{"#", ",", RowBox[{"Dynamic", "@", "step"}]}], "]"}], ",", "\[IndentingNewLine]", "#"}], "\[IndentingNewLine]", "]"}], "&"}], "@", RowBox[{"Unevaluated", "@", RowBox[{"(", "\[IndentingNewLine]", RowBox[{ RowBox[{"MapThread", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"rf", ",", "sym", ",", "symName"}], "}"}], "\[Function]", RowBox[{"(", "\[IndentingNewLine]", RowBox[{ RowBox[{"step", "=", RowBox[{"Column", "@", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "\"\\"", ",", "\[IndentingNewLine]", RowBox[{"Row", "@", RowBox[{"{", RowBox[{ RowBox[{"ProgressIndicator", "[", RowBox[{"i", "/", RowBox[{"Length", "@", "rfs"}]}], "]"}], ",", "\"\< \>\"", ",", RowBox[{"i", "++"}], ",", "\"\\"", ",", RowBox[{"Length", "@", "rfs"}], ",", "\"\< (\>\"", ",", "symName", ",", "\"\<)\>\""}], "}"}]}]}], "\[IndentingNewLine]", "}"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"defNb", ",", "needIRF"}], "}"}], "=", RowBox[{"CreateDefinitionNotebook", "[", RowBox[{"rf", ",", "context"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"needIResourceFunction", ",", "needIRF"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"CreateDefinitionFile", "[", RowBox[{"defNb", ",", "rf", ",", "sym", ",", "symName"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"CreateDocumentationNotebook", "[", RowBox[{ "rf", ",", "symName", ",", "package", ",", "context", ",", RowBox[{ RowBox[{"Length", "@", "rfs"}], "\[NotEqual]", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", ")"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "procRFs", ",", "\[IndentingNewLine]", "syms", ",", "\[IndentingNewLine]", "symNames"}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ "step", "=", "\"\\""}], ";", "\[IndentingNewLine]", RowBox[{"CreatePacletFile", "[", RowBox[{ "needIResourceFunction", ",", "syms", ",", "symNames", ",", "package", ",", "context"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "@", "rfs"}], "\[NotEqual]", "1"}], ",", "\[IndentingNewLine]", RowBox[{"CreateMainDocPage", "[", RowBox[{ "rfs", ",", "symNames", ",", "package", ",", "context"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ "step", "=", "\"\\""}], ";", "\[IndentingNewLine]", RowBox[{"CreatePacletInfo", "[", RowBox[{ "rfs", ",", "symNames", ",", "package", ",", "context"}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ "step", "=", "\"\\""}], ";", "\[IndentingNewLine]", RowBox[{ "IndexDocumentation", "[", "\"\\"", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ "step", "=", "\"\\""}], ";", "\[IndentingNewLine]", RowBox[{"paclet", "=", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"$VersionNumber", "<", "12.1"}], ",", "PackPaclet", ",", "CreatePacletArchive"}], "]"}], "@", RowBox[{"Directory", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", ")"}]}]}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Quiet", "@", RowBox[{"Remove", "@", RowBox[{"Evaluate", "[", RowBox[{"$Context", "<>", "\"\<*\>\""}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"$ContextPath", "=", "oldContextPath"}], ";", "\[IndentingNewLine]", RowBox[{"$Context", "=", "oldContext"}], ";", "\[IndentingNewLine]", RowBox[{"ResetDirectory", "[", "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"outfile", "=!=", "None"}], ",", "\[IndentingNewLine]", RowBox[{"CopyFile", "[", RowBox[{"paclet", ",", "outfile", ",", RowBox[{"OverwriteTarget", "\[Rule]", "True"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"UnloadPacletDocumentation", "[", "package", "]"}], ";", "\[IndentingNewLine]", RowBox[{"Check", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"PacletUninstall", "/@", RowBox[{"PacletFind", "[", "package", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"success", "=", "False"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", "success"}], ",", "\[IndentingNewLine]", RowBox[{"Throw", "[", RowBox[{ RowBox[{"Failure", "[", "\[IndentingNewLine]", RowBox[{"\"\\"", ",", "\[IndentingNewLine]", RowBox[{"<|", "\[IndentingNewLine]", RowBox[{ RowBox[{ "\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"<|", RowBox[{"\"\\"", "\[Rule]", "package"}], "|>"}]}]}], "\[IndentingNewLine]", "|>"}]}], "\[IndentingNewLine]", "]"}], ",", "PacletizeResourceFunction"}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"paclet", "=", RowBox[{"PacletInstall", "@", "paclet"}]}], ";", "\[IndentingNewLine]", RowBox[{"LoadPacletDocumentation", "[", "]"}], ";", "\[IndentingNewLine]", "paclet"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", "PacletizeResourceFunction"}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.810123349270775*^9, 3.8101233558793325`*^9}, { 3.8101234421155705`*^9, 3.8101235267104964`*^9}, {3.8101235683482914`*^9, 3.810123568624285*^9}, 3.810123678613806*^9, {3.810123902412357*^9, 3.81012393779837*^9}, {3.810123989102481*^9, 3.81012420166743*^9}, { 3.810124444960411*^9, 3.8101244767198195`*^9}, {3.8101245768095565`*^9, 3.81012459718227*^9}, {3.810125356420286*^9, 3.810125372797784*^9}, { 3.8101272608497*^9, 3.8101272858270464`*^9}, {3.8101273731024995`*^9, 3.8101274031920958`*^9}, {3.8101275014969287`*^9, 3.8101276278861113`*^9}, {3.8101276599382725`*^9, 3.810127695457279*^9}, { 3.810128009981288*^9, 3.8101280478479624`*^9}, {3.810128463616538*^9, 3.810128474890066*^9}, {3.8101285371252213`*^9, 3.8101285667600994`*^9}, { 3.810128609720808*^9, 3.8101286365010357`*^9}, {3.8102144574021025`*^9, 3.8102144938398795`*^9}, {3.810214556335251*^9, 3.8102145576820035`*^9}, { 3.810214689873146*^9, 3.8102147243391285`*^9}, {3.8102148390839453`*^9, 3.8102148473523397`*^9}, {3.8102150659818935`*^9, 3.810215075788478*^9}, { 3.810215202793333*^9, 3.8102152187394505`*^9}, {3.8102152990085993`*^9, 3.8102153155833993`*^9}, {3.8102153709638805`*^9, 3.8102153898646593`*^9}, {3.810215454354921*^9, 3.810215454573034*^9}, { 3.8102155462675824`*^9, 3.810215547657843*^9}, {3.8102156592986016`*^9, 3.8102157105400343`*^9}, {3.8102159375099945`*^9, 3.810215945949483*^9}, { 3.810216009206488*^9, 3.8102160189945354`*^9}, {3.8102160841789894`*^9, 3.81021608430363*^9}, {3.8102161431319933`*^9, 3.810216195062047*^9}, { 3.810216297605381*^9, 3.810216316855422*^9}, {3.8102163649737873`*^9, 3.8102163668715363`*^9}, {3.81021661119878*^9, 3.8102167302991037`*^9}, { 3.8102249401507053`*^9, 3.8102249424267054`*^9}, 3.8102253184449654`*^9, 3.8102259872169323`*^9, {3.810226020975154*^9, 3.8102260309291525`*^9}, { 3.810227507407523*^9, 3.810227509068551*^9}, {3.810917914405207*^9, 3.810917968953289*^9}, {3.8109180250970526`*^9, 3.8109180736066494`*^9}, { 3.8109182060120564`*^9, 3.810918240224419*^9}, {3.810918284246874*^9, 3.81091842453747*^9}, {3.81091848948271*^9, 3.8109184903781962`*^9}, { 3.8109186191292906`*^9, 3.810918620758507*^9}, {3.8109187382989273`*^9, 3.8109187439388266`*^9}, {3.8109187899086485`*^9, 3.8109187900116534`*^9}, {3.811930924771628*^9, 3.8119309265456295`*^9}, { 3.8119309785595894`*^9, 3.8119309793226395`*^9}, {3.81193105881114*^9, 3.8119310676401467`*^9}, {3.8119311531551495`*^9, 3.8119311748195987`*^9}, {3.8119312488119106`*^9, 3.8119312499088836`*^9}, {3.812004156949252*^9, 3.812004170589493*^9}, { 3.8120042304816203`*^9, 3.812004233243113*^9}, {3.8120042699412994`*^9, 3.8120045018888626`*^9}, {3.8120051742371616`*^9, 3.812005242978813*^9}, { 3.812005283570155*^9, 3.812005350511188*^9}, {3.8120136462507043`*^9, 3.81201368164706*^9}, 3.8120139474200454`*^9, {3.8120144112409983`*^9, 3.8120144454104443`*^9}, {3.812014480020053*^9, 3.8120145008033133`*^9}, { 3.812014531990037*^9, 3.8120148162360277`*^9}, {3.8120149540679407`*^9, 3.8120149818248377`*^9}, 3.812015992642975*^9, {3.8120160848672857`*^9, 3.8120161042052083`*^9}, {3.812016165775136*^9, 3.812016207551712*^9}, { 3.812020964959403*^9, 3.8120209651825805`*^9}, {3.812021101824332*^9, 3.812021102539873*^9}, {3.8120211527238417`*^9, 3.812021179601372*^9}, { 3.812021432466688*^9, 3.812021448298497*^9}, {3.812021494533038*^9, 3.812021496063059*^9}, {3.812021547790165*^9, 3.8120215516104407`*^9}, { 3.8120217806064386`*^9, 3.81202184271361*^9}, {3.8120229142972097`*^9, 3.8120229144912567`*^9}, {3.812025391259339*^9, 3.8120253972240705`*^9}, { 3.812025840748557*^9, 3.8120258421077733`*^9}, {3.812030318931911*^9, 3.812030319103896*^9}, {3.8120386500860057`*^9, 3.812038665583606*^9}, { 3.812038896773744*^9, 3.812038931753574*^9}, {3.812038971033205*^9, 3.8120389916990585`*^9}, {3.8120390546746993`*^9, 3.812039055903466*^9}, { 3.812298471584094*^9, 3.8122984732238617`*^9}, {3.81229854598938*^9, 3.812298546176384*^9}, {3.8122993376039815`*^9, 3.8122993399197655`*^9}, { 3.8123444057478886`*^9, 3.8123444514254265`*^9}, {3.812344482241357*^9, 3.812344562233282*^9}, {3.812344615575219*^9, 3.812344718947713*^9}, { 3.812354694930208*^9, 3.81235469496128*^9}, {3.813834094367584*^9, 3.8138341024174113`*^9}, {3.8138345336731806`*^9, 3.8138345361319327`*^9}, {3.813846226689605*^9, 3.81384623079824*^9}, { 3.814448629458082*^9, 3.8144486750133276`*^9}, {3.814448792027659*^9, 3.8144489141528444`*^9}, {3.8144489576732063`*^9, 3.8144489931387854`*^9}, {3.814449029266794*^9, 3.814449097644743*^9}, { 3.814449957238067*^9, 3.8144500707977653`*^9}, {3.8144501031448307`*^9, 3.8144501165640087`*^9}, {3.8144501498160915`*^9, 3.814450153302552*^9}, { 3.8144502075983067`*^9, 3.8144502097422533`*^9}, {3.814469298592957*^9, 3.8144693023763943`*^9}, {3.8148146015570526`*^9, 3.814814620595435*^9}, { 3.8149762349212103`*^9, 3.81497624392037*^9}}, CellLabel->"In[16]:=", CellID->672866399] }, Open ]] }, Open ]], Cell["Documentation", "Section", Editable->False, Deletable->False, CellTags->"Documentation", CellID->475424634], 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoUsage"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->{"UsageInputs", FontFamily -> "Source Sans Pro"}, CellTags->{"TemplateCellGroup", "Usage"}, CellID->77317143], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", StyleBox["name", "TI"], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->415589021], Cell[TextData[{ "converts the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["ResourceFunction", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/ResourceFunction", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " with name ", Cell[BoxData[ StyleBox["name", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " into a paclet and installs it locally." }], "UsageDescription", CellID->522238241] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{ TagBox[ ButtonBox[ StyleBox["ResourceFunction", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/ResourceFunction", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "[", "\[Ellipsis]", "]"}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->929360290], Cell[TextData[{ "pacletizes the ", Cell[BoxData[ RowBox[{ TagBox[ ButtonBox[ StyleBox["ResourceFunction", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/ResourceFunction", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "[", "\[Ellipsis]", "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->216039179] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"{", RowBox[{ SubscriptBox[ StyleBox["rf", "TI"], "1"], ",", SubscriptBox[ StyleBox["rf", "TI"], "2"], ",", "\[Ellipsis]"}], "}"}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->234491822], Cell["packs several functions into a single paclet.", "UsageDescription", CellID->21642035] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{ StyleBox["rf", "TI"], ",", StyleBox["file", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->899917871], Cell[TextData[{ "saves the paclet file to ", Cell[BoxData[ StyleBox["file", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " instead of installing it." }], "UsageDescription", CellID->817667823] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{ TagBox[ ButtonBox[ StyleBox["PacletUninstall", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/PacletUninstall", ContentPadding->False], MouseAppearanceTag["LinkHand"]], ",", StyleBox["paclet", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->120857401], Cell[TextData[{ "uninstalls the paclet with name ", Cell[BoxData[ StyleBox["paclet", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->596281745] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Details & Options", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Details & Options", 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoDetailsOptions"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Notes", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->85988701], Cell[TextData[{ Cell[BoxData["PacletizeResourceFunction"], "InlineFormula", FontFamily->"Source Sans Pro"], " can be used to install a local version of resource functions as paclets, \ complete with local documentation." }], "Notes", CellID->505737131], Cell[TextData[{ "Since ", Cell[BoxData["PacletizeResourceFunction"], "InlineFormula", FontFamily->"Source Sans Pro"], " stores the code of the resource function in the created paclet, it can be \ used to ensure that a given version of a function will always be available." }], "Notes", CellID->945842244], Cell["\<\ Functions that have been pacletized can be used just like built-in functions, \ with the paclet automatically being loaded upon first use.\ \>", "Notes", CellID->554024925], Cell[TextData[{ Cell[BoxData["PacletizeResourceFunction"], "InlineFormula", FontFamily->"Source Sans Pro"], " accepts the following options:" }], "Notes", CellTags->"TabNext", CellID->634001825], Cell[BoxData[GridBox[{ {Cell["\"PacletName\"", "TableText"], Cell[TextData[Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Automatic", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Automatic", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"]], "TableText"], Cell[ "the name to use for the paclet created", "TableText"]}, {Cell["\"ShowProgress\"", "TableText"], Cell[TextData[Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["True", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/True", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"]], "TableText"], Cell[ "whether to show the progress of the paclet creation process", "TableText"]} }]], "TableNotes", CellID->667184426], Cell[TextData[{ "With the default setting ", Cell[BoxData[ RowBox[{"\"\\"", "->", TagBox[ ButtonBox[ StyleBox["Automatic", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Automatic", ContentPadding->False], MouseAppearanceTag["LinkHand"]]}]], "InlineFormula", FontFamily->"Source Sans Pro"], ", the paclet and context will be named after the resource function for \ single functions. If several functions are pacletized, a name of the form \ \"PacletizedResourceFunction{", Cell[BoxData[ StyleBox["id", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "}\" is chosen, where {", Cell[BoxData[ StyleBox["id", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "} is a number to avoid name-collisions with existing paclets." }], "Notes", CellID->786545901], Cell[TextData[{ "When automatically installing the created paclet, ", Cell[BoxData["PacletizeResourceFunction"], "InlineFormula", FontFamily->"Source Sans Pro"], " will attempt to uninstall existing versions of the paclet." }], "Notes", CellID->134878355], Cell[TextData[{ "Calling ", Cell[BoxData["PacletizeResourceFunction"], "InlineFormula", FontFamily->"Source Sans Pro"], " with the same arguments a second time effectively updates the resulting \ paclet to use the latest version of the pacletized functions." }], "Notes", CellID->252998375], Cell[TextData[{ Cell[BoxData["PacletizeResourceFunction"], "InlineFormula", FontFamily->"Source Sans Pro"], " will fill the metadata fields of the generated paclet (such as version, \ author, \[Ellipsis]) with the appropriate information from the resource \ functions." }], "Notes", CellID->362332257], Cell[TextData[{ "Some pacletized resource functions might not work as expected if they rely \ on precise details of the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["ResourceFunction", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/ResourceFunction", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " loading and evaluation mechanism." }], "Notes", CellID->15970232], Cell[TextData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{ TagBox[ ButtonBox[ StyleBox["PacletUninstall", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/PacletUninstall", ContentPadding->False], MouseAppearanceTag["LinkHand"]], ",", StyleBox["paclet", "TI"]}], "]"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " effectively uses ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["PacletUninstall", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/PacletUninstall", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " to remove the paclet, but will attempt to gracefully unload the paclet \ documentation before doing so. This enables ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["PacletUninstall", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/PacletUninstall", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " to work without needing to restart Mathematica, assuming no other \ instances are open." }], "Notes", CellID->461544106] }, 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.2863], 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.2863], 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.2863], 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.2863], 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, CellTags->{"Examples", "TemplateCellGroup"}, CellID->992818145], Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", TaggingRules->{}, CellID->904125756], Cell[TextData[{ "Create a paclet from a ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["ResourceFunction", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/ResourceFunction", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.812037379307002*^9, 3.812037396402172*^9}}, CellID->875145491], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", "\"\\"", "]"}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.812037452224844*^9, 3.812037469012989*^9}, { 3.812038279810628*^9, 3.8120382849715433`*^9}, {3.814445182153923*^9, 3.8144451845795603`*^9}, {3.8144494823620844`*^9, 3.8144494829939747`*^9}, { 3.8144498066595373`*^9, 3.8144498074922557`*^9}}, CellLabel->"In[1]:=", CellID->188670269], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"BirdSay\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"3.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"BirdSay\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"3.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\rhennigan\\\\AppData\\\\Roaming\\\\\ Mathematica\\\\Paclets\\\\Repository\\\\BirdSay-3.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox["\"Have a bird say an expression\"", Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "BirdSay", "Description" -> "Have a bird say an expression", "Creator" -> "Wolfram Research", "URL" -> "https://www.wolframcloud.com/obj/resourcesystem/published/\ FunctionRepository/resources/BirdSay", "Version" -> "3.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Symbols/BirdSay"}, { "Kernel", "Context" -> {"BirdSay`"}, "Symbols" -> {"BirdSay`BirdSay"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\rhennigan\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\ \\BirdSay-3.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.8120390358649325`*^9, 3.8120390724535217`*^9, 3.812039165862424*^9, 3.8120397003637605`*^9, 3.812181916504711*^9, 3.812181956982348*^9, 3.8121820259761677`*^9, 3.812288524694178*^9, 3.8123484752751646`*^9, { 3.8138441295467997`*^9, 3.813844156440628*^9}, 3.8138461871300583`*^9, 3.814445222571102*^9, {3.81444900761556*^9, 3.814449037554845*^9}, 3.8144490846809216`*^9, 3.8144491257444253`*^9, 3.814449411399413*^9, { 3.8144494733496056`*^9, 3.8144494903279743`*^9}, {3.8144496524423857`*^9, 3.8144496762708063`*^9}, 3.8144498174645395`*^9, 3.814449873095602*^9, 3.814449922317259*^9, {3.8144500040119176`*^9, 3.814450066196883*^9}, { 3.814450132762865*^9, 3.8144501682038336`*^9}, {3.8144524585849776`*^9, 3.8144524837834496`*^9}, 3.8144672936866393`*^9, 3.814467380360535*^9, 3.8144705079083557`*^9, 3.815936806499283*^9}, CellLabel->"Out[1]=", CellID->293285788] }, Open ]], Cell["Use the pacletized function:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8120383695898533`*^9, 3.8120383814138784`*^9}}, CellID->728860234], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BirdSay", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8121820300251913`*^9, 3.8121820330988693`*^9}, { 3.8144453827359657`*^9, 3.8144453885399847`*^9}}, CellLabel->"In[45]:=", CellID->30312315], Cell[BoxData[ InterpretationBox[ PanelBox["\<\"Hello World!\"\>", Appearance->Image[CompressedData[" 1:eJztfQdAFFf+/+7MbGELLL3DUqVI71YQKQIamoCIdLbvgiZRBBSTi2JDk2hi YiyJGrErSlu8xFzukvzvcvdLcnf/v8nv/r/LmYupp4kKNsr+3puBYakuCqws 88mTLMvszNt5n/n2955LcXl6MUqj0Vr7/sHXGgpPN6gxokCBwrjw2Wef7du3 r7a2NicnJ3oYUlNTa3FcuXIFHKnvzlKYIvzyyy+tra1g3AEH2Gw2bZwAn6qs rDx//ry+vweFicf3339fV1fn5eU1XlaMBoFAUFhYCCSMvr8ZhQnAJ598AkZz tLG2sbEhdAoQL1dGAqFuwDFCoXDEM4D3d+/eDQSUvr8ohXHj3r17hw8fjoyM HD6s4M2KioqGhoavv/56XOcE4ggoGvDZ4YQBmksikYz3hBT0CKBZgIgYzg1A m4m6BLBjAVuGXAVQBVx6oi5BYZIAHvbh0gOoG6B0JumKgHiBgYFD2Hj16tVJ uhyFJwQYL2BPatsbwJwAtJmCSwPrRdsqpkTKUwhgNyYmJmo/zoAeU9wHYAUB 75gSKU8ngGOibRuAJ3rylMsjAS49RKQA30dfnaFAAKgY7YcXPMvgidZ3p6Dl rB2pm3qxRoGENkOAMAEiRd89GgBQNNomNMUTvUCbIcC/eArDWUCmaVtKEolE 3z2aWXj6GUIA8CQnJ0fbGdd3j2YKgFohNf7TzBAS2nkBiidTgGnHEALaPKmo qNB3dwwZ33//PRkuEwqF0ytXos0TKn08eSDtwGnHEAKpqamkLzZdZOD0QkND A/kk6jFc9iQAkpCM+1HGyYRD+/ZOa18S2FQk1QHt9d0dgwLpSAKqPA0x1ScB aZwA+2pq8o8zAdpP31MVVn08AJKTZUvAytJ3dwwBwMAjFQ2QJ/ruzsQAeDfT 3b56qlBbW0sqGkMSzqQCNRjm6wtAMpNixMDMvM8++4z4Xmw225DIP/UgczSA Kvruy8SDrHukcsRPAvI2GmTpDhn5MQCXTV8AFh0pkA0yPmnAynTKUFFRYfAZ MdIsj4yM1HdfpiXIYIIBp8OAyUomtadjNkq/uHr1KhmW1HdfJhdk1o/SOONF XV3dDEmEkRrHgLXqJCE6OnqGPF9k9BW4cvruyzQDWVxk8IEm4LiRThzlCOsO YMLNEIOEABkOMmATfcJx/vz5GZUklUgkBhwznCSQVusMseXI7APwdPTdl2kD sizH4K1WAqS/LxQK9d2XaQOy4HmG6GhgrxpwHnOSQPq/M4QkAGTcVd8dmTYg V2+YOZFqMgdBuPwUWx4J8o7NQJIQ7r++uzMNMMNJou++TA/MwDtG6wcVdNUR 5PIvM2dFd5Ik+u7ItMEM9G7I9I2+OzJtQAbTDGAqli4gc1VUME13kIWLM2Q1 VLKaF4hQffdl2oAsI58hE5fI72vwFVYTCHLikpeXl777MhUgJSc1AUd3kLmM GeISkt4ctd3SuEDW4Rj8fGrwFJCJG4OcXjR5IOtwDF4CkzWulGszXpBrkhh8 eTC5bQFltY4XQAiTtdCGHZwncxAzJCg0sSBX8DDgyk8yQgKeiJlgok84yMpP A9Y4pPM7rVcL1CO0J90bpG8IfBnSrzF4J27yQBp1Bjm3AqhRgxeVU4Dvv/+e yWQSd3LXrl367s5EglqcZAJha2tL3EkXFxd992UiQQpJapmjJwSZxAFYuXKl vrszYdD+Xgbsu00NyLU7kpOT9d2XCQOQG2TSgVrg6Amh/bgZUh0juSAJcG2o PWGfEKQYMaQZsoAVpNs7Q0qqJg+GKkbIqgCgcSh79QlhkGKEDIwAYWJIzNcL DFKMaO9AavD1D1MAUiYbjBjR3o0FfDtK0TwhyGWODEaMTNMdSJ9mkDEEw0iM UgyZcJBixDA2+NBmiFAopBgyISDFiAGslgYsVW2GGHZ93ZTBYMQI6Dy5ohfF kImFYYgRQHWyOpeGzy+jGDJRMAAxAkwO7b3mASorKylvdwIxsWLk6tWrxcXF Bw8efPJT6QJAj927d5NFRISKoSoSJxYTK0bA2SwtLcHZEARRKBSTKu0BG4Gr ThqoBIA8oRyZCcdEiRFAD/JU2sjJyZnw9XDAtbStUwJAmFDTZyYDEyJGwNAM oQedTh8+guCpf5JBBEKpoaEBMJmcUaVtoO7bt48SIJOEJxQjQESQy2eRZAOn AnwDfBj+sBOIjIwEx4ARBx8f27YEB9TV1aWmpmqbHNoAf6Kkx6RCO3s+XjEy Bj20DwNmA3hztCEeAsDYaBzkgsOjAfi5wHmh3NvJhva0gnGJkeH0oOHm4tg0 A58C6ma4ptAdgBhANNXW1j5S/lCYKJBiBNx8HcXIZ599NlyDAHqM64kGlgNQ EGCsCaExtpABsgVQ6/Dhw1Q96tRDW4zoMq0A0IMsV3tsejwSn3zyyRUcE3hO Co8NUow8cnbSiPQA71D2gGFDRzECJPyI9DCMYiQKY+ORYgRIiSF5EIoeMwpj i5ER6QGMVYoeMwqjiZER6QG8D8qMnGkYUYwA/7eiomJImoyihx7R09PT0dFx +/YdXYAf1QE+MlFXHyJGKHo8VXjw4EFnZyegh7r9cuziuNCwiMioqEiAiIjI iMgBRPQ3gKio0PCIhTGxTc0t4IN3794FZ7h///5j90FbjFRWVg6nR2BgoEGu fPWUA4wpoMetW7e3btuRmpaeuTw7InIOiqI0nYEgaGhoxPKsnKysnLT0jOfX Vt68+UtXV9djdIbcFXo4KHpMPXpwgNFcV7leqSqXSOVCFzcEBx0AQREURcD/ QKPRYaP3N/xXBDYa0n8k/H/fZxEzc8u8vPyq6pqbN28SV9GxS0CzDJEbFD30 CPCY/+7DD1/du6e4pITD4QC5gWEYnYYPNF5kATjAoqMWTBNnrrWXsUOopXuM fUCcU8gi+8AF1rOjLL1CzN18TZ2cuRY8lIXS4IfoeKEXYAz8gSDgtMAT2bNn zwe/+93Dhw916RW5HCUJoVBILRc29QDj9dHHn5w+czYxOQmMIwPDIC2QvkFh 0BBrJs9X4BBj45fjsrDCL31TWP7uuaIjCc81p/6mPbOu+ZkXzydtOJFQ+Xbs 6tcXSF8KWSnxSkxxCA238PDk21gyuCgkC0EYOsbAOEac+ISE06fPfPTRx0Cp jdGxIWIE0OPw4cNTdVcoDKCrq7u5uTU4JIxvbMLSGhGUjloyTWbznRJsgpS+ yW8uUnyctfPfZUd/lp65KTl7R3zuruTCPfkl0O7KLnbKGu9KL3ZKG2/Jzt2U nvlBfOLv+W82ptTuiioRzVq80NLbjWdtinEYUCtBtrBYLD5fEBgUeuLkqc8/ /2I0qpBihKKHHgFUzKWmSwFBQXQEI+kB5IiAwQk0EUpnp5xIqvoi7/Vvio/8 Ijr5QHahV9WiUbVrlO0ahRpvbVoNvNneo1T3qtQaVZtG3nxX3Phj6al/lbzz p5yX31ikynZbOItrbYYZMRFCtNCYDJa9g5OPj9+b+98aMcwOxAjwa/bt2zf1 d4aCBqdHR0dnU1NzcEggfLxxywGYHCaIUbBAWBGw7FRK1d8K3/xVdl6jBIOu 1ijbehWtPVqtl2jy/ob/Sv5JA1sb/tnfgl9/Ep3608rXDyQ8W+QdN5vnwEOY GLCA+wtKha6ue1/bC5xlfd8VCgPovHv39X1vrMjNC4+IhNYpnQb+celoiKnL c8HpwMC4uupAh/xcj7JZA0ZfNsABzeDWq9VG/pO8tUfeBn+q2h5UtP4sO/NZ 7munE9bJfJI8jawYwDHCoEUL/CB3T49X9rxK8eQpwb179/e9sd9zljcKvVTo 0WI01BY1ThNG7F9U/o+Cg13yFo28XSNt08iGSIZxNyhblC3w45Aq6h5Fe6+i rUtx6fP8N1+aUxxh6cNCWNCgxf1lNw/3PXv3UgV+esf9Bw8OHDzk7u6JBzOA HUI3omOzTZwqfJe9n7HtV+n5XsAQWQt49jVSda+8vQeoDPDO45IE8kTZ3KsA PAGUAydUA7ZopC3d5S3/Ljt+MHZNilOEJcaFjjYGDRWgd4B98iThWQpPCOBE HDl61MXVlQhfgKHhM9nRdrN3zi39qujgXUVzr6wNKJce0KCWaSN+7VM3E9XA 2aTgEi3diqYb4pNNaS9lu8aYYzzcn4ImipNQ+NbBAwRPent79X3PZhbAbT/8 ztvOrkI6bjECOWKGGS93mXcpve4H6TnosCjf0yiI9v7kN3CVy8A/6lBc/CBr 90q3aOAgA44QlqyLm+sHv/tA3zdsxgEoevB4gpsP46CgoTQUwRbY++9fUvH3 kgPfihu+LT1+TXT8mvj4NyLYrk1og+cEZxY3aLXj/xYdu1569FvRsaslB/cl lEfaeUO7BIUsMRaYAD7fun0L+F937nQMB3iTMnEnFoAh+954093Dg0aYiAhC gzRBHLmW8+19k4VBy5yClzqGJTtHJDuHpfS3ZOfQZKfHbEnOsCUTzQn+TIEt TPuYFOeQFKeQFHhMWKSdnzXPgkHDnWKEzmQxAwIDFsfFxS6Oi43Ffw60+MVx CQsWxkilcoonEwXAkDfeeMPTcxb+mEI1gwv1vggF8aK/0Uf6ddwN0Wpa7z/i KrT+X8dOLuOzdeExfn6Bt2/f1vfdNQQAO+TAgQNeXl6QIXg2FqHB0OrQkegb nv5RGhi8xwEwefCGInTcxSbGn95/VTqGpwqHUWQ4FUYBUbEQHBJGkeTJARhy 6BDwdt2JlD2Q46ZsM38LdxMml9YvSjAMs7A28wlw9/F355vyBBbGHj5OfsHu rp4OLBZjYGB0FCPDpuQTMDbhePm7zvJ3MbHg0zGGwMLUw8d5doiHm5cz24hJ 65vLT9eFIdAJwkkSEhJOkeQJgTPksNDFhUYUeICRQnmZbjFbForceXbkcHB4 nPB5/mtqSlZXl7j5OviEeZatyVm/VZonTueb8B8l+UkxNAA2m2VpZW5rZ2Fj Z25lY8rhssC1PX2c1mwoUVXl+wS7IWzEN9inrHxFVZ20SLEc0HLwOUaUKyPA P4BSN0+K96984OrmQcPdXfDg8RBWgmPIxWUvfLTylVTHSDeetRmTi9BoXB4z bN7s1bUlz24qC4r0CosJFK3LW79dWqzKtHe35ppy2BwmQg7a8Od64E99zdHF IbMgqVCesUqavqIkZZYvrFny9HV+trZs9cbi0AW+pvbGodHB4ufzq7fLRGty nD3t+AIO04hI+WkVKBC6aJgYAT9NTExs7eyTU5YCN0fft3ka4+HDh2+/c4TH M4H3GkON6MxFNgHHE9beFJ+6Izn311VvtOZuW+YxF/g5DCbdxdM+JWvx8sKU lWVpKyXpy0tT0gsSlhclrpAuyxGlBkb6cvlGgzhCmJ1DVAsdNzTodN8AzzWb yqq2S9dvk67bXBY21w9BETsnq2XZccsLk5YXJeeKwVUyssuWZRQkZhUm5UvS 8kqfcZvliJ9vKEloWjqM1DXp6envvX/lb3//v93d3fq+09MVgCHnzzeGhUcx GWyMRmfTGXPMfQ7ErPlJdKpH0aKRt2pU790tb5L4pUBnGKFxuGxLG3Mnd9s8 SVrFxuKYpChrJzP/SM/yTUXVOxQp2bHW9pY0rWHq40k/W4aQxC/YA3BjQ72k uh7wpCxsvi8gCZvDsrQ1c/N2LFQu37BDXl5TsGhplK2TxewQN1V1QdVWaUCY N2GTjk0SAGBEyeVyKr/zJAAMOXfufERkFIJA645NR8LMXfculH9b0tADc/0t vTKYvPtFcV7skwiTsHhVITiSaYRl5Cc8+2JJ1PwgBKXbuVopqgtrtssz8+Id nK37HRP6gEihDZUkhCvjG+y6dnNJzS7J+noJThIfPMcLOwPUyip5xsZd8tW1 hXNjw1AMsXEyla3Lq9wq8Q/1GkWS0IfoOgxDpVIpRZLHRldX14ULF6Mi58Ly VITOpiGz+fb1c0uuFR/rUrXDnB2Rz5W3dSqajiWuj7TyxoCjijOAxWdmFS1d XSuaGxtsYm7kHeK+urZs487yzIJEd29HjjELZWJ4mfOA5KAN/gX80cLeLHnF osptgCHSmnpx1VZxyFxvBO3zXExMuQXy5Zt2rymvKZ6fGCGw5M8KcKnYWFqz Ux4R7cc1YbM5Rlo8HJBd/VeBVweSpLRURJHk8QAU9MVLTWHhEUTdMZOOeXBt N4Zkf1VyCMgQWNRBZmZhhre9o7zp3SXrs10XzLfzBWYtykEjY0NXiNOW5cZG J4cnZsSkr1qSWZiUWZS0JCN6blyYu48rxsD6LdR+auAvUQbiKLTzDHBJWbFo /TZ59S7Z+p3iml3iqm3ipKz5ngGOds6WQMhwOEYLE6OWF6Vklyx7Ji9+UUpk QsbCtFVJGfnJiWlzY5ZEevl5IBjSLzQGeEJQhcFkBwWHLklKee21fToWUVPQ BmBIa5s6MCiEmMSA0lA3lu3zfsuvFhzoUrZoZIAbLb1aNR7dsK5D3Slr/El5 5nR6jSvHCoyCEYcRvtBftDZ7XZ2kQJFtbmfKMWWlrkxcu0W+dossNTfJiMPW tljx0YNjyuGxsvKS1m0WV9aVVe8E1oioul5cvRM06dotZc9vLlm6YjELekko k8MEIitonm/Zc7lAyxRXZFk5mrO5rGVZ0dVbFYCZDCZG07aQSfMHaCtjwf63 Dt66dZtiyGMAaJnm5paAwGBYpwp9XpoV00QyK/mL3DcfwvKhy71AjCgH1YT0 KFu74M82zZr3P8jcJuRY0/BS9uA5frLq3E17lMUVK3gCPniuU1cmbXylYuPL KqCM2Fw2HnRBSEkCU0A0uhGPmVeS/MIriqp6UdUOUQ3kCWCIpKpeWrVLsnGP PKMokcEhamiBq0v3C/eWVuZt2qMSr10psDIB103NiX5p7+qluYswBjpAEi1R QoPeuvHRo+/q+2ZPSzx48OBC46Xg4BAMpkrgHRUwOQVeiz7J2X1fflEzSm1h X82YvLW3/PKHmTtD+C5chMtiMAMi/UorctdtluWJMo1NjDEmI2V5/Lot4nWb RWm5CWweCx8zhLRIEDxXY2zOyRWlbNwlq4LSQ0K2KthEG16WZBYv4ZoZMZhA DzIQBPML8SlVZa/fIi5SLDe1NAb2E9BoNVsVKekLBkgyYIrQCdPawtL6xIlT lNs7XvT09Fy8CO2QvgcPRU0Qdq7Hgvezt9xVnOurGxxWdzqILUr1D8UNF1Nq d8crQ609BWbGHj5CvyBPV09HJhNDUNReaOcb7O4b7OHkaocxkAFVgBOFwaA7 Cm2TMmJWbyqoqZdqM4RsNbukypqCrMLkJc8sMLc0AR81NRe4ezuDc7p5OTHZ GDibnZONX7Cng5MlMQ2s3yQZCPWbm5tv3lLX0dGp71s+/QDESN3WbSwWG7+b CB8xynSKUj/zG8AQjaxpSG1q7yh1y1AZVbRfV55Jc5uL9PmdZOoNIfUKGbTQ fspZRoygcJ+KDcVQjOwQj0iS6p2ymp3SF18pX72h0NHFSsud1UoJ0/qk07CI bp8YcXVz++677/R9v6cfgBj5/e//kJy8FIWlqjQjlBVnH9SYsuGO9CywQHrl sI1W1q5lxLZ1QX9H/Z341DLnSHSAIDBggQzK6dPI7D/p3LA5rKAoH2V1wYZd 0tFJIq3eIdpQL1VtKPD0dQaeF7BkEC0mal+FrC4YeIET1dTUtKqq5s4dKg4/ DvT29n78x/+TkJjIZDLBs8ago/6mwkPxa26ITmkUbSORYWRJgns6beDFDcmp 34TlL3EISYblRrDiKMVpoC11CksBzTl0mXNYnFOIPdeKiHoZ8dhh8/1UNYAk o0uSejGwVWrqZRW1RUGRPkD44MYM4sC1jHcMSRJGgDMvxVsK3oiaJfAiySnU S+CMwdkekJACgdnJU6cncM0TwwZgyKd//ktcfByGYUS5hiPbvCY4638KD/Uq YRhkDC0zglkigyTpVl76UXryX9o1h2UnQLuG/yReXBOduC4++XnhGxmu81Dc fOXwjSIWBlRsLKoZiyQiSJJdkCQB4bMYbGiasuhYtuu8Lwpfvy4CZ26AlxCd /KbsJLwQfvV/ixv+KX63ds4qM5QPBQ9wgfkm7xw5RhmuOuLuvXtJUMugeCwc +r2x1v6fZL98XwnG+tEMGUQSeSseRSF+tg8qVFZeHtbaNcrffld6PNdtIQor 3GgcHiRJ+YYiICjGIEn1TjEQNaqNBT7Brgw8q8zH2GKvJTfEJ/tKr7Wv0lcm /X6v8r0LidXhZh4MFAofYxPTEydPUfXzjwRxi3788Ucvb18aXrAKnjEHrll1 cM6PpSd7y98jdMcY9BjJI4aTYnql7d3yy8RsO6L1DGvdMhjS/67s+Cr3aFyS 0I247NB5s3F1Ix/i/w5RN+AAQBIPf2c4E4xGs2Txy/1Tf5Cc0CjbumUt2lfp m3aBz+P4S9YrRbNiBSicxs7jmxw+/M7YqxBQIHDz5s38wgJjgQk09KBVR59j 5dW4tLZDeg5aIzJiEveATaIzW9p6FW3D+KM9H7wNz/6ob0rPynxTWAgDXJ/F ZgBPVrZ+ZfXLklFJAgzXnSJAEkVNsYu3E+7H0B2NzNeHZP8sOQWkU7+BTVyF lIHwzR/LTmydW2iBGeHuNmv+gujmllbKLBkbHR0dRSXFDBaTsP3ADceV+/wv iw70yC/Buy0fIMkj6THeyZu9eFzltvxCVWiOBcsYFrajdGdPW/HaFZAkY3g3 BEmqi509HXFXGnHhWG8Kz70hOaNFkmHXUrR2qVpOJVV5cW3x+AnCZrPrtm2n wvJjo+HkCT6fj2dEiZpEmjVmUumfeUNyWgN9XnBv1bqom0fM8h7jeKX6jqxx +9xSN541EdqwcjQrWZNdvXtMF3inqKZeKlmX7+Bqi8dEEA+e7baowl+kZwFJ evpJMvRa4Oso1X/MfCVdOJfLgBqHxWLV736ZkiRj4/m1a1lGbJwkfTXo/gLh m9FKMHCEvtCMkyS6c6n/hbpTfunNReWBpkKi4tDM2jhPlrZ+J5HRG4UkwCzZ Ic5XZNrYWxCBMz9T59cWSm/hJCFqGLRV5MBXUKq/KThWE55nyTLB6wQYJWUi ajOysSEQCIgIJFG1BaRJslPIB+l1XbJmYv0Q3WXC47Kl7b780vnEmgU2vgRJ TMx46flL1m0RjcIQCXRt6sXPby5dlhtvYWlKkGSB9ewzyRs65BeAfgQ28xAV qaXd2u6Izr4du8bRyIqIx3J43HXrK+9T5uvoGEh6QYOAhtGRUt+4f5W8g2dh 2iabIQRJHsiarqRuS3EOR/FYKE/AiU+bv+aFotFyN4AkG3dJyjcWzIkL5Rlz 8EwwkiGc8+eVr3XJLwHR1KsYlSTQyVK2tKa/5MV3JL42eEbKxFTR0VjQruUA z7ExwqoOzb6laBwSZZ1UknTLW77IeS3PMwbDixI5xuz5iaHKDasASapGcYE3 7pZJ1q109xcymBiMrtCZKp/kn8QngR3VTVQsDDNZ+/PUbb3l6o9X7I4y98Lw ecIYhkllVPniWCDSosTSQOAxtmcJts0tuQdrRdRTwJC+Jld/W3xM4beUhS+z xuYyg+d7SytX4CQZwSyBQZJ6aaEq08LRjIbP6LNnm2+PKLyngJUM3bi4GIMk GpX685WvLXWK4GBMgiQSiYQiyRgAHGEiGJdphOEDJDSyeHm+5L6yWaMV4pg0 GQJbD3Q62jtljZvC8wT4IkUoE3X2cigqz964Ww5rjYg2SJJIKutKM/MTjM3h IiRMGhpmPqshdm2XrInk9nAPq++FDJCk/avCAxLfJeYsfA0TDBNJJHcpkowO cJP4KNuaI2ChTJwkloAkD6aQJPCpl7d3KVv2LVJ5cG1QPM1nbM7NLEip2iEj lIs2SYACAhKmvGZVdEIoB9YswcBOusu836fv7JG1PLLbGpkauD//Lj36YtQq J545QRKZXE6FSsYAD+W482zceNZGKLzhzjhJpkaS9A7oAnW3quVy6uYkxxA2 LtBYRoyYJVHlG4uqd8qgI1xfNljXyESrs/1DPFgsmIJhI4w1/unfFh4bnogc wXaVw5U//yM69dYilRffBq+xRNJS037++T/6HoqnF7MEDs94RPkbO7FRNtDv U08S/PzqHmXrvwoPrQ1KN0agncBkot4BroWq5TX1yqrBJIGuTb18lSTN3tkS w5O5Jihne2Txfemlsfs8oHfk6k7J+calmwIFjsQqXmwWO7+giFqcZDQssg94 YV5RmJk7A4GrvgObZPcC0X1V05SpG/zpbtfI2jsVjftjyh0xM1hBhNDNzfmp ufFV2xVV9ZLBUTVx1XZpel4C3xTmX1A65st3fHvxmofA2O6f5TEmIWHc9YGs 8bcZW0LMhMQ6jeA8i+MSqInAo0Hik9iQtnGBlQ8Dn1TlbGSxC5BE2YQvgDlV kkSuBiTpLm9Vp9ctsg1gIUw8+4ZEzPeXVRbgGmeQd1NRWxSTFEXUGrER1lLH sMtpW4DCIkjySE4CkjyUN76XWRdiLiQX80xckkyRZDTsny95P3tnnLU/C5KE ZsUwfiGqoAP4kjDJPmhmzWSShBjftn8UHqoOybbGF06kI4iNrdkzK+Kqtsu1 eVJTLytQZM7yd8UwOPnCGGE/65/636ve6sVnJeug2rRI0i9JgMaJT0ikSDIa /pi5879W7M10mcNjQMPVCGHI/ZZdL32XvOGTGnQlSQLtSVlrp+zCxZSacBNn WLVKRzAMCZnnp9pYvH6HlNQ46+pEiekLeaZGeEEz6mRksT9W1SE9r8Eprbu6 uZy+GZCEiCJ6eXm98soeysEZDTdEp/9ZeLgyONOWjSe86MgzzuEfp+/ognbg FPIEHzuNSv1l/gG5zxILFhePAiM2ztbLVsU/t620epeoBjjCOyTi53MCw70Q qBsRDspMdAj9ILO+R9WuGRZAG36h/hdtnZJz55Nr/AUwMo+imKhMTC1fMwYe KFtvl505Fv+ch7E9UbAeZCY8FK3Cs8DqXh2qWyeKJ3hr+1Vy9njK+iATISxt ARqQgXgECotWZ67fJt6wU7J+qyQlO8bazhRGh+mIPctsc1ThteJjsE5Sq6tj UJEgyQ3RqYOxq72M7QiSyKRyqj5tDHQr4LLb/5WzZ77FbBQmymjmDN6z/mk/ yM72qNRDlM4kkaRXS5hAy6TgcLn3UlumgJiXwzVmhy8MUFYVbtghV1UVBEX5 oBgsPGHSsQVmXpcztnQBh12m7lU0jxVD0yaJUn29rKFubpkLz4ogiVQso8Ly Y6BXAncG+abwHZF7oiXGJxLBmcI5fy84+EDePDWSZJAwkV9+IGm6snx7kn0Q m86A7jCdbmljlpIVu2ZjcWZ+vK2zFTFNx4YleN4//X+KDmngIhhqojrx0SSB uZv2fxS/UxGQacM2hUs3YlCSUCQZAz3ydo2y7WfxyVfnSb349sSE7XALz1PJ VbfhnCy4xMRkM2TQOMJqydZfpKf3R5cHmrkRGzWiTMTFyzFrVXJwlDeTyyDW Ggkwc7m09IV7ksah2Zmxzy8DD8Xlv+Xvz3GN5jNgmQGGolIJlQUeC91KqFPu yS5cydy50Ho2gi+hbMUylc5O+qrkAPQ7ZJPuCA8WJnAPi275pf8ueXtdUJYj 24IomWMZMdxmOQss+IQYEWBG+e4xXxUcgnsk6c5ASJK2HlnL79K2zjGbBZQr +L4MBqNMVEaRZAx0KdXd+A38pvhYkVscn85CUTowTnxNnfYnVPwKp+8N1emT qGsIswTO3Gm5p2z6OHN3oWsMH2Fh+BRefOXpvlV+QwTCo4sqbolPE+VzulwC vsC158+lDa/PEzsYmeIGCRocEnzs3WNd3Y+zv/AMATBcu2GJjvqO9ML+mNUh pm4YXsXIw1gpjmF/SN/xQHaxd5KjatoM0cjwd+RtPQr1Xfmlk3HrIi3c2TRi cYq+KeFsOrrCdd5Xq/b3AKtpPGIEnlzZ9qeVe/PcF/KYLKIQenPdFiprMzbI O9kjb/2m5PjzQcutmHxi3rUj07QqOOd/Vh3Gh6/lkYGIiZEkAycH5pD666Ij WyJWCY1M0f5VWMHIupnYbJ9bekt8QQOXV9KpP6T31KVsOZNSM1vghOFeNIPB 3L5jJzXT8xHQCow/ULa8l7E13WUOiw5TsQw65s93ORq79pb0HP4YthFW5VSI lL5egS41/3HFy6VecaYMHlGojdKRZa6RH+bs6pINZPR07A8weK4Xv/tieJ4F xsOFEiIwNX/ttX2Pt5f9DIK2ylaob0vOH4ip8Be4sOgMMCJshJXsEHZmWe3P yjM9iubhe+dNKlUIr7ZTduFS8qZoc18OnQlkiS3L9IXwlXASluyyRj6O6R6Q UcrWDzN3pLnO5eAVVhwuf31Vze07d/Q9Bk87BqlsOdwj78vCQ2tDsqwZJig+ GceMyUt2jjievO4/kuPdyktDykcnN1aPb/0JevV96Ym98yQexrbAH1lsF3Bx WW23rBmQBNYYjNkHLaGE5/UUzftjVC5cGxSfRWJsLDjecELfIzANMPTJlbfc UzVdydiZ5hDOpTOIrY5MUKN4O7/Di5TXS449VOIzfKEpO8KCNhPFnEHnkcM6 2C8LD5T6LXFhWa0NXP7PkqPdcnwFSNkjLtd/HlwxyZq/Ln5bFbCMhbCJhYu5 XN7bbx+hDJJHYvCIgMezuVfZ8pPo1PHEddH2gWwUViYDf4dDx+YIPHbPE18t Otwlb8Z9kOGTwSeeJKTX0yG70LK87lmf9DPxNfdULcBJ0cWQ1hKSbfcVly4k 18ba+mPQ4qLzuZxlz6R9+ulfqKUnHonBIwLEO84TRfNP4hPHk6pS7MPNUS50 ilEgVlBfruOm8JV/yt59W3y2By4totaMOKYTRJghPLklu/BFzr5r+Ud6iRUJ hjFhbF3zg+x0dWiuDVNAzO5xsLW9fPm33dQsYB0wAklAg8mypl9FZ9Spm7Pc FpgzeSi+SjuwZR3ZpjnuC44lVn1Z8M4d0Xn8ce4fL3wsNMOMlifnSS+hCmUt D2VND+XNg0b/USQhXvRImz/N3ZvqOg+DW33RGAxGVFTkF1/8Vd+3f3pgRPFO yGfw4pb83JXM7cVesbbgAcTXkAINeKMBfLci98R34yv/f/E7nZILMGsmv6yR tcNsrAxftQauYzN0Pc/HYMvgLo1PXhHvw3k9CvVdyYWDi1f7WbgQ8xV9Z89u v3yZ8nx1xOhmQBt4coHb2yE/92nuq+uCsmYZ2TJpKLGgIfjPnMEPtnAr9o5v iF93vfjYfVnTA1lLtxxPswK2yNvxzcTbexU61Z3qqHQej3UaZdv10mMyryVw p2A8ExQ5J4qqMtIdow4KsfSZDDoR3fK2q6sO7J4jirMPMcV4KLF5Fh0atOC2 R1l6SXyW1M8Tn03e+Nfcfb9Kz3RVtHaXt8FZ25Aq/WeWa+mjYbWRj8ETnWVR 211Z43sZdTFE+hLfjyAsPOwOFR7RGUPGYtijCqOsPUCJyNt+Lj15aelv1gZl x9oEWTBM8A2L4I40QLiwEYaQa73Qzr9oVvyLEfmH459tT6/7ctX+W+Kz3aq2 nor2nvL2XtBUoKmhYwIt3rbecZbRjpMbfcwE1/qp7OSuqGIPng2xvIbQxWVL XR1ViqY7xn5syUHR9AejrouONybXqvzSoqx8zRnGxNpEdDycwqSjbDrDFOV4 8xySHcPW+KW+Ok/SkFjZuLS2PXXzhxnb/5T1yhe5+77MP/ivwiM3Sk8/VDb3 qFp6lM3jJcA4Gl43+03RO2VeieYsPtxGC0HS0jN/+fVXfd/46YRHiveB4cPz O0D73JM1XhMdu5BSK/FaEiFwtzMy4aAoufA39B3oCGALHzUyw/i2LBN3rnWI mWuM7ex05znFsxJWB2bUhK3cG638Y9bLnZJzGvlYZYeP3QYkiar9q4KDKfYR TISB7y6MZGXnUNUj44IuZsBgqqgJx6dTcv7rorcvPvPC88EZSU4hfsaOTiwz c4zLpmM0beDJfbjrFoJxMJYxg2PJNLZhmzqwLQpdoj9d8eoDRdNkMGSA2Kr2 v+bvn2/pB5PI+B6By7OyOzupfQfGgfHe9v61f9s0qtZeZWuH9MK1oiOfr9zX mvbS3oUyqXfSQlMfF6alJco3oRtxEBZ4flFIG4xGeEZa8OM7HV707G3ReR0L hx5LkrQAm+QvK18PM/PCp/0SJMnppApIxgNdJMkQnmgGHYZboSr1Q+XFH8Un vlj1Znva1iNxz70YmlfgsTjOPjjCwtPb2NGObcFHuRwgTBAMiBQmirEQLNrc 62JSbad4UlZV0pYkn+W/EW7uTacRm9kjmcspSTI+jFeGjxymgOYK0BrNveUt PRWt9xQXvy06+ufsV9TLXjqbXH0k7tl9i1T180QvRuRVhmQp/Z8p9U5QzU46 vEh1reRIN26TTLgk6e8YbpMUHs4QzuNgbLhOLU4SqhRtfBg9hqlj6x+RFjyq D/PIGllf8UaPsrVb1dpV3gLaA1VTh+T8f0pPXSs4+v9y3/pnwcE7srM9cI2L ERbmnZDWRxKl+nrJu1VB2XZcCxru3WRlr6Cm/Y4PEzUiWrvh9AXk8ZlWMBkH fSKiqWHcXq7u6VshthW6NsrmierDiDwBBs8votMHY1Tepk7EzN+IyKg2tZpa 4Fd39ChaJqvJh7T+TQfgX1v7Dpi8q/c3wJN70ou/Ta+bZ+VN7IiEoujixYsp YTIOwCVPDbrBEkf1l6VvpwvnMOkoipcbhYeHU7kb3XFX1mjYrVPa2Klo+of0 qHh2siVqjOEL982ZM4eSJLpj7wLp2G3PmL8++fGT3CSgA68tUO6YV5rsEm7O NCZWd4yIiLhx44a+7/20ga+JE2g+fc1xlOakddhoxzzJ8ZPVvPGfs43tvYxt bTgCNsro24nD2rqqqoqKlugIlIYSDRmz6XLMkxw/mQ1BaIP2ECU2XHB0dPro o4/0ffunB/o2YjXwppVK6t8X2MnJ+cPf/0Hft396gNx2e+guy4M3XNblsMc+ fhIx0A8a2RuCJEKh8A9/oEhCgQIFAwcQd/ruguZ/AUDrB2M= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output"], "Hello World!"]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[114065]}, CellChangeTimes->{ 3.812182037319572*^9, 3.812287729801235*^9, 3.8122885276030006`*^9, 3.8138441619650593`*^9, 3.8138461902657475`*^9, 3.8144453896149883`*^9, { 3.814467370907155*^9, 3.8144673843376613`*^9}}, CellLabel->"Out[45]=", CellID->488888757] }, Open ]], Cell["Look up basic usage cases of the function:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8122882676023827`*^9, 3.8122882838650303`*^9}, { 3.812288720425692*^9, 3.8122887238786006`*^9}}, CellID->962474874], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"?", "BirdSay"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.812288339741851*^9, 3.812288353174693*^9}, { 3.8144453933910046`*^9, 3.8144453947464824`*^9}}, CellLabel->"In[3]:=", CellID->881308311], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztncuPHMdhhxfJJcf8C/knFtm95Zirg/wBY43HzsEObAcmcvJBF+1hhYUu BmIYMGDZRgRjDh5kYoiOIdi0DEk25ZFlDrmz5PK1K5Iil+QuueKaJpl+TPd0 Pbt6+jE9U9+HTwI57OlnVfdvuquq/+HL//6l3t+sra19+++C/32pc+6fvvWt zn/+y98Hf/nXb3z73776ja90//kb//GVr37lW//45b8NPvx98F8/+EP451cA AAAAAAAAAAAAAK9enZ2dPX369NGjR/cBAAAAAJaNhw8fBmn22bNn7gH4xYsX n3/++f7+/hUAAAAAgOXn6tWrd+7cef78uTb9PksIkvPe3l78lclkcuPGjdu3 b98FAAAAAFg2Dg4OgjQbxOA03N6/f1+bhE9PT4OJ48muX7/+6NGjZwAAAAAA y8/JyUkadG/fvi3dHA4miP91d3c3yM+LXlkAAAAAgIpJGz9cv3795cuXaRIO Po9j8PHx8aLXEQAAAACgFk5PT+PecGkziRcvXsTxmLvBAAAAALDaBGE4vgP8 LBpT4t69e/Fd4kWvFwAAAABAvQTp9+7du0H6vXnzZvDna9euBX9+/PjxotcL AAAAAMDI3aPjG3ePLu4djm/eC/5w/OTpHDOJW0Skt4XjMdaqXlMAAAAAgAp4 ePz0wqVbP/n1pf96dyTZ/92VP98o1r43bh4ctxY+OTkJ/n/r1q2a1hwAAAAA YG4+2j34wS8/UTNw1p+9f+XwvusIwHESPjw8DDLw0dFR8P/gz7VuAgAAAABA IY6fPP3FxWv2DJwapOXxzXsus42T8IMHD+IRJNo5asTtd988d+7tj0vM4eO3 z517893bla0RAAAAADSHewxOvXr4IHe2cRKOM/BcSThKqRnqyJskYQAAAABv +eDKgSXx7t99fPb8r//7Bzkq//BXnz48zulGVyoJh/lSDJgfv00SBgAAAICq CNKsvW1wEIODNPvx/l31n87/cd8+8xJJuHw+dYUkDAAAAOAnFy7dsreCGHx0 9cPdz374q0+1/3r3yPbS5BJJOLojTBIGAAAAgNr40Xv6iOvoB1cOLDMv0zpC bRwh/JP8L1GejT5Mkm00g5g452YbHWeSbzJ99p81y83MTs7oJGEAAACApePw /iNLyn3nt5cHH11979Ob//fJDdM0P/9wYpl/uR5zSfZUQ6Z6wzhzYzdJtMm/ xxn5zTflT5K5JtPPFhN/kpm/nMqlv5OEAQAAAJaO8c17poj709+ML926H0fZ P1y9Y5rsR+99apl/6bEjMjdqhagpt2gI/55MIObcEF3fu3Pi9HLziOwExlvQ yXdIwgAAAABLx0e7tlEjfvirT+MoO/joqmUyy/zLJ+EYw23bNL0KUVRt92v/ RNtOOPOhPudmv0USBgAAAFg6Lu4dWiLuu3/cD3LsX1+8tA8uYZl/VUk4QtMk IZNEZ1G2mSQsL58kDAAAALBU7N7+3BJx49YRh0cnlml+8utLlvlXmoTlyJrm TzEIc08YAAAAAPK5/8iWco9Pz4Ic+/5lWwuKX1y8Zpl/tUlY7icXB9CPM02E I+ZKwlKQzW0GTDthAAAAgKXnvy+MTT3m4hz7zm8vmwYTDvxk/45l5uXGExbv 02pGVVObD6efFk3C5+S7zcpdZmXsCM3daQAAAABYIkxNhd+/fBCE2LPnf/3B Lz+5cnCkbSocfGh/4XLZN2sIaLKmElHTD4u3jsgOJ6x50Ybwz9IiScIAAAAA y8jT0y+0L9f4cPezuLvc4dHJT3+jv2/80a7ttRrPqm4dodLcK5kBAAAAYBW5 evhATblvv/fnvc8eXjk4Cv6gjcH9310JUrR9zjUnYYIwAAAAAJTFPpyadsgI e7uImFqTMDkYAAAAACrhzzfu2scNTv3Z+1dcYvCz2pKw2scNAAAAAKAMh/cf /fzDiSUDB1H5gysHuY0iUupuJwwAAAAAUCG3P3904dKtn/z6UjYD/8/v9y7u HTreCk4hCQMAAACAn5CEAQAAAMBPSMIAAAAA4CckYQAAAADwE5IwAAAAAPgJ SRgAAAAA/IQkDAAAAAB+oibh/f39AwAAAACAVefs7ExKwof37p88f4WIiIiI uNqq94RJwoiIiIjogyRhRERERPRTkjAiIiIi+ilJGBERERH9lCSMiIiIiH5K EkZEREREPyUJIyIiIqKfkoQRERER0U9JwoiIiIjopyRhRERERPRTkjAiIiIi +ilJGBERERH9lCSMiIiIiH5KEkZEREREPyUJIyIiIqKfkoQRERER0U9JwoiI iIjopyRhRERERPRTkjAiIiIi+ilJGBERERH9lCSMiIiIiH5KEkZEREREPyUJ IyIiIqKfkoQRERER0U9JwoiIiIjopyRhRERERPRTkjAiIiIi+ilJGBERERH9 lCSMiIiIiH5KEkZEREREPyUJIyIiIqKfLnkSnmxtrK2t9fqLXxNMHXaCY7Kx M1r8mtS/mfllr8m9QXVAREQsZg1JOL4ci2xsdraHShgYdsIpN7fGJZelXvon /e3e+oa0ApMaduBkNE7Nn340Hm6FK7bZGTR8oDPrWfuySMLz7Y36qoPXLq7S ISLiElhjEt7YXJ+axlEpD9Rz6R/vrCcLnK7A9G/VJ4TR9mYmbNvTTvYHQtNZ pd/N/CjoDmteHEl4vr3RYBIOwmF3c72W34atcpGVDhERl8LakrB4QQ+uvNEl qeqLr3rpj/PJZmcgLii89O/UlITXgzkPhv2Bw6bFKd2aRZN5VplXR+NhuIZx bicJV7iZy9k6YlrGVj8JRy6o0iEi4lLYUBIOHPRqiGHKpT9aSmOX+LxEMQni txCBHFavxotyLYdAlSS8qL1BEn7VukqHiIjttrkk7HBnZt5lzS79DV/irYub 9LvyP0WtFMo8/i4nSbjyzSQJt8v2VTpERGy3jSXh+OIrdlpRssQsLQdXtE25 dV/UuDFt9rfeHY4M94TdgofUq07o0xc3rNVHhUyeNCaKsbbNZ7S2C4yIrknY tmdm03TTBthhm/Ct2ZHVZL+kQXVuSHNZtPG7o4Hw3XXp3qAy87BZiz4guUxZ OAmPBjudWZt5pQFPHdVBUWjZnn5XKMDue0m334ylIufgOtY4m+2sdIiI2G4b ScKTvv7ho/HSn+nhlfxr2g8uiBDdXifOABu9jnzpT/vr2S/fs2598dymM0/X MF6c7gIar1sc6XVJeDhLO1LMiOaZ/DVKBWvyjhoNkn7uybfCJr7bwWamn2i/ GMxcCCH69OKUKPL2zOzARfu/G66buBPkJDyKlxscppxA5bJok7Pdvh5+V9lF s36U8cx7s79KQwq4TlksCU8baWf2mKbkVF8dZMM03u1N91W8Mt3e1mBSeC+Z ttRYKqqpcblHv3WVDhER221Do6ipXdhCDZf+cLQH6cbO9CIrziRdkHTpz4Yi 402/ra4UzKQAb2jjIcY80z1h7efRh/EMk6ULLUaSIJG54GYikOaL0uU+nCbe P0n/RDkVOCbhnD2j3bpJf2xIwq4x2GnR9iIX3RfN7PBBevS15ScT0XNKmmVK tySs7oH0kI3NM6ymOmg0lFv3bXecZ7ZUVFPjim7U4isdIiK222ZHUVMiq/bS r9z/GZkGPZhOr7lGhw/K06tS1+kJu9x+Q5cbpautIVFor+npU9rJ1raYErOL 0NwZS5NApiuQ0AloOlyGsDhtL6F52wlLeybvHl0mumjyXqlF683bLmP5MRxQ lymLJmF1E5Rl1Vgd8ral6LZrdLhzm3dwHWqc2bZWOkREbLdNtROeJE+HlcuN 5iaYfP/H3OfF3jByksnD+q/3Bztb0ZPcNK53BubVc+ygp92K5IbSaHs2mJsa HjQznH5x2O/29F805wc51RRIwrY9M0oe9Btu8yYpYs4YbD8oGnMzmK3PlHiw 3KcsmIR1k+XOsOLqYC1mxbbdOE9zqXA5uPk1zmhrKx0iIrbb5saO0FyDHC/9 lquhy4VS19to9mFIeOM6aTyZvUTKK6wMf2G5t6b9MGwhWfC6Hz/etX1Rc1E2 3Id0ax3hsGcy0xh7fm0Wj8FOB6V4GbBPkH347j6l9vC5fKvIDGupDqYiWmjb 8w6fplRUU+OKbFE7Kh0iIrbbJpNw/vNl/YWvgku/1DM9uX8ltCLWPIgX10e9 aWZOFLqntNKmmZ7SCps/awFr/qL4oNbyEhOHJOy6Z57HXfXT5JO9ExinpmnO cR+jtcCii5WBJU/CNVSHepKwrVRUVeOsh7iVlQ4REdvt8iRh7QXRMY1IFzL9 RV/3kD07pXFwMPW5qvYprbRE01NaTTDI+2IyflTM5nqYQOYbjcp9z8y+Mr3X JyW6uI1lgXgwx6Jzi4fDBEKRc5/SveyZM2TuDGurDs6/4OxrYjsoYqmorMbp bXOlQ0TEdtvG1hHKBdc41qhbr/Z0SrG3i/StaWzTtigIvxj9Qdt3SVgxc1e1 nCGztGnB9EXliXk46FPu0Lv5SbjInjGueXYNp4+MHcLwfIueHYV295gzVofi PwwrqA519JizlorKapzeNlc6RERst23sMWfsFC8N5pkZnyr5cBRcmwYT+do0 ltKIegmeNWJUrrzTi6D2ppaaEDLPcyfpg+DoQ8PVdpysbWbbR8nNJacvxpO5 3DpzvSds3zOT/kC6+kvHUYwNY8cwXOig6I6RGu0GO8kRN01gHEXNeUrnUdTE rmROMyxdHUwaQq/7tmsOn7VUVFbjtLa20q3uu/wQEVfHRkdRkweVdb70Z9+N FY/MP33sPtQO5hCRLD35e/Z6lE62vpG+PqC3ZWiSOhtfVFkx/X1CafCl+EPx u9Nr92DYST5Pn9IGYV7Ib3lfzAwkG+yZnb5m3OZE93bCtj2TtHmYvpdBzTPK DbRkNDB7JCh0UGQzr4TIfbPGuvjOCP1rwfOnLNQ6IimxG0VmWLo65O6uaH1m b5QosJdkc0pFVTXOvIdbWOlmb/nhvjEiYmtt7M0aukF9C1z6T/Qvq1Uebkav oF1P++xEU2rfryEOOBy9DNcUusyjgalJOL4fLrznV/foNr62dtRwnr1zqHs6 rH4x2uTMS7uSvDHvO+by94z4UuM1pYWk7lGyYxh2PyiqY/lVv/LTAXUC06Nt pymLthMOH4tY30dWQ3WwmNnVwjgP7ntJPXa2UlFNjdPu4dZWOu4JIyK23xqS 8MppHkx14Ve6UfiW2Ozd13C81qTzvpKI5n2zBmKjOgxfvECLVTpERGy3JOFc LcMXLDgJW7oUhf+k3FIjCeMyOMfr6pqzaKVDRMR2SxLO0/YQPEnCw9F4Mmr8 CmhrORBclIVbapNwDUnCuAQ6D424CItUOkREXAJJwnbtd30zHfQW8TA3bU6Z bRA7Dgd3WhfvTc26IJGEsd0uvMVRjs6VDhERl0KSsN6w+0/SA8gcccNeS93e 1IWMLBr3bxJ6Kmm6OIWDy83Ws60ZA33Wrca1QrdKh4iISyFJWO90DNU13ZAX iFi11DhERFyEJGFERERE9FOSMCIiIiL6KUkYEREREf2UJIyIiIiIfkoSRkRE REQ/JQkjIiIiop+ShBERERHRT0nCiIiIiOinJGFERERE9FOSMCIiIiL6KUkY EREREf2UJIyIiIiIfkoSRkREREQ/JQkjIiIiop+ShBERERHRT0nCiIiIiOin JGFERERE9FOSMCIiIiL6KUkYEREREf2UJIyIiIiIfkoSRkREREQ/JQkjIiIi op+ShBERERHRT0nCiIiIiOinJGFERERE9FOSMCIiIiL6KUkYEREREf10yZPw ZGtjbW2t11/8miAuhcPOWgNVJlrKxs6oiS3y5CTgyWZqbabQ4nI7GvTWwzpS X1FxrINNnv2wGmtIwnFpEdnY7GwPlYIx7IRTbm6NSy5LLZmT/nZaKdIVmNSw AyejcWr+9KPxcCtcsc3OYJEHvR1mdt3iV0bSvWSWL8ONb1q7knB9J4EVU93M pSt7c7uqSXiFzzON77RBL7rSb653e52NuKhUvtNIwitrjUl4Y3N9ahpHpbJR z0VwvLOeLHC6Amt1/U4cbW9mwra95Gd/IKzeKb2w/W7md0p3uPD1EdWVzOBX THdzXf491eIrlGmFScJLacuSsL501TRbn5Lw0p1n2rDTprVD+pAkjK7WloSV 2h3lwKrPnLqrQ/TDsDMQFxSeXnZqSsLrwZwHw/7AYdPilG4Nfsk82xYOq951 42G40+KfEsuwsdPjUsuThSZXuG1JuLzeJuFFWlN1WGihbYVLd55phfGFtfYT Dkl4ZW0oCT9PHl5UnHmUkhktpbHTSN5ZaxLEb6E6OKyeJ0k4u0NIwg2uMEl4 SW3XZpKEl2vHrrgkYSxnc0nY4XbovMualcyGTyPWxU36XfmfoiYBPOHKSBJu eoVJwktquzaTJLxcO3bFJQljORtLwnEFF3uKKee3WVoOYuSm3KQ2akCVti1d 7w5HhnvCboVQ6lUn9OmLW7HqT0eZ8GY8a43NbZmoIIadaXZ2YhkNdjqzZudK GxjDkQ2br2h+fYRlLG1SHsxtayAuMSlXQmvwtPhND7rpGu2yDrPvitvV29Js l2VtZR1XuMDOXMudbO5DVsNJwKitymcny3RCnx67UcEJ8o9+BZuplr1CJUpa yqbjzrSWrkIVcHkLbaHNXK7zjKHi2Deh6E7LPzSWKibuiky3oGI7LXcd5j/V OO0Tx4yBzdhIEp709U/8jRfBTHcqpcAHxanb68RFdKPXkUtm2l/Pfu6ddeuL 5zadebqG5t+Y8brFkV6XhIezki/Uyuk8k7+mlVHYUaNBMrhE8q2wPe12sJnp J9ovBjMXTlYul558g3luBxU57r4xSU4LuoEvhKWrJ5b0Wh/903hndiItkoSn jYqDgx72Dt6Ud69UTtbiI9vLrJVa9oS5ZWYlXqGCs1m3Nz2s8fTd9CKiO9kW W4feVlyKpmsynbTI2sq6rPCWsDOVsioX5kylc7ph5X7I6jgJzFXllfq7Pjt2 2bqWN4Hj0a9gM41J2KFEzb8zraXLvfAvdaFd1fOMebfYN8Fxp7keGnsVk5Jw kFfTWW3m7zTHdSh1qnHbJ24ZI98GLtMe2NAoaprd/sp4EQxHe1A6gU6r7US3 IFNRtwTCoMD0+rbOp4Y2HuKDD9M9Ye3n0YfxDJOlCy1GkhNOptZnrpKaL8p1 Kpgm3j9J/0TDecbN6aA08WyDfB7dPZsuSNjh4Y/36U9m/bZnNjycWNir7kk4 Xq4Q/nc0KUVTTuKFCqutO0CT/lh/hbIcU3MayV+HzCVGKGbTW0OZM2Te2uq1 rrBctpP7UZofldJyDfWi5CGr/CSgmlvlM5vcFe4VBxGlP3acwPnoV7CZxrKX W6JK78yc0uVQ+Feg0K7aecb5iKib4LLTHA+NYxXT/ShQB6eas3iUrB2O+8Qp Y+TYzGXaA5sdRU2JrNLxSn6IST9nRqYRBnRHPHvcY6Q6ZVJuv6ELaVL5MZy1 tCU8bRox2dpOCrm6CE2NTutFpv+d0PNuOlyGsLhqeg7OTkrph9LPVd2hkSqy 9EQp+KvSmsUtCas/cqWlG8uJcqTyfnTPf4VyXwfzdskHtNgtAqcVVuemFFrT oan0kNV6EnDcRfYqX2jbCxz9CjbTko5ySlT5nWn+se9Y+AvMtm2FdlXPM1rd NsGhpjsemvwjVSIJu61D6dpRap8Ubyhe/2XaA5tqJzxJnhSo9yXU+yTyryFz RzN7u51JJg/rv94f7GxFTy7SuJ4pvaZflHkd9LRbkdzFHW3PBnNTTzKaGU6/ OOx3e/ovmmtT2YZGuoovLFp/ZpD3m+1cWuAKpTvK4q62dUgUp0zuh/QMjwzm v0K5r4Nlu6SZ5K2t3qKdj6SFmjfE5ZaF6yGr/yQgT2yp8rm/ONwmcDv6FWym rZ3wvAfXdWdqS1eRwl9gtm0rtKt6nrEckUKbUHCnCYfG4Vf//Em4yDqUqR0l zn5zdIxt4DLtgc2NHaHZ1Y4XQUvZcCk2ug4psw9DwhvXSdOpbEmQV1gZ/sJy Y0T7YdheqEjSTr64afuiJkwaf5MWUvtcLHtwDW3+TXf5dOeWgj3mrP9kLwzy T+BZAXDpxuV6hSq0Du5XKPvauh8+94Vq2zhlcAkV+YfMXFoqPgm8cqjyufMp OYG44RVs5txJuPzOtJwcHAu/+2yLblfdhXaFzzNaHTbBdaflHhqX4jd3Ei6/ DuXHjpD/KTdj5NrEZdoDm0zChqc2yrGQi0EF522pMKRNpLK/czWjW4jro543 cguh+KG4aaamEcLmax58KF8UH3JV9hIT8/v7phXZcILVDt9haii4sCQ83Vdp Rwbxpkcrr1DGtdVbSaiIe6xo1I+6UPSQ6dannpOAQ5VfRBIutZkk4YUU2lU/ z2i1b4JzEs47NE0k4RLrUH0Szs0YeTZymfbA5UnC5ocaLgdOSFz68qx7OpCd UlO8TY0ZtE0jbM8vMnPTRPG8LyaDtsVsrodnqpIxWH8shDU0DFhnGhxG32Cj ZBIWVtLaL8b2Wzu56WG9dhS5Qjmuw3xXKHVt9db2oNlFx0OmW59aTgIuVT63 X1W5CaTtqmAzSybhUmdU55sA9sPqMlv37Wqm0HpyntFq2ASHmu54/9mhb2Md rSMc18Gxdrif/V7lZowcm7lMe2AbW0coR8E48p77TxhNFzPpW9MfjHKLgvSL 0R+03VuEFdN2VdN86NZAyPRF5aFqONJazh2Pgmq2V1y0NsSK0X203bONEmCa iax409tcMEp02JF2/vzt94r3ZJnjClXgLujcoaLcCP+uh6ypk4BTlc+9CpSZ QN9jrtRmlmwnXOqMuogec20ptN6cZ9w3wXWnORaAmnrMOa5D6drhfvabzdaU MXJs5jLtgW3sMWfssymNoDttDSsW9V5nMJED4VgqmWronTWF0new3djRZg+1 ZmXOLZO+cN0xRNxxsraZbR8ld3SdvhhPlvtDsuBoEsqilcOqOflMp8l2QVLa Xc+dhOUmAZbxguQLtDzlpD8YWs+ZxiuUZvjZOddBvxSlFLmsrV7nFdYudLYh umEne3lXz6KHrMqTgE7HKm86djviWKZzTGAYRa3UZs6fhMvtzNzS5VL4V6DQ rth5RqvjJhTYaXmHxrGKzZOEXdehbO1w3yeZ6Q0Zw24Dl+lyvy6XxkZHUVuT Gjc6XwTT80M023Rg8PXtoXYwh4hk6cnflaHzog830oG7pwOPq7/IZoP6Kium //UtjXgWfyh+d3oKGgw74sgtwdIzP9CcvpjpCBDsmZ2+oTtVdrRAB5PfDsIA xfLXk5v8pmmSuwfRJ8GpbN3wc9ixdcRWVzpkutN4ZrT5zKjs2hVLBpk3JiLd yXb6rfRFJ7Ypretg+G72KI8d19ag+wprFmrYkA3thpgOWVJPbYes+pOAufw7 VHn9sVMzZNEJDPu21GaWSMLldqa5dLkX/tYWWm/PM1rdNmHunaY9NDlVrEwS dl2HcrXD/eyXPRARxZolNHCZTuPcir8bt7E3a+gG9S1wEYyPkfLiQuUxcfSG xPW0bX80pfb9GuKAw9GLEQ1J2NKnUk3CcTET3r6quxkbn4I6ajjP/orUPStR v5i+ZGd9ts1r63KPqnQ0Y7eDOP31mvlZoR+TObzVn9ZxpXnGcCu8dx3sk81k AsPzJtd2wsJbMo2vTRnL7wZV242Ir/JcU1pWG3sZpLPt2F5j5LQOBZ755qyt 7Ti6rrC5m96WULSc3pwrHjL7qw9rOAkYdK3y6rGTHjPNMYF69CvYzFJJuOTO NJQu98Lf8kLr43nGWGtyN6HATnM7NLYqVi4JO69DidrhfvYT179oS5VGLtPc E8ap5pEwF15IRuGrmbMdUcPhUpNOvsol0vn3ZrmOJ0UsO3YEIlaop60EZ9vO eYad1rxuo21LNneZ9kCScK6WEacXnIQtDeyltyVGFc25KX6DJzeSMGJ7nOuK vCpynmGnLca53mrBnq9SknCetpskSRIejsaTUeM/zYzNOZ5HCTNTR6Ipne/z VPOm5lwn4U4jCSO2Rm/HUIrkPMNOW9w+LPogpqHLtC+ShO3a7/pmOugt4myQ Ni7KNlMcx+215n5oIncsrclZHwGSMGLTDreUVotJ33Zvn7dynmGnLcC5niw3 dJn2R5Kw3rCbQNJTwFzNw0b1ri8wqse4Z4HQo6Fg/5SMQjqt+fwWjnc323X2 kwAnW8RqTQd62uwI/W19vrZynmGnNahbxlBt8jLtjyRhvdPbI2uGzpjYpJxs ESs26ho/xwALKyznGXZag5Ix2iRJGBERERH9lCSMiIiIiH5KEkZEREREPyUJ IyIiIqKfkoQRERER0U9JwoiIiIjopyRhRERERPRTkjAiIiIi+ilJGBERERH9 lCSMiIiIiH5KEkZEREREPyUJIyIiIqKfkoQRERER0U9JwoiIiIjopyRhRERE RPRTkjAiIiIi+ilJGBERERH9lCSMiIiIiH5KEkZEREREPyUJIyIiIqKfkoQR ERER0U9JwoiIiIjopyRhRERERPRTNQnv7+8fAAAAAACsOmdnZ1ISvnv37jMA AAAAgFVHvSdMEgYAAAAAHyAJAwAAAICfkIQBAAAAwE9IwgAAAADgJyRhAAAA APATkjAAAAAA+AlJGAAAAAD8pI4k/Kc//amSaQAAAAAA6qPyJDwcDl977bUf //jHJacBAAAAAKiVapPw5cuXX0v43ve+d3Jyok4TBOB0mvPnz5dYdwAAAACA +ak2CQfR9/vf/34adN94442joyPTv77++uvZfwUAAAAAaJI62gm/8847adz9 7ne/e3BwEHwYhN7t7e3087feekt7xxgAAAAAoBlqGjvi/Pnzaej95je/efHi xSASp5/QQhgAAAAAFk59o6h98MEHX/va115TGA6HlcwfAAAAAKAMtY4nfPny 5a9//etpBg6C8YULF6qaOQAAAABAGep+s8be3t53vvOdIAYHkZgxhAEAAACg PTTwjrmDg4O33noriMTVzhYAAAAAoAy8bRkAAAAA/CSbhB88eBD8/7PPPlv0 SgEAAAAA1E6chOMMfHx8HPw/Hv4XAAAAAGC1iZPwvXv3ggz89OnT4P/7+/uL XikAAAAAgNqJk/DNmzeDDPzy5cvd3d04Ei96vQAAAAAA6iVOwnEADv5wcHAQ /OHOnTuLXi8AAAAAgHoJ0m/cPPjq1avBn09PT69EPH78eNGrBgAAAABQI8+f Pw8ycBB9Hz58GN8fvnPnTvDXa9euffHFF4teOwAAAACAuohz761bt14lBAE4 iMHBh9evXz85OVn0CgIAAAAAVMzp6WncKnh3d/cvf/lLmoSDfzo+Pt7b24v/ iRdtAAAAAMAq8fDhwzTrBrn3lcKLFy/i28Uxt27dunfv3n0AAAAAgCXk6Ogo +H+QaSeTSZxvb968eXZ2psbglCdPnsStiAEAAAAAVoPd3d0HDx5YMrB0f/jp 06fB9IvO8gAAAAAA8/PkyZNsq2AAAAAAAPh/ZUzFDw== "], {{0, 102.}, {471., 0}}, { 0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{471., 102.}, PlotRange->{{0, 471.}, {0, 102.}}]], "Output", TaggingRules->{"AttachedInlineCell" -> CellObject[171041]}, CellChangeTimes->{3.815936827192415*^9}, CellLabel->"Out[3]=", CellID->204934190] }, Open ]], Cell[TextData[{ "Look at the documentation page for the function by by clicking on the ", Cell[BoxData[ GraphicsBox[ {Thickness[0.07692307692307693], {FaceForm[{RGBColor[0.604, 0.729, 0.8200000000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{6.5, 14.133299999999998`}, {3.394, 14.133299999999998`}, {0.8660000000000005, 11.606299999999997`}, {0.8660000000000005, 8.5003}, { 0.8660000000000005, 5.394299999999999}, {3.394, 2.866299999999999}, { 6.5, 2.866299999999999}, {9.606, 2.866299999999999}, {12.134, 5.394299999999999}, {12.134, 8.5003}, {12.134, 11.606299999999997`}, { 9.606, 14.133299999999998`}, {6.5, 14.133299999999998`}}}]}, {FaceForm[{RGBColor[1., 1., 1.], Opacity[1.]}], 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}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQvfyFh97/h3IOGUo5FVVLVR1sdK7MehYr5yAx9Qpn RpKqA0haca+sw6qmQM+5DqoOE/irzFb/k4Hzg1kXT7JyRPDXT0ntSJ4rDdev tVL4gouENNz8UAOgyAQpBxf3op/8L1UdJlkx+rb4SjnUXNgc+dVSDc7XeMu7 z2Amgu8BUv5dDa7/Q/KZWG8Pdbj5WyK/7rzVpQ63n+V5j8bbs+pw9z1JXHjN 5L063P0wPsx/MD7M/zD9sPCBme/OXMGtkiEPt//9ycNOa1fKw90H48PcD+PD /AfTD/M/evgDAPvnqKM= "], CompressedData[" 1:eJxdU2lIVFEYHRMxKa1w3rz37iw1MyWDkIRNYiJ5GLVSErEFNSs1HUzNzLWF SUREzBamcosKsgW1sAUVbRPSsjIxERExE4l+SJJKpSZidu+8YQb68bjvwP2+ 79xzzqc9mr3XvEImkwXTj51FF59lejxTYk98WeDQWw6+jd79YbUEE+r6id2P 5MituPztZ6KIhondfstaOdacDXi4gxccWLc0VzB+iHdgeX/Y8EyLAuxabIIc JGZEadEqsGEgO9G9T47JvFZu8QKH7ixjcRs4nGCHiUODNyt04ieV5vKULwoH VlmS/Q9s4XGs+Xte6wEO5ZRtVguPwvGb6+6f4/A802PhdpqA2Uj6kGoOwS5R pZ6fBKQeHt3p2s5hrY2QiJ2up1dtnOCw3+3u1SAXYucvIKR7tLXUokUn77PP LUXAdV+havC8Fmyqb7qAYp/OsvoaLXqnPnSZsgR8rlgyz9/T4jgbm0f1iO3x f/NUi7o0SrBAQP7GmmVrhxOz8tgeJ75StBh00ksHAzMgQsDRuiHjdKBO6veL x+prjSUxETo8Zjrc4hGqmvwacFAHKzPgrwIjbH6qDuHDM78jRQWSCqM1igwn vmT44dkxo0M7Sr6+G1bgua1AByZL9DSPO2ycmx7ufWLMSIIo9Sd6hDalj+X0 EMSx5/jpQdUyFPUq8YCyuQU95guo4GYVtofvyl2I1tvnaWDpb46fPaMHc/3p MpF8qlKCtVe+JFjJfm4QUDUbva0E+TQGH6dEUBeNxacIqBlRpZdE6X4wAXX1 1esaAT1dpqZ0DZF8/MM7sIy947ETM1Rp5mGL8WaC20znbTze176otkYTKcfr ebA4JucSHBllSeDteSFgcTLKeLB4GDqc2NZ3k9KBM8ZyKi7fU0p7EsdDQ9fE L0QFLzZ+pYA2m94qUFXiy9oFsPVaSFLjjYkJK8JGe1At+byVgC7N0lyrRtqf OtGeN7W9nrdjFayU/UC2Av/v6z83cIzc "]}]}}, AspectRatio->Automatic, ImageSize->{13., 13.}, PlotRange->{{0., 13.}, {0., 13.}}]], "Input"], " or open the notebook directly:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.8122877332191343`*^9, 3.812287756172387*^9}, { 3.8122885574299965`*^9, 3.8122885902947855`*^9}, {3.8122886305995445`*^9, 3.8122886312645426`*^9}, {3.8122886846399508`*^9, 3.812288696724759*^9}, { 3.812288769055894*^9, 3.81228876968118*^9}, {3.8159369504762945`*^9, 3.8159369554771447`*^9}}, CellID->103618464], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NotebookOpen", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.815936960399*^9, 3.815936963385909*^9}}, CellLabel->"In[6]:=", CellID->729700213], Cell[BoxData[ TemplateBox[{ FrontEndObject[ LinkObject["ib5tr_shm", 3, 1]], 132, "FrontEndObject[LinkObject[\"ib5tr_shm\", 3, 1]]", "132", "\"BirdSay - Wolfram Mathematica 12.2\"", "\"C:\\\\Users\\\\rhennigan\\\\AppData\\\\Roaming\\\\Mathematica\\\\\ Paclets\\\\Repository\\\\BirdSay-3.0.0\\\\Documentation\\\\English\\\\\ ReferencePages\\\\Symbols\\\\BirdSay.nb\""}, "NotebookObject"]], "Output", TaggingRules->{}, CellChangeTimes->{3.815936971614663*^9}, CellLabel->"Out[6]=", CellID->526502585] }, Open ]], Cell[BoxData[ PanelBox[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsnQdcFFm2/xvD5KQzs2/3v/s2vt33Ns3uzoaJ5kjOOUclSBAEsyASBQMC IjnnrEhUQDICouScc5Icu/t/qgqaJootKs6c7+eI1bdu3VTV91fn1q3bv1HR E9HYRKPRDN+BPyLKJnuOH1c+JfoJfBDXNdQ8oquuxq1rpH5E/fjXKpshMA7i asM/YltSSU1ETllUHg0NDQ0NDW1NBrpJqqfSQSGJwyJSaGhoaGhoaGsx0E1Q T1BS2OYRk2YZ7xqMBw0NDQ0N7cdqoJuUK7pIQA+LyzzTXnvh0dDQ0NDQXpet JKDCwuIiQmIiwmDkhqgkYULkRwgUEoMIr73waGhoaGhor8sWCSgv6XuCPhb9 9N2Kz7aWfral7NPN5f/v3dIPaGCwAR8hEHZBBIgGkd+UsVxedJnR0NDQ3hDj l5Tjl5SdM2pbjk9Cdt0zAmlYqg5rzGglAa34bEvTR7SGTzc1fr6lhkbrlhHo luGHjcbPt0Ig7IIILAGFvKja8YrPZr2sqnKLSnKLkrksjP/89ZXlk5BhVZNv tu4y/EuqDNkdhhyJQkodEBQ7zFkLi8sQRV14Zlcp+WERSe71ObMyK7XkSpFZ 1wN11bEfu2wgGhoa2gY06Lp3HObfyS2wwA4L7OMXWV9XCFLbJyAK6sCumBC4 m1eIUqvVbSUBLf38rfoPN9X/6pPxvKw+C/OZ3h4w2BjLy4JA2AURKAHlE5Pe xyuwg1tgxyH+/cJSvGISsHFIdPEsI25RaQFpRQGyA9/HJ7STjL9XUOJ5WwPi HxQQ3s0nSsiiuPReXsHZRETFd/EIcYvJsOUoxS+lICQtzy0iflBUTlHrmJC4 9HNLm7gMt7Do94cEDovN+tqgxbsOkzVdqKGQHdngMkIyinwc3RgsTEqaR3T5 llymTQidldzLJ8JNtI/0AX7hHYcFvj8sSBwrPttoSwPR0NDQNprxkj6IkLSC m7efq7ef25zd8vJx9/U3OX8RNJRvnTSUUs/jp85p6B7fzSPEcsFATy0uXxGR U4KSrJ7CSgJa9pOt9e/Q6n76zkRx4Whc1HRL83RTw8idCPgIgbALIkA00Jd9 wjImdq4e3r7egX6ayrL7JTRdfL0VZKQPixH+DllTGQFp+d3cUo4h99yvm/xr r6CB+TUPHx+PgGBj/SP7BCUEpOQI35z0o+dcy+WdL0oIVE5bW5mf5+YX3iss c9LaycRQay+/CL+svr3jFRFJSR4JIjUBKfk9h/nOuIRF+dz4br+QU9S9uBAv KUkQRFmylSD92Ux5KDdWQna2DHMbVHbcQqKCR894ertJSUocEiU9WTHFy67+ +poK+4SkBCRZicgISCkKSUofktGMz8g8pix3UEyOn6oL6cDOun5EBcm8oHaw DeGzp4y9PNBcioKS0rwy2jd9iJY8KEqlIEcONZDO+4KbJdn9vPy7xVROmV0U lZTcLyiuctLSy8ff2/umjLT0AWEpaNKDQuLKCwNRQ9HQ0Dgzasxzka1j4vsF RFW19SJj70gqq6vrGsC2qo6+nLrmabNLfsGh4JlCH7heeR0QFAf1THuQoaql t4dPGLrZXTyC3v5BvoHB0G0+s59cXkBFJUvfo3UK7Jpua5mqr+0x0uo11iH+ njWaamyYbmvuFNgNESAar4TUd0LK4dlFN07qGlwJK0iLEBRXsL15U05KCnzM XdwC+4QkwJPazSvwt295boRn3Lp8XMPCN+1ukIyymp6prZGBFtxO7OGBmPz7 BCUPCYrs5hcDRYBDdnELzjtfcycI1O0gH7/sGfeywmRRQZ7vBVVyOqYKom58 +/1uFUv/0rxEQb7DO3kI93YPv/juw3wXPGLifK99x6f5ICeF59D+HXxie7j5 d/GKHBaR2E0Uj3+vgAR4i3t5BHfxCu08zL+XXwy84x2H+fYKiPOSYnqIT0D0 rCuTyXS9qLuTX4JHQEjS2InOZN44r7KDVwT8X0jkgLDEdwdFrwal2J6S/ZJP 9UFhgYaU0H/28+0VFAet5BYWA0cSXD/wYQ8Lie6EvMD75haCmxzI8XtuQcJr FoH6CswnFQhJyX/Fp3rFxUlWWuagsDj4vBAZbjYOCAjv5BaEOh4WpS4A2YOC oorHzVOLarsqHogK8++XVLns4Wt09IiZ2+2UGC9uPgEecemDkkqX3RcGvoRH CWhoaD9sgw75kLAECNwSE1u3LOYE1Nnd6+t9hw8Ji+8nh1ihA5TX0Lrl6QPd +3oJKA/hPRGjtaCe6RmZ6sf0v9nP4xcU4uMfBAK0lsOXF1Bh8bJP32r8r23j eVn0pwN9pibj2Q/GMu73W56jDw+N52bBLoggIiIBAvq9sLJfUrKe8KHv5C7l ZMeJiIueMLOUklM6Y3/zxi33U0Y6h8Q1HANCHG64JWUUXDU7dt4jOS/J9/td e7/ax7tPUExA4dgVdz9Hd9/juupyRubm508d4BPklta87OQoKy11kNBQqYOC YtCGB4UlCU9NTGKPqHrCw8cmKiICutbp+aUP70cePsRtFZAScsv8e16ZK55B rt7+dlZmO3ftu+AZE+btqGXqVlFdduuKqZrR+cvOXtev2coo61x283N08z1p pL1TSOasnZPNZUd3n6CTxsf1L93w8As5c0IHNBTuRg7yCUqdu1Fc1pCTECAi LLRDQM4xJK3icbH5GdV94prXPIlEjA00+NTPFFS35SQHHjEwvp1Z4OLo7OIX ct5EbxePgLDaSc/QUD9vFzEREXG9c3ZXHK+6+Xveuq6gY+zkG+jtekNYTIRX /thVd7akqlpzUkKO6ugYnL8kJSXBI6N91SvI3SfQyEBb/bTtLXfPmzfshSUl QEPh7MOlq33WytLeJS4hWkpS+JCY7GEhyd2HDuxXtszPSxIX4TskRji2hxYF isu99i8jGhram2WHRSQllNRA3VTAKySN2lDW0l0vJ5QloG7efuAMCkjJkSOT sqChajr6ELi+AspDzGmR3cMrrHbMIOZ2XEhE5C0Pr718IuB7rmWYbmUB3dr4 s89GUuIH3Z16T+mNxEaMRIf1nNQd9HCGQNgFEUgBlf5eSCEgvei2v29CzmMv W6OvhNQKy0u11I7mNPYG2J3dL6EemZrvfvWCkMqp/OoWbzuDr3mVg+/nlzzM sDY9tR/aR1n3xJmzJ219CnMTdM5df1z0QPDQXqWLPrmpEfz8/NzgjYrLyR0l zpGMojK3iBS/pMz33GJud7JvXtI7cSPY29UhOD7t+FEN3+RcMwNN19sPfJys heV17uY8uWyicdwxLNbXQVD5XPbDTDVZ4dPeiU0l2UrycsLKukZEpt4lxWki EvL3anviXC5J6VhUdfUEXr0gb2hfWJSpKC12UEzuIC+/ooVHYnR4RFKalYHC IY2LcbExbv53rl7S2itx1OTc2ZM23k+K0ySllYLuPwl0Or1fQiOnrjvwyhnF s65Vj+4LSaqEp2SdM1QzdomJ9rRRs/brbirRkFe8GV/UUJ6ppqDilZAbdPPi XlFVk/PnFiTleOqg7LH8stKjCnB/knfL3lRJ+4yOkb6y3km9E2cjUwsDXS7t PCwMAgpu8j5u7r0yJxLv3QUBhTLziYp/c1jCLSEv0tVq92EhPkliuJh3USB6 oGhoaM9j1BNDw9PnySeSvtSjSeoxJXiLAlLya5l1s5ZcWALK0splA9fRwFcC 3zMkPLKrqxP8XPBJBSTX5GKsNIRb8h6tU3D3VF3NeE7GwFWrHpNjPcY6A9es x3MzIRB2lcwN4X4vrOR/L9PxnJG47sW0zDRdXd3b6Q+0NLRvZ+ZoiPEcUrbK zYsXEuL5924hO/9kL6cz3x7g3ysgpnrySmFFtaO5gYj66cDwKCd3z9LyIgUx aa/EzNM66tcj7185o/Udrzi/uCS3pOolZ29otwunDA8JiPNJye/j5tW9FhQf HRoYm3BCTfGSV0yAr398YoSatkVWXiI/P8+OA9xK1l5x/o6n7f1u+zvsFj6W lBrPfXDXKdfoKG+Hr77fL29w0T8sEjItKXmooqQempFzWlH8bzxyt3MenlUS /4Jb9nZugamG0h5h6UO8/AqWPvfDXfUuuoQHuFz2jL5+8aSFV7zDpSOC6meo kpeVF8mKSjnG5Dqbqv5HSC3tYYGWtNDXwmoJD1JPmTo/rix2dLjiFv0gM8bz +BWX+FDPr//51dHrgfcivP4DGw6ByaHuUkqGARHR7Ek5map+JaSR9ODeqbOO SclhPIcP7BcS3yMobeEU6OPnFZySD7XbfUgAxJEHbvyExQRVzybeuyMtJXpA SOKwpFZEdnFC4C0BMVFuMRliKrKw2MJAnIuLhob23EYJ2eLJscTjJ8F1UU8e Nq109/HfwycsJCMPcgl+6CFhCfVjBi9JQKH8fkEh4HuCej7IyFTV1gcNXYuX 8YxJRD95a7qhjslkDly1HnCyh42p+loInJ1EJCxOCqhKwL37xlL8v90rnVT0 xMLY8HZGls4R7YTcQj1FsX3yFx5VFGjICP55j1R0dqXfNZPdApJ8ImJ//vIr Q/fbyeH+3rEFAXZH/3RIraCyVF2MT9XCMzsv725UgLioyKHZMQHJPTzEOdor IM5DzrEBveCWP55V1vg4544Q32HZM0613U+TvO0OiOvmlhRoKYp/8d3BS6BL TuYnrgXFBTjsEzNIzUwR5Nl3xj02IcTlH9/xhWbV+Nmo//GQemFZkYqiWmRu gbmG/FfCavEPC8zmNi6oK1ICKmfhk5cQsJdHOvZRff3jNCEeIYewtEtntNwS ywJsNf54SK2w4om8uIxn4iPH84r/4FPJKCzSU5TcLa2TmpNpYGSZ+yhfT1NJ XOmosLj4sRtBaTF+u77brXczNC3Gd9d3e467hkX5ePrdKfS/fORPC5P6kl8t PTfzuLFNdv4DOQn+b/Zyy57xqCl9sOs/fz/vm5IY4rzrAD8loNxCIvwqZ5NT 42UkBXcKKoelPXS1OvHF17t28IgcFpMVV1DcL6QUsiDw9X8T0dDQ3kRjvRC3 wNZvRIsSUDUdfWc3r3/s2LuHfGVjF4/g13sPSytruHv7r6+AEq91CIr7+Ad5 +wft5Rchnofq6Kc9yACxPiAo9sxx6We8xvLrT8ay03tOHJ9qqAPrOWEwlv0A AmdfYyEEVHqHkIJXUu6dIF+P2LRYH7uDEqrxDx4cVdeKSsvUVZL5hk/iknts VmqsnbNPUWnN1fMGJg5Bt8ODr7n7JyUn6qsr6lr73rsf5RkSV1nx8KicxLci GkVtI7HO5787LMxqJeo9U9bUZT5xqR18kuF5TTkxLnsOch+UMShp7/Ow0v/n fqHT1/xT7iVedw2IT4iR4OM1vhke6WG/T0wvPiVOgHe/yc3wKD+nb3YeNrka kHIvyjP0bnV5rrycanBa1nk1ua+EVKIyss7NbZxRowRUQPaiW/qdgF0795r6 xMcHOXz5DZ9DSLLVGXVNc6/7ZMmrqwoVRIR1r4Zkp0Yf1T8Rm/pAV0Fyl6Rm UmaWirTkKZfouEgfJ5/w80bq6jaeSWGeIKA6DgEJoR4goMccA6O8nA3Ou9y7 H700qdtpD1RlpU45hCXfu3PLK+iC2aWA+Puevj4ZT6oiPOyo4dlZAVU+dSch VkKUh1f5YlFNmdstl1u+QW6uV2VVTBIyko5pm+ZUlrmTge4eTrJSMmt5OwYN DQ3tFRuhaELismpHUx9kOrl5gh9KjBX7+Du7ewWFR8L2Os7C5ZOQ2cMrbGpp 6xMQBBrNS47l7uYRAvW8czdBQEr+8LPc6mcvpPCTrcRCCnJC3XLCxEIKP1m8 kAKPqLSgrKqClr7KUc1DgsKHxGSEiRchZ1+HJN5P5BeT0jimoqHBQ7yOISsg o6KoqQc3GGJS0sQbrEKS0hq6Cioq/FIKPIKCOyV10grydBSk9opI861cbG5R aX4peQFJWeJ9STEpAWnIi3g1Yy+fiKiKtpqOnoCY+H4hSQFpBUEpOfLdTAUe 6rVQKXmIv19QQvqIroKqCh/55oigjCI/8YooUWb2DTIvKV5JeWFpeV4x6jVP 8oVWKeI1k30CElTJibdRxKX3C0vLaRyTUlCETPlmE1HiF5PcJyQpp6mnqn1M QEySSgrS4ZOSF6I2JBXguP0C4islJSAutYdXVEL9GKQAlTssqaKirSssTbxr A2WbbxNxWagjqYkyoopHVHSIud8qWtqCErIi8spQRxH2QA7eh0VDQ0N7VQZ9 I2goyITK/FQlfSVNXSFphfUaK2ZlBIIFks0z9wsp4K/tFxQD9YQ+9pl5rctS ftwiEgcERPcLikM3Tr0Gy8O2IA/xHqKgGGgWD6FBEFkSXGOQTnCCyHc/pWHv AWGpQ0JiwuonQlLSXCzP7eMTYa01tErFSfUkt+fzkoV09gsQz/4g8dmViMhq 8rAWJiJXGyAyFZKY1cS5ww8v2SBs9qjZ8vDOLqlEFJ6VyOwKBoJih0QkqY9z iUAxIJyY5k28rjJXAO6FG7wrJkUUA5qCrBSVgiRsHJ5dtIG9QaRYqxlTE7/3 k2eESJ+sy3wgkc7r/4KgoaGhrWIgaotflhEUe6ZLyIFBD7lowi10yMv1scse uz6Lya/+Li25d8XIsx9FJQXk1BQ1NA4KiPI874xo9vhre6uXdz1W8V2UyEr5 ruVF49WTYk9hTUnN2jMC0dDQ0DamvdTlGtbLNtTPmRGerKD4BmwlNDQ0NDS0 RbaSgL6uH9RG9URDQ0NDeyOMElAxBRVykVU5NDQ0NDQ0tLUY6CaoJ7+k7Df7 eb47yPfdQV40NDQ0NDS0Zxkf6Cao5ylilfswv+DQgNBwNDQ0NDQ0tNUNFBN0 E9QzIDSCiSAIgiDI8wDq6ekXODMzMzk5OUMyzYLanpmGXcSHNcB+LIupycmp qSWhK6ewppyek2UL9pKYns9u8R6yJZ/RnmyHr72wi9PkoKbTa2ujKfJ0Pkea z1mMpeV5kQI8R15s22wFeEYVqGv7BbNedns2/ZdQWQRBXhxKMUE9vfyDQElh +5UoNmNmhv4SUn05yS4HnT5DZzBWKQn9RQqy8PCVs9nQkE20bqmtJS3WSXnG 2UEQBFkPKMUE9VwgoIyZ3s62WqC+cWR8amRkZGZq6E5MROc4uZNkxRTh2C7i 2LqGtklSBcjOjPHo/u388q6pidGh0fG5mMsnwqBPjY9PzOfEFo3948Jt5ny0 lcrGqlRdwwhZskWpsz4x2PJdKcdVmY3TXF9bV1ffN7iw1aYHY2Oje4eHEm9H dI498/C63qeji/JeUCT2WkyT52hs7jNjZnhoeIaxWrstZWJssKWxHhqpu3+E iDafz+yxoE2w0fDofmJeGZOQKvqiCIsTp08vKsaiBl/LtdQzPMU6Yr4AuaXM uatrwUFLPq6p7oyZ0eHRuXh0cAOpzanJidGxsdGRken5tp5PgT7DoK7tvLJO sjUWRJi/OpcrGFvOU2Pjk3M5z138K7T2mi9CBEFeOosEdHqK+CL35Ift4Zaw A67drK1/oq9p2NDdqiotUNhHdBHUgfQlHgGD/LKzjr1yPaB7kujfqL3OelLO cTU5QVbn3FKY9M6kuxnUMeypgAcJfwdKorT0LUjVmWHtWKSLyxdjtPleYtYy yS4smJ399eruSfq8r71ihzQ9V3j2XBhkYHlmQmUr0dHRl3bXdMbMUN1VA8PT Nvb2Vma2t0KnGPT5/WONMtLiFW2tGrICBX1zlWM/nMGkD9fD4SaW9nZ2FoY2 twaIfBYXcVG+hJCNNcuK8T16OleloSptVe3q4flTsLhdFsCYJjXYQkda5cQl aKS72TWsyi7KGbJOvGV0xMZvhQisJoqvbJ9hztQfVdEii7Figy/1FudOWehu bgl7e3tV1SN3HjYsKsBRKABjLn/67EkpbyZuSkozZs8O6wxS0rtS3Ql9pw8b K4rGlhLN15nn/c0BxQ4yust53Rv+UWePG5YPLigfkznfsC6GMjZ+RRA6OT1X xLWNhFDVbHsQoHb6JqWM/SWRcPFPECnM3jNAbVmtPTM9M3fgKxppQRBkFZYV 0OZkD6WzXnNRprq6e6bH2nTUFYr7ic8dDXWNnYNLk6J6g4XHEh1jf2sDeKO+ FvouESXjI08HBodrUx15BVQr2rroVLfNik0KaH9xiJLGuXFimHdqbLC7rrGV VZK6mprmrn6q7+hshGIQ3d3U1NT0xHBrW3tZksPyyS5TMIKx/lZwR8fJ5Can pumToy0d3WMTEJkOdWwdIJoCYrQPzLrMvS21VdV18GFmbOCkzH5zr8z+kclF Y4XkSOOErZ7q5ZCCuSCyJ5wYhLwmYOdk29Ej6jWdHSe0FB73U7VedPiYlbby 5dC5w5l0KNoMfeZpT0fv0ARzcri6qqq5d4So+ARRwt62hvqmNiLieIuejkZh U3ddQwvpYE/1dHdPkD3uUFdTbW39CBE6XVdTC2249OyRTTZ29ohqUtts0OjY +Gz7TU2MjE/SJ4Yg68Yuos3ve18wcYqYngLvjNCpqcnx8SlS8hY20SWvrIGR 0d6ennFSWUb7W+YbfBKaZbqlvrZnaIp1qSw6ZS0pnrInnIiNpOtC6hfHx4ar K8pmC+Bz4cSNUKJ1RvqhamN0yPEp5Gjqkd3Z1XlKet8lr4z+ESLljsa6prnL dbinGSIPT84syo8SpjDbY6edkyA8w83wd7/7JrkeqjZwVFo0vWm0D6owNQPu 5jhxQbawCjx3bRs4hz4iA6cbamsb24gSTo5RFwf4l1PU+PPI2MjMwjuFRdUk TkBFpLLGWWpkAkre0NZHtbaxU/gMXAd0BnG6m9uXnD4EQV4Dywpoe7qvkOrZ qqqqyrrW6bF2Q4NjtZ1temoyNZPM3MjrJ07ZmJiYxBY1Mhe5ZmRvwDq2qq4F 9qXH3NLSNbly8zrv1//2zuwtuX3NzD06xcf4q28PXQ9JmCRcIvYRWlJAH4cq a14CN05H7Jvjlq6XTykZOcfOTD11sTxr6+xkYn1rks7IirhuctrG2MgwpbKn 8rbtHiEJz+BI78tHv/7+8LXgJckuLFhldSN0rA8TA/T1De3tbdU19GuGmSXh FnsFRT2jkgtuux7kkXO9eUVNTenChSs37O1llVTSq3tn+sscHBw9nU1Nr0cM NuZL7v2XjJZ5dnU3nfA4WaPHhDZMNKeKSmsPEU7EJIg7FGWss9TU+MS1q9Yn 7PxGxnuOqilXtbcfPyJbvFBAqeqP1sWLSuhBFzoz2ldVWdM1MMac6T0mvVv1 vENqSWNGfKCLh6ehoWFuVX97usfug2KuPjdNtSXPut9lMoaV+f5hYOlqd1pF 0TIIPuprqTVMMjPvuOgZnLS3vxSakB10w9LWyfGUrevAKH2hJ0gJ6MSFI/LX Y/Ohlfqe9pzWlbtTPgTB3pa6t2IfFqSG3/TwPH78eGHNQE6Aqalvwr0Q2wue 9+CwUEcT69C86cH669cc2Jron9LaNvkVZScNNGvGmY+SAnXZGvxJuPk+EXnP G/ayyqp5DUOLxhJmleWet4LJTdiojLqsfOLy/fu3oe4GZAFyg80MHGPpQ3Vn jx+Hhj15NbC3uUBy37+kjtnF3o2V3/8vKU2znIan6VFOcLkanziRWNle9zDu /PlzDtcvBSQSw6EzCy5dQuBbH3hIHbOBL4GlidHZcwYWAdmMngw5pbPTjHEj Xc363j5DmR3HLW9dPqVs6BAJ8dOjnKlrm//brx3j65lTLdZGumb29saqKq5J ebWp3ppm3hDtrMLec0EVzMmSY8fO9U8vGAZgXZnCahdqiQH7uqK4G3Lq5yDC gxB7Y7jCDY/fr+zODzI96ZHclR+0a78wnG4zbanzbjH0ucMRBHldLCug3dmB 3+wVtre3v+Z1e3SkTUNFsbKt1fDYkYKSLFkRscctXaXhF/dJnyY7g6lFvUF3 DhwrZGdndz0oaaK/UlFMupx8iGelLuie2l0cftHAJYk5kK2uZU4es5wHSgoo FE3h8FcJhPfZJCmvWt36WOkAd1pdL3ymt2UK8os9ael6EnJB+NiNtBB7hZM3 IHyyKlZTz3KZZKmCsVVqqLdMVVyWHK5jxl0zOO+X+yjSQtrYET6WhtgIqFrA xhOvU/tlLsBGoc8FdfMg5vRwfnq8h7PNP78XAN3zv6AcnE/4NQv6YbL8fUUB ykfNJhgzdPrkNDgfdLqvuYr25aienk4lnn0h94pOGhytaGtbSUDhcHXti9OM mcmuquvW5/cIq7U+7VYXPpjRQ8TpbCuPDfYykN59wju3Pd1ln9QJ8shWJQm5 krZ2TeEdZIs1i0ortPR06h5RLq57YqCkUkO6NGNtWZJ7edLrZweOFzlD1BDu eTVheUNzO7srhc1DGZ5ndK4mMBmd6oo6jePMvs6KGDLrU355BVE2pj53E/wu Gt+Mh5T87I6d9UpjTg3lZrA10XmloAJw4nqVlJRKG0u1ZWRLBlgNnvc4ylxQ 04r4eEP3uPMdIu/peTmYO2UBX+8jTpmuvklR82h/V1VssPdsAaIvm3rFxjob HrWOgIaV3/9tfM1wpNURv0wiD+eTimHFDOZwAT+PaElL1+NgU1Fd65ArJkdP u40sO4hNtcZotYq8Rn5hxjkzh4aShBNmN1NDHQ0uR4MHryQvV9PdrS7wXTzZ vOJyKrUtFRqS0mXUta0m5JHWmuV7Ts8mimzoSkU5nZKaYl3dU+0D3Wek9xrb x9VkhRpaBhBX78zSagZ+sweqeeXq1avmhvIiWrajvRUivELwRXsSekFYx+Fe +LVzXsmt6a77qdPNbFMRl8jrpsQYn4ciyGtjWQGFO3+Vsx6zMcZbNI9qVLe1 nDQ89iAzWnAfr9NNZ0dHh5D4DPKru/h2ujnFW93UlwqZbIlXlDlJPRcKstTx Sm57HGN90j15uvGu0pEL5DDjMgLa9zhMVceSwZjQO6pYOsSYnmrVVperGGcO 1aZfOnPsqKlvTcntw7v5iGI4XIu6n58SaHfaOQwq0pHvp6p9cZlkyYK13vdR PedJhUy0JCnIGlNDwU2Jnga2sdnxN4yvBUMfXhTsoGvuR5+eLg5x0rfwh42i QIdTV8Lv+pzVveTV3FqlKK/QRqffPCHtn9nFXDQ7lOyHp/qeKEgqtrA9pLqq LaRiZOt444aD863qhhp9nSNVHe1Lh3AZrMMlFFvm5rDoailXtLaZHFMuG2VM duRryIvfL6q962x0wT+1PtlXzyqcjDZ6XO5IVnXNKQP1EmixyRYdTY3KtpbT J/Tv3w/W0bVglaS3Ks3inJ66iVP7GH3h5JvZIVxTHc17HbNBY83ZOvrn7ka6 n7uZyByoVJURhazjnIwu+j94GG1n7pcQ72t2zjsdYkY4mlyJzHvgeVLb0nu+ iYyk/LLhHqVbS1snrzhFU8l4mq3BcxIcTzmGzkxP3/M2NXYkBmNnlghoW7qf qAa4ZrVPxxj0nkINebG5AqTnR1+19I5wP6+sdNzG0fHG9evO9T1jjifkvNO6 4Zq0PSYRUjTJbLu7dwevM3m5BsdnQ4LRbpZy8uohqaXkU8QFjxGnCSmadDE1 OqKpae2dymQOnNU+oqx6JCink8HsPqKhXt3RbqyrWjIMzdusp3cs51GSpuJJ avQ58JJuQFp1hJXOzbg6MmDmpOLRgp4BP5vTF6zt/cNjfL1vmJ45H55dx1zs +c462qyv20z9HW2jK90NmYd3cDvPXuEPU3wtzfxT2E73mJGMYkoLMcCOAoog r5HlPdB0H3G9a7MxpttkpMQr2lrU5MTKO9rP6yvdedze11lXSzoyCwYByd6g N9OXV+lsU1NTQ2PLxHifpjS/dURuQ0PRzj/9/Hp6X1Hg6SNXohl9OeKCyo+b OxmMmaUCOloWJq8BHihdQeRQPkjMdJOclEhGY/vjwur+rnIpEcm8mnpTA+U7 xe19bZUt7WP3PU3ULYixssGqu9KiqsskSyl7ogufhhXxAubEFGPq6XlNGVu/ e7W1lSZq0lGlnY/DLmrbBUK0h96W0vqEP1vgaSGtR2zkul3StfR0t9E29Sys L/L7w1++b2cwA88pnHZO6lvyDJQaiMwOslIwugLC11xdXlRWlxnlcNT0Zl9f X0lZ3eTTJjkZ8fIVJhFRh2cFWCqfdaprbW0qvy8hrdbc36MmyVM0wpyuj+Xj U2/raD8l8c+jTg968zz/8Y34k8a6rOBrikZ2I2P98qI8+eCBTTVKSVKnTLSy q8NIU8opOqu2rjSv4NHj4vqB7nIZIeG0Zqr7nW8kagjXSEbQJjKPGIBvIzze aFvVP34rUQft15rES2Z9UvwfOi4ZeaEXjt2405jpJaRxpra+RmbXX01Dc0It 1M56Fs030Vn5Uy7p/cMt0uLC1U8HrXRlrHxnGzyytDPX77SKOaEacTf0j9r4 M5cT0O40b2mjm1TIWO1dAQENtgKY6t2ILr/nqnaWaNjHjyrhAK8zCqcckvpH p11PKZyGrAfbjmspxcHl2l7f3NpbVf64s2cwwdlY4TxxH0Wfm2c7m+MM8bEp w2Hbtl+k1hHaGmIk+vHfRIlRipkWaaI9W9Wl+fKIC7JRUkKkpq/7uDyfVRhx be/68y8uJ3V0PvQTktF9XFubFX5DWc8MnP7iqHP/86dDHWMz8ZYKv/xOrmdq +elt7F+3wSfBcuoXmfQRY00ZouTkFZ7iZqjvnNCV6/3lt+TpDrmufNzi6RQ5 wWjxFxpBkFfH4tdYpqfhzvzx/Shb58C6urqa2tr+7sbbsTG9Q0PxMWF9dPDd Ci6ZW9lY2z6sIcbKFggoMc+RXpEdd1RdXVtbW0tbL79ucKK/ytbM0ikgPDY8 5EnjSEdFRlw2cf+fHHTTzvs22YUtTqE89469g1d/f8+d6LD2cQaT/vRObGxb f3uAnZXNZduEh9UQc7A+3wKKYWVd0j7RXvYgIaeUTICeEuKybLLwd6ihOCIx l6oz/Jke6fC+bm1vbxedXgIf70W4OwdE19fXtz3Oun2vEEI6SnJmN55kxWWU T4+3Xb1k5erjFxAa2TfNnO54Ymllk1VNqAxLQqmMent7WpvqQ29ZHdHS1tY8 ctk1GqLEBd60sbFxC02empq8ExtFvcbSMUYdxVxyeF2Yu40m0YhHLjqE9PZ1 3okKayMHH7NifGwv3/Dz98koba5J9JZTNfa4ddXyonMz8QbGSExUeAcxg3Mw Niamb3g4PjasZ4Y5OVjnZGlpf/XGo8qqoKu2Nra2iQW1zMXzqGd79tQoL+vL dvb29gF3HkBrFMR5nLF2rK6v7e/vy47xtbns4Bfgm1Xe2laRdTe7DJoy2vua /XUn/8CArKqumZHmK4ub6HJueX3K3ejOSebMWIfXdStWg9cVpiTkUBv3EnPL mAu1hboSyOswADzQ6qrqgYH+RQWIIwrAuBPoAg3rHnx3msGYbHsMJyW7fmi6 p8LC0jq7YXSyo9j8IlwntiXtw5UZsTbWNnZuoQPTdObC+xayNWagvpV5cfr6 prnldZDp/ZBrJy2u1dbV9nfVQXvCVyABThk0L2MoJiqsl86c7K24fNEKru3b kWH5ZcRwRPG9CFt7e1tHv+5x8nakq9wv5A5s9Zbf8wy/S1Zs0R0jg/3rBpmW Zd+2v+raNzA40ph/ae4Kby25n1JUW5vkwzrdLSP0Rd8+BEFePYsEFL7OExMT Ti5uri7O165dg440O4cUnYVvti2F+i4Tx9509fL29vHx8fT0eJibtfaSsFJw vuXueutmdnYOGbrcWxLr0G8sSGFifOKWu5eLsyNAf4EsqFHB7OxskKBb7p5e noCXj6fbxMTkcx/uRhwMDel+yzlnhaZ46G2leMp7+SoxnxW8huUZbty4cfWG i7enu72d/ezpeN4kVoi7yus0TPZrif06XLYA6yEgVHaTk5NQX/trjt7eHteu QIb2Ds6uRN2Jr0Dekhos95mxwm62t5WX5suqpj3J9RvOrq4u2dnLfHHWdroR BHl1LBXQpXGoQNYr89QSRmv+/pLx6QTEIXNzVuGGf+ZZ77KxCjNbADLfOXdv thhMtjSfleziEa+FCbLny5hNlrVBxpmrx3w7rL0To9OpZmAwF7fnGg+fe5+R Smga/C1mV3n+nfuP4PP01PSiaCudspWqvKicROQlURhU49Lp1Fu58+eRDKXi L9tE86Viz51BX7zxLFYtwPxVwViyMXedzOa/lryWNMuCU7agYel0VvUZi7Ng zF6NEP7cb27Ol5xBrum09HQjCPJ6oboCUE8PX+I51NjYGNyKw9/R0VHq7/j4 +OTz8CLHsqfA2bEcwyr2iycFJWe1AAdpsh++YlMQq6NS6zwxWR/XnRc/lW9W AVinjMWryZo93+VzfCWnG0GQ5wW+sPCtBPV0dvOcnJjo6OjoRjY+XV3En044 XZ2sj8gPFjzdCLIhge8k6Caop+Mt96HBwabm5lYEQRAEQZ4FKCboJqgn2PDQ UHNLSxuCIAiCIM8CFBN0EwUUQRAEQZ4LFFAEQRAE4QAU0I3A6x7IRxAEWX9e d8/60kEBfb1Q11hnZ2dvb28fgiDImw/Vm/X09HR0dPywZRQF9DUClxY1F7qi oiItLS0lJeUegiDIm09ycnJeXl5jYyMoaXt7+w9VRlFAXxeUehYXF5ubmxsZ GVlbW1+9etXe3v4KgiDIGw70ZhcuXDh+/Li7uzt0dz9UVxQF9LVAqeejR490 dXVjYmJGRkZe21pUCIIgL4GpqamWlhYbGxsrK6uuri4UUISdF7weQEBNTU3j 4uJe92WOIAjyEjl//nxERER/f/8PT0NRQDkDroSOjo42jmQUDoH7sdLSUmNj 44mJCfqin7ZGEAT5QUD9GkJ6ejr4ob29vc/bW7aQwFHU3+ftaTnI5XkzQgHl AGoAtqamhpLRFrLR1t7sELOvr+/+/fuXL19G6UQQ5IcK9WMljx49srS0pDyO tXeS8HdgYAD8VlDep0+f9vT0tKy3PFG5QG8M6UMukBdsUKPNrP589Y4dBfR5 gZMI7Zyfn3/kyBE7O7vOzk5ocLg24O8aU6AE9N69e1evXn3dFziCIMjLghLQ oqIiCwuLtQso9JAgl7ARFRV1/fp16CddXFxyc3Oh413HCb3Qk1O5JCcn37x5 89q1a5CXn5/fkydPqIwovV69Y39BAW0neZFarJHnunt5eVDqmZeXp6WlFRsb a2VlZWtrW1VVZWNjExoaCmK6lkRYAnrlypXFFxxjFtanFS7L+V/AZI/PMQz6 zPQ028+bvqZiIAjyQ4IDAWVNsDxz5oy5uXlwcHB4eLi7u7uhoaGbmxulOC+u odCTQyeck5Nz8uTJc+fOeXt7Qy6QF2iogYEB6CkVAfKCwq/i+b6IgEKDNDQ0 gHy8bA1tbm6uqKh4qVmsBZbvqampeefOnaGhITiPoKF6enpycnJmZmZrv0JW FNA5GGv5/WUGfe2KtcafrV4Ubd2LgSDIj4fnFVDoG8ENqa6uPn78eFhYGDW4 OjAwMDg4WFdXd/78eZA2CHxBAaXEMTU1FXry6Oho8DEHSKi8KisroVe3t7cH EbcgWaXkHAsopNnY2FhQUFBTU/OyBRSaq7i4GDzrdczoeZNiV8+4uDhoZ5B1 qmHB/ZSQkIAGX+O7TqsI6MTY06b62sa2XuIDY3p4aJhwC9m8O/oMsfko9U5u STv5eayutra+sWV8irhQF7iN86myb87HmPMyiQNbHiXY2Ht0T83GGh9d/2Kg f4ogPzY4ENCenh7oGMHlHBkZaZkDOlsIB8UxMjLKzMzs7e3l+Hkoaw7nsWPH 7t+/T/lB7BmBWENG4IeqqKhISUmBmK67gLKr5xrHLV8ESuweP37MsYZSrd0x B5T5udqfumNhV0/WxCEqQUtLyxMnTlDbz9TQZQSUwZgm5GXK6piKgaXdSQ15 +9BsxkyLpopm1TDb1UhOaQNcjktdDi6b6S65cPaEzeXLF08ahOY2sWnVMm5j 9cOER819bEnNxpmGK3ymXVdZKelJyySdWZaX1NDWcdVQQ8/ipRQDQZAfD88r oNAzV1RUgErW1tYu6kspafPy8rp27RqrB+YAyhVycHBwcXEB9YRk2XtmKEBK Soq2traamtqRI0eUlJTWXUDZ1fOVPZp8EQ2FQoL7f/XqVTiJ1tbWtra21AuY 3d3da3EYKfXMy8s7evQou3qy9kL6UCRInHpf+JkaurKADptpmzyG/6dyhHhU nzKZvd2dEzNwDc487e3sfjoKe/pbG+oa2rzMdIMfNMddPXrE4R6VwMQUIWq9 LbVV1fXTcN1Ojk3NydfQ0PAUffTK2bPpdYOQVH9PR/fTMQjvaKxr7IBMmH0V CarqWmU9oJEjNqfPl7d32hueebTexRgdHp5CRUWQHxPPJaDQMYJrmZGRcfHi xaVdKNVtJiQkPO+E3kXAsfX19cbGxqAmi5Z3oBwiKC30zOB+gnoqKiqCZKyj gIJSgHoWFhau4nu++EDrsimwNLSkpOS5sqCGBaKjo8EfhzaBv8ve4ax0LOgs +J66urqJiYlPnz5deudDNTu0BpxZOzu7Zz7mXllAxy5q6gQ/rEryunj+5l2Q Mz1drbrefhP5PcpnryU9arkf66mpY3Ll5nW+b/7jlt7RWhx2aMch58gMauR1 qOOJk6Ojp9MFK7e7ZSke6hccIN3J5jR17TMdPe03rjmOTU4aSO1UOXst+XFL euxN49M2JsbGKU/a8hOcdu/eYxuaMtVXZ2d/AwpiqakZUrCuxWhJV1c37JzE B6YI8iPieQUUOurc3Nxz584t7T+h4wXnJSYmBpLieF0jKgvozyELSHCpjlAd Puh4dnY2ZARicenSpXUUUHB4wfcEAS0tLaX8wUVA4AtOK4IsQCKXpswCnMGy srLn1VDQLHd3dxkZGS0treLi4jWOooMsVlZW6ujoqKurx8bGrqSMEA7RLl++ LCEhAbms7tuuLKCTZhqy2hftLpkcO+kUOzbeqaasUN3VeUT4QOYA+IOVsqLS FYT/x7Q9Kmof/gQ2GvPvaimL7pfQr+pl0McHHmYmeDhb/2efVFNvyxFp+RYG M/3WGeuwR73l8ZdupYAUynLvzRliMgfyBHhFS1q7SsPN9ilYwudzp05Bas1Z AZduJcHGBRXp9S3GA9fzFzzTmMSL1eiFIsiPhecdwqWGN8HBAZUBpWMfX6WG cKHPdHNzW9aRWQuUk/vgwQPKyV1WRKiXQCF3kGno811dXVdJ8HkFFFIGCQMB rSMBP65uIRDS0NDAQdXYs6hbDkgZXO+Kigq4f3jemUtUW8FfuPGIiorq7+9f Y/vDUZAp3BR5eXmZmpouew1QgpiUlGRsbAynBk796mVbZQjXUv98wQQRoCks fDu/7MxxrYq2NuNjyuXjDHpbvILMScrLC7ExcAh9zLpKQy8c0beLSfY/p2vh 3dxWrSQv28JkJjucdAqMszh9snqMmeVrG5QNYb2aRxSrJhiTVZEHdvI533R2 vHE9LDFnqr/ixHGjMToj1cM6IKMBVM5c79z6FsPq/Omizmn0PxHkRwUHk4ig bwwJCYGOuoeEtWtoaCgzM9PQ0LC8vPxFPFA4Fry8kydPNjU1rdJRUwIBatu2 6loKHAzhwl/QUPBAwTujHv91LOTFh3A7lgBpQnZQZWr0mIMxcGqgFYSYg5Yf GRlJS0tb6WkyddKTk5NtbGxAmsH9fGZJVhDQ0ZMKym4PysoywiSUTBq7W5Xl JMpaWzVk+PP6wPXrOiLFZxOe29BQtOtPv76cWFn7IO1ednFVde1VY1X7kGTf SxoXPAvri/z/9LfvK6YY4225u7/4rYbdXSZzzMLMogqcx5lmGTH+h/1Mxnjr cS3Fu4/b+zpq6hqHGE8Lj2geH5ucsLe0LOuBcoyayCutazF+p2kXw2SbfYQg yI8BDt4Dpbr6y5cvX7hwobi4mOr8Qc7AGVRVVQX3B5QUhOB5+/BFnD17Fpyd lcYhqdlErFXmVoGDSUQvPif2eaG0D1z7hw8fvsjMpZV89mceBe0MDuZKD69Z AgoR2tawpt+yAkq6Zoy0aO/L9lfsbKzymkZA+KKjo/uGhxNvR7aTQ6ZjXRV2 F62cAsJjw0JLW/urU6MsrO3s7e29o9JAmaZ7aq5esnL18QsMjyKeNjKZajzf eRcNMqcao2KjiWlD0wO3YyI7yKSGGgsszK1srG0L6keZ012JKWnDA81xd6LJ X4WZSY1a12Lw7vDK7ybSRf8TQX5McLYSURv57CwwMFBfX//8+fPQrxoZGcGG rq4ubJSVlb3Isn7Us1RwckGgKQdzUVLNzc3UajkODg7PTI2z11jYNZSjSjwf 1MyldZn3y9na7yx9fKaArn2YYvWFFJiEqC4OWPVSXbCXMf40L9rtyMmro4xl F0NYNqnl03+ZxUAQ5IcMx0v5wV9Qsdra2tTUVHBe8vPzu7q6QG6OHj2qp6dX UVEBGsrxKC6lX6DITk5OIKbsA8VQyMHBQdBoEOvw8PBn5sLxQgrUXFPQ0Oed z/O8UP57YWFhdXX1a1nQ71UKKH1mZpqEWg9oZoZYwID6yyT9VGLfDAHxCy70 2cizM3OovdNTsPdpU6G9tXPTCH3hInuMxUkRGVHhswsgvNRivMxvKoIgGw6O PdC2uTcEwUmE3pKalglyBhqqpaVFaSh4qRxrKBwL6nzu3DkzMzNwNqlBTtAa CIyIiAD1BP8X8n1mUi+ylB81LQd8Qw6q8Fy5QEtCLq9muHgprDlCrNc8lz6f hdsYEMT19UDXhQ0iWhukGAiCvEpeREDb5ibEsn4bhVr+vaSkBPxQAwMDzh7J sVKm9NfPz8/Y2BiU1Nra2tzc/MSJE/A3IyNjjQsGvvivsbwaXXtd6tk29ww0 PT1dW1vbcjng2rCxsYGWX33NCvYE4eykpKS8xF9jId3A1+/zbZBiIAjyOnhB AV0KaCj0xsXFxZGRkS+4Ii6lv9QbGTk5OYmJiampqaWlpaDRa18qEH/ObC1A Ozc1NaWlpYEfmrwCsAuuk7UIPTUWkZWVBRcVDmwiCPJDhU78OAUDOsY1Ohdr AaSNWv59vVKDThs6ZHBqQDcX/RjoM0EBXSPQyNRo/Cqs/SdB4Vqqra01MDCA +x8m+XiRjiAI8sNienoa+rfo6OgrV66s/e37Z0It/74uSbEn+FzSSYECunZa V4Vq/7UnBXLs5OTk4ODwum8SEQRBXhbgeujp6WVkZLzIT6hsWFBAXwvUpK/m 5mZzc3MrKyu4uh49elRYWFiEIAjyg6C4uDgmJgbUMyQkBNTzBR9ZbkxQQF8X rInTgYGBoKEWFhbUfCQEQZAfANTPUlML/vwg1bMNBfS1Ql1UAwMD3d3dS1dE RBAEeaPp7+//AatnGwroBuC5Hp4iCIK8KXAwLefNAgUUQRAEQTgABRRBEARB OAAFFEEQBEE4gF1AhwYHUUARBEEQZC2wBNTJ1WN0ZKR1uR+zRhAEQRBkEaCY oJsgoFcdb7a1tZZXVFS9GOXllaWlFWho62gveE0iCIK8DMrLyzva2x1cXK3t r5aWlmRnZ+dySl4e8bekpKCurriu7hEa2rpYbe2jPOraQhAEebXkrQooZkV5 +TVnFxcP75GRkZ7e3n5O6e3tg7+RkVV6emkGBll6eploaC9sGcbG2R0dnF+W CIIgHPOMIdzW1tGRkZvunt4BwS+4aDD5y29ME5MyGs2TRgum0QLR0F7YAmi0 sOFh+jqsao0gCPKcDA8PD63MwMAAxLnl6e3lHwQb5M8fc8jk5Az8NTMr27LF /913I7ZsCUNDexHbuhX+hm7fHj04OAmXFvnTggiCIK8IOp0+ODj4dGX6+vqY DAZLQGdmZjhW6qkpwk24cAE8UL+tW8NptFA0tBcxLi74G/LRR1GDg1NwaeFv jyMI8ioBDV0koOBy9vf3o4CibXxDAUUQ5DWySEBBPeHj2NgYS0NRQNE2rKGA IgjyGmEXUBDNkZGRrq6uoqKiqakpkE4UULSNbCigCIK8RlgCCr7n0NDQ6Oio paWlkJBQQUEBaCVIKgoo2oY1FFAE2cAwlnxkzG8z5my1QzY6lICCelJOqIWF hby8PPwVERHJy8sDPe3t7UUBRduYhgKKID8E6G/qa2iUgIKbSafTg4KCeHl5 CwsLp6enzc3NZWRkQD37BwaYDDoKKNoGNBRQBNmwMCaHGdPT859nxukTo6xd 9NGBmdH+mZH+uW8tY5lDlk32Wd/zFxGp54US0P7+fsg0JCQkJSUFlBRc0eHh 4evXrzc3N8NeFFC0jWkooAiy8aC+h5MdV7/sSE4hPk9NwN/xXJM6K1FSP8a7 nf9Zpf1f9Sd/WXfi5/Xnv+vPyiYPGWcdwqQvLzTg3D148CAvL2+ZXMnvf1lZ WWJi4tjYGHMNUvviLJpENDo6OkAyNDQEGorPQNE2sqGAIsjGY1ZA261+1343 nskS0Mxj1ecPUgIKu9qiQ2dG+mZGu0azTlWrfTrY9BTkpd3yt9QhSwWUUsPi 4mIfH5+goKCCgoKle0tLS4ODgyFCVlYW81UJKDWDiHoMCopJbbBCent7GXT0 QNE2oqGAIsjGY05Abf63PT6ByRLQLP0aU55ZAbWe20U+/Gy7+ElnOiGI7Va/ p8KXFVAAPLukpCQQ0MDAwNzcXNaKQBChpKQkiCQuLg6E7BVVlcEYGRkZXhnQ UCbbUn4ooGgbx1BAEWTjwRLQPywUUL0aU+45D/QPnWn5s7F77tUf+/RpA0ge fRUBZc55lBMTEykpKYEkOTk51C7wTFnqCbL1smvIgk6nNzU11a9MbW3tQH+/ Cwoo2sYzFFAE2XiwCyjbEG6WLktAO+3/t+4iX1fQsZ6QU622e7qSo8hjJlia u9IzUJaG3rt3DwQ0ICAgLy8P1JPSU5Z6voLBWwoQxMLCQihD/gqAxNdUV9/0 8EIBRdtohgKKIBsPtiHchGRw0hiT4yCI49nHa0wPzwnoH+ouCnQF69So0Zp8 nImwGca85sI3eWZ6pe8zJY5TU1NpaWkgoMEkoJ4JCQmjo6PMV6ieTFIQHz9+ DBpatAIPHz5sqK9HAUXbgIYCiiAbDwaDTnwVexz/0eR1jQwgev6hCN56W3Xy Ozrabv2/nfdzYWuq3KFabftwxyApuxOE5iamrCEDIpnp6WnQUMr3BPV8ZTNv 2QFBBP+3oKCgcAXACa2vq3sFAgqdIcuW6yeXj7yWOLO7uBaEsOIvv3dJCuzx ly3kKrVYPXD1ei2q2tJirFTxZXNf5fCVclnlRCzIaPXmfc7aoYAiyBsMOQA7 WWxbqfJxX9Ej+lj/RKlPrdamvsIycjc5C/fObcbMFPEI1PH3teZqdFZ4dCjx fuhwz8xIH33ld0JZGpqenp6YmDg+Ps585erJ3EgCCj0h+SvbYKGbNoUtDA+h sXWtmzaHzUVmxSTjLE6NlWAIW/ohbBvsB7IiB68cyJ5sCNfmsE2LO/wFiW/a tFJJqGLPVmHzXGU3s9WL3A5drmohtMXNFTLfXFxhZKZkRpvCuBbHXFqLpe2w NJfQZUqyTEarN+8qtWPXzUUnEQUUQd5EZlftG75/tsH4N3WGv6wz+br7fszs HubU/CuioAlDjxuNPu4tAG1ldDv9o0r7p/Um/11v8vPqYz/vySLnCK3wPJQC JGlycpL5OtSTuYEENOy9D6I+2Ra9fXv0B2/Bx0DooinR3LQ5/MP3I+b7TKLf DqBtCoeY726B/jYIAre+HfH+uwsS3PJWxMcfR23bFr1te/T2bVFbNoW+834U HLLtkyjob2cDuYho5IEh77wfSezdFv3pp9EQ4QMyNapI28hSkWUIoZKFjx99 GEEUgxbKtVymkPgmomCEHGzZGs5ekq2bQ8l6BW56l8iRjAZGaXEA7W0i8N1N cGAgFymLULX33pmv2rvvRb61JZRVNqIk74dTjcAFLUam9uHHkFEk0YbEjQc0 bOSytZhvHGiHpblsJk7K++9HErcK5InYvDX8/fciqDSXZBT67oerNG/oCrUL IWr3dhhLN1m1QwFFkB8IMyMzw+BLUh9mv6KLVxyaGp4ZG2Gyr1A02re6B7pB eO0CSnb7wbR34+6WjXe1jzU1jXTVDtjopHPRArdsgV2B0ubNI/0D//6UFCOi 1w3+l8CjwicjELOuql+fL5lG85U4W5/sXQLJ0jaHkUcF8GhV9fdNtDaNtLaN tTb2/vO/IzVutLe2jjW3jw/0TbS0jrU293/1cRC3Yd0DfzjQV/Vyc0vLWGPT WE3NaN/g5FnRBBotNrFyoqtjrLFxtK1tLMq+gEbz5jlWDcm2NI00tY4kujz5 5UfgfxGavpkt0+aGkeaOsbLi9p1/iqLR/PmOsZWkoe/Q70GDAncplzxpIir7 uKBTctddGhfhsu3ULnnUNtbUONJQ0mcsdo8UqUCpczUh1pC1/2ZCWSLd4/u0 doNm3U6smCCaq3mko2/olmnuFlrQ5s3BtI/jLvt3tTaPtXaMpvpX/Or9INrb cfFlK9SicYRqh/98FMRrUhNus0wueR1TLjqpZEn8v5AsTQupeIvmxwUKyJZR hn/5T94N1XPtWLZ57/uWcMF5oYUuV7sAPv26rvquX22F+yU4v5Fud3u19sbA Kd6yCQUUQd582J3HlRxJxpu6EC5zowhoEO39+LyGkSO77mzfHr5DNL+1d1T0 j4Rjten9O263O3Pzui2OptK4gjbRAn75bX7f4Pg5qdRPtkXsliw008+m0bxk zJvzwsvZBNRfxqypILryww+DPvwk6uOPIqFDfu8jcMFCdmhUNhW2/GJ76PbP Y7Zw+UubNeWTB77zYdRnn8Vu/yT4X0IlVcVtv3jbl/ZuQn7jiOo3sR98EPHJ x5GQCJVs4e2q7duCfv2XtITi8bLY8q3gTM1n2kjs3R6y/VexVrcH6pOraTQP uAEoiJkrySdRb20Oeuu/71e0Dx/ZeXfbZxEy6k9OqaeDqP1JsHh8fFxfLHHb trBdkk+6J+mnhOJB2ZVsG+86PGJJW3DmkMF+KMndguaRo2Rz/V0wr/3p5JHd hO5ciX1ad6/+L/8dvf0X8Retyr/+VRhta3x+0+JaSJs1Ft2u+slPwn7ys9if /ZRoB3nLhsW5HICYd9KaJkbrev7+0zCuTb7/VKwoulvzDs0HPFO76PmMzCzL //2byHc+iFqmeS82PYyqgEb4o9Dj5WrnJ2JQNcpkuJ/Igqxpm6KCMgaPH0IB RZAfEtRPrqz+qyvL/UrLm/B93jgCmlU9KPqHMHJcNMAjbdhGNZFG8/kdX/HD mKrvJIsL4mvfIRyZsFsPhiIuZILikIf7k8/UAqQvNGYFl7ELqNSFxtyIig8+ IGTr3bdYT9x8/iRRWp3Z8BbNF5IipMR07kAuKuvYO08GdHbFwS6uDxOyaoaU v4798MOITz6K3LplNn5mUCmNONyftv1e4+C42B+JUc233prdmxEA/ixIjOf7 3xX0VHfChui5przIuZK8DbUOeOvXD5r7RsT+Hk3G9KWGcN3Sh0LOZsBHLmLs 1FvOtr01qw6kR8ai4fa1Ipa0+acN6u0jBDS3blBktrn8XdKGr8jffe+LvJG+ gd/PtkkQuYtq2MW1kLnYeN+zmEZzIQsQCDHlzOsX5aILuWxKiE5rC/RtT3B/ TKO5falU8TCuhovm/tM9hQPd/WwZ+a/YvGZNuaHQXH6umcOhy9TOU+ZCTXRw Q152D///gkZHBKU/1T+IAoogyJvBxhHQ7NphjZ2ES3VQoaR/ZEz0TxFctEBD 55ZrGskQLS6/59B/Q/yo1LJxA57YzZtDtm4O27Q57C1Ckgjlyg5hF9AAQYPa ybHppvrhtraxcNuHELLprQguLr+/yZTVZDd+wOXPtXXBgZvfgo+BJz264h0L iY9cIbR349Ibp/u7xpvaxtoa+rj/D2TLT+5iE8SHdDZvDuPiiox6OGImC55U 0NtkMUC186MrP90e/NHP4/xTB2OuQb5ewkZ17CXZRD45FTGuau2dyAyqFeeJ I5RuS0zS4zHNPVFQr7feCt+02f//HX7UVdnBRfORvNhw+8q8tAWkzwlo/TA4 7J98HPa1+JPulqdf/MT366M11an1W7j8Nm0K37QJ2iF8E1fwcrXwFz9Z31HT f+N6hdPNWiNFwv+Vs2yIXZoLV0Lmk67df0i6Xz7I/9ugXwmVPk6sodFu7dWr q7xXx8po8xbiAe6mLWFLmxcc9pwguKMITigd11qudjIWjX7ncvk1agoiIFpQ QMYgCiiCIG8KG0NAZ/v5vq6xpqbRpoo+Y5X7lKzcrZgsiG9wcKip6Zy6rprM xRWeVjmud2hOQDeFbd0axtJB6MC5tsyGEFoWVUmMpn4e8zE5B4mcu+v3hTTR w78PTtMWdgH1J57xiZQOdvX87q1ALkJ6SE2vGVbfAZoe9fln4DwuyIgQUFpE 5MPRi/MCSqr26FRT48jY9FS4Xf6nW4IJETFdUhJyEtHPfhl/5kZN3fCk25kH 4P/eL584znt70+bgt0mJ+dnhRz1VnYSAmjUmuz2GENCpzVyEb2hwkHg6mdk6 09sx1tk/1V3TJfivWBDBQwa15Sl1m2i+swK6OZyLtnwtRI3rOmr6HK5VODrX Giqkgecod6kxaWEu+sQQLhzb9w1XwJdHawpDSv4pWFyYVEcJaEVKLSujzeQs 3GWblyWgKRUr1M68Mf5KAY0Wca/yqeyOBIc7/YbcKKAIgrwZbAwBJUcaa4bU vif6+Q+2knNruQJ+tvNhQ/Pg9auVDg6VXrd7n0SXQ59888FonH3u3BBuADmK yBpZ9Zmbz8kaTfWefzVmroevzmIT0AuN2aGQrBdte0JRx/gpvrvU3FpiYJMc VSaHSQOpaa4Lh3D9aD9PbXs6Lvp/4awhXFDth9EV27aHON8fvkMU0p+YBLWk JHMlB3P/6PuC4daej2hBN1KHyaFpH3KQ00fRrq3xQS2N5iZ4rqk4toIoIVGG 6LSqMY1/Q4538xpGFL+M/MOOwu7uga//K4TG5f+LPQXD/YN/eT9gbmQ1cKVa yJg1pnk/ptFciVoQkf2EzjQszuVf4TSu+IzyXp7P4JDoiPQeV++GWN+KLTSP n+4uGh5gzyiAeJVm2eY1nRvCzRoJX6Z2HuCBxt14xMXl8R/V8ty0Zo/wdj3u WBRQBEHeCDaOgObVD0v+OYLq5N8m9ChQ/1ZHosNDEBEazZP2SXJ1++B3nwf+ 5kARgzl1Rjrtk23h/5DKD/Yre5/mI27WVBhbtW1byPbPYj7/PHozOU8GQii/ 79Pt0e9sDaN6+L/JlNfnNc27SBebHkaCgPqYhQ9UxFVu+yDks88gfswH74bQ 3iPmNZGjyuC7RX+6jZp+Mz+JKKV0ojisZBMtYH4S0cWmvAionfvm3zzom57W 3nUHUla41Mwqyeefx7yzNfAvPAVJd5r4/nLn888j5SxbemvattN8fsv7aGps 7IxkCjHNRvrJCIOudRAO9/3Zlzk9E5PnpJMgXM6mdbS167db/YkJTg3Dcl9A c/kb+vV2pJMPiDdHeeSMNuY0EnN7fn7b3K9e69BdGldcfvPiWkA58yPKt24N 2PpOBHkiAj7/W07P5IJcfgO5vJ+YWdnL/V8Rm2h+v9+b1zLJLAoqeQduHrgW ZuRbp8WTQN66LNe85CSi/xN6vKh2OoeI2inbNMYRk5f8aFsirGP7R/vHlXdE oYAiCPJGsFEE9L27yY/6xf8SycUVsmVz2CZwbbbERucN6nHf3rI19P23wzZx RXikPnXQSIFueZfE7Gss1cW9Z4RSN9P8eHTI90caR1pbx1prO/9IC9xzpIp6 U6OxZay1dViVECOih/+LWMmj5Lr35np48dP1SR6PuGi3H/bOtDePNreONTWO QiKu+hk0ruj4qsnO9rFGMtkCQgh8DmvNvsbS0joacfPJLz8m3mGZe43FX+xU XbJ3ySYuwvEUOddQk1n/Ac3nkFY1W0lG1A7efveD6It29VDapuaxksLOXcQA LOGc7hB/VFgyTLzo8aTPSOw+JEIuOBC8Q7u8rI0Y3G4t6FH89g7h8X0YTzTX F1GbNgVu+TQhq3bEiDeeixaw+dM4h+DO1paxluaRVO+qv34cSnvnTnz5xMJa eIucqk/2mX3rhxh95Vo+F66PE+7mdez9lDpTwRZhT8vulHORr7FsYs/Iq+qv 28Kp+5NFzUs1CPkaS8hOiUW1Y39JJ4CLFvjpX7PbBqYUvibePEUBRRBk4/Pa BXTWuMLe/yBy66YFIR9+FEV1pNRiBeAuffhexOwr+eRCCu+Rr+TTiBUMZhcr 2E6+wr+ZeOt/bq0AMvCdrbMTcTdtDf/g/QjW6gfEi/zEm/6zqw1QaykQizks WUjhkw8XLKTw8XILKbDWc6BWHvh4W/QWcv0BVknA3nmLWoUg4B1y5QFyIYXg +YUUNkWwlhogJwZTSQVykUsQvE0OmZI5sjdX8Oa3I7d9RK01Mbe+wSdR1Mjq ooUUqFosXXdipVzeez9yCxcVAZIKf//9JQspzGVEVXlp87I1yDK1W7hMBLGc BS6kgCDIm8JGEVCy/3xWyOy6cJtXXMpvpdXqgpcmsuQje+Tg5QIXL+W3acWl /Fh9e/BKJVmwrt0zlvJbdulCtsbhms+Xa+EKe3PFW6kWCwr/jFwW127ZjFZp 3mcvVMjFtew1gAKKIMgGZeMI6DPXkGet8U5bYTH5Z66XvlKyiyK/4GLyS7df cDH5leq7bMuwIi/bMiutEr+WXGgrlPaZZ+2ZVV7lGkABRRBkw/LqBdTMjJi+ 8t57kaChaGgvYm+9BX/DPv00GgUUQZBXz6sX0BMnnpATawPIdyjQ0F7QfGm0 4KdPUUARBHnVvEoBnSF+c5yZmtptavr44sVyU9MyNLQXtlJLy4qJCeKyRAFF EORV8ioFFEEQBEF+MLx6AaXTGVNTdDS09TP0PBEEeQ2gB4ogCIIgHIACiiAI giAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAKKIAiCIByAAoogCIIgHIAC iiAIgiAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAKKIAiCIByAAoogCIIg HIACiiAIgiAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAKKIAiCIByAAoog CIIgHIACiiAIgiAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAKKIAiCIByA AoogCIIgHIACiiAIgiAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAKKIAiC IByAAoogCIIgHIACiiAIgiAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAKK IAiCIByAAoogCIIgHIACiiAIgiAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAc gAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAKKIAiCIByAAoogCIIgHIACiiAI giAcgAKKIAiCIByAAoogCIIgHIACiiAIgiAcgAL6YwbO5tTUFGwwEOTl87qv dwRZZ1BAf8yMjo4+efKETqe/7p4V+VHwuq93BFlnfgAC+gq+lz/UTmBsbCw7 O3sDnlMEQZCNzxstoAzSd4IN+swM/QelbK8IENDc3NwNdU4RBEHeFF6vgL7Q gM9cBPrL1k7GzNgIi9HpVbODYoOaT89BCPsGdlpRQBEEQThmQ3ugDAZI0LL6 SKlS65MHZww05eXkT9t61PVMs8LXL386/J3sLJQ68P033+/as/O7r/ccTq0e hcClHi+D9IdXSGf5Wrx2UEARBEE45jUK6MzU5Mjw8MjyjE1OsmXEWOjHMQg1 mux8IrX7i1//7g9/+9sXv/5/v5A4eWuK2LO+DjIpoB15fF998ecv/vHPv//1 T//8LqlihLlEQEE7qY3x/t6HKbe9vW65uLjc8vKJSclq6x+dizOz0UQUBRRB EIRjXouA0slECqMcvv/X33fu3rNzMTt27TrIzy+tp2t8zcEn51EbdRRLQymV 7MgO+Nff//jV19/85z9ff/3vv325R7l+jEx8/VRqTkDzhb778m9f/vurf/3j i692JVcuFlBKPXubHjuYGh747tu///XPv/+f3xL8z+///Ncv/j977wEfxZHl j/v+d/u7vY327p43eB1AKOcskWyMsTFgwBgwYAwmGLAJJiflAEKJoBwASYCE cs5IQgGUcwbliLImp57u/ld1z4xGESHsw7bqy/uMeqqrq169Hvrbr8Ir4yWf fH/KMaeyXVLkj6bdjwBEoAgICAhzxisk0KIwJy3FBTp6+joAuroGctDX19PR 0VJTVVZQUNTSNd53xql5CPpxEg6leE3QW/KZgeoiNU2QX/G9f6/da8fEaF/1 5RWUQEagGxbraukaGAEX1Gj5BAIlKPasfXDvk8U6iooq2rp6BkbGposXLwFY vNjEyEhfV0dVRUFDZ5m5ayRHTP7Y3cwvhZckUNhpLZ3H9fzMLzeF+QUvlqhG r9CZe60ICAgI0+MVEmhxuIueqqKBkZGBgaG+jtYihTEsWqSoqqahb2hkamJs aKCntOC9T74+3sUSyx7C9J+apICv1n60dPGSr/afqW0dohjvJxgDnZ5ACWpo s6cy4SNtZVUtPWNjYyMjQ23ggSooQA9UQUFZVU1Hz8DE1NTIQFfhvUU7frg2 IiaIn82A6EsQ6GxbMDN9CQV8OCmLEIsw7Pm5Z6xejInQVGwEBIT/S7xaAtVV WQT8NV1tDdNPt3n4Avj4Up/uHq6nju5ebKCtoaljYGhoYmKssEDZ/Fam7Nox iPgsJmvKWqaazQu4SzJFViwdtZxwjSwDNYUW1jU9gVJ0LRo4vfl9RXVtwJ36 +rrqqhqrNu6yd3OH7fDwtDjy7UoTPWUlVUMjI2UVtTNeMUJibMB0grb4uLrF 03l2s5ynPJtscyVQeu0Qr768JDcnt6iukUu9FcifHJebOjXS2947AjvZ5U6L U6MCSzr4+LOK4LhMQqr2FBXivJaWNumrkzQDdSD7+jgt8nH9AF0+zh8pepT7 +PHjR/mP2waZL9g6BAQEhFnh1ROosamOmuL7++0m5SK66h/vWb9MXVPXyNhY R135o90WTPHcO2mf6/dNzWs4zu8pXD8VgRI4dJqelYSZaCvrGRgZGuira+hc cI8ZFY6rZ6SzzsP+iKaS4taTXjyqmgn6Q96cTjXiOR2kL+lxzYlAgUIEKWY/ iI94VNU0PDRUW101xIWmwHjs4REJW9FNEnBZo0yq7x0TPEoOS31cz+YJ6VcX HpvF4wv5XJYAIzithXdjMrgckJlDV4GJRLRJMEwEKJLTX3f3bkTPCINOxbhM WUUAAh57hMHKSQrLremTpPRVe/uH9AwO9XbU3Lt3v5slwkRCXKqZUCSCJIu6 dhEQEF4OPwsCVVdavtucIQKOl1Ak9b8wDD7wyqNcdJSBl2qip61u/PHBNmqa kGwykYDHZbPZHDb8EIrGKYZjIg5HMsUXG/OPeBXZaT7e3t5eAel5dbRHI8lP F4qLGovTgwK9vbx9gwLj6luo+Uus2q2L9TUnEagYgzXmBNlpKy0yMDHV1VIx 3XBskCoNtEC6ClSiT3VhfsugaJwDRfu70m98zlBx6aPQwCA/Hx8/X9+wuIT6 3iFptrFLRAI+NXWZCz65QmxaExMYl0tlg/l401HFXAiU6tbur8sNjsuWT+5v r0pOSMnNykjMKgTt5HZUh0RGVddXxwUH51Z3Y6y+yDs+d8OSGzsHud2N98Pj 84pK23uH8lLCK3owvLfSIyCwtKomPT7kQWEjuA1pkcG1/UJw8DAx9smQsLM2 08PjZk5h+aiQ7O+oe5CWnZuV/bCoDtQ70FoVG5lUWFZ895ZPfqPEYoL+2uCo DOoQTwgJ6WDyHyeFl7aMgu91j1Jyq3tH2wtuBEZh0uYgICAgzAE/FwL9xoJD dQsSY3lEgIQGKqKX6inpGpjoa6uZfHakBzxTKQ6CTz2Ca//daj2jJR99+L6O wVK3mDJKPdgNCg6ePry9wkT7/fc/0F+6KrII8mBXdc7h7Z9qq6ktUlR8+59/ /2CPDR8WIiaktTYWRe7fsk5fS01JSWHhQgUlJTU9A5OjFj7tPdUHPzJV1dab RKBQi1QvM80FyoamlB+911oIdRDhE1hSNuNoKms0V+Q4Wp/8ZPkSHT0dFUVF ahB4oYqaur6J6b5TTk97+JRdCHrucXNWwPtGestXrFxmavDRttO9lEHkOWBs hrOezgcrPzLS0ztkHyieZoHPHAiUbkt5RmxyXj1QCnZzgySMEXUn6MkIPJUe daegmU08K/MLjgXfsd6ym8GJIL06N6G4YRgcsFoKfe7GCqnCUiNul/TgRG+Z f2giVELUE+h3Z4jPTw8LqnwGCfRBdFjNIHB4u6OjHlA/kNHoe3eruhhc9kDw zcCm/oGkkDuNQ9AAGTF3c+sGaCWFQ41+3jfz8vMfRN/zCoYXdldkRKSXAzMk hd9vY5OCkY6CygZ82nuCgICA8Hz8XAh0kgdKO295d+20VJQMTRZrqSxad9gR do4SYimBcsx2LVFQ0TQy0F2gqOUUVkTKEWhDure+2nt6+vrvKmn5ZrUOt+Su NVJRVNU0NjVdtnyptprOeY94WAb0EnH4JL9lpau+SFVdk5q5ZGpIzQQGUFVS Wblh/eqVi3V09Qz1xhEoTnmgRaGOuiqKBkbGhvo6GnorQgvo5SokpJbxS13G sSo1ObTvSZHNib1GeppKyqp6+gYGekBf8AcUZmJibKyvp6ussGDZ54eahzF6 VinkelbrN6v1FdW1DfW1FZT1b2Y8pVs9dkPhIe53cefChSpGhroKKrq+aY0T 8sgwBwKlffmG3MS47CqSmrpD3YqWoDuxPJwEzn7j4+TER0+xgeo70emgkYK+ mqD7ySBLeVbc48puYBRmS+G9uCzYM0sIH0QHlfbgeE/p3dgsDK6T5ScEBz4d YGZFB1f1CQiSeJgQXTuIE7zWiIgUrlhMcNpue9/KKyjIy8t5XFjR3//k3r14 Dg5vR35qRG5tP62kYKA+8G5U9+DQ8MBAemxoVkUniTOiwhM6O5/EJmRN77cj ICAgvAB+FgQ65RgogdU/jv5sqY6mjuFiE4OFi7S8kmqoa3GJz0VwLPa8r6yh u9jEUFFVzyW8mJQj0MYHvsZaiwyNjZVVDC973T2352NFVS1DPW1FhUVKixb+ 9d8q1+KqQTa647ck6pqm0kIdfSNjYyN9XS0VVTXTpcuWL18OSEpVQ1NXR1dH R08fcOp4AgXuFzhgNWd+qK+ibWBkaGigq62pvfQTpzsJ3Qy+rBlTzgbCKX+w tyzCQPkdXUNTA10tRSUlXSOTZdQ6WFCvirqmoaGhsamJioLCTrMAKkYEYGzY 7iTPM6rKKiamizWUlXaZ++Py3iU1rQlnPt21ylBD19BQV8Nw1e6nLOl8p0mY cxcup7f65q3QYcqNFHFYAu5QzN07jSPwVHpEYF7DiLi3LCAiBca7eFZ1m/JA i1PDH5bBrgBmc35gVLqIujQtMqCkGxKobwh8nyEZTd7ed9kiUWrorbI+OIga eedW/RD42xYUGANrAzx4924HV6oMNnTH27eJAQ9TowJzaiUeqKCv+k54Gn3c kJtAc33N45TAoODihi541wbaiqqQB4qAgPBSAA/PioqKkpKS0mlQVFTU0tz8 0xGoPjUL10R+Fq6Pr4frlSO7txpoq2nq6AE36t233ttxxouNyyYCSQn0m+VK 6jqmxgaLVHQnE6iR5kI9QyN9PaOlS5YYGOioKKut+Gyrk7unn6+Po71dfvMI 1AQ8gwdqt7yvrQ4o0MhIT1tTx3TV9btxPUOjLDa7vjLX5vBX2uqqugaGcHmq 3sRlLJQ6oltmOxUWKAOyo9fjqCqrmn68+oSjW0FFp8xYk8P8USXgXmc2v/Xv d1dt3Obkd7egsW0Ejlmy6ytyT+5er66uZWhoZKinpWG8tqRPRLUOrnRlNWWt MlTT0TfW11E3WLWriU3K+JE2bGOan4E6cNtN1ZUmMex4zG0WLv0+0FZbmBSf mpubF5ec1DXMG+muTU5IzkrPSMgsBFpy20tC4rMggfbXhkSmggoGmspCgu5X NXdxOivux2fRBJoVF1zRi+F9DUEhocVlRanREYX1kGRbyjJDIpLLa4tjo6Kb BoUkwc0EDmR63hAX62+rirkfkZOdXVgKx0A7qvOCwxJKKyvCw+4UP5GMgYqG nwbcDMx5/PhRVkZcQsYgNUtYNPr0hqt3Fxv+dnrrH7oFRaMxUAQEhJcBeHhW V1eXl5dXTAPAoe1tbT8hgQKOA9SkrTluHaiikpq6pr4B9Or0DT+w8oniAvYU Y2OxiMjZEaiBsYGBvoGerpqW7knn0F7mOOVpEkz0OKWkpAKcT0NI2EvvZD+d YKFQFzMdTQ2gi+EkAqVnAYmHW7/fvmrBQiUDQyMjaimonraWsuIiTV2TrftO hsdnM+gJTuNXlNAvA32NuZ6+d/o4Ex/j4v6KTe/rauromxgZKKroOIVJWkdF AxQ6Hd2gqKppamKorKLrkVBNShxzkg50f+fSAUVFNXBWSc1wch+vPOa8DpRu h5jPHh4e5kkjFIrHZuHCEVvp0k5cJMLoHHwuk8nhwRRM0o2KYSJwNewWJkgu m8HkCmVVcJkjbB70vKULjsSjoyNCqiFiAQfUyxeI6JwCziiTzRvfTELA5YyM jAB9xFJ9Bc9qoxMfY5JJWT9qxA0EBIR5CfAwGQUPpukxODgI+M73duBPSKAU DMaFIjIAKYaA1PR1F69cf8U9pLYTOhfSybQvQKDAh1NXUv7K7CZ9oWwRqITN sP4jn5mqaOqZmBipKql8a3eXpIL00jtMw+lA4Ptw1QZTnWkjEVG6iIebXc7s 09FUUVFV0zMwMKZgoK+nrqqirKL+4bqt/pG5Aom9p7aJSCiYMJE40GrXQiV1 U1NjVQWVo47Q+AQcG4Z5nqT76akpGRqbaqosWn/YiRqGFEtaJOo7tnGJqraB gbaq6YYjk2cZyeNlIhGN6xQmyAnLM6fIP+uARdOXMUU5s9m1B9zNnubalKj0 zgHOxPcYBAQEhLkCPExYLBZzegAOBdl+YgLVMzA0XjYuHO7SJSbGGsqKyioa +vq6igsWaC5e7Z0IXS3Kc5gtgeobmgDS01uxtWZADGuVi+ZO92oyGlM/0tfQ AVxtqKuoZRqS3wW3gJE6MhQ5EoLeohlC+UmzQVTmxJ/6/itjHQ1FJRjTzwj6 o8ZGhobAgV2kpPL16WtDnImuD3glEIlEY1+FvOGR4crCvPjQoGN7PtdU1zIy NlFXWrjH0o/qMsboWEs4p33fWiNVLX0jfS3tJRuKn8GFjVQHL/msOHyxloqB sYmqosoR53BYpnjaWTMvHwv3RSPsvUxmYqaTzymFz2Fx+CjkLwICwo8J8AAE LMmYHsPDwyDTT0eg1Cxc5WW7LgzAVZsseukmmzPa196cHn7v1Pc7tDVVjExM DbTVFqkviyzuoC7HZ0ugRnB55pJNpwYm7XUmmayb5m0Ih0pNDHQ1dRcDJqIm qhDjvMuZY+FK7Ti2VKWzPN/F+sSqJabKSspqmtqARuF0IBNDxXcW7ba4JRqX V1ITLmIU5ERcdzLbs/FT8PYAKlJRXKisDsP8GhoZAwL9xsKXJlCqaqhVosdp 4NyamhgrKmu5RJZCPan9ayJcjqkoqpgYG6hoLw4vfgYXkky/Ccx8CyaPfE8E BIQfET8PAlVavseSP3VeTqDNHjU1dWPTxdrqih/uNGeIqa5McvYEqrp4/bFe ATmJQKn5txGueipUoAYddaPluxvY4xajvgCB0mXiYlkVjMHuiNt+O9d+qKys DBxsfeBjG+kqaBlHFPdIL6fz8tJD3L/4bKWWloqiopKistKC995T1dBduuyD paYmenp6kwmU8p2lU4kMTLRVlT771g7OsALl4Qyzrz9S0tAz0FZdvOHIM6pv dwbOmG8EioCAgPAj4udCoN9YsKmFIbhcCFexSAi7awfKN5jqaMIJtTraxh8/ 6oBcCGelzJ5AN/zwTBKBYaIOgEB1xxEotYryRQl0crxd2VlW732n43pa6vpw gpGRmqLiwUt3YB4xXAdJioaun9yptGihpraeno62hpb+pu2H3N19Y1MKnvUx gx2OqCiqGpuaTiBQWPvYVCItE0NdNf2VqfUwRsFoY/oqQ3U9Q2NVReWjLpGk 9F1jOrzsbiyTgu1OF3sXx6fdbfz5tVAXz6jG3AqWK+DH80xlZU0XnHHKVHn7 gF8mJv7Rto6dVdzkHxUT7jXy+hF+xfj5EOiESESUctQKDO7T/e+bwGUbBoAp lsRWwNlEcHLPyxIoHW/Bx0jahau3ZEMptVpkYhfuc8ZAxwcDlDOsJBwhKbT7 dq2SmpaxsYm2muInB+2p0EKw9iSvswrvLjA2XQLoe/En28KzK+SD80W6HldZ NDWB4nJTiYxMjJWUNO0CHgJFCkMcdZQVDQ311fU/Sm9kktN4yjL8eB4omtRK 4TlGeL6JfjojzvwS8tMC/TYQfqX4ORMoAQc7cZJZ++VSfQ0dA2N9XXX9pXGV Pw6B0pOIhivjluqr6+obgcKV9ZZGl/UTcBKRHIEShLCv5PMlelMTKF2kUECv voCzlMY/K0QisUhMxtw4raSgYmRioqOhvGy3OZtes8l4snOlgbquobGBtobB 6uT6IVJKu0IhnG0b6vzDdARKG4qeSqSmY6SjqvjZEVeQ6n/xKyVlLT0tlY92 mTOnDZ8whpcjULhUhJqBJtsNhxjsae0ZYkgMQzk+9GO7sTg3v6KNGL+T29Se kVwS/czvayjOzK+kT9HpmEgoFI2Zgs8XEFNcPa6eaZLgh1gw2traKiti6syz KJb+MjzUO8AVE2IRn/5RwPuEC6UvRmIRj09FtZeVScjZh8pNFMbdc/a+282l /z8QMzZNTomplBSLhPAOsZhcATbhqkkNnFjs5IqmrF2uhIn3Gg4piNltvYOT L0RA+HXg50Kg40P5UQtNJC/MRaHOOuqqBoBngJO4dGvNKLVshHxZAqWfXPhI 9dalehq6+ibGRkpKqqfcEkj4fBZJ+pCpOHVY16NVRlraesCxG0+gkicG78bJ HZv2WTwd4EoLluxKJpZO53U6uh72tZqYaKos2nr6Ov0sG6qMW6Knrmdgoquh vHz7RRZcFIlRy2twej1L7PUTygrTEaj8VCJVQ31t7aVbqjpbj68zUdPVV1FW N/d/ILPzDJhrIAVqQ/POwh0bPt24eevmzzfs/d6sphuYRRxgfdQ7Et4IkVAy tZh+G/G0/s41ip5ELQ3bj8umOo8re6wO6bM5xOX8pdsPqebQy2CJgKsXbz94 St8j1tMHRy2ucgjqdUt28RjrTLHJ2lhnKT0Tuzbp6HcX+0Rysf3HZZ5Kz8nF Uvpio0/trRx6hERffvBZJz/KBHig1VFrHyosEq/T5uzZsmeCsTJxnO6k8LL5 3jUSviSUxft9tWXXNc+gFmp7+MnWkDeW1Osn5JSUZKBsQUS4nVvx0Zovv9zy xWdfuIdmw5iVODbhTWHMGhJCxydkkHvrmUC7E0004V5T4S7Z3k62eU9H5StC QPjV4GdBoFNvZ0YK+YycMN9VujpauvrGxoB9FNZ+70QxofhFZuFOQ6B0HHlS 6HwEspuxkZGBjobO8s8LOjnjlOB0WezfpK6hZWhoOCESEfXcwOJ9zqoDnlNV Xbp6k3twYg+DN74OZlKQHSiZWhxqpKyoauFP7xJC9haGmeqp6AHHWlvNaPXB rvEdbO0VWd+sX6qhrUsvY5lMoPJTiXT19IBiFja2nyw10NHRVjdc9eDJ8/tv yTkTKJW/+cHNQxedh8GvZ+iZx+n9Z65Fgco4w8MiTPpkFnCYPGrxq5jhfOFU 2aCYy2HyJSElJBlYMFQCKRTC24NRy3lwAY/FkdhwhAFb4WlzJKxkQGJzeDHb 6eyRnE5JyIWKSNej1l6E5NmOj44yZDaiCwQlstiSGWqEJIAxyWUxRVLbiIEj DeMwSL4zqEpJsRDDZ9JTvlhS+j7zIMDhemgeOGjNunnU+gagJOFA3cGN6+wC H4CyWjLvnLDzp9UT8ThMLrWbAbx4yP74kewuISbk2J/c7feghaScxwnWkCiG Y9TiZFlDWPSbCsHncPmyMBQ0wfMcTnwTkt8KXNDm/IQvN+4sGxBNthIshMkQ iuWuk89AjDeLrHaKh9kMJr1LnHjKe01lbc++e/rybYyULeJGQPj14JUT6BSh /CA8L9ubb1j9kYaaqrYejFFrqKelqLE0urhT0rNLvjyBSkcSM27pqiiAOgzh gk21pRu23c0uHB5ls9kjlblxh7d/oqYKwxDpjw/lh1FOYn2yr/rb/9Y1Xmxq bKSjpaGsrGr60cdHLC2otvi6e17e/eU6dVVlHT24GgUQpdb7m6v7RVQEQZLX nvuxMXRsjQz1NTT19tr61XcPg2fdcHfd3Rs2H+jrqGtqT7mMRQb5qERGhoa6 urogt7aa0sqdZkz8+f235FwJlJ7hEuth6xQk2dGsNs7d3D2eFDafOGFPrxjK ifTa9dWWTz/ffi+3iWDVfH/gpNdtj51frNr+vU03Cza/MOHW119+vnn393bn 7XyjckFK0p3rnj63ju7+yjvlCcFsvXL2wNr1nx+9cPHoidO1gxS3UrddPFh1 4gfL5mE27DtmMf3sTl0Jgpf3PSmzOn7s842bDlm40VUkBl1z8QhwOn/www/X 3UqBm/Vwe4psbBwD/dy3r121/bBNFws2PNLHwSuyBBwwO6vOH//us/Wbz9ta XrC91seDhRQlyuuZA1ISAl1lxd5OLSfp2dfgj6Dr/Pc/VA9Cs7dmBxyz9QRp qfc8HB1c/MLhXvBelkeDH4MfMJkZ6rlj6/Z1mzc6h2aBr6Jn+QcPWgM2Tfa3 XGay+NPNuwraRoEB3bzkrHHmwJr1G0+esbMxd2rhk/hAqbWtY5CH+9bVKw9d vlWQF3/+my0rN+3Mah4ipf9JxcPVR7890yn5yfAsDn5bOkyONFdYSK3UA8cS RKnBrlvWr93+zemCuh7KjOVjZmRiwOS8wSbn84fkaxf3lzg6XvN1stx2wIpN krnRXl9Pea+/s4FVYAPnD+551C2Q/mIREH49eLUEqqeqaABcPyqErHwoPwWF RUpKKto6usYmgJoMNdVVAUdcj4CPa2qG3yyDySsYGC/W01ZbsvH4lAQq6a8S s64e27RQQdXEBHCokQ6oTEuHiiUP3DkNDU1tLU1NPT19QK+G+rpaxu9LPFAq 8A9/oPPqmV3Kigqa2vomQFVjIz0dbVUlZYWFEAoKiuqaMJ6tsQlgT41Fyrre CVVUE+g4uAyLnR8qqmmbGBvBmEVqaoamS2Gti4001FXVNTRA82H8QGNjDWWF PVMRqPxUIn1DI7iNi6GBkoqG3b1c2dmZMbcNtancmPPF/ddiyzkcdvPjB6eO HC/q5g0WBB+yuAFuTUGY4+fbj5Y29/U01RVXd7GfpH762efBGRWMgbYfdq9P a8U7cgLWbtqd19TD6Kncs2nN3fw+YFG77zZ8c8GtuXdULBiyOrDlrFckg8XK uGm+8chleu8zusd1pDrx048/+GLz1i1btmzdvGnZR6uTGrkkq9Pm7PmwlNLe 3h5367M30+EGNLaHPtt20qWlZ+RxsN2ecy4gpSs3YOXH64IzyhiD7cf3bIyu 5gIGAdwUXTNKcjtP7Nx05V4GeIcJu35613l3kL8+xeezzfJ6PgN6yhe77+I1 yoWECg5Vxew7eYUayier4jzMboSJ2J0u1/2KM2KdbycLhhuOnbBgEGRplOvG r45Vd40OtRXu2LylbJRklEacdvQHV7FbMr89aNY8zBLj/MuHN46zhmckg81K cj/7xWE7UEN3XuCHH68NySofHajbvWrJHnP37sFRL5sfLt2GFC+mfOTBkvAv j1g8Y7DZQ73RzmaW3gkkv9f+vMRKblang3I6yYHH6z/b85QlfFafX1DRLhrt sD0nM+OZW+lPget5ce+mSbUHfbxmY0R2BXAyC8JdNk11r0cH2oCFoyrhTga+ l457xNWQ0lcvBIRfDV4hgRaFOWkpLtDR09cBAN7T+Fh+esDdU1dXWqSgpKG9 ZtPeqFw4QjQhlN/ztjN7V0ffSEtdyXjd0WkIFCYBLsOGW7776pP3Fijq6OkB b9fUxBi6m3p62tpaCxepfn/R8fr5b1UWKevraanpL0lvkE0ioovjpt11WrNC b5HiIk0tbX19A0D6SygsXmxKOYbaKoqK2ktWeyXAJtBuFP3ZURS5TENBmQpk b2IKMtOVaqsoKy1fvy8mNXr7MkM1bT3VRe/tMvOeTKByU4kMVbT0qP1gNLUW byjtp+MtPP9GzI1AqaEyhvU3a1at37R29Zqj51zKnwJmIZO9LzneeghKPbtr x4MW2PFIGygn0NHsKoyJBLxHu+Onap71XTq8M7yM3jmF52F5rhAcAu9178mn 1DBybZLn7pNOdGWdecEXHP0pk4kl710RHhYuQSwKzL6KI1/ub+CTjUkeK1d8 vHvP7h1fbvl045bI4mck1nFs9/d11EYt5dHeVtfgrzfN19bKndr2BR+y/+FY 8SBOCptO7DnRCyqNuXbyUgBdaVm0r0sg8A155/duiygblNOTIEUtP3xzWFqs j41bGCntbq2Ov3bY6jptyvJot0v+EXkJgfeymgeKo67cjs2Lu+18J48kOWbf 7nnQLBku9zDfk9YmLAq+etknCXx9muZ/+ooftBur4eRU1mh9GGLvAWtM8wEN iYNJo7XHvj1F54zyuRSYXE/CqWuQQGuTfT9+f9nmLRvXbfwmIDILqFgZ5/aR zEqfb4ko7MZFQy6n96/7+kDaE/AOQ5ZGX//4w0/oDKs3bE6sGel8eHPnccdJ tV+65JMKk7CBc3t3Tn2vgYWP/1DQBRxrIs7N1t4L5icwtOIY4VeFV0igcNNn A53lH6xYPgnLlr2/6uP1Ow4esnW8Fp5dQIdaJ8ZCus5yQ22t5Ss+WmpqsGrb ub5pCFRWLM7u8rQ7tdLESF1NdSHlA6tpaK78aN2NwBSga2mEq4mO7gcfLDdZ sfoh9bQam4VLKcXur7/pe2X9J58AX1pdWRmUADzQRYqKmto6S5asOmXtVtku H8uXbgMsoTo3cvvaD4HXq0RVCjxPk8UrT13xax8CreBb7FpluPgDU33t7+xv T0WgkvDpSV7n1JSUAQdrqShuOOJMh8adzY2Y83Zmgu5Hu74+0cli5d62OmwX RFvC3/GUf0YXyas8tNdyWC6/n8Np3+R68M7A6cw7beY5Mtp4+luLPsmk1bKD By4OgXeYlrT9px2YcPyUiLxu63m/mL467Jr5tfuFJM2f1F2/c9XsVuoT+qyg NXPfiSugpJCr5l5RZTwOh8sViAR8YFpec/q3ZxyZMEo9Eepu7Z/YAPL7Opzy T20EmnC7Hp0868iFvJ265/hlUGzsNXPXe/AdjBQOnN6/9XYuoOC6Y3st+qfQ 84q0WJuAZFgsTVg1CdePWksJNP6283U316vuXULg9oY6urm5OLpWDuAEp+LY PivJtFRu8/d7v+vi4qFuF0LyukFCso/DFb8UYEp2Y8r+M1cmWyMcKBkClfRx OOmX0gAa0lMQcsjimgCqw3I8vT/1CXy7E1LLpO86nrG9lc1kdn2/bXt2Bxwx D3Qx95ZaiZrqTbdNmBbosm3bgQ42Fulm5RkpySDgweHN6BvT1g5+zPze/MP7 raa818DCp845j1LmSLhuZXlNsv3uC/zSEBB+9nglBEoDzrFn06H7pgCPL5Sv aapVbISAx5WE/mNzJkRixzERjAgoLes5y/Ok1MzqbUuLi/H29fP19opPyxll 0fuJEGJMyJWUxsUmDi0Ssk1AwKO7raE4PizU18/f18cnICgwI69kZJg/XRMk jI4xitPjA719fX29wxPSuoYkq0IAYQgFVAPZbJ5ARE4Fet/xuBunVBVVTE2N FZW0nOiu7Nk9qeZAoJL3k1SvvRed4Xf20wPbtj7sAOoNWx0+kN0lJrG2/Ru/ uFvSzhrszswuEYh5V07uS6UWpdYleZ9yDMTFo4c2boio7hztbnI6/uXOc9fB qaqoG+ecg2g9svysvznrPMxglKTc+XzN6oQaOIdTMi2bYF86sTf1CZuegluf 5H3czhsk59+9/NV31n0sXm9LZXEjnIRTEeV+zokqUMy4fGJvcpMAeGtWhw9l tcLt3+qTfU/Ye4GDyqgbZ64EQgXiPdd99qWLq5vtxSOfr99dCXxMUduBjZsi aybqeVZW7EmoCSmNQjxQErbzxGVq9QnZkH5v2xcb3OILwHFfWcq+nVvNPajd 0/idP2zbGlTYzh7tvHxsx4nrwItkXti3J7sbvOGJXc0PBj+GA5FlkUD5O5Ot sXHNJ3G1oMZRy+8PZrZArsy67WB+NZSEewiUHTl0roNHSF6eCK7V0W1hZfC1 Lc3H7KDlTcpKDjIrlTR3kjgrwsOtqG1YzGj9ftvOciZWFemy/ZAVnaGosRVc kuljOWXt2e3UaySn+cA09xpY+NRlX3rK2M3LJ5zDSsjpdwVCQPiF4hUS6GwA A8D/30x/H79EUV6BWV49g2XghN1p1pJPubydWusxU6MlwWUAmUFfq3P/WgNV bQMjXU2dFVuqB0Szmj9EYU4EChXODLx6LeABrWSMx8XLQY9wfuOJY/b9FM/X ZIZu3fjFhq2b3UOyOEM1Z07a9VIzSR8EXXcPgeOzmUHOa1et+s7G6YaDjVcY nGAT7mbnEwX7EIDmnN76c99sWbNtp6uXn42FzVMmvSKS7rZvsjhq3sSRNC/W 3db5NrycYHdfN/9u7br1X+//IbES7uAW4WHvHUU9tBmNlqesO0UkPlxy4vhl qi8CaHLNjRopltULUBh318HRq6gw+fhxOyr2I55112UqPaXFnrZt5xGkdDEm wes4c+hY5QCc3tv0MGD1+i9rB6FheS0569Z+ToeKAqfqsu9/uXHdhu1bLb3C 2ZDt+k9s2+aRVAte3+yP/1BMhV8M97g0pTWsza2agSVHSkFDqIz4bRez22nQ C+4tijhx2YeiTkxqqItPmHCoXtRXfvjgD0+YGMnruWYmsVJSFbASXpkeuXfn 1jUbt7qF5sCWcMbMmFzVCNRld9dOWTvVMnhHarOmvdce96GFSWzQ6tih7A5q vzkUUQHh14VXS6DEzHiR62cufPb6gAZKVqKKx7HYbIqiF5PLSpDtm/bcWvGx SseHYphFrcm+F9RUlI1NTVUVlfbbhRDktNtnT8acAymIBAIRJulYB5zK5/NB pTzh2G6eGJ/LpNdf4CKu1H0WCoWyIBV8FlNAF0U5y0IhX0Qv8qRPizEGh0sf jA+ugfH5QlmCUMAXYmNvICwGQxYwQCgUiOg+XxzjU3EMCLFIpiE4K4kSJaDq JYRDbAZ9qibSed9FT4of8Gn0HFesRF9Ky0h3M8/4Kso+fNlZWC9fIG89MZ/N kCxOgVeJhHRmnM8T4BL1prcG9SltCAH0pw0kxoB15bopKEPJ3Q6eQLoAVN5K 8EIhV34b1skZpq9dVviU91pAW2yoKv4HM/cZd9VDQPil4mfugSJMAL3WfWS4 m8FijQ71BrnZ6etq6OobG+lrqhusedTOIamAwrMs7ScKJi8fKGDqDGMRbKY4 K+tRf4GVg2OhBibGVJwVMKb3pdNnzB2dr5iv3/pNTuMg3Q0ws57jFYB5+T2V FjaXu9myMAvjckjUkzPObBSdizUmFSE7IMZbaeKdmmTG59Y+w72m3ifZvg42 yZU9s24uAsIvCYhAf1Gg+zGZtvs+1TVe/P6yxWoqanoGhotNDBcoqFjeoqIP zdr9JH9sAp3sOk9OH5dhxrKmOz915KIZy5x5r2/6IjHzWYifl7OnT3XXiCxx Zj0nhb+Dn831pU19VLTj8d0XE/Wc8ux0VU2yhvzVUxxNKmxiX8pzCn9uhsna TbrX1BHG7ysorcen0A4B4dcARKC/JFAv+aLeog2melp6BkZwm1FjAx3tBQsW fW3lzSHHAuXNEmg7sykx+z7/H+vCXzmQWRB+pUAE+gsCPQO2LTtAU+kfCxcp LVJQUFdVN/pwpblXBJwM+uI7oiACHQM9/E2NfL9UMS/4DvNrB/Eqd4FBQPiJ gQj0FwTaweEMdyXEBfj4gn8+cfFpPQy25NyLP7cRgSIgICDMGYhAfwWY8/wM RKAICAgIcwYi0F8eYGcjNvWylxcEIlAEBASEOQMR6HwGIlAEBASEOQMR6HwG IND8/Hx0TxEQEBDmAESg8xlcLre2tvaFgjUhICAgINBABDqfIabwqrVAQEBA +EUCESgCAgICAsIcgAgUAQEBAQFhDkAEioCAgICAMAcgAv3ZAp9+KzS4zcWL TPuBu6yhiGo/Hl7U/ggICL9KzFsCpShlIqfg0+98jYCAgICAII95S6A/ewjK 8rLrO4fJCXtRUZ+MwfYn7d2z2SWKvrS/pfphfpV4FvkRZsaL2h8BAeFXjHlI oDSndDWWZRZUS5+B9GMQry7ILK3vHMv0agCVwkebLM6cSq18Bo/x8QRK8O45 nz56wb1fRD5XUfrS1AAHa89Iai9R1JH7UnhR+yMgIPyKMQ8JlOaUOD8bS68o 6nkoHWoUD7peOB2SVUelUWwD/ojFOEVghLR3d3I3r3wKQQ03iuFV0z9ZZXkI acHyJ6mqB+seWlrZPRmCZWNypVEKi5tLH+VXtOGS7LT+UNexksZVwQ1wtLiT Wi4rfGKeCapOUk+WOE7PSSnPaR0hKYqQmnUG7hmz/FiDxlUHvkr0li92/CXk 2DjyOONMd4+oAsQThp4nJE62/3hLjn8/eZEmIyAg/OIwDwmUegZyA50s76SU kZINHGGaeLDe3ta2rJNHQpKdbWyeCZwy/tyU9PKccumnen12uOWVm9xpq5pR pfFVEOw2J2vrh3UDpJwzO8P0pFnWMsfLn1/+xBxTWvE5RcxU+tT3aEq9ZmMM YuJLxKSLEGsiIPxKMe8IlOrDFA81WF28mFLaCR5t0G3AQaOI3sp0S0vnDi7t ZsK8g621qXExKem5PJzsaayofNILspdmZ9a09FNFSTp+q/KzKpv66G987nD+ g7TY2PiS+g4qz/jK6UxCZnnug9jomOqnfaSYXZBXxMDG8tLP47S7V6+HZGB8 bmlmanx8Us2TsY5l/nBnZsaDXiZGF1lb+uhJL5sQjWQkRmeV1OPyVURF1zT1 C3qrrCyt6wYwWeF0RSIeIzcjHahaVtMiJqZXL7eQTZKcvuaHD/NZYkk2kI/d 35KRmTMqmEXrRDCdN9ieW1ABDoZ6GlKT41IfFg6zhXJmlJRB/2mtr0yJjU3M fDTEpptJDnfUZ2bls3FJHt5ga0pqyhAftLsjt7ACJA88qU6Ji83IKRwVygqa bJyp7pE0d9uTmvjY2NQHuf2jPJleExLh5SNj9pc4mAJGWTawZNyjynpszEIk b2g2TUZAQPilYr4RKN2HOdSQY25h3Tg87jlWknDL9kYofADC55swN+qmhY1D RGxi9P3AmzeDXR3tInKbwLnbl895RRfAXGIM5GN1lpqfNSvtYIKU9oqHV+wd bkfEJ8aGXbI0i3nUQMq5PPQBo7v6+iWr6z5BCfGxt3z8A2/62rj6jUprJSUO MufOVWtX/4CoiKikhMTwYM+Tp86kFLfQ5bQXxZ0579DDp7JjDD8X24iUvJS4 8NDIqPyqJlhFV5Wsitt+/jfd3R2u3R7GpGXT9NfX4OFo5xkQnpgQ7+V4KTgh ny6c0TVJPWcfFklyWx6dPn2hhmJhDPIQnuDv4HgzQYjDfsqZWzdMkUbz42hL B4/ch5nh9+MSk2IczI87ByTJtRtqB48EI5E33a64+ycmJt71dLK75t9LsSa7 u/ziydOPmkZgRSLGbSdLpwBYe1tB7DnzS9ExMRGhsUkJsY62Zy97howI6D4F 5jjjVELjdFROcY9IAitIDLS5dC06ISE22M/B0a25H7wZ4PkJ4xOfQQ5tK4yF 9hdIhs77Gkpdrtj7hQBLxjpfsXALSgT6EvCVjGzJf16TERAQfsmYbwRK92FW Zdw3s3LvYvMAuFwuB/7lxfo7eoQ9pLOVp949a+XYNCBxOhpyIk6dMy/v4oPj rHBPl8AkgqSJA0+86eR+PxukDz99ZHHWMrehl76kqzje0sFnFFprjLaEo51X bc7eTCiQaMMf9LY/ey3kATyWTO+h+bP9mo35ncR8pkBi7eQARyv3MIqIyMcx vvZekXRu0WCjo/UF94DoPgZ9kq7inHwVPvbnXIPTZFXQznVG8A2XoBSJTXiM /sFRchr1roZQ13LaXO1sHz0dpVVkdZTaWNg/GcEkTZuxdfRYYV7szbMWl3Jr mmjyaHoUceHC1R6RtM0SBubH+Ts5eEWzJH4n95aLTWReE/0l3t/B9V4GOMgO veHgHk73b+fG+F20vlrd1CO5oLvs4pkzD+thf7Wwv2GCcYaa8ifeo0te4NWH GKi1trCq6pPUOtTXy8dwbKBuXGJ/H5cvltmfvjHs3mq7s6fj859KjD9Ua3X6 3INqSfmPntNkBASEXzbmHYFSHbSpwTdOX7BydXVxlsLVxen8GbOYvHpwmtdX Z3vuXFbDCDjGhELAub1V6bb2bn1Ud2VxYoCdWyj1FIQ8YmVmWz8Ens/8O1dt QrIaxmpiPnWwv9bMotmTpGfUZN+/YSNxcsUYtKTw3lW70KxaUjZtiZ5BVP/Q ysqJftKKhNDhq80MNbf1HYGFYWHuVp4ROXQlwJW+cMG8pIMNc4pATpyq4v64 KlytbicUywqnuzGzwz2sXAOGeeO6T6dU735mLWU41i1Xu4TidiqnOP6W0624 IlI6AjhT6+jLSVGYu413zGN4EhPhON6YG2Vp4zkoXVpD69Zb/cDS7hpDTqec cF//GIl33FWeYu/omfcw0dL+ajeHdgCxcHcbv9hCSilYLCnuu2FpFf2oESQM 1GWPGQcTEwTv3jXbSffItZVPEsON1hfOJ5e0yf9UsMEG24sTE0E1wHKeEdmU 3txID3vHoCTKPhgGmyC462wZkFg8myYjICD80jHfCJR6cPGCnCxuxeVDt5PD AR4o+MvuqrS1tipsgQ/bkqQAs8v+bIKe6gmveRTtY+MeTrsibcUJVnYe/dQI WPwtZ+/IPHDE7am0NT/vdy86IR4iITEx+o7XBVsPmnPpTk6S1+VodjGhuA3S BWVG8ehTOwuL7PpBUuoa0591D8OsHW+zoU8GFQB/SpMDza7chj4XPuBua0UV AlGXFWrtdJs3fRXYYL21mVlG1dhyGNpb5A93+rtaXrB2fVjUKBlM5U6n3gB9 Pv6Wq39sPriY2Vpkb+fczqJ6b6VTU6dtHTV5CXiDbrbWSaUdoHKMGnBNv+fq FJBIXS2jdTzzvttFu6tJyYkJwI4JwIoJjtYWwQ+qJRmEAz6XL5w4f6W8Y1SS gg2AYhNL2uGdon+Z3A4nC4v4wlZwWJNxX2oceIrXW2U3xT1yfwb7FfCqrIiz Z075BiR0DnFIySsBXv0wUj6RnmrmYWedUNRKtanO0uxiTgP8DyKWzLblBjpa 0hOeSUHfzE1GQED4pWOeESj1rGY025uZpZR1yZ/oq86wtHBspR6T8bccrgan U2NykL7AFeHu1h5Sp4/dXmxr49QhBIxRamvr2M6AWTrL063NrcMTkhISqOd+ YiJ4ROeU1tPGotmN01ZsYWVZ1SMkKDOCJ/RQfba5uXXDEMxFO4b058NQtyu3 4qlDyWKQGN9LLndTwXd+d7mNpWVJO4dWJjnQ0TEgiVIVm6oKAo72wirGfE9S OvWFFDLzksMszp/xi8gUwmuLLCynVE/Sh1kYf/N6IOz1jbvpHJJRQ8omoM7Y uvoBEWW0EgsL85J2+ApA81zAFbOApBJS5nrDREGIm42zVxC0IeA3aMj4hJSM 9gE2PTOqLCPM2vycjfPtQZHEpNyOUnNz82K6WKpSVnPBxYuWFb3wxSUx4IrE ODjUobsi3WrKeyRdbNLbUn3L7dJ5a5fqzhGQhonHJVZ1wKAW3O5KYP/iNvii NdSYZ2Vl1zAgmU0EX0z4HY7mZonU6w0bGGTGJiMgIPzSMa8IVNZBamZuVS95 7gHPBU5eKU68beN6jxpWw0I9LG6EZkK3AqPGztgtdhcvJpfCGZuQTUeeXrGx ezIoeHDH1T+O7qwjB2ozrWxcR6arl3raD9SBes1qn2HgYSuC84/I/BhfM6dA qlLpRCP4wQ1wsgx+UAXUxYRQAV5PudnZs7mUJ9halGBu4dhJ8yfBCXA0D0wu hQ3BRFNWURDnd97ae2iqbkOaNUae5J07c7ayX8x+mnvBbBr1KP1bHkdfDYwf 6qi54uTez5dNNX1O66gZQGR7SaKFhWMHV6oFr8PZ0upBZS8pc70py4fcsLkn 38Uqh2c1WRaWLo0dnX6OVvFFbXRiR2mSlZVrj4AEPi81tYlMCrxi5xEO6ZNg B1wZb5wZ75HUKxRFetk63EqQpo0lXr4ZD2ssjjczd+zgSJpsYWn7dARaUiiC Jn6SE3He6moPdbbteU1GQED4pWNeESj94HqSF21l6zUkW5FB9anF+ztIBxbx jOBrFlfv0X4XxhyM8bl2ysy2giIt+GQUPPO9di3lQfpVp6utDLGkY4/Rcvni +YSidmlN2DCLLZY6GjTF8J9VW5w796Cmn05sK862PXfKLfSBXJ8e7Yd1XzU/ 5x0lcXgJ7oCfg8X1+xl0jrKUIHv3MHoEFvjALra29AJPsXiKKpqKM2xAFffT 6eFVyVMb5z9KTX3Sy6K/sdsKrSysG4YJfKjW/OzZqdXDoTGYzQXXvW/d8fVI KITzgeViHMzUOrGc2tTwKFVUS4G1tV39ONcb/imM87VwuDUicXlJNpvFFlCv EAN1l83MMqthR/SjSK/LPtH0xKTChNunzl9ukazoIZsK4k+dta2mm8btnGCc yfdoiMkC3NffVPUgs1jqExJx/pe9ox8NdzWmZxTKEuNvOtwIyYINSQ6wk9of FGh3/ky8tEBGZ4ndxbMJBZLJ0uXPazICAsIvHfOLQGmu9LOz842laUviRIme OZ4+EZJJxSAiyeGWEpvzZ676BScmxIUEhz2Ivm9u5djCoh7CsD9VGHnz8pFj p8PTqdg+hCS+TGN+ovVFy5thUYkJiTe9PW9H5sqtuaQWLhCClKDrp83to+MT oiPuxUUn33Sx94uhVsTIzSDqr8mwtrsSdOfmzXv3ExJibzjYeQbFM4T0LFUs 5OpF1+BMusyhuqxTpy/UUbNSJG8C46uIjU7yB1XEylVBdfY+jr9jaXs5PCYh ISbc0coiOK2EOsefVj36puPDN+0vWl67C5dpjI9HMF3rfKnLgcVkauMYZJPK 1MDTF66Nm04Dx3tJMbsv6LrDpavesYkJ8dHhTi5eNd1C/lCro9W5gJQSupmM loIzJ88UwE5UPNz7ylUvj5u3/aPj4iNu+VjbOhXUd09lHMkc3wn36FZENgFX 7jxxc7S57h2YmJh4z/uqzRX3NhbOedZ8/Yq1LNHW0aNpGHjdonuukoZQC1WI 6syIi1a2YcCSUSEO9jaROVWk5GUAe36TERAQfuGYVwRK+zpV+RlljdQAqNT/ JAXDOVlZLX3Qc6HZcKizMSUxPjUtc5gnJji9uY9KeXJjlG21RcnpuTCGAEFK uzHhH2bn04zU+Li4hJKqp1whNrluUsQuz38YGxNXVgMXPjwpL6hrH5JdTn8O ttXklzeCqspz0qNj4qobW+nraUVLczKrW/roIoc667MyC1j4zFXk18pVIcNo a8ODhNi4hLSa1oGx4qdRD6eGF0XDTy6ZXcxuGCLl3c8ZW1fbPkhZjS9Tm+4E 6KwvzSutl3/BkCuEX1uYFRcfm5ae3TEAPESy90lZalaJXNxZQUlORlXLACke uW5tkVLVy33WlBwdlZaZO8qjctFLfScYZ9p7RDecV5WbERcb9yC3nCELDYFN SiTGGiJ7+epoqk2IjU1Jz2gdpjvj6SoFs2oyAgLCLxnzikBnibktc3/hIHiz zz/n+HrTxuubmDCbTJkhN674xAjJie7nC1X9EldNPMXtKLGytK3o4Y0vYKZ6 pz47Zey92QXkmxQXEJEjAsI8wjwkUGoj0AkPOmLaEOL0l/HTJunI4JOflZKY 4RMjmk+sSBpofertR2WbX8vnHKf8+MD1kyp6fhVjqk48O8W1hIDP5zFqMiIu 2ro2jwjH3PYXad0ENWbc4JsqBJeL307g4vGZxRgGzrUXJ1jauA2KSXoNy4Sm TBfrfpp7NBYNXl7NyYmT7TllCPoXbDICAsIvEvOQQBFmCZoR2sszHO2tPH3u NfUyybl6lj8uaGIqSgy44huNBhUREBBeFRCBIswMTCTgciXdpD+rLkqRkC/E 0K8RAQHhlQERKMLsMOsN3hAQEBDmBxCBIjwXiDoREBAQJgMRKAICAgICwhyA CBQBAQEBAWEOQASKgICAgIAwByACRUBAQEBAmAMQgSIgICAgIMwBiEAREBAQ EBDmAESgCAgICAgIcwAiUAQEBAQEhDkAESgCAgICAsIcgAgUAQEBAQFhDkAE ioCAgICAMAcgAkVAQEBAQJgDEIEiICAgICDMAYhAERAQEBAQ5gBEoAgICAgI CHMAIlAEBAQEBIQ54EUJFBOLCXAVEiRIkCBBMs9l1gQaGHyfYlz8FVM+AgIC AgLCzwOzJFDv2/dYQrJ/lDfEEiJBggQJEiTzWQaYAg4fY7OYo6PPJ1CvgGA+ TvYyBP1sDAkSJEiQIJnP8oyFsQXiWRKoPzUGyhLhXJxEggQJEiRI5rNwcFKI E6zZdeH63YUEygCEi5FIkCBBggTJfBYWRgrEiECRIEGCBAmSFxNEoEiQIEGC BMkcBBEoEiRIkCBBMgdBBIoECRIkSJDMQRCBIkGCBAkSJHMQRKBIkCBBggTJ HAQRKBIkSJAgQTIHQQSKBAkSJEiQzEEQgSJBggQJEiRzEESgSJAgQYIEyRwE ESgSJEiQIEEyB0EEigQJEiRIkMxBEIEiQYIECRIkcxBEoEiQIEGCBMkcBBEo EiRIkCBBMgdBBDqFTUQ/ZrYfTyvilVsGCRIkSJDIZJ4SqIgYFeAjApz+ZAgJ luyUmOQTsyhBTPIIkiOXAgqhCiSYcyJWllAMDAtkMi+zhDgokzu+ujk3nKoF YyI6RoIECZKXk/lJoByCnACOCJoC0CJbiA8yhPBgZrsJ8WcsjCGSkBogOBlw EvDUi98F6eWgJNakU2KSHGHzRkXjOBRw7ij/xe4FV1qLeHwtSJAgQYLkRWUe EigXJ4cGGHZ3K494ln7nUXLQrfx2Tj8bsJ6QANyXHlv82vLg+62QEUeFEjdN 3itkCgngez570v7vHfEpvTi4hImRBIlFZ9YduFZ05lZtbpeAT8pZWESJ/Nfx +gDXVUSQGdGB3x44+PW3xx6388FX4CHCSkXg7pD1+Ykn93720Y5T3RjJx3CW 9MbRpD1LtxSwLfCsOxsefrvnm30HfwjNbYO1CPFXfjuQIEGC5Bcq841AWSIC sFtPXfNrHwR97FD8g1fJwatFKhvvG1+vYRGkgCDbWvqtwxvrOQRgLo4Y9nnS PiBXDK9lCCH/YiTZVdvyh/VRCd1iQKACAe+YRarC4fRjniWHnHLf3Rxtlz1E GQrkJ0B+eDnlpQIFAPly5d1bWCzkwUtfGf7mb5oWjjcKO7hCnBgViHkkOczD 2AKcOzJ46cCGtUe8gdvI4InYlP8rwsmS9KCLdt4MHHAoIRshZYmI8aOlBJ3C EuE8nOxsrLxqb/nun/6/rY4pUMMXdGCRIEGCBIlM5ieB9ja2/m1L7COWpD+z 72nb62vCQlswAniOFD/yKI4bZGNs2NtJdA4Lhvg4B6cyj/D7+WJOZ9ffNkXH dYK8ZFF21W83JlZLe3FbWodKnwn4uKSjeJQt6hgRjoqprl2M7GUKhwTEmNso xLtG4ZVXdi8x2GIFDjAcY4nhhbnhd+LK+8WwEPGBtQbWcc0EAdXjUO6kABOX ZNw1v+Q7Cm6fSAyIGDA1UygGSgKipF1mpgAWhVHdwuB4hCdkUCrt/1Rzh3Ma IlAkSJAgeRmZpwTa0Pr65zF5UgJtrXn6+pqImE7IW7XFDf/4MvkRE9LWPvt0 s6jW83bpb+1ISO3BCB7nzJWsf22OVP025ZhHtsLWhJgOSKAZCaX/sSYqa0gy lsolSSEBvdfB/tEL3vlGexLe+zJi4cGMhCbgUxL2TmnGdlXgiMmHfBxwO8/U pgIS6E4TtTXHWRhwOYVDI/3pYc4Ki4xja3qBToMNsSqqK6qp8cvugVEWVbiQ hMwIAFxawIosvnCQhYESWWx2H1sIfF4W1SMtFAmqnzQ3PGPIhj4xjLPtfaXt TqmIQJEgQYLkZWSeEmhj2xvrQ9c6lhzzKvn22uM319/fFQLpE7BSXVHdH9fH 50ACxfebxf5+V1pg3mAP8PEI3MI28fUdGbk9/L4hls2NzP9eF5PSA7twuSz2 5u8jf7Mp5kJMcyMDp2gUjpN2tPTuu16a2cZjjLK/Px715g8FgDefFNb+YVN8 /ighwkkcE6z7NvK7+EFwif1XJhprTwKS5AnFjcVpKzTefs90i0doMqDCaLtd epvNuKJn9kfXv/O//3shIJcgBTFBtquN9azvlnP7npqd+F5be2VGG6cs786H +hrvKhtldwmAHgWZQTt2HLR3dd23dduuI2dPHDt691E7aNeXyxURgSJBggTJ S8o8J9CjXqVHrhetO5u23b++lQ19urri+jc2JeRSBPr10ahPfFpJilhH2rv+ 9Gmob6OQ/srt6Hz986jEHhz2+gKXkMNzDyhU2Br2/z6L+Obm00ExyReTTLF0 zitBljys+uPmxBJAkLhw7cGoE8mQNNtqm9/ZkZgzBPtVL31tCggUMCwDuK+k cPsSZfPoVnpa7rHNKy74ZN2/fz3ucdmprYvXngwBpfTUpxsuVLhfxxEL2Gk3 LyxctiMpO/Gii0dpSeKiPy4CijGbk/76n7+xjK2H3cjVsb9/7bUVXx5OqwX1 ihGBIkGCBMnLyzwl0IbW1zfF5MsWdWD8jfsjN/lDwqotqHv9cwmB7jwWvd6v FcfhJeV51X/elFjMIYUYwSGIztqW1z+PBjwF8o3wcQbVncrDhLGJ1W9+EPiJ 11Mu1cWaU9i271Lu+9+nvrs59H82peSNQK6MDnn09tHH4MjX6+H7jjV8SgUH ikDBVXyCHGyMW/C2blaPUCQWj3YXLlU3sA9MqegC7DqwXHmB56NnIH91gpPi sp29FEcH2exfsWbf/eTHHJIsuWeu/vH3wG8Nv7juPxasZVKFF0da/Md/LqqW LN4RbP8AdeEiQYIEycvK/CXQz6Oj2kQ8gbiLAecORdzJVTyWD3insaj2zxvH CHSdL2RVAdW1+4cNsTmjpEiEM3BiuKXjL5skBEqPRQIaHaKGNTNjC/9jY1I7 ST58UPm79VG7rlWlN7IKiur/uinhEQOOS4729il+FZfVy9/9Q5yVdCaTwy5I oGzorZIRdrv1Np7hUfOXysOt/6JskNEOBzErou2VTbd1UbOVnA58+tlRfzim KRxcq/GG8VeuLKgHdmSj6Qn/AnBUk+b1roKaf155bXnWEpV/bDrtz8GwIT7l 3iICRYIECZKXlnlLoH/bElcg80BFgg17Qk2c6wG71BXW/W1zYh5FoLtPxG7w byOplZ680RHldfe+i+unr3iUVv7f66KTKQJNTG90yxqWlkXe8nn4x705oJY9 RyNXerXRiZHBj3+7PqmIDdd1ApK0dMr63D5v+encChYJl31KCPQExab8PesM v/XK5fNhcIXL36746OA1IbiGEJ3f+eG3jgl8ES4W9n+5YrHv4y6BkBiqj/v3 W0opbTDLUHOWvsGy9A4+H4N9y4lBlzYeMr/u63n/YZ0Ajszi1IRfRKBIkCBB 8iPI/CRQ2TrQY14lR64Xmn4dpfDdw5JBOCOo+lHNayujsqDDh2/ce3/5jSYS rsfEAe9FhhX+vzVh266WfOeUv/Zc8l/WRIe3Q6/vbljRvz+L+PDc42OeJfsu PfjfrTGelZAJw+4X/GVD1J4bRfuvPFpxOOl3axKzR3FMDOcXtVS2/PcS/5Xe TeD6Ea6YJlD1NcdhF+5wmf7f37hwK6q0rVfIatL63795F40A+3OGKjT/+Ifv feI7h4VdBbde/927bvdTuoexOxc26nx+kQ5kFOe0418aH2ZVdjCFpHAwT2HR uz/4hPZxhLSPzMYIBiJQJEiQIPmRZL4RKFtEyEciOuRRcsit5EZad6+YxAi4 lLKna9Am5EkTjxTiRGhifWDxqBCHS0JYIriQ82Fx53euhWfvt3VzRSEJTeXD ODgL0nsHGNdDKg5cLz51q67smQiGJxKRYoJMSG446FLoldE3zOJ6RjQ94RJ8 jBgWEYSQpb814nIhB9hzkCv1QNec4OA4j9vn4+KQVPIEzlx6VnftRkingOQD HVhd7vbuD+EEJXKotfyyvXP2U4YYdj77Bz98Cm6iACfLc+M8/ZOBv4xhjKiY wDMXz32xbeU7C/6maLTMLb6QD+MzEDjORwSKBAkSJC8v845AKZkcC5cnjRRE d+vyxSQLk5ySRd5jUhxKgxrtJCG3wnSCJ1cUuA44gLRtZfVwcUmxdPnFD8r/ +U1GkxAaf4QvIVCtjefheCsckoUVAWeZ1pOHSeL0ktRCTqZIUgh9LFMSiFDy TWhzeIP5/RpJ04SCkuCLf9f4rBMjqarIrz9SQwSKBAkSJC8p85NA5XdjGR2/ GwsLnpJ8ZVCn5C9kCgHfwS1XgEPKoD5lVzEkBY7bjQXkgXN0oQMLDwDtNjZ0 H7uS9fbGSIdHI3B0VQgvAQcu+1b819/e+2LP4ZwnHD6GAa0kevLFUt3AsXQX FREuO2YKMIY0pC1LKB7iAcdXZHl01efHHYrq6qrqnzZ0VPpct7/oHQ083Y6K 1L3bv/jbn37/zfV0RKBIkCBB8jIyTwn0lZhaSACPtaa684BrYWg1DNdH8y/4 FOBkfWl+YOAd91t3qoZEAvwldv+kyhTiopTEO07uLldcXK+HhWbUdHIpr7mn 86mPn7//3fD8lgH+y9SCBAkSJPNeEIH+X1tb2qkrvyOnfLqQ+HE2GpPvpaZ2 WIPbuMi6mjG0nRkSJEiQvJwgAv2/NrhI0qk7MV2IT7eh9pyEYMIdurFRPgbK HCNryYbaYrShNhIkSJC8pCAC/WnN+zPgqSl1mE4xloiYFYPPMturkp+B2ZEg QfKrF0SgP6GI4VYpr1wH/uRNt6dMpIRLTRh+brFcAm6aNimd+Bm8MBBMAU5v 7vaqNUGCBMmvXBCB/nTC5AufMbjMV67DCIcpen4iW0RycHJ0ZGSEg3HEM5UJ mHeIxelnCydQMLhqKlb9PxWggxi8AwixIe4E9QgGX8Sc1HOOBAkSJHMWRKBz tBvsw5zYjSlJBAcCTESS9Wlub+usreeSIhzmnLHXdIYHOzFFhqlqn5BO69CQ 6fmPf5oWjNCLRgn5xMIREiMIyRIYcAonMeGz5W+8pvqlLfBP2QKMrnRc7SJ8 WEAQBHl6i+kHBzzhRGIBJtOTyRP0s/gTtJ25dTKLzWDbSS2dokA6BbwAsPiD oc5nV5voX02qpX6rkpz0ql4CTZ1CggTJjyeIQF9YqHk4XALOm+UCv0bq1MgS ORgxyhMBnqpJdPrTwuU1FIGCJzmPnOigMQVwjSef2oGFKRRPfrbTGQTUrtlM 6WJPkMgWU4n4uHsxIZ3myrpU19/+Vv3R8DgCBYn/81u1nAExIBQeNUGXSbGY ABPc8b7qm1nKp/QE5YAyeZR6kvJxuHcb+DEc+lhVf+dVXEqgTAG1sbjfsVW7 zsLmiOGMXxYoVghbDXf3Fk0xbUneYhIzTmVbPtWrPGYcqv95nJVEOKBOJiYe BXQpFnZUJOguMkzrEuMEVQJoGrhEMOxodjKhsFMEjCPE5dl53H+HqQgdCRIk SKYURKAvZi5pFKBRBqtzYHSUiuPHwuAjGmCEye7oH+HQq1FIsjbZ9S9KH9Zx SSEmBl8HhgZ7WGO9oyyRxCfq6R/uZvLFMOLQuEc3YB8xFW6os3+4j4qXy6ES AVcJcCFIHKBUAfTHniqdxRdCrky79sc/aj+eQKBpV//wZ716nBTwmB0Do4Ct RKQkEJOQOoYF8gX9bBjmfnB4uGuEBa4FLRUIBS19MGz+xS1Ghl+PESiLLxZy WN7H12it+rZrePgZyA+aQAVf6h8Z6Rxgi6Rxk+R/eBMsxpIGdJK3LfA3e4dH h3g47I+FZEewhcLeUTZTrhxQuGi01ds3sk8E7dmQfFV37YFBHIatAGajCBHn 8YecLU8nFnYKMDgFmgtfCQgmFRhZ0tNLcTefWuADuHuEJxpFUSaQIEEyoyAC fQFbiXAuTgx01Z07+Y2Bkurb/3pzgf4nSTXPhGIc0FeEh/mCdxa88/ZbRktW 33/UhFNbdr6huKKKCVdkFoXZv7nANLsduGIEk4qsyxcT6REen3y0Uuntd954 8x/bLQPhxtxShwg828GTvCIjbPUSk7feeec9JS0z/ywuARNL032NDRe9/c47 7ygsvxSQCf07AYx1XzY+nU+ROCDQP/xBawKB1iRd/bvSUhsHC1M9lX+9+brJ uhOVzwhI4aTom/dV15+6R8Kt01wMv9gf5e+m8u5bG07eAM15HONtorbo32/9 e9PO7etMlT/ee0MIaRobFZI4Qbof2/jn3/2/3//pr/966611R53ZoCx2m8Xh Nf9e8Nbb/1z0/tqzFc94wBOn/FD4KSLF8hYLfdQMzNjfUStn24/jK3sB8dp+ vcRwixVoDoMH3zluX9y2eKs54Fy2EIOvLgJ+55OyvZ8ZfPad+yAXxjI0371y h2UMZOeh4T6ekCeGXjYd8lBE8aOQIAeZPDo0Ys/gKIugOJSi+86uzqqnbYPS ndC5r/onhwQJkp+zIAJ9AVsJxXyCbK95sOe7k5l1vYz+tu8Wv/3XJfvBw3yk JvJ3//k3t/wuxujALU/H6IIOikCd/6ywrAFc2PbwvT//+UrKU2g92BMLw/2J SbHnlTNmnjG9wyNl8Vf/+7XXXLK6oP8lICQVlQb/5bXXtlmE9o2M5KfG+ITl god/W0nwm6+9tt81fnhkJDf26uuvvWZxrxzcnZaiienm98pAadVJLhMIFHBM Y4bvf//Xb1YesKnqHOxpKv5w0V/0v3KivD/+NsO3Vx0JBEe1iTd++8bvNx28 Wt42zOBjbSUhoMz91xKGRkYK0kJU//n7lYe8MakHCnw6Dodluc1Q7ePDPcPD 3UMsQFbmX6j/TXlV7tOB4b6mvR8u+qvGlk742oAzhbBbeLA25vdyFosp7MQI srUqXd62f1m8D+R8kuzw2zeU8wcJ4A/j2MgajX8cvlkCDQU8RDHO4QzeurL/ f37z5nd213OfDIl4nUsU3guqY5bn3V2pvvA93U0tYqKzPufcgW36Hx7sFhCZ kcGb13yw/UwAX9xrc3r7e2++ufdyELAJj99ld+7QgdMOLpfMP1u74/z5Mz9c utkrJHli1KOLBAmSqQUR6AtbTC7ET3GY5W/f0K4QkqyG+Dd+83fHhAppBHoC duEmOf1ZZfUzjLHH5L3tdrEw+pCc6VgiQurokISYvVH7zQ0W0G9i8LARKjqu xRa9v684DogYEIes2NPrVBatvUBSEeYBvI6u+JPB16Ccc2sVFcanv264nQu4 MsV5sgdan3btd79Xr5AGom9IuvTbNzSL4Baooh0mCz79IQgSaJLL7/5HrVC6 ZSpQ5h8rT8BuZErpMxt1DOS6cOlwvk7fLNZcd1pIeXk9FRG//4/f3amGLiEg QWK47K0//Jd9Sgd0DPkYJNC6+L+Osxg1yjnetv/zF50S4MriI6u1//XDzULw I2zLD3jrLZ1Hg4SYgG4s8H+BOlVR9gpLd7Kpq5pyfIw+/Da7JMvR/1ZR9t1/ /tPk8TAuYA9fO7JhyVf/P3vXAR9F0b5PUUCKdKR3EERBQTqogCJNmiAdpISW AiIdVKT33nvvNYQWIAQIISRASC+XnlyS6/32tv9ndu8udyHwwf35KF/e5/cQ 9uZ2Z96ZnZtn35nZmYXIjVXlpPT/4SufbZd3blt29FbI0tHd2w1ajZJdPOzb ct8MVQiRzOv/TYnPmv+95YSKZs00CwIKBAILJAjoqxWXMBQYePn0uOFDO37b oXqFMh+Xao/ac5bnbu5d3KRBjYZt2s5adyhX2Lclwnd1jWY/z5raTyKRrPBL QUqgJVhHPEia9OqslX//2a9br2aNGpQo9vGQ+adRS6630DosKsSvX3/Wb/YZ jmG0ZlpvpdV4Axiif7NKfWedYRlGY7CQDP3wxOxPareXsdyQbyr0mZkXHnpy TskaLZHHm3RjXcmS+QVU7Ne9q2DQmUaWyXlyskzpuucSUPzs0NZ1uvtgAY3y W126dPMgFUuwHMdZBmBjziJjlEaaZWjPHl+1HrXeRUA5TtjS9A8jx9EcF3Z2 YclSzR9qOZJlNegfb+rboszgFbYtYJAlJMcGOJWYgsH7fSMjA684lW3p9vfk WLDPLh1Wtc1IVDg7pvXuOGIZZUuX0wq7yywY3rGnz16UF5blts0Y0fnXqb73 E6w8f3WNx9e/TNXhU4jR3ZrNOoq3pzEqwn/6uvW8tfsfSFU8b+3f9quVt+Q8 nVbnY8n0U4mCfpp6NizZYyZ+mDESNPK+HWv1A4FAoDNBQF+eqCGlOf7q/r8/ KVln+KR//MOkwVfXfYpVxrbwrE6vvHZsQ5M65bp4b6JwT+mujySSmh0Grfrb s2z1NlEGnqKFyagUa2B4qy6tR5vG9Vr127zrTJJGPqJD/Z7TjvKCgGqxb0gN blmlqzfWMrWB0JLi1mbUEHugQoMH8e7s8S7eoIuW40d9W6mLc/he7xL1OsqQ R4YF9Ku7CjbfJKLSn34TZuAtVsLM8tKbm4oVr3tdhhJgnAUUiWyQGo8YonSH tqra1Ws/UtgcLXLj+Bn9W7Z6xgNdNrJdsz4zDDRFsGz0lTVFizW4h4SboRR4 eFXX5fOS47YHC33UWI/MriX2g9dmpNNX9y4oXsKlbO+p8BOLNu123ZqNbqXm jmzf4O+LybZIUDFyPGVM/q5R3R0P8dY2HGce0r5qr3+PY7+XI4Z3ajz7aCT2 eVNvNqv77S0Zfi65d3DOByXqnAnNRsfJd3Z91W5gGhZ/o3efbzqNXxibJN31 7+8Vqn9zK1FtIZF0OnnHQCAQ6EoQ0Jcmp8XNKTvs2+qdvU+K7eqppaOKfvL1 IxOvyY0LScwSA6+vH1G0YTcd8v78N5asXP9CEpIPus+XpVtP3I6dGpLRk3gg Mjlws0RSP0LsmVXHtaz26YB5ZwQBxWvVIkE6sXjwRxVaPNXZ2vA0mYrGKQ79 uLwjUD+kWbk2o9ajoxOLfvvINbztqLXoKNJ3eZmyrWMYnnUeA721tfjHdU9E 2eRhbt9G5duMxZNreWJkh4a9/jgsdOGuLVu2RTASUIZFxuyf07tI5e/TxAto ec8mFTpN3O54D1QrbI+6flynet97iqcQ6vivK0iGLb0ifgz3XV7sg8qXUqzI VUfPIRaWz86KC5XK7CU2vEijXuhgVMsqP3g5lW2JFg91vFAY7ILRPfsMHdvh +4FPdDzFCe/VCsUoDdhSs/Wv8UY8aqxL8W9U5/Oracj75NKfnPimZY/HagZv g75nXpcRC5Q0iY7/Htn2B4/NNFZbbvXUfv3n7DWTlJ7kTarYseNGLVi5bd3B k3G5FJZ8CiXNXNy752BgHN4fB/xQIBDoShDQlyfKOMNzp1aO//TTOqMnTRw/ ath3rVsXkzR9YOFjr62vUaXqoPGTPCf93qhyJe9NuK8y/PTfks/axBI8xfJp j48Uk0iWX4/D/hQSHYY3KWI61/v0my4Dp3h69+/bt275Sr28D4gCKrioHGXM GNa+ScUvOk708Rn8S9fvhk5HCs1RuZN/woE+Pt7d239Vp3m3R9kkQbE0KZ/i Gh4mwy9npgYfkUg+9trmiyfrIu0WPNDIS6slpcu1addjspfn4J7tilb94uTT HAproLVv4zLtx+5ER0/PLULe8x0Vz3CsnuHN8ui2javUbdPD28tn8OB+X9Wu 8t2wVVbHayxWBkUbcWldcUmpXqOmzNt0xIKyf2FFzQolfh4x0cdjVOWSlT3X +1I2G/DJj/3W16rmXGLXOY4/sXysS9l+2DxQwdEsY+H4pLsHPpZIfpi2C+9X Tggzl4Th3n1/9mn63aAroaFamj86u+/n3aeLvu3eqb2rt+h3NTKd5rnJXRu3 6T89OCxRL4/5pupnByPNqD5T5oyOdYtNWnUhWYaHTzfM792w06+3opPEV2nw ZCeOtxoT60skRTtNNPG8CU/6ffuVEAgEvjsEAX0V4gmZSEN992yaMNlz6/FA tU62efXeOD1+uyQuInDmLE+PyV5HL4cRwmoGmfHBi9bvzyA4E437IU/tWr7y yE28lgLSRxK/gZibGD7fx3vKjCVPZaYg3zP7Lz5GPpJB6OE0UJyJReJlOXl4 NUpr5rJDUXITkl0D9iVR4BqPyZ7zVp6TmYTBTZIzFRhOI+1m965funjPaZMt Xfx2ZFrUnc0nr6alxv0zw3PS3EX3M7GCIP+aZNnjOzfs83uKzMiMu79wyfYk E96rVHxfUqPLWfXvfI9JM84/yo0L9d97+g5eb9axl7fwPuZtv/1TpnguPewr vjeakhg0Z7anx5R5F+5gZ9OxxjvKHXIY4yPzSkzQdzyrKl/Zxht4gqbVFM1Z k5tX+nTplXSh/1ZYIolkkZ3hgRdWb9kvszK4d/3U4VO3E0gG77sa7Hdqw95r appDDwbXDm1dc+iakeQ1mU8WrzuUSeC7YyaUezZsvhOF+36lMcHLN6z0nja5 Zfv6lWrV7DlufqyatjAoaeSB7joY+AQ8UCAQ+CxBQF+5xOyTV3lhhRzstuGd qXkyL1h8ed+2+ab4LqGe5PKNponziGx9orxtnq3BJSHOQOfFKa5vgDRI72SA heX0pO3k/OGU7f6KcL7jNifLfrIowc4n553D2EwyUKzJaYqs1TVOR8k45hWL WSbyrshbSclhRr4SK7BskQFiKT08MqtyvZ+kBKquedNiHZGYGfy0wNqNF9Wc FxZJMNjDsdcvFo4QaLTbmhJy4udBHjJbmXBWVcbAVnUm7QpFH8Xp0DyMgQKB wIIIAuoGdQStsVA6K4uafS1h69lDHoqWoMRwW9lSrONb8Sqt1VVE0CV4xRu8 6qweb9P5rI/D6ay0uCqO06JzzoHPO9nFWq3rLcOG4Y1HBYMJ2nmRPTzp1OYC uxgvhODMaiw0XgiCLNBavKYfNsCenL1M6Gf3Py2wxPKVrcZMEiwXF3bJe+zg 6qWrLD0XyfPCZisukTAOO3EZOi146DADWWU7dskUpzVbLQyX+uR46+87Hbju HxkTG52ceu/eVc/pc+5ItciTRSUDs3CBQODzCAIKfGcpdtJGBZ3zmOJz/F4y w+dfuvY1JEFxyJtOT4rYunft8jXrlm/bdvjGnSQdjScYv8sbngKBwHeAIKDA d5niWvoFdgK/tiRcu5pxBzXH59/rDQgEAp8hCCjwHaeBZHCn7n+zH9VAsTor rcV93bTzXi1AIBD4AoKAAoFAIBDoBkFAgUAgEAh0gyCgQCAQCAS6QRBQIBAI BALdIAgoEAgEAoFuEAQUCAQCgUA3CAIKBAKBQKAbBAEFAoFAINANgoACgUAg EOgGQUCBQCAQCHSDIKBAIBAIBLpBEFAgEAgEAt0gCCgQCAQCgW4QBBQIBAKB QDcIAgoEAoFAoBsEAQUCgUAg0A2+koDuPoIF1ECxZpYHAoFAILAw08TyJMu/ pIBu2XfEQPKZaku2jgQCgUAgsDAzS2vVW2ijQa/V/mcB3bb/KMHyOTqrwkgD gUAgEFiYmWugTVbmJQXU1oVLsmaGBwKBQCCwMFPowoVJREAgEAgEvhphFi4Q CAQCgW4QBBQIBAKBQDcIAgoEAoFAoBsEAQUCgUAg0A2CgAKBQCAQ6AZBQIFA IBAIdIMgoEAgEAgEukEQUCAQCAQC3SAIKBAIBAKBbhAEFAgEAoFANwgCCgQC gUCgGwQBBQKBQCDQDYKAAoFAIBDoBkFAgUAgEAh0gyCgQCAQCAS6QRDQAsqE ep2nvT6ruLdeMkAgEAh0sJAKKMVprazGyop/dSRncHzF8AT3EjEwvIXjTU4h KBIhQk7vlrAaSAYVLOKzumwgWRSn2TW5d5B6qy0Lb90SIBAIfAMsnAJq4vh8 MFG4KJAsGklWqSPxwYvLjWRzDLSOsokaEjgHWB4J9KvfBfvlKCbDM18xPK8x WrSUi4YizdUS78q9QHY6CtX8to0BAoHAN8BCKKBmllcpdIsPP/Xa+mjylrCJ m57suyM3ItUjOaR9/hdCJd8dPZ6CFVFL2npNnb1CPckh3zMnIa3GMN+r2Sy6 RI+1gz53K2bC+ocz90bfzbQSvFMJUwKdP7rag1xXiuNvnjvgMWHiSA+f+2kE +qinOJwohe4OHxvsN33sLz8O+zOL5gmaNdhvnCja74Bbip1umqP3b1owYvT4 PxYfyCJ4CwMdzkAg8H+chU1ADRSH1E0WkyT54WC35aFTt4VNXPewcb/jbTZE GTjeyvGpyfKFp+JjTRxSLhODO3tFH9DM4Gt1JNZfmuczo5NL9Tl7KYtBAmq1 Wnz+ulbf099na9ikVXdrDzy3OFAlFBQ6n0PnWwWnTOzaReJrdnZvcbRYB5cO b/Vxxa/+WrkxJN1MspzWylh4Xm2hjVbWrFEundC3l9d25IfqLJRR8H8plg/z Pzhv8XYdizSUc4yQGijOdbSUeybkPxeR48Jnv8ofKISgRwiSIi+f2DupT1tJ 5XZRZp5iuTc8RgwEAoFvmIVTQLPjUyoOuhBksHU55iamlu158kQyzSHPUdBH i6BxSiNtxN2nXIbaqiJYEyucrCHkBGPKyKw44NzFDHQu/zAwong/v0h7L25y iupRjpVgbR3FWiOVriG1jNC1S/PZelJl5fLcRpLN1OIrV4zu8O2gf9ABzdIG Bl9499Shi0/kDI6EmdDr24UXkzgOm2cSOm+tNBN28/CCpTu16PZRDBJipNR6 kkFGWliby6y34qhooVsYHWsslJ58kZIKTwg4m0g9zWJnMmV3eClWZ2XRkwCN O6hZMX6k42JxmWj0LTY658HuSo27RoOAAoHAQsBCKqBxKWX7n79nF9CUqMSy PU+fz8ASEB0aV2XwlSA9lq1xS/znn02Zs9i/+rBL12Q0ZzHNXBFQbeCZJh5X fbYE1v/t0vl0LKA3Lz36oOfZAJVtLBVJD8lh71Up187dHtx6zKU6g0/Xm3jz khT5lNySVdfbLI5AR3oC6/H+fffa/RuOBXRE2y96TjPQyOUkVRq5/8nV9Ru0 uRCVjWxSxl1o3KRzpBnHn6XQGoTISUHLEJBLizTWQJBKA41iNBiNuUYSKZ1B 6JEmKWtkQlJcjs4xRGt4Xskg71g4QWexGjleqZLHZcoJ4VkCC6XwVWpaalRS NjrNymKHGnvWJl1kfBoyyWIlLQwT4buqXMPOIKBAILAwsJAKaHxquT4neq0M 89kW5rH+fuU+x0cdw/KJVCnmYUzpPr53sICy4+dfKDnq+oF7Shny8Tj2r0V+ ZYfdvCsjclWGfzfeKtb7/FUZ7sI1G4wDp5z5eMD5ueeT4nWsIKN4nDQ9OXvc hke3Ui06rXHKtLOVpz5A0pMQEl1qgG+wlqNYnqWtvT3OTPZVokuWDG/7Za/p SCQtJBMfer3zlzXrtBu05cQVJFLnFo9qMXC+mcpZ4t2nVqVKc/ff5Xjr+YOL urdpsfDwE3Nu4vw/pjRv3vVmqunxvUNdWn5Z+/PWgZlI4vgHtw4OGzZxydq1 434bMspr1h8+3sfvp1DYUX3GD6VYM8vJ06LmT5vc5ruBO66GBl49Of7nDj29 t2C9ZnmrJm3pnLnzl21eONtnwNR1uVaeoPmc+Pu/Df1t0eptC5f8u3jPNVSw 0SCgQCCw0LCQC6j3tkdeGx72nnV96O7YFCP26WJCY8sNuHRXENCR3md/3pHC C8KqScv8tMeJnfGk+NGcnlG2/1k/GYt7fZHEmCyb94fU/+1k0V9O/74nUcnw BMPrGbvXx/FhtyNKD/QLQwLJkr0mnv3jChbN1OikWsP87qhwL+3Ske2QgCKF 1SH3lSeHdvh8wbkUcVquz8DOc3cEHD++4eL9x3/+1r7X9GMoFlmsf6t69Y/H mBir8fqeufU6Dbsc6DdvzZZHYX4NSjdAhumTLlco8vHfF2JxN3LkhZISSefB XjejFSTLFdSRyxlJ2mLRX94xVVKkws67UUh/1WFHP/yo9vUclNu0vs3qTVzi J86x/enrCl57QtHR3mnda//ghQ4CTq1edvoBOngKAgoEAgsNC6mAxqWUHXA+ 2GwXOJroN/7MgN1YsKIfxJTtbxPQET7n+uxKYVl8yZN7kWUG+IWaeJLmTByX EZ1ctv85pFPoPA3B6oTuVAtNXvCLrPzDgZ+3JZqFLtY7Ianjlt79fsq12gNP fDLg6j0N1spzx4Jqet9HRzu33f5+ZRQhmLBcEFB0FcHxyviLdWt+EyAjKYbR ZoV0bPrtkgNXwzORuiq++7zu1iAkaXzkpVUNO43IFjT64L/jO/ccd/zKfRPP hx1Z0LTbFOS3nprX+4O6vfRC5KFn/vqgSINIcUyWLHhOkY7Ace2fP7h1/7nI JIplYv03FC1aO9TIb53SqVLHCVY8UZlmGE3PJmUGLbuMTpYGH64o+ch7a7DQ 8UtRqPQurwEBBQKBhYSFV0D7nzubSlmsTKYOzx06fehuQ59gpBHxD6PL9MsT 0N47sapaha7dUn0v3NHyFMXqWE6dnF5+gE1AxbFIJKMqYVjz1oWQD/pdTuP5 2zeeluhzdtT6CP94w4OHsRUGXArS4XFJbXZuw+EXA7KJ0VMv/mOfybR8FBZQ I/ZW+dOLR7foN9MizF96cmph+c+/vZmGBzHDzy35vN2QTGG20qoJPX7x3o00 jyaVvb4s12b4WgO2g/bq1+6P3dgZjLq+rXb9L3bfexL9JKBD4yoDZuw20TRe qEEY6zTm11AO+csMpezRrNbCS2kcQwvDst9W7zqX4nK/Kl1k1vEonmV0DK+K 9y1fpPT+MDXHcciQ2/sXfCApv+9xLsuyFhBQIBBYmFhoBbTioIsPHB4oZe07 5kTb1bFIvGJCYioO9LsnCOjoPy703Z3KC296WrSaz3sfmXxRLl4RdP1Jsd7n rggC6ucfvylA7Zils3fH7dJj76BUxnif6botVQw8c/R+8T6XHxp5YbIq9/eq gP5L7n034264gcevfdoE9A9BTYkxvVt5bLtLEHhxhWUenX+cuJ5E13DUnBFd PFZeIpBzSMoHd26/836mleRUsRdrVG90NRWfokoKaPltJ/90gqBx37LfwaX9 Ji3YsHPr8dsxeMKP8EqOmeEUesLi+gKpgWKQwTnhJ5p+2zdJeCDICD9fs3aj i0kEpwquXbzEsThWzMj0n7+o98sipOybdu6SCgX476CWTXvNtwo92yCgQCCw 8LBwCqjjPVCfbWFeG0LajTxbf/LtMCWeERQZFCXpejYAO3xsv7HHv9so5fH7 mCzSvTMnQ4r2PDlkXdjkVcG9Zl8p3/PcqTQsNodPPqzxy+kus+/7bA0bt/RG pd/Ob32KlfDk8Qfl+54ds/Hh+BVBnT0vl+jpF6hlaQbPL0p+mlysw+6u26Xo eo2ZEQW0ac9puAtX/bjlZ+Xm7j37KDWbNEibVaq4/aEGlb9JFf5V6VJTdvhm qMnMB3vLlqi96fjVLDV9aG6/r/vPExcyurhqWLUvuwQ8TdeTPKm8V79B7ak7 TuSaSNFH1hEMSilw35wPPy636WYah99tYcViQV+hjxdXjy3XuMtdaVLo9VM/ 9+i69VYchx8u1JN//vpXn23Jyckblkxo+fP4eOSGE2ndWzZdcDRQKo36Y0DH udvuMBxnBQEFAoGFiYVNQI0U57wS0aQtYZM2hW28npXN8DSHX6WUZSr/PZYg tfAky53wiz0QqiVZ/EoIkgMkr7dDMyavDZl1PDXLTB27JH2iZtG3KDxbodtw LHzChtA/98Y8zqHw8kQUjzTp0pW4iWtCtt3MVRvMW09LE8wcQXNqiuNIQ8vf Ti8LMaHyVJrtHmjPP0wsazHn7liz/HJYAp65lBOzfuOxDCtPIBsMmZuXbL6N JyjxqpQny5asDkzUMbjzeffR24noJlpZ/sndi1t3X0H+Mk3rzp4/MHPe7F+H dK1Vt2LD1p02+YZYaBZpqTzp0cCfWg6ad0IYuBRvJadFJrHE+J5Nvhs7c/Xa tavW7I/MUgv3mjVxvEWXu2PjquWrtx298cAgdCwrdIqHEQm+Vw8uX73q9PWH 6JnEYKWsLBvltxoEFAgEFhIWOgEV+OxauBb7SkFity7B8Aba9pXjxUm9oKEi hNFOHmsrDucsTlGh65ADaMy3PCxri1aMP/TGk6q/35SSuPA1hE1Am/Wbg8db 8ZAsTgg5y6KdFtq2Ti8vLIqrp2yRiMcOIxFJ2yfyX8++C45H2bJGWsOOzvvs y18yUO5o1qLLmti350b/ZF6Y8WsUFknA/b+6p9+16vyYsEVBCeqJM05xRke2 cccvXrjPxPJ0Xhg+R2/FAckBW8o36gICCgQCCwMLp4A678aidd2NxYC/sn3U CV85X6gnkd7hLVeQOuiseRqB1/CxReiyGws6B8/RFSa+ogMku/FxWT4rAmr2 O7M8SMNjqcWXoIM14zp/VLHOr2M87ySYCJrW2sVLSzB229AxrRcn/1Cs4xgp l4609cQaSEZlQY4v9bf3T/2nLX8YExMRmxiX/nTHhiXzd1wQdJBZP2/C5JVX KWFBIbECGNFV8qyVE7pXbtozOkeuI6wocpeZuih3BI0CUUIOY5DleryaPY3+ 4rVwWXLf2tld2n5ZtH43JKAkCCgQCPxfZyEV0LdS1CSHPNaoyIwJa0NOROLl +mwL4lF4YZ/YR8EHDhzavPdQhIqysv+P3T+FOEmWuup3aNXmNSvWrN1w8sTN qAyLsB4v8h81Vjx7Fi+fK5yvF1IPuHxi7ry/FixcsuNsgLC4LvtqWaORS87e uHp+8859x68H55Cu6/0CgUDg/yJBQN90adu7PfVOEukcTnLPXW3vlejcS82K C9gK4WZhab58O6a59Me6mzVHRy9sZwYEAgsDQUDfdIFTtk7d/OEk+7wNtd0i p8c7dAv9rlZG/5/8WaEzlhJOfjXfM18kQhbcjwEIBALfI4KAviU+d4sxA/Um Rg/dTuX/a/Ybyd1LkXIZwn67Vr1VA95yVXwtJebYaO9VbS4w7+4PoAALGUFA 3w4Z3mnTbZcWzCxM2f0vJOqaCod3PXPP7AK38H5Js91M979AZ0teR5m/2qar r+d2vBa+har4Guhsm7jHvVWoma9mc4H1+fmVHAjMRxDQt0CGN1pJhUKHDtDv 1MTYG0/h9RCtRqMx0abXPQknLxU8lYhX6o0KE/WqrYSeIHM0Jn2+J/yXNhsl pzKY5EbyrbdODkvw8esoc+fifWO34zXwbVTF/y9dbUMtGN7yT6/NkOu1FK/T voLNBiuVozHqSBe5LLiSA4EFEQTUnULL6ywquP/n2XAxEL80SuBdO/03T5FI Pj4WbeQ4TmMm5AbCQLJ6hqfJnO/KSZoMXkQIK7fja8ULqZc14DlWcXqLFadC 4eFXjqfGdflqwJxTHLqbZvplIjFYaYrn425trVK1XYiGpznO9u4MOpN1NdtK F2AexaqtKK/8jEHtfpiwFc9AttIvaXlB4QUFvmRBOVvisYXmedqS2ansC43P dxOpZ1N3FK9L+PNqyP//drwXVfF5ZjiOC76qoFScCp91rm/Ctu/00U0+VatV qFqrzeWI2B5VJY0G/ftim43Cy18Wjst5cqpK1a+upODFNPXotOdV8jwD8lfC 52UZWEgIAvqqFJ/SUSGYhV4j1CDnPayiYxIvqoD3s6bypu44TjbRnI5gCJZP jbj7z7rN0Vo899Z/p/dPo2YJW1dzBG09tH3dzluP0DlG1I6hombwhWKK+Qww 2QywvXmK2z1hk2uCQ+0Dk7f+g7DEwc1dPmIqZvyJGtqqVjevgwzLoY8WDr+O as8Cl5cFMm9Gk9i2xFxb+0nxL+4o8Lp/FlvecVNsdTabxuYhAyyCJYIBjJHF m76hWjSpW5OWI9axrgIqWkuIlpPOljPi/GRnC58X+LyCepElw9ciKSdIUz7j ny1b4Say4k0keJupBRYvweAZzobn1ITXdTve8aroYIF1EhkgmirGpneadeZI xczwOqdCwGbztjzqKFt923HzIV6BWR3RqKRk6t4nWq1OZTYd2VGAzc6xiQ8t qJBRwWc+OFi8eC3fJIp3EtCCKjm+kBA6h/Omr7t0fbvm2lbaL/d8+8JnD+A7 ThDQV6IJ/caR72DCrZ7WoM9U6qzCoj24ZbOv2CPXaDIURsq2UhAnrmik0RvT 5RqTfdUgi3CViWQpk2H7tJ7NfvLI1KhzNHpxNSFK+GGiBhBdamXJDLlaYRYX /MGNgJ6wKkz4J28QDCCEN19QQlbhdZVMhTpbh1cksjC2H7uBYEhHKmp1lho/ tg9vW+eXuRfRaZkypdyI1x40ij984e2XXLU6Q42XPsJ1Q4xEbFuurytVpkUs y1st+nSFVsy72LzkmU1YUYQoGqVanakxIMNQ5FbSmpyL1wacN6h1q5EuAmoQ FlNC58vk6iw93lPNIryjirLPCGWIsp8rLBdsen7g8wrq5Sxh8oy3FFC2BvtN VOsMGQptrs6UpVRnac3Ggoo3ByWEwguoCXyB57t3O97lqug0NQtLTL46iexV 6I1i6hkKtcLC8fa9gcSbSzBWlIpKWHdLiMqWF6HwNYSw0pdY31BaZo7JCDtT vdSnu4NzzVYKne9s87OxOYo0R47K2WpO9Cv7ab38AlpQJUdmZKu1KguLO3ux tZyRJLO1Rn2+5pTCTqsJP4lxZtvtsL0yhoXbylpF+1Gg/aHXKCzqJb55/daH NoCvShDQVygr4fcVeXlDi96jtqxf0uabz6tVLte29x9Pc3iKYdFPiTSl/+XV s0bd6jWrNvi+16zwHDPJoMaZPr1lQd1adWvVrN66Q/fjQUno1xx9bWPZCq1j CX73n/3LlCha8tMK1apX7+G9HhXv750a9J15ghN+fY/9d7Zp1aBmrVq16n+3 dP8tQtjxJMJvwzd9ft+/Y12XFo2rVCrXobd3nIYmaFYufTjwxx8qVa9Zr26D 4TO2yoWF+zQkz3L8Zp9+ean4oFS44T98PmDW+iU+Q+pXr16pWsNVpx6JbS9p zJk3pVftutWr1anb44/FaegxW1i7T8x71OV1nzXq+O/yv9q1aFytclkh75yw jyj1+/dN+vx5hMd7rq1p9ev4s7s3Na5dve/0jajxu39+e9svGtSoXmPAiKG9 233ebexGUhBQg9jGMpz/6S0//9i1Uc1a5SpXGfr3AdTEGUm8oVr4zZPdO7St XqtWnUbN5u8OQJ4LsuFJ/kDctj8qsKAurf8PlozZIKzBSDiMf3p+bb6yjdcy BI2MYXctnl6vZr2a1T8rXrREpSq1Oo3+Wy14VfmKt7f3aiMqDmPqX57ONcFC sagYWe1rvR3vYFWM17KiyiNpQA84yiTnOrklG7+ebPIY3Nlzydapo3pVr17z s9qfL9wfSuJ9DXB/cui1ve3aNq5Rs2bDtp22B8cIC1ryVpN85cxRDevUq1Wj SvseU0Ky8EZ/ozo27Dffl7XEdK5e6aMPPy5TsUq7kQs5nhv7XcM+gs10AbFh wwhdxqxRvapWqvb5l628vAfUqdD0otTqLKDPVPJpj/GmS8yikZ1aDfqHELa+ Refvmzek/W8LTI6+Ytr2NIJbSIsV1WGlSh6XKSfER1kklMJXqWmpUUnZuGeA 5UUf3GzSRcanGTh0Z/G2wqCh7xdBQF+hrKw0+qXH3dj+oeTDrh7/RmQoZdLQ Lg3Ktxy+SvjhWBcMbFrx85/uJirUudKx6IumA2TohxlzrsSHFTcFZ+q0ir1b V557kI5+jVFX1hQv3vSuEv18DAsGt/qim6cMeUmCMzK0Vc2fvA6g6FJCjlSW SMav9VVrNHcvrCsrkSw48pjHLd7WDz8o8sPoBU8zVekJd6oWlYxYE4jCZ/Zp UavbzFyjITrk/LJNR+QMFlC85CDJmUyGv4c4UkE/enpyz/rFKzZZetpfpVGv mvajpHy7eAtq3Ig5v7Zs0m1KgsJgyJX+2r7B8MVnWeGOi3mPv7mz2Ecfd53w bN6JIXazo/02Fi9XcsDEdU9S1TqCTg07hiwfv/6SSqN5cP1Yk6olu07aTtsF FC+5zzNbV8ycv/V8tlrz2HddMYlk1c00pClJoUfKSyRD/jqRq9EEXz2/4+Rd dFWqc+A1e2DY0YIL6vKm/2DJxG3C0r/E0Fa1RONjrm5xKdtiklFrAnDf5raZ kpI1DwdJ1Yokr25ffjNgTo7BbMR9qly+4s1SGdBNXPCrS02o8OWgDPyogDsD X8vt0L+bVbGYZMz6O9gjJhiNsEDl3AHfOtfJbOwCk+N/rF2idout5+/I1ZrT GzyLSKqcjNawHCe9f7BmuWorzofojcaAYwur1Wv/UIEHiOf9+lXxGt9fjUjN VaRtX7cnFD0a8szgb2t28z7Mc0xyyJkaJUtuupmqM7rYLL23/9nY0Alz+n/x ad0f70rludnSfyZ3//jjOldTaIeAFljJWwxdjsdG/VYUL/d5sJKjOJ6lNT2/ rOK5J0zIrDgZgDWznDwtav60yW2+G7jjamjg1ZPjf+7Q03sLEkfkk1o1aUvn zJ2/bPPC2T4Dpq7LtSLF5HPi7/829LdFq7ctXPLvkv03Tch/h9eo3yuCgL5C WQkPqLHXN5Qs2TTcvop73OWlxco0jaB4deTpTyQlDkUKXVVIANSPq5WQLA9U WtOul/mo8spL4fbVfjh0Rqz/htKlm99R4M8rRrf/qvcMoRsHu3Ij2tbt5nMU HU3v3rB+r7m8sJg8wjbvzmVbDUVtRMK1NciAR/b16726NW73+zZ0sODXNvXa jU9W21aUN9rXahDX2l31e75Uav/ojVNBn3LCDpb+pO5NFW9KuFihQuOrqYTR oNWYLMEHZ1dp3T+XRb903GILeV9fwjXvxct99RDvnUoNa1u3x9SDgmytKfHJ FyH2vVb/GtSiStc/cF+r0I02s9/X3+bvwuUY3l40jLFf80q95p3HbW+/5p91 nobOpIThKs4em3OgeNGM3o0bPKegShR/oSUj1gpZIUa0q+cwPn/ZjtqCDpYP at64zwIxMPfB9vIte8hwhyorrpzsKF5SKE9Z+OmSH7jUhOqlPlpyNR03tlb2 td6Od60qNuk4bhvKnsFCiwL695D2znVShwPp4W1rd//zNC90tCIMbFmh51x8 x2f0a/XdhK0kTWaqDFar5pcWlWecy+CzA4pKim8NwfsDin25wj4OlHDLDuM4 pbdqlyp14Il4m1G4zeaZBcYmC/hY8smOUFxlkU3m+IulStW55NqFW2AlD0Pp s5ruzapN3ROCGsPU4P3Vq38dpOQYzjHsyyFX1GLRX94xVVKkws67UchMddjR Dz+qfT0HpZTWt1m9iUv8hCjNP31dwWtPKDraO6177R+80EHAqdXLz4WJNeSt N3TAlycI6CuUlW2IZH2pUs3vKRiSoY0sk/PkZOkSNa/n8vF+iz4p2fyhliNZ VoP+8aa+LcoMWnYNNVP+u/5t0qBGwzZtZ607lCts6RJ9bV2pUs1wq8VxS0e2 a9rzDzPHaXHTQA1vU+fnaSdROfdtUq7vrDMsw2gMFpRW6Mk5JWu0TOT5pBvr SpZsHqRiLejXy3Levb9uNWINlqT08Ik9O5StUeun30ZfepQl7udiFAWU44T9 Rp1SaVu35x/HWJY1cVx22LESQhak19cVK/lpteo1qlarVq1GzSpVKlf5cSLy Ggia1eflvdldp7yXKV33XAKKkB3auk53H6xBUX6rUYOMzCOQU8FZBnz9Wb/Z ZzmGURpplqE9e3zVetR6h4AiC1HDp1dnrfz7z37dejVr1KBEsY8HzcfNaf+m FfrNPoMu1JpplLoKm038imPLC1QLgf2bVXpeQaE79QJL2oxcJwooKg2H8eIl eWU7fDUnuFo1azfefydRrZB6dGzQesQKPL1E+CE4F6+R42iOCzu7sGSp/DVh 8IprvLAl6+u+He9UVWzeapTt6chAsSaGM2ZGTHLUybAsobStw9si7TvCMCy6 EQzNTuvbsuVwoce4S/UylarWqFatStXqNatVLVeh3NLrsoxbq4uXaBamx9sT 4J0XLJQGqzEuse6CgCpjr9UqVWoPyi3HiTZ3m4a36hv1Q42CYltV7JNmSD+t NG3i2IwHB0uVqnsp/xhoQZU8FvdVnFkytGqbkSiZHdN6dxyxjHKdC6cTBjP2 zx/cuv9cdDbFMujhpGjR2qFGfuuUTpU6TrAK/b2oFHs2QbfjMjpZGny4ouQj 763BvLj7Eo6Edp76C3zHCQL6CmVl/32VLv31Qx1vIQgzy0tvbipatFaQgU+9 ufajovXvqXmGoRT4p6Tr8nnJcduDbc/eeuW1Yxua1CnXxXsTjuQqenRvJj72 LxnRrlmfGSaaUuEZmUILMBW3AL81q9jFG7fqCg2eQHJnr3eJeh2R4yP1X4uu va/GwygI3r2aIUkSp9bgn2Ts/Rm/d/uw8ld+cRqaxR2MosuzbKRrKshhnIYf 1JF+ZYcdQS32DTmfdnN18fLf3MsxyRXypCx5hkIrN1rzTSIq/ek36GncYrXl vVjxutdlKH7GWUBR+xOkxnM8hC61ql299iOFzdHiJmhG/5aOSUR4fgXDW3Vp Pdo0rteq3+ZdZ5I08hHt63WbiqvZIHv21QZCS4o7u1GDW1bp+kzgEHtggQX1 IkvsHqirgLqW7ch1KE7anPZr83p1a9eqUrnat928QjNoEo9F2p9P7MVroCmC ZaOvrClarEGBNUFLsK/1dryLVTHv6ci+PLK9Tn55MVaLqsqQ1nV6zzjJs0yu Hm+jN7pt9Q4T9+I73qJKr9nHjHp1Unp2SrYyW6kxsci81agw76pQXmiVmUJ3 XNjXL09AVXHXkYDuDdWJHqhDQAd+U2Bsa4t/0iBQwZOUVcew6qhznxY0ieiZ Sl7vpgwP0WrTbtet2ehWau7I9g3+vpjs6jByeoZnKGWPZrUWXkrj8Bg+v2LE t9W7zqW43K9KF5l1PAplWcfwqnjf8kVK7w9TI8VHyd3ev+ADSfl9j3PRc5WW tK1g/VpWwwa+AYKAvkJZ2QaeNhUrWtcvxVbV5/ZtVK71GPTrpdQxzStIhi29 IoaH+y4vKql0Jd2qzYkLScgSA6+vH1G0YTc9zyf6ry1TtsVdodVaN7ZTve89 bR1GPDWqY8Me0/CEluP//vZR+RZPxYaB1w9pVq7tqLUo1Zgra8uWbRFsb7Wm 9mnRbsxm9OsLe/wgx9bvZGleUTL9RCw6wjusCX1e68flT6X3n8dtLfaj42XK 1vdL41ldQrOyktGrb4gnCcNttlkNtuGhW1uLf1z3RBTpyHv5NmPVggaN7NCw 1x+4QYu+bDOPxPNr+P1zehep/H2aeAEt79mkQqeJ28X3QMU4kwM3SyT1I4Tv OXVcy2qf9p2NvZ5j/wwsUsGRfT5NpkRN0snFv33kEqhCgaeWDv34hQX1XEsm bBNyQqDSyGe8WLbT+rRoM3INOriwYnDLPlN5+1MKz+ctg/Bs8RLq+K9da0Kx DypfSkFRcjqKe423412riqi42o/ZyNoHuAnK/CgiLNdRJytIfI4noKOhbaq3 H7VJDFVEnSsmkay4hm/L0UVDildsFW2yJY83c2dxYTYrJxm+/KoYaNBqM/BG RvQoVN+m40cOVbx/vbLl9ofp8tl8bOHgYvli43iL8mmDYpKJW4LEwHsHZ39U rNa1VIZzHgMtoJKPQ7EbCFTX2AWje/YZOrbD9wOf6HiKc14NkkGPZTnhJ5p+ 2zdJ6JrOCD9fs3aji0kEpwquXbzEsTjbZgvTf/6i3i+LGJ7btHOXVOh4/ndQ y6a95qP0CMp6cc+eg4FxeD8m8EPfB4KAvkJZCb+vWP/tJcuXbNul96Spnr91 b1e06hcnn+bSLJ6g/vjiqloVSvw8YqKPx6jKJStPXnsBFdcj3zW1qlYdNH6S 56TfG1Wu5L0Jd+VFXFgskdS8LRfbt7XFJaV6jZoybwsSDrZf41Ltx+/BbQGR O+WnJhW/6Ojj4929/Vd1mncLleGGKsJ3Kbr2jsrWao3tWKNh/5WoSZn0c+Mm nX708vYa8GPr2t/0i9KypDBIZ7AyFJ6Sui5fKh089okttuzBPonk09OxeC5i 6IWNtSqW+mHoeG/PKd//8OOsY3eR9qDGR+wzjLy0WlK6XJt2PSZ7eQ7uKeY9 B790wVv7Ni7TfuxOdPT03CLRPIbD7+Ob5dFtG1ep26aHt5fP4MH9vqpd5bth q6xiG4uaCIY3KWI61/v0my4Dp3h69+/bt275Sr289qEGzapLH9oeZ3+ij8/g X7p+N/SPLI6njelDXAKnIz3gqNzJLyyo51uyUmjALM8abyvbTjUb9VmEDlLu 769RoeKwKT7T/pg6fuLk2auOJ+vx7q4FFO+mIxZ0Ty+sqOlUEzzX+1LCi5xC LXoNt+MdrYqdan7efxkeAyUoPXI/ad3kXl861cm+4Vr0JenR+/OKteoN8Zjg 5T2hfqVP2k9cbRLeDEXusudPzSs2/X6cl/eYEUO+7jslWnjnJPDookrFS3Ye hgphUqsvm629mYjuea+GyLbd6Ftl9KXSEsm2YK0ooOhWdrDbnC+2KBO28uSq iUWKVvptgtfkcWO6/9i6XJFaZ+Jxj4TDAy2okueiRzCthbRyfNLdAx9LJD9M 24VEUk+49N8iWy+uHluucZe70qTQ66d+7tF166043K1sVU/++etffbYlJydv WDKh5c/j47XIvLTuLZsuOBoolUb9MaDjnK2B6HqLLq6+RFK000QTfrGIBj/0 3ScI6CuUlTjL3W91pSY/3o5+sGDmlIlzFt/PNIq/Pj1qAVBLm3h/zmxPjynz LtyR4QdmkiU4Pj4ycOYsT4/JXkcvhxGC85KV8GDh4u1JJjwjArWEt/32T/H0 XHzoEsnyx3eu33clksSNM3I6LCcPr/GY7Dlv5TmZiad5zoyuTXzwj3CtheHR aRcOb99yJhi1YCaz5uiB1R5TvGb+vT5BzVFOO6ahu0w9m8plnApqVFSZkQsX b4hSMagmoNNk6SHz582aMNlz13H/XDNhooWlZkisF2lRdzafvJqWGvfPDM9J cxeJedeSyAz2+M4N+/yeoggz4+4vXILNEybqcyi/Gl3Oqn/ne0yacf5Rblyo /97Td8zCe+5CtPiE3MTw+T7eU2YseSozBfme2e/72Cr4dzSHsr8aWTJz2aEo uQmvO8cWEIg8khcX1PMtCUTZJ1n6WePtZbtt86n7qA18dPnAL117TprgMXrM uMmeXu0a163fw1PJ8WYKL26QV7xTPJce9hVfOE1JDHKuCUbX3ev+v7fjXa2K W88+sAo3F7tm6KGF0DnqZKKaFeY8W4f80Hj4ijPXzq0bN3HK6nM38eq1NF72 QeibJS6c2oEyO33u8gfx2eh26/EYLp8UFzR3tpfH5NmHb0SoSYZkGXzLLkeg RLXypBVLloVkWEl8K4Vwu835Y0MNnRBbwHXfSVM8Zyw/mWXSH9mx63EORYo7 8D6/kmN5JWkNRXPW5OaVPl16RZwS5rinnBa5oywxvmeT78bOXL127ao1+yOz 1Hmery53x8ZVy1dvO3rjgQH3Y3AKneJhRILv1YPLV686ff0hIYyBWhnm4t5d BwOfgAf6vhAE9BXKSpyk57+xbLmWYfa5nfgVdft8V70gBw6I68mIL6Q7IL6V L85bJIS1DgxUXseggc47MApv/DlgYW3z/cz2a8XIOfv5JjbvZCvH518T5rmp 8Cb7JcLyBawlLxqX9V3zzLZ/68i7c4TOWRPSZU1OW5OK2566GsbZyxLPQaUd htlf/Bchvh3/vMAXF9SLLSnQeOey5TlTty9Leh5JdFx7cfGgonV+ysRvZTKO XdEdxfu8mvAab8c7XhXzcupaJ7XC/J9RHRv+MvO0I1y8p8/eR8a+ojsy3poX LGxo62SbeE8p4fgFNufFJjzeiBB601124H1eJXeEPzwyq3K9n6SEMAc7726y eDRX9/S7Vp0f26+kBPUU8+VcDibBMBPrugkvlf939NabO+DLEAT0FcrKStP4 sX+ZRFIzUMGSNKWyUPm22kTPjVqC0lho5x0/7YGUY69M9IvTEnldNHorjb4V JyToXDbl5HTiV4TTqnqu1+JNP+2/U/vJBayn+qJUxAhd4xetzfdDxl/hHUuF 7BC0c94dEeYzTwjhhAhp3BCRBWwYahBmV4pm6112FHXOPvfSgQUX1AsseZ7x OjzRl2Y4Ztv8UWWq1f1t9LgJEyb+1qd7pVrf7Lwey3L5lqETi5d5QU14Xbfj Xa+KDrrUSbwKn72XdS/H0io9oXVac9I1FZfa5ZSX/LfMiO8plbfiYsE2066r KTKO+qNzKurnVXJUVawsFxd2yXvs4Oqlqyw9F4nU0nHrsf0ko5JnrZzQvXLT ntE5ch1hzf8bFBLSCjNs7fnFk4qFfXhp5+crmIX7fhEE9BWI3AGh20rs5ROG wN62ScD/Ojmj4JcF3zr35xQvj8meMzceiMbv8r/Vu/9eVkXseeFe1l32Xtbn PFq8a0TyjayNCjrnMcXn+L1kxv6CmEi8oBDLB1w+MXfeXwsWLtlxNkDH2pbm A/7PEwT0VYsrX8cgsDBQ77Tag0vv3Nvje1oV39NeSnH/AhEFdMjTrv2xb9ta 4BsjCOgrl9gzHYPAwkDc22ahnuk6fpt8T6uiay/re0MDiTt+n9e/KnTG4r7i 9zFrQLcJAgoEAoFAoBsEAQUCgUAg0A2CgAKBQCAQ6AZBQIFAIBAIdIMgoEAg EAgEukEQUCAQCAQC3SAIKBAIBAKBbhAEFAgEAoFANwgCCgQCgUCgGwQBBQKB QCDQDYKAAoFAIBDoBkFAgUAgEAh0gyCgQCAQCAS6QRBQIBAIBALdIAgoEAgE AoFuEAQUCAQCgUA36IaAaq2MQbgQCAQCgcBCS/2rCOjeI1hALRRDsjwQCAQC gYWZVpan2ZcV0P2CgLIMwwMAAAAAUOjBcZz+VQSUAQEFAAAAAAAEFAAAAAAA twACCgAAAACAGwABBQAAAADADYCAAgAAAADgBkBAAQAAAABwAyCgAAAAAAC4 ARBQAAAAAADcAAgoAAAAAABuAAQUAAAAAAA3AAIKAAAAAIAbAAEFAAAAAMAN gIACAAAAAOAGQEABAAAAAHADIKAAAAAAALgBEFAAAAAAANwACCgAAAAAAG4A BBQAAAAAADcAAgoAAAAAgBsAAQUAAAAAwA2AgAIAAAAA4AZAQAEAAAAAcAMg oAAAAAAAuAEQUAAAAAAA3AAIKAAAAAAAbgAEFAAAAAAANwACCgAAAACAGwAB BQAAAADADYCAAgAAAADgBkBAAQAAAABwAyCgAAAAAAC4gcIooBzLs6ztmKU5 9s3miGM4hn4DyfAoX9x/Px0AAAAorHjnBBTrC2UnjZJ+6QvZNyJM/2Wg+4E0 /VXzzv+vZB8AAADeH7xBAeWw68ex//nE/Ne9+iUvjI7KDjEnJYofLOF71Xcv CIevN5UCU8ZFR2f5q/w20wVq3bM55dwobUF2aZU5+jZlohwBAAAAAHi9eAse 6PMEkcUNPZlwQXlqnvyEt/yIp+LcZktqunjNs3Y7OWgc/qyLUl/ZQJro/F/l fRT/mrP/kUSPbEAYcEbU25smLBgkSk5BMRdof0EnOEKeeznHMyT6zxI0JW5E RQvhehVvKxbWnKG7+XcuyvuZfyyybEf4C1PJl32cEfLpoujukqxzZ/H3jlvm juXcfy4QAAAAKJR4EwKKm1/sfubsH2sIO4lDCups5BisFLpTvWIGlcg+5i0/ 6pm9qafU+5O0TX9ShKAjYjOORzAdbb4wzMfi2JjE7fGjSplUTqmytHPswl/8 zxq9VxN0lmXwB83B75NXeNgFlMsbG3U5zouEcw7MdwK20DW5vDMdHzkiZJbU 8wvC6igZ+7U8T4SuS5pSNH1db5T3nN0/Sr0ryo7uZPl8Ous0silGW2D2zVLt jeWWbIUtFZdCY/ML4vMsdz5+wyPFAAAA8M7jjQgo7rnN2TM85jdJ4qSSxghf HPiMhooCqj//a+L07g5lonPupEz5IHXHUkc8YjhrUTMmo+0kluZIo/XRisQp NY2ZSsak4Zx6SBmTmjFbCjJKENADHZKWjXX2QDmrgTGqX5Ab1qJnjBq7IaKm 06zFZgxrVLMkkfcVb5c/xsLo5Rz2Df9JnNjARUAFBaRTjyUMl2RfOuxIiEo9 KB0tkV06I5YOToUwO6Vii6Kg7D+j7OJVhIYxGVyseoHldrcdlQZLkC8oEAAA ACiceFMCyumC9iR4FI0fI0mc+Ikx4iIOd9VQm4Ce65/g3YmkKI4hORoP4ZGP F8aNKmrI1NtO00fLd/dInlcjaXr9jA1zrDrczhsujJFOLJM4qWjyjOrSGfX0 0hyeVmj9ZmYs6pAys6bUu2rG7hVYVAWfUXu4S/KqiaI8aPbbBRQbKdec6Z80 s07ynzVSF3fTPLxvG7flxV5Snkw4l7N1QOq8xsl/VpX+2VEXG2PzaZX+aXNb 6+ODlHt7p0yvmehTLef8AVucgkybg9el/VkjaVr1tI3D5Qd7SH2aERZb6dv/ 0op1NaWLRgpXCROohGcA48Vf4zwaWs0sPkl5M23u55rQy8odv6BUpNOqZJ3d Kd4Nl+z/WVefouWNQUleZbSxGbZCM8TId3dPnl0t+c8GaesGmzJybOHKGwVb LvibZPLBjCVfJv1ZK2VOw6x9f5M6Js9mAAAAKPR4Q2OgggwZQo8mjC8SP9pJ Q51aYycB/Y4SOi4Ft4vlzY9Sxkmy/S7hkyzJWX9XTl4/xarKYdTR8uV1klf5 IFVELpj5ztQEj/LGLOSZqjmG44yxOVv76cIuo49U1uUkD4nM96yYkGZfW+mS 3/MLKFKra6PjJ9cxpicwxhx94F+akGCH5aKdxoD52ftnWpVZrCVXfaRT3OSm VpNgqPJ2yqSPkuZ/rwm9ypg1plvTYodKtAlZYnKW4PlxQz+Q37qMvGZr1IWs f2vHT2nt5IEK8dMJqRMk2deu4eTE5wrklnIsk3IUPXKon8TjAMXt5AmSxHkd tY9xKsTT7YnDJVnnj+Jons2+6qZ0QhFNVCqOikjL+quS9K9B1txc1piiOvhT 3JRGZjl2PFllQAGWx2dgy8zxaX9IMg6vpo0KSnZJcWYRaXb2TAEAAKCw481N IhI6Kg2hx6Te5bEfOqkkHg916pUtSECFr9isjKkfZBzYjA5NV4YmTO/iFGl8 is9nhkwdOrKGzk3wqGDR2SLLN+1ItbN54sJhYkqa/R2Tlo17VkDVu1smzB30 kvLAZl9IHC9RhWNp45S3kiZ8pH4cb/8yM21KEdkl4QmBzkj3kqTtWSvmEP0h H81NnNAwT0DFcUb1LanHR8qHEThMHFoVwzWBSWM+yL15EwcobiZNLKaJyRLz h6A7+n2cV3uKxh+sYc7Z5znVraTJxTVRKbjQ/MfGjalG5HVj07K5H6fuWoEP lTcLsNz3gpDctcRREuXjpJcrDwAAACh0eHMCivsz8bUZKzsljCsSO0ySufp7 jqFeQkAzM3w+SD+0HR0qt36ZOKOl4thk+ZGJ8qNT5EdGJI4VHTSOCJ6JFMSs EmbIiBpEZGmv/CXb1DttSUPpxE+kS0aKtjuLptMxR2dcTPEuKv2rs8r/BGUU RgOd1VQ4tiacl+8flbm6XcrcCrG/F1U9fIS/UdxImlRcE5eJ0kXlyTPI4A+z zhzDX8nOJ44roolIQXnnKAL9JR7MTJzUKL+AagKk4z5U3A/jXySgKBUkoOk4 FcqKorIE/ZkwtoJJRQpzk2bbsy+UHRLQScXUUbgLV7GpYeKSsUJ5UhyD5yDp TnaP/6MzTkBTkOVnTwjFbtEc7hI3rkzW3jmG+Fg3bzoAAAD87+JNdeEKg4gs k71zCHI/40ZK0pe1ZQxy+1fC/8/rwrU8SRkrkfldQUHyDQ0TZ36rQNJ5dJL8 qKf8qJfi/GJCrkRfESFzsIKoxRm/PKN8mDG7SuKsDorLG625Seo9bRMW/Gr3 QAsSUA6Pt7Kax6rTE9OmVYqfWEf96LFgFmv/y+ov/R4/plTmDg9d+G0q+YTU o4jy4RM+T9rSeFFmkeJ7IwHFxcUmH0mYUEQbk4m/ogWle/Cnq4CKXbjStMkS 2YXTwmOGUxdu6jFHFy72QFEq0am2qDiWCJ2f4FHRpCTzZ98hoNE43dy1NZNW TxYSonEhc6z+wm8Jnu1xhjU3C7D83Gn77WBNj7dkr+yYOOaj1PXelEV4OIEe XAAAABDwhl5jEdzP7N3DkHTGjZKkL23DGO1vWDjOes4kIuRaxo4oZkjHvZPq fW2k/454JgFsEhEyK2FCJbOGFbxaTnf8pwTvLpTVdob+RLeEeX0LENADHZOW jRGcPqd8UUrNoR/jPb+wGoVXLAXHmTM+TB4nyfW/ZzvHGp408UNliLOA4ldW 8wkol+2b8LtEGfIUT2Ai8AxYMvyfxEkNXWbhCk8Xyi0NE+YPyJtEJJSz4UzP uAmNhElE6AwkdsW1iXJcUlbsIBv9BsVPam4VZsgix9aefRLfVFFAI9OE/LaP nylMbGatrDA3SbW9aeI/Q3BaKv8CLD93Kl/5UqlXkycifRfmA7Ow3hEAAABg vLnXWHYPix0miR/trJ4ub1sU+BoLlX4FyVbarhWi3tEphxOGS+Q3g+3fC6rE CJN1w5fG/17c8SKkZk+rxEU2qeUMUtnCKomLRoqvQjq9+8mr97RJWu0lHFot cTdIte09ESp8YfyYKhaDOJdWEFDVDek4iTrOPjUoaF7c6I9UYcKopeJmsmcp jTDlVZChrMxpxWTnTwsG6nIWlpMumWh/UKDUhzolTPlGVD37ayw4fibjTOJI icz3oKNAyMSDOMTvjC0X6sCkCR/m3vC3fU1I07wkaXvX2052zT4SUGxSNB4D pZMOJo6QKILCxK+YnCvS3yXyu/dfbDmriTZFhzmMyZpTNP3wbuF6EFAAAADA eGOvsejv74tD6rmkVYHqyfPPWUjB65OMvcuEvk/bejjGW38mji+dsXWk/KiX bGWnzF3zBFnkeEtixqziSfN/yj3kZUhKo6T7pGMkaZuGyY9Ozdo0MGPh5wkL fhZtd1p9iDf4Do4dXlHz6D5SWcWm5tLpX+ce9JYfGZ/sXTL7zH4hYoYXV+Nh 9fL1TeO96uQe88rZOTBrQ//ESRL5nQf4lNzLCSMk6shU3iZD6WljJBnHhTc6 OeS+nU6eVCx5SU/5UZ/sHWOzVnaI9/jCYraVvuM2oD9E2MaUqeXT1/aWHxMW UvCsKDt1UPAcsWZxqoAUr+LJCzpk78Ljv6kzKiUtHEUa7KOlTtnXJ2bw+oCE YRJ1RKoYvfHm9ESPT2W7J8gPj0me9mnGwTXiswSnuFaA5UexiFsjdyR7lcpY MxyX85p20pnfWhT6Z2dnAQAAQKHFm5pEhJtdU6QfrRbeTCxoNT+Oc13K76in 4twmc1aG43LxJGyD6oHq/Jzcw56qu6dovdERIasLV1+clnN8tik9FX2kpJeV R70VpxZZtQSrvKe+fUhUDWH924u2GMl0zYW52rAgIRKaiDurOOqZe2iWITLE kVzeAaU0+C/JPeipDcZuoCFolSkNO6ScOVntt9ii0NkM5fS6KwsNsdH4EtF7 1Uk1F+fmHpquj03iiTTNtR1C57TrKyFimVhkBSzlx4ku8M2kyZ9oY5LNjzbn 7PNU3/G1F6Jt3NOW/WMzTVkynspU+y6ymSTMSqJz7inPeOUemWuIfypcJMpu SgGWx0WL8bKmVN3V+fJDnsqLO2jbYhQgnwAAAGDDG52Fa0/SzQv/w+Xcy532 8unmi+HFH18Qz0svU/+8xeRtAoqHNTWxmS42OI0hvzDmZ9bucwPwBigAAAA4 4Y0uJo93qPxPjfDLbGcmbN2FT8gXIQ53uopl8j7iZWztlrvsAcoJ8YiCwuVd 8uxCuOLJ4l5jwrd4rV37enfizKWC4nQxWJxP9aJ9xwrczszugeK1EaLTkJEs RRawjalL9vOZ5PStS9ZeaDm6xL291QAAAKAQ4J3bDxTwLEQBVd9JmVZRGye8 EcOCnAEAAMBbBgjoewO8mLyBK9g1BgAAAMCbBggoAAAAAABuAAT0fQIMRAIA AMA7AxBQAAAAAADcAAgoAAAAAABuAAQUAAAAAAA3AAIKAAAAAIAbAAEFAAAA AMANgIACAAAAAOAG3l8B5Vzxts0BAAAAQOHC+yigz5NLkFEAAAAAvDG8jwKK QFGUSqXKzMxMT09HfzUaDU3DRs8AAAAAeHN47wQUCWVqampISMjdu3cDAwNv 376N/qLj0NDQjIwMFpaKBQAAAMAbwfsioGL3rMlkevz4MRLNuwKcBRQBHUdE RFit1rdiIQAAAAAKFd4LARXVkyCIhw8fIrkMCgpCf8PCwqRSaWZmZmJiIgq/ c+cOCkcaihSWoqg3byQAAAAAChXeIwGNjo5G+ohU8t69exkZGTRNm83m9PR0 5JaSJJmamoqcUPRtQEAAktTXkuzriOS/judaCXOTAQAA4L+Jd19ARRlAZiAf E0knUkm5XC5+lZWVdeXKFeSEih/RgXgOklGDwcA/86qLTVFs/zsLDOcU5vJa TAER2L98NnLXF2rsH5/9Coc5kXf96AjJlwTvEk2+l3ecr81ffA6zC7S1wOIp 6DvnDOSBLeD7ghMCAACA/y1w77iA4iYap5gQHx8oIC4ujreLWE5Ozq1bt9Bf x+mRkZFIQ9FpyCF9mehZiqTzph25NPM0abG6OSOJY2j6vysZDqliWYuVYZ/9 kmNMWrXGQL5qxOx/spuhKZinBQAAAPy7L6AswzEU8nIeP36MlBG5n8geZDON FIrjsrOzkYDKZDJHCBJTpJ7ozKioKGwtzRiMBpUyOzUxLiFJliPLkqZmKXPS lFoLSehkyTEPbgXGaXmeMqiVuXqD1SxPTZflpKdk5qq1kfeOH7n6KCdbJsvK UenVmbLcXFlmjlKREBslN9CsUavKiImOSVOoNSqdVpacmZqZmZWTmatU0ywt vXPtxpOkXLlMpdOkJyZGxUTLcnJyVVraao3M1KcpCIXKko2otih0VrWZVGst 2RpCrrNmK805OkJnIhUawkDSBo08Ry7PyUiTJmVpldkqhTxblpapNNCEVS+T piv0xlz1ofOJwdmExkjIFOYcDZGiMKstHM/qH1+5cML3bnR6ak5OtlJvNOlV BoPZaDbh0pDGJUizsuU5OjNpMih1BqPWoJdnp8lUJpVClpYglWVnqQxWq0GV Eh+fIc+V52ZmyLJRPFqTJSXkln9oXHZutlqn1chTY6Kl2XK1yqDNzUpOVxoJ iuEpM4okJSU9OuJJmgyZn5ubk6ElYFQaAAD8r+FdF1DBK0Ti+ODBAySL6K/R aHzy5Ak6CA0NRX+RpAYHB4vH4eHhyNr79+8jDX386DG6UJWdee7U8cNXbtw+ ffTM0ePrt2/cdfH+5TOrjgVlKGIvr1y3+VpwTHpm4u1Lx0+d2uMfrUoIuXLt esDtwLCEjOyH1w7tOn3/8a1jG9auXnviyIGTp/evmbfzWmjQ9UtPUtWynNQQ v/2n9586dHzXliv3o+5HXD2/Z92ebSdOH0/QcZnBfls3rtx66nJCarT/se2b j166fHrrtouBKj0dHiO/GJC44ULCpksJGy4n7L6ZfCgww+9hxskrCdvvy0PC si4EpfiFZR26kf40Vx3iu3Pz3t07Nq9ZuvvI2aunD+3bc/Ds+QfhCdl6Q/it UwEPImVqU3BI+qnAlL3BuSGPZWcDEjbdzknM0lCkwWxQxcXHBF65cOTQ2uMP pOlPLl6+fuX8xQtHrvjj0jh0ZPWhnQ8SlXHBR8/7+R4653v+km9oZKos4da2 VeuW71rvG5GTFX5+09btu/dv33Pmyp0bvnv3rfeLzM15Grhn07INRy7EpiU/ vX/57L4jJ47vXXvRP/Dahbv3Q+MzjZQy/vTBDZu2bdt6+LjfxZPbDu09738z S2uEXlwAAPA/hvdFQENCQpCAIq1EAoqEEn10CKgopijk6dOnDgFFIosuJMy6 ZGl8qsrM04xZnRUWGZ6SrcrIjM/UkZROFpeUaWB41pAVG5eQnpWKxMhkIWht ZmjwzTiZ0ahSqgjWoEiNinockZSakZ2ZEvskPttkJUiWIfVmi8VM8pQxPSMx Rhr/+OG9iISktKys7KxUNcGztFmeFi/NMSHnVpGTLFMTRkWyNEdtRYVH0EkZ mkepuohUrVRhTJIbk2WmHCOJPOAkDcVRjEZrylRb0pQWA0lqslPCI6Oi42Ol srTUrIzUlFSZxsIzVjNJGoxmjiQsDO6uVckNiWp8rUptSFKRWq2RpEmOpYwk x1mMOVkJGVorbczNyEpNSkpKQ6VBMaxJEZeRqjVTJnVaekZqYkqGwmDlGcpi yE1OSYlLS841klatTJqUkpIiTVVaeEKXkZGYbWB51qrKjE+U6Ries1ppnrLI sxOepsotVlod8SgqSU5RZllqUnKaNE1pJLU5iRnIMWXyOp0BAADgfwXvvIBi sCyLBFHswlUqlc/rwkVnomNxDDQ6Otq5zeZeYnTPDkqnytaabF2O1Auza4/S mpudpSvo9dMC0/xflRIrev6wvvKoKwAAALyneMcFlGNphrSgg8TERHFwEyuj HfkmEaG8IOcUnXP79u20tLSXip/jmHxzcFhWriDkpgJmynAcq5TrU1XPG87j aCtt0JoNjOtkJOf47cnl01DHRFzeaT4tb5so/NyZsE6xulz7TBbzTal9TnC+ KbT5vyrgUufzn03SyfbnFBgAAAC8z3jXBZSyyp6GsQyNjETu571795A+Ot5b ycrKunr1KvorfkxOThZXJQoODiasVoM8J+CW3/0EuSrl8aO4iAfXzt0IDteT RGZUcIzMZJRnpyQ8fBT59E7ArUy1KTczOjDobnxyBkmQFy9G7XukNegN9x5m +oZkBcSoQmNyw7MJlPvgYOneu9lR8Tm3Eg1x8dmXHuTei5Hfj1fefSyLUpA0 ScXFyBIUREq66la4/H549vUo5Z1HssCnuXfjVWGxiltxythMvZXmOZMs9EFA wI3bgUG3pCrw2gAAAOD9wzsuoAiZ8REmFVbM+Li4gICAoKAgJJFSqZQgCKPR mJqaiv6azea4uDhxMSL0NzwcD4BmJkQcPHHozKUrVy4evXz/zrUDK1buPZNp sMTdPXX1ftjtq36+lw5dDYuKfhIhV6QFXj978MSRW/cfaM1s8D3p9uupvg+z zvvH/V979wHfRPnwATyIKAqI7KEiiIiKigrI0hcVGYoKon8HSzaFtIDMCmXv IVOQvctesvcqZc+20Kbp3mmbpNm5mfd57tI0bdNSImqLv++nxsuTu+eeu5b8 8tx4Mj0wZPbhhAvh2pB7CWlabbLWlphhvBwUueyC5o4qPfSu5s8rMeuDEvec jj18I85gt6SnGtIyrVdux284HhN4OGz+yaQTQbGrjkevORu781TUhqtpoQna xLgMU+qdnfu27dm2+vc/lh4J1fKM7R/eqwAA8BcV/wAVHQLP0nxhGEYeCFce yo90M8PCwqKiokJDQ4ODg+X0lMcpItMqlYouwgus1Wi0WFmO5xiL2WrjBVId w9gsRhK7NhvjPNzKWS1WUj/DMoLgYOycwcxkWXmG5c1WzmSnp095m5XMLzdJ 4Hgb6zynSnaIjRNYhs8ymOws65CGFmA4wc4KNoazMALHCWRm8mNnyJwiLwhm k4njGDvLcayVRD9tBMbABwAoaYp/gLqz2+0hISEkQ+ULitwHkz+fLUhCyuUM feTcz+jh7B4AwH9WyQpQucEpKSmkKyofy5WTlEzfuXMnPT1dvtbIlaERERFu 18GIubPPw7h3bq86xNwTeWfIN+3huiC3lzzOg/FqAQBKrhIXoDJBEEwmE0nM 1NTUjIwMs9ksl5PNIR1P+RtbXP1QhBQAADxyJTFACwpE1+0WJDRd39tCwpQ8 le8SBQAAeFRKYoDKPNwa6faSnKHBwcHyF23r9XpHwckLAADwsEpugBaObFdk ZKR8uVFKSsq/3RwAAHjcPK4BKiP9UNcwCwAAAI/Q4x2gAAAAfxMEKAAAgBcQ oAAAAF5AgAIAAHgBAQoAAOAFBCgAAIAXEKAAAABeQIACAAB4AQEKAADgBQQo AACAFxCgAAAAXkCAAgAAeAEBCgAA4AUEKAAAgBcQoAAAAF5AgAIAAHgBAQoA AOAFBCgAAIAXEKAAAABeQIACAAB4AQEKAADgBQQoAACAFxCgAAAAXkCAAgAA eAEBCgAA4AUEKAAAgBcQoAAAAF5AgAIAAHgBAQoAAOAFBCgAAIAXEKAAAABe QIACAAB4AQEKAADghX8+QBMTE+/fvx8BAABQzISHh5vN5mIboCaTidSpAwAA KGZIPLEsW2wDFAAA4DHwrwSoCAAAUCwV8wAFAAAo6RCgAAAAXkCAAgAAeAEB CgAA4AUEKAAAgBcQoAAAAF5AgAIAAHgBAQoAAOAFBCgAAIAXEKAAAABeQIAC AAB4AQEKAADgBQQoAACAFxCgAAAAXkCAAgAAeAEBCgAA4AUEKAAAgBcQoAAA AF5AgAIAAHgBAQoAAOAFBCgAAIAXEKAAAABeQIACAAB4AQEKAADgBQQoAACA FxCgAAAAXkCAAgAAeAEBCgAA4AUEKAAAgBcQoAAAAF5AgD6IKPIsefi3mwEA AMVLsQtQkSeBletH+K9FNgAAlADFLkCLEYE+WGO0h6ZZ07PoNLqhAACQ7Z8I UI/HP/MXCrSEUe3P2DlOs81PE6jUbPXVbFZqDqzgaZSJuRfx9DRvnWJhMz9w TpFuqZh+TNVDoQ2JpdNCQRW6bRQO9gIA/Df8/QEqBYooPLBQlGIya2ene/97 NmUrCdAhuQPU2VwPWyBw7rXkfT3nCLAcsu5PC5lTcAZo5ploZXnd/QSHK0Dd DykLOS0rYBoAAB5P/0APVGBM0pqyM0WacBa6ZZgcoIZ930aO6Jg/fkSbXrBZ XI2m0WXWu8cpb9byFmv2DNIDaxY4qbWMgTcbcmZljTlPpSpExuLMVcbIm/TO WqVcFjNPR/k8rbsX75AD1LlKO2/SOoPUrRGinSyuLdpeAQCAku1vDFDaiRO0 R2fH/NqIzYimJSSSpNTJPDIzZtxbTJpKboFzdjlA93ZV+X7I2KwiY6a5xlhF zk7Kucj1UT5V9KoEuWOYtfNLdcA3NB7tyfrDYxKmto4Z/ZLar1bC6tkc5zwa rNvUKWnjb6aLi+MnNIzyLR87+yfGaDIHzUoMaKT2rRC/yI+1ObuQus1fJKzy N15YnjjhjahfaqintjVGx8nnQHMFqNRCy5X58VMaRo+sEz36I23wJecmiBrd 7m+iRteNHvli7LT2uqvBzm4sAAA8pv6uAJWyw6o6G95TEd5DEfvrq4xGLb+i PTE/oo/i3g+KhFktaZ7mDdAuqmGf5Q0eaZ7MFW+pxnxJXhI1ByP7PKkNiaCv ZIWmLuuSdf0w6YGySYejBiiSD+yRF9Jv6RjR+5nkwNl2bSab9GeMn0I9olHC 2uG2NA2bQudM2rXBOWdgx/vdyyRvmWrPTBMMUZqFb4QPft2albcHSrcoaGz4 wFqZ147zJo3t2qzI/uV0oXS7TEd6Rgyua4pX8aZUw7kJuiuXXDsBAAAeS39b D5Qe7RRZW8bOkRE/K8hPjP8rrCZSd2YpfdpbQTp61sgLUt/NmTJygBr3/xTR p3bqVukiokBl2raRNp2NHjwlEWq8Gz1IkR58Rru2VfQCf7pMvlONmSsbR07u JpfqNv6fesK3rpf0G1uED2vjar1u7fvqaT3l8NZt+IhM59Rivqz+WZF68hRt VfoJGqBhcbScjYnzK5V+Re2a0bC9fezS8bSGVY1Vv/4P1w8BAPx3/J3nQJ15 QjI0vJeC9DqjRlSL9ClNAlQ9rJot5oo0S04CFhagdEa6XmuQv8qnQuTY1tZ0 I01VOUBtSfojE5KXfBk3vYF60DPq6T3lNurWt46aPUAUeQfPkJn1Gz+OnPg/ wSE4eI4+3fSxKuBbZ9SSOWf1p3MKjHTkWZs4+omEDYvpetOP0wANjaHbHrst clCZxJWDNFt80jb7aAKHJE58UT3te7KdXMLeGL+n1BM+yTyxnTXZ3LYeAAAe T3/zRUTO61FphvZUqAaWIn1PV3rmunq28EO4Due1r8ydxarvFepJ3aQLZOni fMbVhLE1I8e0Tj+82J4WpV3TIlcszuxDc0xgHbQH+n+q8V2E7Kqkp9/kzDmj t0i7w3KTLMkTSidsWOrICVB6DpeLWCcFKI3ONHqXjZ9m61j91eNyVAq6m5m7 BsUNrxYxqK72xk1pk3AIFwDgsfVP3MYiZ+iuUfd/VEQVkJ6OQi4ioiPpCfRg r00dN7Ky5s/VCaOfST54SF4qa1s7ld+nrN1ZiWF7e9W4zm4B2jd3gH7jOUDX tYqe40PbwJnppbasKtZHkXzgT1qSfjJq8NO6kCg6rT2j7qfQReoL21w2Q7fp swjlm3aTWODtogAAUPL9IyMROU90ZuyfYFWdcXhKT8cDbmORXtreTjWmA5my XRwW3u8FSwZNTe2aZpFTezhrMKqTJ9eMnNpTvl9Tt7FN9OwBOQG6+dPICd/l BKjrKZne9Ilq1MeMyRl25qP97veqZk6low+RHqh60DNZsUbpFS5jcT3ViA6s ObvN9iyRI0vxtoiTjNZ5lw17e3JEn5pWo3wvDQIUAODx9E8N5ec+wo/nA5se BlKQT4MGDrObHZx6RfgPCm1oNL2NRTSlTH5WNam7wInMvWXqPoq4Jd00gcOS lnyXMLmhKqCD3EbtH41UAf9zBahu5Tv3h7d1BWjOU3oV7ueqAS8mLPg+basy 5fe2kf1qaM5I3WTynzkkVqmImTeYsUiHjQ33EyfVU49tlRroq9nUN37821kR SQ6HVbP4XfWId9M2+mm29I/2K5eye710f+l/Z9hDAID/nH90LFzpztBCWuLI M5SfM0BHMGbBHrIm4+QWVypxKWcy9k1kjLQny6oPZwT6pe+catfbhIwg7dlN cg/Uenut9sKfrkVsd9Znnt4uPRVdT5191fWtoucO5jLvZe4anLZ1oiUlhZYK gpz59vD1mh2TGIur5QbT9RVpm5Rpe8aZoyIFlqVBK3K28D3ppLWbxhhD5Ouj 0PcEAHiclbTB5EW3R3nyL+WUPDqfbuOHUTP75nmhoAWKVi/SEwDgMVfsAjT/ 15nx9ACsQyDlXO7Zsp8K8iKcPNRtztefCVyur0Lz9NQZoOtbqKf3FskT3uqs xx2Z033V9LIoLnuN7uPfZjcDA+ECAPwHFLsA/WfJAaoPbB8zf4iUmh6ubgIA AMjvPx6gMjrsPGP7t1sBAAAlCQIUAADACwhQiYih9wAA4KEgQAEAALyAAAUA APACAhQAAMALCFAAAAAvIEABAAC8gAAFAADwAgIUAADACwhQAAAALyBAAQAA vIAABQAA8AICFAAAwAsIUAAAAC8gQAEAALyAAAUAAPACAhQAAMALCFAAAAAv /OcDVCRb92+3oYhKSjsBAP4TSnCAioLIs9k/nCgIf+/qBM5tdXSNf+/qAACg eCvBAerBw/fRBEa0ZP0NLXn0RLtJZNl/uxUAAOBU7ALU4wHVvIW0sylmhWsP TtBs9dNsVWq2jDbcuCTPmmspD7VlF0pdSMuZIfe7lzEmm3LW4nkph/X2uvTt ozTbfDVbfTVblJqdv0lplntmsfC1iw8zm6tcfmTT5r+dvG+n1HK+4GULbL/0 iodyUfRYDAAAD1DMAlSOMOEBhSJtgxCzKaKnInH1YBKgaRsHRPtWiN84U5Tn JJEg8DmLuxLCrVCUpvnkC5nHl7IM71yFawZaSfac0oRm4asRw5vQAA0c4hag zllyHuUJj2vPVa28OiFn2l2uZjgDNHVanaQdW+gk+RW4p6TIe6hEeMCviWy/ gOAEAPgLilmAOgRG7gzmShZnoSNXZAhxW6OGvW61Zi+YsF09sIIp2eqqSrQb ebPetYzzf4yJN+k8rVl0W8p9BmeApi99L3Hr+rzL2PQCJ7gWF6267Kd51i6X yFvhIA3I2T6bgbfltNnB2wWOk9pp4M1Zbg1jU2e8krQzUJrHefpVsGp5qylP k3iTVrAzHrZPYOPj41lnpzanXZkp8RkGNncZAAA8WHEJUNrVErRHZ8f82ojN iKYlAid3ozKPzIwZ9xaTppKbKz3KAbpF7fuqK0A59crIgc+b0230Jd29jO29 4359I3pE9ahJHSxJqVIQc6YzAVEj6kWPfCF2WkeTOorMyYYtVv/SzJlgjEa7 vVfMmFeiRtaMX6S0Z5nl/qMzQJe8E79uobNhdEfQkGJCFkWNfceWxZAZmdDF 0b82tRvsgi4079opc9qKjzV/rstY+3XUL7XUoz4yRYcaz0yK8X8tckiNtGN7 5K0gFcYt6qU/MT1+UsOoYZXiF/3CGEQpQkmA1nMGqCA67KkZmztFj30haky9 xG3TaGiLIp9+NXn+x+pfXooZ82rqjmW8dJzbtdO0sbePnr3O074pfUETE3b7 Xgzdrshrx4PuiAUc4AUAgIIUiwCV+mNW1dnwnorwHorYX19lNGr5Fe2J+RF9 FPd+UCTMaknz1D1A43eqBz+XtEY+hNtdPeSplMP75aW45JNpm0dYU1IEU2za rJeiZvWnCyXvjhxYVR+dKFjTDWfmmGPiHTSw5qsGv2m10MmMP95SDWtjSYgV zHFZJ9cyFsa5g5w90MZxK2fwFh1vSiddVJH0E+kLjGb+i7HL55IZkidUSTl8 iK496Viutc8eKFVgS5tfJ2J406zbF3lLqmbBq+E/l0/cOIPRZ1qvBKj6VTNn 0Ohnw5ar+jyRuGGKXZvBp19LHFM5bvVcaZtsOQEqWjP/aBL72xDWaBQM6uSZ 9VMO0PzN/P296IWjecbIxu7Tnt4i9XHpmgXp4eb5k2rp0wV5ZtPFb/5j9uaD wVL33nzm2FGN7W++hhkA4LFTLAJU7uixtoydIyN+VpCfGP9XWE2k7sxS+rS3 IuqXGtbIC9KJPzkW8gSor2bTkKR5H6XsXsjZ8lZsvz4x0q8xQzq4aQfUg2ro 7tzOeY0E1r1Fkcq3bKS+9MOR/Z/NijV62kP0f5lrWoX3qxgztk7MmBcif3lZ d/e+XIWgORY77t20nUNiZ3wj9QTd9o+89qHvSodUuZTpdZL27JRfsV8apRrW zHkoVoyPH1E+41qIgwb6gkjfRq4jsGzoDJXf23Y7nUyZXjdxxya64Qm7o4a/ YdHaRLtesFttl8ZETelCyrWrmkfP6s+as5cW3Q7Xsvpjh47r5ZO2rO7gjt3B V84fPXvZTl8Ub184dita73BGLQAAFEnxCFCH6xQkydDwXgrS64waUS3SpzQJ UPWwaraYK9IsrhOH2Ydw/V61ucJGSEsKqJa8d7v8zBayK23lT/FTW0cPrajy a2Wz0qSwBk2LHvli9KQW6cc2yWHBhC6IHPImCSj2ztRIXynppJimt3nmvogo Xw+Ul1pEm2TY3fHuFwpdRDJtmHTYOffaW0qHiEmAki7kFnrhkCjaLo2IHNua ZaVrhNiY+DHPpV+8StsT8lukb2ObhfS1SQN4IX6H2reeOZ2sRZACdCOZx35z dqRPxegxL0aPrh095qWoodWj5w+gm6O/k7aotXpknYRlP5tjk+S2yzuW0Ucd PhZkp5P8jXMHrqp0DnPMvpNX5C2Mvn3x4m16QBuXFQEAFF2xCVDaFvmqVJqh PRWqgaVI39OVnqLgNnCBM0AD1b51TSkGkbEKFnotjenA99EzepEJy8VxqsF1 UzZOMseqbaEL1H6NXdfpiEyG+fKi6BGVEgOXOKRDuHKAcvfmqXxepbMJnMi5 325ZwDlQ8ihdIiuaQ5NmNI799bWkbcvkBSzBE1VD3Nbu+47VGaB1ncdgScKS AB3dkpW3iYuNH10hPfiasz1+NMdF3kb2Bxe+JNKnntVAWsCnzKiXuG0dPdl6 e2bksPdtJjNv1PAGDW/WC6zd1VwuJTh9bXvV8LfNKTrXxcbWtPDDJ4JJLVlR V+YtWHTqfNCpQ7tWrt1wTToNmhBy6dz1cGknI0ABAIqqOAWoIydDd426/6Mi ymN6OnJdhZvTA+XTk8eVjVu/lEymTqmRsG2HXGw63Cti8Lt2EneGcLsmSS60 nuyh8m/voIdwf1P7vUsrsapi/RSph486a7NlCc54K+QqXNpU3doWcasWCrpb UQOe1IUnk5KUKbUStuesXTX4PRvNNy5l5qvJu7c5q788Wu3/UXaAxiX4V06/ dN1Be8SLIgfVs2idQZa+9DX1jL7yKdSUaS8nHzxCG2S6FzdMkXrsZO6G2Jik 69lddGvcUEX6NekgsxSgpAd66OgFMmVKj78cdJY4cWj36vUb5QCNvh0UhB4o AMBDKmYB6pDOh0oZun+CVXXGkT89HXnuA/WhAyls6h83pk7UlM/tWbTzaDzS P3JI3dRNg1LXdEuY+oGqfyMb52BDF0b9Uit5o49mc++Y4dU0p4+ROZnb08J7 vyRdROSwXZ0aOaBcwur+mkCf2AmN9fcjaGn27ZI594FuGawJVKYFDqcjA4Uv UA2obko1kBlMB7+N8G3C2BnT0b651j7wHQutn0sa91zC5nXyFljPDwwf8kZ2 gEbFDlGknaMDQTChy9SDy8XN/TJtqzJ5QcsIvzdNCanSkVgufeEbkWPb2PS0 N2u/szhKWT5hJWnqkPiZn2Vcvkg6vmkL3oyZ/pkm0Dd5zgfRU7qwVnrg15n/ rP7Y4exzoPIuTLu789hFefL2hWO3nedAEaAAAEVV/ALUkWvwgbyDKjgb7cgZ ichXGonIVx98zH2oBXPQkrT1yqyr50Rbsv7EWpaRYiTpXMZuZdomX2PodXk+ XnM588hy+c5L8h+XdjFzt2/a5rHG+yFS3y3n9o5cIxHRAB3BmDjr9cW6Kyed 7RQ0uv0TLSnp5Jn5wuLcaydlgvHCQuO9EHm9XMLxzBNreLnFgj7rxExLfAKZ ZO7MjRr/mSX5cuauIWl7ptn0Jmlz6Xxc0pX0nSNsOoPz2lrdlcy9Y9I2KbOu nBBY6dopPst4cV7aZt+M/QtZa84oRrmuwhVF8hsUBMGuT7mnjuPoCV8LrsIF APBCsQxQuWWC5/QsdJmHGQ03/yB43obIo+u4sfcWq4c1sbvvY89jGz5MU3Pf B5rnfk+N+jruAwUA8ELxDdAHyvVtLKyYZ/A66ctT5Etec745JXsR9zH0cn2v inMGzpH/u13yfhsL6yx0Hx6QFMox5HHtgttXxoi823qlBaUK2TszpUPKUjM4 Nld6Sm1zHwmQfgcN3XBXU8XsRnIeYtd9JCKHcyw/B0YiAgDwVgkO0MeM1Knk NZe1R/7g8FVpAADFHgL0vwPfxgIA8AghQIuXPIeUAQCguEKAAgAAeAEBCgAA 4AUEKAAAgBcQoAAAAF5AgAIAAHgBAQoAAOAFBCgAAIAXEKAAAABeQIACAAB4 AQEKAADgBQQoAACAFxCgAAAAXkCAAgAAeAEBCgAA4AUEKAAAgBcQoAAAAF5A gP4VPMfxgpinUBQEUvzAZQWe57AzAQBKrBIdoKJIoopzDzCPiQb/PPLxgOeF f35ZAIB/TIkO0H+RFNL2LStnH72TQqbk1CZ9T/IYfeX4/IUbbVKB6CnMBZ6W 3jm6ZeWWo1Jd2KUAACVPSQ1QKar0UcGzl27Q0xaJUo8lV6JJ/VOWZUmflL6Y p7sqCjlHUEmXh87H8R7yThR5nnO+6lYorU7fur6i/6orpCaLzU5Ww0tHbv+c 2b9ClVapHK2YLEcaQvrFLJezLpuFzMyv6te6fut+UhErulVM28xxgqsfna8B 9NCvkNNBI5ULrnYXso0CL1XMuUKdvuo61Oy2IKk/T5vd9voDKqEt52nZzcO7 dx28TppNK5OakbNpD7dskY6HAwD880pogJL3d/IYdWCaoup7UQyZFOhzKdH6 rbpKppjcxwDduoJ5M1LInZpFOv7rDFDDV82rDtt8x7288OXc17Vt5NfNvxoh lWYH6IMW99SSIpXm2UbBixUVuRKBpftmRe/POw/ZVlATC1p/vmUBAIqvEh2g cccXVH+jrdpMOit2K3lgM79sXm3EllsO2lcSUtTnA/xHKP38T96MJSX6yKDZ izYa6Fs32QQx5faxZRt2stJb+c3je5VK5fi5mzU2h3vYkv9ztswDO5aQV6cv 3W6UyumrzgDVfd2i5pQ9l0/unu0zxHftocvyIsl3j81bs9VKnxj3bF4Xo8/a vWjSL3PW26XFb53arxw85Lf1+5f4ft78i2G0SApQea3m1FuT/JXKUQFnwqI5 gfaz3RtgoGvl96xbsj84kqxJ6pEyu1bODYrUyw02RF+as2hdliBvoyN7G+lL qgv7RymVv06en5Jll2eOurR3yYa90gcPhy3lzuzZK5PpK6Y9m9dmt3kDI+8G 2puntaiCHlDJzFmr9Lzj0pYFH75Rr1GTdqTZJ8IN2rBjW/48oUm+Nn6UctjE heqMnGWXFrrsyXCt7v7l3zdsswsOrz5eAAD8jUp0gMYenVflzY4Wt/JvWlb2 XU97oKozy5s2bNRf6TewW9fy5eofjDaxaRdrPVN+4y2d3Cea2aNFy14LyNTO qT3KPt+gr8/g79t98G4nvyyRnsqkD3Qu+/huzT9s191v6NAP6tX+dOA8ga6a F+UAFbN+/r+qDV5v3mPgIKVPt1pPPTV02TFSfGlFH8UrLbVkSkj/vlm5d9t8 2+PnAeOXbif17Z/T98mn63T3UfoM/OmFis+07j6BroT0u6QjtrbkG63fqfxl j74+/X5o2unnezqy4+3j3BrQpu9sstbtIz+r2qwHI22GNepg7cqvnEm0yWdS OX3Ia8+Vnns8XpS2cXr35q3kbZzZt2LVukN8/Xp++WHt+k0uqrPIq/snd676 XhebtN90V1YpFK9cpsXa/32Q3ebfd0jhK8hHjHfPGfB8tQdW8mqI2XFmy4K3 Xqr26nuf0RBUGcN2jKhQsWrbTt8PHars3Lx+jUbtI6WPAvunFL6s75nIjE3K NgpF6Stp9DOPpyPsAAD/mhIdoHGnf6/w/As9fXyVyiGDlcqhyv4vV3/m1+23 yUtZ+lSLs6XioE/f/ObXPWRq7Nfvfj16Pe3KWNRtXqsbGG7nk0+8UKvhZWcH zuHT+f2ZB1VkgpOPAItMeoZWfiklaFm16s3vmR3StULyOUjj142f/W7sXnmG W+uHP1GtWbrDEbb1l6rNv9TRMsM375f7cux2eQYm4WyNJ56dezhKfrro54/e zT6EK8ibc2SmolYz5/p4VjqcyaZnZOY0oFrTcNJ7y7zUsE79Q2oL+d2dWjyo 5fdjpEo4VmrzH0M7tO49i6Yrk/DF+/W3hNlFzdlKpZ5dfC5RrufXrxo27DiK RNGJ+T3ebNdb7g3qb26pVq35DQOZNHd571lXmx1Sb5smdeyJqk+Wf2Al1au3 uCRtgP83rb4Zd8C5Z7aPKVezSZhGfqZvW79Ct9n0k8aRuT0fuGzcjfPLN21H DxQAiqHHNUCJK4fWdv/qu+YtX69SoVynwUvJVkTtn/ryu1+SDEw4NO3lxp1I 1/X+9tFlazZQDh8+aMCAIUrf9+pW+2nGn2RZ6YIi6WhvVuz8UYM6fPJRg/o1 ni775pkEelCTdwZo1ufNKo/aESoKHMNy9qjDLzz70jm9I3LHiIrvd5QCVNex WZUxO8PoFTk8f3/X+Ocbf66nh4WtpPotv3zZ1HUIVyJYk0d1+eiVNp8OGz87 KUvumeVqQNmyb5yIZUnhyC5Nes48TCe6thqz5go9nEuvtyH7RNTd3PTKax+S nDNcW/NOi64mh+PeFr/n3m5P2sMxFjJX9KEZFeq0IEl1dkGPVz/uIeeX9tqG SpWaXKcBaujQ1NlmC0PXJfD08damYRXfbleESppe1ZFFOGXHJh391rHkU4Do uLlxaJWWX5O9zdrtvOiY8dOHLb6fQeY/NvunBoUuy9m5v/0vCQDAWyU6QD0e wlWuv0Ymji4ZVvGFeoMnr1BFa+f2+PTTnnPpy5bID1+teyDGsNK3wxdDV5Dt urF51DO1XlUO/8Vn0EDyM8p/3PFb8Q5pM8k7P69Xf/VuraZf/bRl//XUW4ca Vm14NCZXgH7RrPKIwDs8xzKcwEYdeOG5127YHKrtv7gC9POmlYZuvCG37foG 3+ffpuWszUpyZMfozs0+H0pfcLsKl852JLBfl08bNmp9Os4sWqK/eKemWwNe O6K2kGaH753yVschZp36o3eaX9LQ34h8G410VtTavc3ryy+lHpje8+thy8jM 19f7PldA9r3RtrdNunWWVe2tWqXJNXpQ1tCxibPNcpf2gQGau5Jml6Ut9/ui 2Ve/bOZogIo3Nw2r3PRLoyiSACUvTf/xw497LyETR2Z3e/OzwpZFgAJAcVai A9TjRUTDttDLYr9qUqPv6mvSvKaB//d624FLHdLVMNN6dxwyYdmg7z5dcSGZ pI1JdajOC29c0nmuP/bQjCfrfSRfzhtzamGVcq+eSaTlvOsQbpOKPReelBfZ NeGrZ1//nKR5yJbh2YdwdV+2yL6oiTy5s71Cqed2hhnl+f07N3q/qz+dknqg tKHpsfGZzo7nN28912PZLfPVpYqXWvFuDTidQOPMYYvu+klbX99+nfuNk26X yb5XRbrj48TSEe269u/5Tfs1QYmkXnN0AUdf5/xYpek3cuGhOf2fKtf0Dj1A beiUfSGWHKCiFMsFHsLNV8kt2o11DG3/dpvB6+Tym5t+qdD4o2T5iTGsYeXS /oG0fhKgD1w2/sY5HMIFgOKpRAeox9tYeq+gV8Ou8P+mat2GgwYN+bH7Dw1r 1vpE7oGSzD21/PnSihdb9c/knAvtmdmnXKU63fr6DOzXs22H3rfTpOqkwQ5s icHv13m24/9+9lUO+axNiwqKOkeiaMA5A1TQ/69xqbr1W/QZNNSnW6dnnqq3 +jg9f3ppRV9F/VbS2Txtq+zbauwsvcbnt0Gtnqpaf5BSOaRH9/q1y739zTDn RUTSXr23d0HjFxsNGDS494+dq9Z572ScVUy/2vilPA2wyhtycGF/haLMvP2h 8vHb7P0i9USzwlq99PQLLXrrBWe25rn+Jzg6iyylvXfgxTKKdt0GDB/Yp1OH NtWfeu8iTX19y1ecbWazbwXyeBFRgZVoaMSfXDL4iXIvdh+iPHAnTXV4Wtnn yrbt0k3pq2zxSrUmHfyzBOkTxf2DBS/7QrfBvkdD4tf5faxQPHEZFxEBQPFT UgNUugxWrw6evSTXQAqBq2YfvSP1dUTTgSVTlcpRRy+nxl49vnXveeeSfOai gAnrDl+n0/TyUunujAv7/JVK5a8TTtyPY5wnP533lWTcPT3Oz9d/xnatLmv3 6lXhGaz8khR8pv2B68Ijo1bOGav0G3/6tvMqmZS7R2ev2iLlnHXLquyBHZwj DLKHdy4kq1p37EpyyIkNuw65jrzKVcadO/wredl/QnB0ulxb/gYIPB2OwHI3 sGLtt2/pxOzUdO4YG0MPCI/q/E67EZsc8jALnu5AkQvvnzsy3E85fekeq0O3 ffGGWHo03L7ZNRiF282zHm9j8VTJxjiLHLvWo+sX+w72ORKhubV91Nvtf7h6 5oBSOXjqkj+lQ+7ONCxkWT+l8lhESur9K8s3bEUPFACKoRIaoF7LP55CYaMK POR79gMHKHio+uQbTgt6dcfYrq27T5Fvq8lbvyGsef0Gu8PotcVybucdA0Eo eJzBgnldyc1Nw2u07MLmFDiXedgGAAAUKyU6QAsdTF4ajI6l/S9BcB+cXOSk 0f3c65FHqHMfZS5nFc7B62i/lKdD2OV6lY56JzhX5BrE3n2EunyD2zvH5aNd X8HDt7GIrpa415bdAJZhSAsjzu9U9vyhZu0mJyIN9Ayl4BrfwSEyGX9MGNbu zVe+VC6VtyvPNrqPwufINYahtHWe25x3RxWlEnn/220W0uCrq/sp6rfW0p6z nWy6+z4sZFnpCl5RGsoPlxIBQHFUogP0v0YehT702Cal36iT0fT+ULdRcOUj xKm/DfcN+GOvNA7Sv9/BE6Vx8lPuHJ29KtAuF/zLLQIAeGQQoCVXoQmJpAIA +HshQEsckR4LZQs4yipyeb44phjI9a0rAACPCwQoAACAFxCgAAAAXkCAAgAA eAEBCgAA4AUEKAAAgBcQoAAAAF5AgAIAAHgBAQoAAOAFBCgAAIAXEKAAAABe QIACAAB4AQEKAACPH/nrNsLDw69evXrt2rVLly5dlpBcI+X379+/ePHilStX 3Au9WAUCtOhEd7lf4nkuz5eTFo7nWPch1j3W+Zd4aqkoCKxTkZr6UC16JLvl 8VDwn8mjXwoACpGUlLR///6QkJD09PSUlJTTp0+TR1KemZmZnJycKnEVPuw/ PQToXyAIBXzx9MMRBT7n61NEL+ukXz1NefwDIGvwolZSZVHX9fdvQu4ZnXN6 sxbpW7x5b/bHv0QUPba3oJ3wF3cOwOMnLS3t+PHjer2eTJMup5yV7kgXFQH6 D7BZTAajyWq1Wiz27DK6y0WBPbrht+nzlmsZweH83mhnPyJvh4K8v9ECdtfy SfM3HnG9wDBWi9Waa2X5uiN5eiYF/a7lUrvVbDAYSVOtDON6Ke3e6YkBARMm Tpw6a22aPVclefuq0rTgYOykr1p4nyj7pdyb4Hm3uKoqSjdLzP21po8m8vLV 8sjXInB2o8FosTpxfJGy7IFLlZjEByhO5Dcako+HDh0indDr16+TjqdD7v9k u3z5MgKUKuB9WXT7TO6aRSos4u4SpaOQzNgfmz1XvqyCeqpV25+u30ujHQRa sdW3Te1y1V6/m8nQinN6Zs6VOtcu9SakAqZTHcWT7/ekpWn3Jg3s/MzTtNJG zToeJnWS1fHu3+lJM7fAlgm0Ql346UG9fujy1dcz1h+R1sTP9Gn/3HPPPkEq faZClz4T76cYSenNHeMUTm/elA75C1LO5ayNbI3o7ELGXtnetOXr6y8lOVzv 3tJW5Kxrw1Fn4zQRkwfl3gRR4AreLa7+lLwi0VO1Dtfvy31j6QO7YYbvV106 9x4yM86ad4bCyXvx/pm1vb7rvPzofVcDHqqSQgg8Sx5DD8ys/Fz57P2sCNh1 hza64BgtYKnb8qtHl0//rlefM/fjHNnHBKQ/IA87oaBygP84V4aSfuipU6c0 Go0jd1YiQIvI27NLcoCyvh3qKJ55ecyUKeNG9iHvci17ziSlPEN6DHZTli5D a3AtwLO2rCyjtChrtuTqWlrtdqtV+8O7ZWp9NpQ8XdKvuUJRdoDf2PH+/l2+ 6DB/1y3XnIxbV5exks6vkXW9DYuc0Wgw21iR58iz6GO/lXqq0shJM3acuiPN I0zo3kShqKKcOMG/bxcSo69/N8EuOjibjbR1mfKzMmXevyc1Ssg+TsvQlTn7 qqzdRmY8Nr832cYlp2LIImYrfZPPvy4pePlF/Vu5b8K8XTelCu35d4vNYjRJ vVHaW2WzNyVftVLLWIPFZhfkRtK5SPfMRp9yp3asnziiS7kyb1/Ty68W6Xcq x7Qt7nSDcmW/HjTuVFiqSMOLy7cWG+Pt4U85Cu/s/JV8vuo1YuqUyRP9/emK HG6fGYq8lPzPWQg7tX/Q183LNegYb3e4ffpj8++Egsq93BiAx4j87yM1NXX/ /v2JiYkOBGhedMM5U7oqNlHMfpr9PyE67Nr5izeypDdKkzZZoyfhwYZdv3Tl 5n1bkd4t5QDl/drXLlW7o8XhsGeeq/f80x2H/k5Kb2/3J0HzxNPlqr38eSjN CrqLzq/yq1K10faDO96rXrZMpdozNh+n1RiS54758blny8i9jAZfjyRlPZo+ VfqFT9Ky9ytvt5HHtLDDbRu9Ic1VusUnP95MsGbe3FKxfPl+8w/JW3Vxzejy 5Z9bdyVNXir22Pzqb30hBbaDkaqa2P29UqWaxkkl4/73lkLxzj2zcxWrhn5G nobRAKWdTUEfN0X5bXnafyz7SVefW4lW+719chNLl35CbuoH3QPo3Kw1z7pY ulvs3ZqVLf1iziZwNjrbnV3jc+8WqVU9WtT7+KcZft+S+mu+3v7IPRouHMvm qZbmsmCdu3pdy7nboi20YOGGDR0WH0hjSH9ZWk3W5fdqf3T1oQJUjunDsys0 aGd44FocD65UzM2RHYUhu8eXLVtLbltRFLKUKG+sPujNSk2DtaJrY8UCdkJB 5QAg/yMNDg5GgOYn9y+SQy4eOntTfm8TpOtcSaFgzzi0c+vpi7fMvKhNVu/c GqhKJ5/m2Tvn9q/dccwmiCzLksXtpNtlp8hjvv6C8xDusK/fcB1kU7zULDiR 7o2Eu6cmBgR0fO8lRen3QkwOOUBPL1eWVjxVuVrdvgOHvl+LzP1aMiusGfop mWr3k3LCxDGvV1W82N6XzLlvPu3MPl3xhcG/TA2+lySv78bO2Z//8OPi31cs nDamnELRYsAS0uDODcqUf+t76X2RH/xR9bKvdzHQI3e020jSp3KDj9UWjhf4 7AB9V6FoEi/Vpvz8JUX5VjHyYVRR/MO3LQnQUClAye5Z6vMxacCPfmPGD+3/ pEJRt/M4ozZuakBAry+alSql6NRnREBAwIpdp6W9YM+zLlb6e9jz24A8m0DW khx6OvdukVrVqzWZ8/kGLceOGkK2q2WfufQXxNhyV+u85kmbqvpk2NQB+25f u3nhjWHzdkfRg848zwk8b1YdeLN6q/wZUcipVTlAk88sqfJam0gLJ4iFrUUo 8olad3IU3tw6Sv4DKV22fNeBAepMehJZ/oPyWGFhSwk8aSbZ2LdqfnzbmrOx 9LyBp51QUDkAOKR/gCQrST/UgQDNTT5jdif45K3oLEEfu3//vsN/7tm0dVeK keMzIk9dDCGvpserrwaf3HPwlIm+lTpsqapz18PtWQmng+9Y9am7t27csnXb 9q2BGwO3q1Jpb83tzcd5CHfoF/UU5euSRBmj7FbpySeb9pyWfRjSETj681K0 W0f2KK09aO0I8mbY2X8TmQ49vn7KxEVJ2uiPn1e80F4pV9rrPUX1T4fQvckb Dm5c9H9v1qHvnmVqz9l5RZ4hPuTUgnmTA8YOe7l86Zc7DCaFpxb0UCjK/xkt CCknqykUA5cF0TbZs0PttU9iaZaKcoBO6vmBQlF96MSJvv3ak4rbKn8ne4iz s64ADTFL1/lY1c3KK979cZK8Fb/1b6NQ1L+updN3A0eTBbeE2Fw7Wc4g93XR s3KkFsF0aONCt024Svee+24xO5NjSq8PSpWqeTye1MO2q1W6dntf2lgu7ybQ KqX5b9+4+Mn4hS0nLJ54KpzuKloNXcIefbhR/ozIuSDK018Iz/Gs/eLaEZUa dZQ6y0Iha3lgbaLA5vpnYzAJovN8dNr9s5MmTAgImNirA/kMo/hy5Gp514kF VFjIUgJLdwcTd/K1KnX2hSWxvOje08y/EwrbOQBQQFYiQKWrPNkLR/fFGB3p 9y9t23ssy2K7fvbwzdgsbdSts9fCBUFgSFdTG3P87GVWvpjk6tlLIQmiwNkZ jjwaDVkGCfkfw+U5sJt9CLddLcWLX8pnCn/t0kBR9oNo5xu+nEqNw6VTheS/ oJV+5G1w7ZV0XgodyhbytqJU+xFrpSfW798qVbOt0m01YvjV3e9UUSgadCF1 HF0ypPzTFf7XfcCIMX71KijqfU6DRky/8mJZRf/fz55d2k/x9IvXM2gZx+UN NWeA/txa7tGUKff8jxMXp5poM+UbT6VDuI3vSydXhczL9RSlPh+9WW7EzoCu pRTVTsbZyK4inWjSA11zKYVeNCxtv6cAzbWX6CZUVSgads0UpAt0XLsl+0Jg uV+s5hwcl/BZbUXt9n4FBajcaTOnR3UZP7vh6OV7o+kGcEKBASo3RGCtNk9/ oXIvL+LYXNLF/mHKbloi7beC1uIouDY574yhB+tUq1SpUuUqVaqS/1Wr83mo Macx2diurz1V/ZOB0h8nV0jzcnNfSt7x1lFta5R66vnjEfRzHV/ITkCAAhQK AeqJtNVM+uEDJ8kb5e0LR+8m0gNel04ejjcwEdfP3IrMlOdLi7hx/ka4tAR3 6fSh8DRn94rTxu3ctinwAT1QfvgXL5d58bNIvSEz7na7BuUV9b7KEMjbvzX7 ypx3b+qsVjtd9cXVw8uUKbMqiB7PZBjpZhAhs1N9xXOvdU3TW8+un1axVKk3 v/NnOeuhbbvuxmgsNrsx+c77NRTlWwwgi3zTQPHMGz+QXEm8tfHlik+81nmk 3NDJ371TuX6Llq9XbdZ9Dm0Wzwv5Qk0O0Mm9mpUp0+R2ptXudhuL3Wp3NfWG ljSVcbDJHWsqKjRodzfVZEq527b+s4paHRKsdGvPLvdRKEqND7xDb9uxSVXn XZeUNHbdwe37QlybQGpr0YdUwNKbWrJ3i7wu2gMlrXo/jNaf0uGlMnW+GO4x QJ3XTPOWXxb8/v3aU4s2bm45e2uStAsE3kNGiNIRfF4X2bFhzbrNusdnCQ5R dD8ML99Uw1g1a0d/W++jnlpeXolYwFrosgXWJv1V8KasOzdv3LhJ3Lp54/rN O5Em3vmHyDE22iU1GC+fXFVdofjU9w+5AVzBzXMUsJTA0d3Bp19pVu3liZvO 2XlpO9ADBfAWAjQ/+fJ+U3LI/hOXyFvRuSNH08gbD5N24MApuyDePHcyNsvZ DbwTfOp6BL3wRrBrjx89ZSBdIZahF5OIvHTy8wHnQPu1qZ5zDlRRbfyG86T0 d5/2boWKJ9/7nrTm/JJeZHrRGXq2muNFXgqEXfP6yPM880z1yhVKVfxwANn9 neq6LVz2pUX7Q8mciwd/5qytdMWypRWVWve2iwLLsPEX1ki3OlTZcl1DftWk ZvdQi7HTKJEDdOTXpN56cjeT9FJZqde9XPm5e1PLNPmJfN4ICpzwdE7ray48 SBtA5k66sqn2k87iD7rluogoe13SvRn2uI71SufehBBpt3RwX9cTTbqRQv+v X1Io6oTQapKaPaV4unmfPAEqbwLtafLMuu2bXhq6+JKOc5gTPx02qdPaswbp 1CWZwxZ1KE+Akjy0pYe0rUOvfpp7JNKR784ReUdlBP9RsV4rlYVWUuBaWBJw D6jNI166AHpXQDfXVtdt3PlmnJH2WguusMCl6OcjeuDXErH/9WqtQ1nnxkp/ 8B52QiHlACBDgOYnB2hCyKULt6J4S/KJM5fIc1Pi3RPBd0XBclIKSmk+5sqZ k/FZ9FO9Ofne4TPXRcF+6UKQgS20dmlJKVH5o9t+nzxp0sSAgIA58y6HJsuv XTu8hRRMmjx58pQpZGLKil1k3sSbh0jBjXh6XE+QRxGQfjNnt6wKCBgfdDf2 /L7Vs9bsIyWa6Ksb5swiC86etyI0gb7rSQftMrasmBsQMP3C7YQze1bMXrvf 2RBbRJMnFTXa+Jjld0u3XmGV19vK42vIh5/P7lkxefKKdMZ5jah8w+P13E2d tmq3TWpV5JWjcyaQFsy/HJXicF5qRMtjLh+ZN5G8ELB6zxmH20VErnVJ1Ypp 0dfzbEL+3TJ55R5SeH7P8smT/0inTTZumj95/mZpKAmezVMt7ceZ9WuPn9t/ z7mT794LnX/sUhT93UktSzrxdg0PGXFyHomhMnvC9NJ+yH18me4oMfLAjCpv fZFV2Fouq7OYB9bm7Ca7oS2R7uq5d3pPgGTz3iMG5z8XsZAKC14q+6razAtv V28ZnCk4cvc08++EgsoBQIYALYhzwDOBky8NFTh6PadNE3HwRLCdftqn59VI T0yQLtCNvHb+/A0VzVT7g+OzIA+9t/9CnbroaySH2r1dT6GovTtEI11wKQWz M0DnVajb8kx4vE6nf9iG5T2RmTPiRL45Pa8r32wPOY5c/mpzj7iUp7WcTpdy //T6BpVbyhkh/U2K2sig4YN6vP5yjU4jlnPZn6lyt0oaceL2jsrlq07ZckiT aZEPh3pci1b1gNoeYuOK1ry8jRWdJ4IzNTEb/H8oXamlyurIHsbKw04opNzb lgM8hhCgRUZ3hSEhZO3q1ddU9LCt67RT9K1zK1etj9RYC1vaE57nssdi54Sc HgTPupOu1CFv1ywN63w10KOpLL1Tg46yLs8pSIdYSZWc+wWlUiH9DMAxNjJn wtkVCoWixvsfrjl4w+Ea2ig7fRKD1teqXKlq9Zq9J9DrfsnC9C6efCPGe2yq VBvP5d6oXOVSOwpZl8dN8Lgu91aRJTjpz6mgal33s8jbSzZJOtjJTOj9f9Wr VatRp6N83Y78N6lXXfAbNWJ3UIS89zz99uRLWMX9K39t9Eb9WTsvS78OPs9a WGno+yLUViBB4LO3mJdOvQpFaV6epaTtoo87Z/V/452Wq45cc8ifTETn2YQ8 O0EouPyhGg/w+AkPD3d98cqRI0cwElHRkfclu92eZ2RRnmXsDFOy3llIIlus Vueh6Hy/ZfLuazRk6fU6k5XJv+yj9Tetq+jVWk0GvV5vMFo8ju5TpN4izzAc 9+DZ/lLf89FUyNk9X7db0E4ofOcA/AeRFEtOTk6RpKWlMUzedxgE6H8HX7TB yf9rSDCxHMsX4ehxUf6Gi15bEf3FCvFLB/j7PJIAJRPks6s8LU+QEgRo8VH4 wDhuQ8r9My159OsqYrXiX179P7SbHg3PW1rQTvjrOwfgMSPmln+GRxKgOp3O YrHoJUaj0WQykRIEKAAAPMb+YoCSoCTJuGPHjlOnTgmCQMKUpOfixYsTEhLI qw5RQIACAMBjyfUt294FKOlmktzctm1bp06dbt68yXHctGnTunXrlpmZqdPr EaAAAPC4unjxYlKS81swHmpBOUBdpz5nzJjRs2dP8ti1a9erV69aLBaSoTiE CwAAj6uzZ8/Gx9OvrvL6HKh83pMk5syZM7t06XLjxg2SlTgHCgAAj7dHdRGR 2WzWaDS3bt2i31ui1eI2FgAAeLw9qvtA6S3YBoPVaiVhivtAAQDgsfcXLyJy HzmBZKgrPXMH6HaH2whyAAAAxZwoDYvqLv88Fy9eTE5O9q7+Io5EtGYj/c5l s9lsBwAA+LcxDGM0Gq1Wq8dXbTb6DZWkS5iWlpaajfQ0TSZTnjnVanVGRoZr kaIj8xeSnu4BunLdejKRmZmpBwAA+LeR3l9iYiJJJfnYqUfykHru8s9MIlW+ G8ULRQ7QDWRCvrIIAADg30W6n8nJySSVCjmOmifn8qSePC09PiAKvYMABQCA YshjgErX8Dif01tLrHa7zaKXLuzJearX0dA0msgTg5yhdPw94wPXKPd2iw4B CgAAxVD+ACWhyAuixaTX6ki/MothmcTIkLthUVY7Q54znPOpxWY3msxZ6Ukh IWF6s40sbDIYkpJTsx7Uk3U4HEU5cuuCAAUAgGIoT4CSWDObDac2zf5+sH+C nmVZ6/ldK5V+IycM7j9lzSGHIJzbuZw8DfDpP3X9cbslbeH4EaOG9x83bzPv cBxZPnHWmtOswOi0uvwrcp0nnTVrFnkk00XMUNLnRYACAEBx4x6gOm0mw3Nn t8/t/FWHdj/6JpgdfGZIt6++vZDicFjuffdNr1vqe/27fnsu2eEwh/XsPmDn js0TFh10OEy+o4dfPn3cd/TkTNZh0md6zEUSlwzD7Ny5s1SpUuSRTBclQMk8 GRkZCFAAAChu8vRAyX/pWoMp5Zb/yBGxFofm1tbuvUYmmgTekjRBqVy6aYXS Z2y8kTxNDhjs83vgjumT5508unvmjOlTp045cPZuXEyMwWI15LuaiNTPcZyP j48iG5kmJYWkIYlOi8USHh5+4sQJgedXrt+IAAUAgOIj7zlQvd5k43XR55XK oYl2R2LQqp59/ZMtgmiOH69Uzl82z9d3QrxZEC1Jo3/uvvVWUtixTTNnzftj 0bxZs5fMmTnJt0+/JdsuMJxdr9PlWQvpSE6dOtXf33/cuHHkkUyTElJeUMPk wYgSEhLu3r0rCgICFAAAipX8AWqwMLqYi8OHjYi3OLQhe3v1Ha4RHQ4uebSv 344D25VDRqQKDgefOnJA73236Nh9ZKaJE+duWDdn8aEQhzlslHJSqt1h1Oe9 1JZ+L3bRBiCS+573798/f/486YGeO3cOPVAAAChuPAUop4s+27fvwEitKFpT J/p2W7A16NqfqwaOmW+xmiYrf/xNejp47JwMm8Dqk2aP8917MyUuOHDk9JWn dq8eP2udiRP0Og8xl5lbQU2Sz42SvidJz/j4eFcPdMXa9TzHpaenawEAAP5t JK1IVJFUkr95k9BlGTOTwnfv3puUYcoymDISQn8bHzBx7sqIpEyj0ZSe/VSV lGk2W1IiLm0MPJButluy0vetWzh+/MKwlEyTQZfpVWNIqhoMxtDQ0DNnzpDH oKCgsLCwU6dOsQyzgg4mv5X0W3mOJf1Q/OAHP/jBD37+5R+Hw2I28fL48M5C 19edCGKurz4RRYH3/FTgRdGt3Pv20NUZDVmpqSmkI5qakmLI0ifEx5FCkp6j AiaRxz/WrpevyMUPfvCDH/zg59/9WeGhcP3y1evk8hVr1y9btXbZ6rUr1uZ/ unHlWnlOeoJy+eq15CV5tr/SmFUbNq3ZuHl19iP5kdPz/wHJ58c6 "], {{0, 346.5}, {309.5, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{309.5, 346.5}, PlotRange->{{0, 309.5}, {0, 346.5}}], Alignment->{Center, Center}, Appearance->Image[CompressedData[" 1:eJzdmsluHUUUhi3YsOQVeAu2WWYbxAMkwkTZGMlBQjwfHuV5xHgCD+Ah4JAw T3G+9I+Pzq3qLld3142dHCnRdd/q6v87Q3V3nfvBg8/uffrOyMjI4/f47979 L+6Mj9//8qP3+ePjscePHo6NfnJ37PPRh6PjHz54l4N3/v/36vPlcGx4Mw/b XuTZTcvM1dnNblD2f+3t9eC01fxvnrUlKqs/LfifPEtDFaHIV+6F/d3GmojS LP31x8pN0l/O/mw2PyzGiUG6UaSdX6vcFP7h7PdB818FRAFLOhzd9AfOD5QH gn+7sl8HzY4HUAFLTji66ffOrxUfK/9l0JpYApBEOHIoYoQm55t4L1tSn1/Z s0Gz457IWAykNhwdEJr0m/O9eJMtqT9X9rSyi4uLp870lScSiwfx4UhQ5OgX QqDfnG/KA8E/VfZjZU8GTQc1QGiGYyBBODxFnE75IfD65XyuKG8jQ4JReH5+ fnZ2dnp6enJy8kNl3w+aDvItYxgpKLEoKEzrC8RTZAbCIzTpl/MRj3LJRo/U Hh8fHx0dHR4eHhwcfFfZt4Omg3zLGAZzCjiwCIQ5fV4lKPogyP9ci4tyaTSg GUnI29/f39vb293d3dnZ2d7e/qayra2tryvbqkwH+ZYxjOQUiJgBELyBTzxF B4TMEBBxroX+pgWhgxEUUQSxyKSwd6sAoakEyFuSB/8XRCB8xIKEJLhW4wmK NIJfiIIUYkL8g6MIAX4riEBqkY0UFM4hxKLw1R0jGEUtgs+iIASqAoJODhdE oFioCwuEX6N8IGpzqQnBh0D6FQJmJmPJIq5YEGF9fZ3qJrIKRJBOTYHIRPAL KRMqi1gPyd6CCKurq+QSkWVmAqHVKQ5EBwS/kOrhgZm5BBHHaQURlpeXWXKV S2SpAuFXJzQEudSE4GvZZ5E9SKgQKD2cVhBhaWlpc3PTcikIRJBLQUU3IfhC UBUwlQqBSxBx7lAFERYWFjY2NrjfKZfiQCiXrBxqEdKFIAQm1B2BezFxL4gw Pz+/traGW5iZXMJLeoIKEJrKIY3gn+iEgJdIWpbBgghzc3NUtMqBXMJLtbnU FsHXshD0XIGXWI5I3YIIs7OzKysruIWZKTTLpRihtqIzEfRQbQikbkGEmZkZ FiVVdFwOOQhYLYIVgt4LmNBWVG5GBRGmpqYWFxeZk4WOctC6FDyEW0W3ioJH YKrXj+CfwPsjvAVR8AjUQlmE6elp7m7UlxBsXR0qQtlyNgTd3QoivEErUg7C m3hfeAvuzolnJGJ9C5+RLvOeVIf0sM2K2lQI+U+ql3nvC0N65aEQCCuF0P99 4dq3NuWSXhkKIvg7Qs+3trgcat96uArXovTIXhKANGZJJBlIaQqT5YVFkhvu 5OTkxMTEV1fGZ45wnG8Zw0jedDiRuyTzaC2KCznOohjBLIEQLK14SRT4jYzC gSxQeBIxLCyo4j61UJmgZHzWQb5lDCM5hRM5PVhLLQSZOxi1CPE+kg+EUXBR shcQNGgrlZQmLmhbqwydK1fGZx3kW8Yw0nZWpd8/2rXaR4oREoHwDxu2p63d bKpDO8O2Law94c3KbHPYtoUZqb1u7XJri9v0t9rNCxBqc8lv6BmFNue5rroJ 2pnXtnyw0S3jM0c4LuWMZLycn9Z/7Z5qE0KiueApLBwepLbF4JsLXjznKv8D /X325xMtKt9ZE4VehaxXIhC1SwxHmiVbnREv3vd6gi5Jol1Vqz8zEEZhjSr1 1+JelbWrzHRQXSoTH/TdCnZ5cii0RsUgYhGONx201mEgPrNL1QqhKZ2CurBG bZ+OZ5D/nTueiUA09Z2DpnPQwBXRhbOg+xy0nvv3nT1CgsInlQcJGuhGZBb8 DMB+AxA3aot0/4N08hRxOGp/xuB/yeA1xz9diJ3f5zcYaYracNy2X8IkKGrD cTt/jxQgpMMRswREsflhgfJrnZ+PkKbwIJ7F4+SYP9FP2OT8VvoTIAmWmChh 8Ylp5R3EpylilgRUrdWem7hWZ/2ZLAmitF07ZxHl3XD62PBkl6W7aZmvbKSc 9RfzEj7XSO4= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output", ContentPadding->False, FrameMargins->0]], "ExampleImage", CellMargins->{{49, 45}, {16, 5}}, TaggingRules->{"AttachedInlineCell" -> CellObject[196497]}, CellChangeTimes->{{3.8159382750575876`*^9, 3.8159382753645782`*^9}}, CellID->405161419], Cell["Uninstall the paclet again:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8123553700501575`*^9, 3.812355375945175*^9}}, CellID->708187681], Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"PacletUninstall", ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8123553809479074`*^9, 3.812355389765953*^9}, { 3.812355766713648*^9, 3.8123557684912767`*^9}, {3.814445481048813*^9, 3.8144454824922976`*^9}}, CellLabel->"In[4]:=", CellID->978239695] }, Open ]], Cell[CellGroupData[{ Cell["Scope", "Subsection", TaggingRules->{}, CellID->204653245], Cell["Install several functions in a single paclet:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8122888444856997`*^9, 3.812288853940466*^9}}, CellID->788122737], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}]}], "]"}]], "Input", TaggingRules->{"Locked" -> False}, CellChangeTimes->{{3.8122888557988825`*^9, 3.8122888633373175`*^9}, { 3.8122889313201246`*^9, 3.8122889907692995`*^9}}, CellLabel->"In[1]:=", CellID->434311063], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorUtils\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorUtils\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\rhennigan\\\\AppData\\\\Roaming\\\\\ Mathematica\\\\Paclets\\\\Repository\\\\ColorUtils-1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ RowBox[{ "\"Contains the following collection of pac\"", "\[Ellipsis]", "\"esourceFunctions: ColorSearch, ColorToHex\""}], Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "ColorUtils", "Description" -> "Contains the following collection of pacletized ResourceFunctions: \ ColorSearch, ColorToHex", "Creator" -> "Wolfram Summer School, Wolfram Research", "URL" -> "https://resources.wolframcloud.com/FunctionRepository/", "Version" -> "1.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Guides/ColorUtils"}, { "Kernel", "Context" -> {"ColorUtils`"}, "Symbols" -> {"ColorUtils`ColorSearch", "ColorUtils`ColorToHex"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\rhennigan\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\ \\ColorUtils-1.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.815937487022154*^9, 3.815937781654217*^9}, CellLabel->"Out[1]=", CellID->27372868] }, Open ]], Cell["Use the two functions together:", "Text", TaggingRules->{}, CellChangeTimes->{{3.812298939715166*^9, 3.8122989459531145`*^9}}, CellID->527404286], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"AssociationMap", "[", RowBox[{"ColorToHex", ",", RowBox[{"ColorSearch", "[", "\"\\"", "]"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.812298647440109*^9, 3.812298673108116*^9}, { 3.812298929169983*^9, 3.812298933842538*^9}}, CellLabel->"In[2]:=", CellID->699432553], Cell[BoxData[ RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.7333333333333333, 0.0196078431372549, 0.07058823529411765], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.4888888888888889, 0.013071895424836602`, 0.047058823529411764`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.7333333333333333`", ",", "0.0196078431372549`", ",", "0.07058823529411765`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.7333333333333333, 0.0196078431372549, 0.07058823529411765]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.7333333333333333, 0.0196078431372549, 0.07058823529411765], Editable->False, Selectable->False], "\[Rule]", "\<\"#bb0512\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.5568627450980392, 0.13725490196078433`, 0.1607843137254902], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3712418300653595, 0.09150326797385622, 0.10718954248366014`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5568627450980392`", ",", "0.13725490196078433`", ",", "0.1607843137254902`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.5568627450980392, 0.13725490196078433`, 0.1607843137254902]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.5568627450980392, 0.13725490196078433`, 0.1607843137254902], Editable->False, Selectable->False], "\[Rule]", "\<\"#8e2329\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.42745098039215684`, 0.09803921568627451, 0.11372549019607843`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.2849673202614379, 0.06535947712418301, 0.0758169934640523], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.42745098039215684`", ",", "0.09803921568627451`", ",", "0.11372549019607843`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.42745098039215684`, 0.09803921568627451, 0.11372549019607843`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.42745098039215684`, 0.09803921568627451, 0.11372549019607843`], Editable->False, Selectable->False], "\[Rule]", "\<\"#6d191d\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.9490196078431372, 0.27450980392156865`, 0.24313725490196078`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6326797385620915, 0.18300653594771243`, 0.16209150326797386`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.9490196078431372`", ",", "0.27450980392156865`", ",", "0.24313725490196078`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.9490196078431372, 0.27450980392156865`, 0.24313725490196078`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.9490196078431372, 0.27450980392156865`, 0.24313725490196078`], Editable->False, Selectable->False], "\[Rule]", "\<\"#f2463e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.807843137254902, 0.06274509803921569, 0.07058823529411765], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5385620915032681, 0.04183006535947713, 0.047058823529411764`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.807843137254902`", ",", "0.06274509803921569`", ",", "0.07058823529411765`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.807843137254902, 0.06274509803921569, 0.07058823529411765]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.807843137254902, 0.06274509803921569, 0.07058823529411765], Editable->False, Selectable->False], "\[Rule]", "\<\"#ce1012\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.4549019607843137, 0.06666666666666667, 0.0392156862745098], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3032679738562092, 0.044444444444444446`, 0.026143790849673203`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.4549019607843137`", ",", "0.06666666666666667`", ",", "0.0392156862745098`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.4549019607843137, 0.06666666666666667, 0.0392156862745098]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.4549019607843137, 0.06666666666666667, 0.0392156862745098], Editable->False, Selectable->False], "\[Rule]", "\<\"#74110a\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.803921568627451, 0.3254901960784314, 0.17647058823529413`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5359477124183007, 0.2169934640522876, 0.11764705882352942`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.803921568627451`", ",", "0.3254901960784314`", ",", "0.17647058823529413`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.803921568627451, 0.3254901960784314, 0.17647058823529413`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.803921568627451, 0.3254901960784314, 0.17647058823529413`], Editable->False, Selectable->False], "\[Rule]", "\<\"#cd532d\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.5333333333333333, 0.054901960784313725`, 0.054901960784313725`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.35555555555555557`, 0.036601307189542485`, 0.036601307189542485`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5333333333333333`", ",", "0.054901960784313725`", ",", "0.054901960784313725`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.5333333333333333, 0.054901960784313725`, 0.054901960784313725`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[ 0.5333333333333333, 0.054901960784313725`, 0.054901960784313725`], Editable->False, Selectable->False], "\[Rule]", "\<\"#880e0e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.20784313725490197`, 0.14901960784313725`, 0.1568627450980392], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.13856209150326798`, 0.09934640522875818, 0.10457516339869281`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.20784313725490197`", ",", "0.14901960784313725`", ",", "0.1568627450980392`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.20784313725490197`, 0.14901960784313725`, 0.1568627450980392]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.20784313725490197`, 0.14901960784313725`, 0.1568627450980392], Editable->False, Selectable->False], "\[Rule]", "\<\"#352628\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.8352941176470589, 0.16470588235294117`, 0.07058823529411765], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5568627450980392, 0.10980392156862745`, 0.047058823529411764`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.8352941176470589`", ",", "0.16470588235294117`", ",", "0.07058823529411765`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.8352941176470589, 0.16470588235294117`, 0.07058823529411765]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.8352941176470589, 0.16470588235294117`, 0.07058823529411765], Editable->False, Selectable->False], "\[Rule]", "\<\"#d52a12\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.30196078431372547`, 0.058823529411764705`, 0.08627450980392157], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.20130718954248367`, 0.0392156862745098, 0.05751633986928105], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.30196078431372547`", ",", "0.058823529411764705`", ",", "0.08627450980392157`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.30196078431372547`, 0.058823529411764705`, 0.08627450980392157]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[ 0.30196078431372547`, 0.058823529411764705`, 0.08627450980392157], Editable->False, Selectable->False], "\[Rule]", "\<\"#4d0f16\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.5686274509803921, 0.03529411764705882, 0.03529411764705882], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3790849673202614, 0.023529411764705882`, 0.023529411764705882`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5686274509803921`", ",", "0.03529411764705882`", ",", "0.03529411764705882`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.5686274509803921, 0.03529411764705882, 0.03529411764705882]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.5686274509803921, 0.03529411764705882, 0.03529411764705882], Editable->False, Selectable->False], "\[Rule]", "\<\"#910909\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.7647058823529411, 0.13725490196078433`, 0.08627450980392157], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5098039215686274, 0.09150326797385622, 0.05751633986928105], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.7647058823529411`", ",", "0.13725490196078433`", ",", "0.08627450980392157`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.7647058823529411, 0.13725490196078433`, 0.08627450980392157]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.7647058823529411, 0.13725490196078433`, 0.08627450980392157], Editable->False, Selectable->False], "\[Rule]", "\<\"#c32316\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.7764705882352941, 0.13333333333333333`, 0.08627450980392157], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5176470588235295, 0.08888888888888889, 0.05751633986928105], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.7764705882352941`", ",", "0.13333333333333333`", ",", "0.08627450980392157`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.7764705882352941, 0.13333333333333333`, 0.08627450980392157]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.7764705882352941, 0.13333333333333333`, 0.08627450980392157], Editable->False, Selectable->False], "\[Rule]", "\<\"#c62216\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.7450980392156863, 0.1450980392156863, 0.09411764705882353], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.49673202614379086`, 0.09673202614379087, 0.06274509803921569], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{ "0.7450980392156863`", ",", "0.1450980392156863`", ",", "0.09411764705882353`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.7450980392156863, 0.1450980392156863, 0.09411764705882353]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.7450980392156863, 0.1450980392156863, 0.09411764705882353], Editable->False, Selectable->False], "\[Rule]", "\<\"#be2518\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.30196078431372547`, 0.15294117647058825`, 0.30196078431372547`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.20130718954248367`, 0.1019607843137255, 0.20130718954248367`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.30196078431372547`", ",", "0.15294117647058825`", ",", "0.30196078431372547`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.30196078431372547`, 0.15294117647058825`, 0.30196078431372547`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[ 0.30196078431372547`, 0.15294117647058825`, 0.30196078431372547`], Editable->False, Selectable->False], "\[Rule]", "\<\"#4d274d\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.2, 0.10196078431372549`, 0.12156862745098039`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.13333333333333336`, 0.06797385620915034, 0.08104575163398693], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.2`", ",", "0.10196078431372549`", ",", "0.12156862745098039`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.2, 0.10196078431372549`, 0.12156862745098039`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.2, 0.10196078431372549`, 0.12156862745098039`], Editable->False, Selectable->False], "\[Rule]", "\<\"#331a1f\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.396078431372549, 0.12549019607843137`, 0.11372549019607843`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.26405228758169935`, 0.08366013071895426, 0.0758169934640523], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.396078431372549`", ",", "0.12549019607843137`", ",", "0.11372549019607843`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.396078431372549, 0.12549019607843137`, 0.11372549019607843`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.396078431372549, 0.12549019607843137`, 0.11372549019607843`], Editable->False, Selectable->False], "\[Rule]", "\<\"#65201d\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.6823529411764706, 0.10980392156862745`, 0.10980392156862745`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.4549019607843138, 0.07320261437908497, 0.07320261437908497], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.6823529411764706`", ",", "0.10980392156862745`", ",", "0.10980392156862745`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.6823529411764706, 0.10980392156862745`, 0.10980392156862745`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.6823529411764706, 0.10980392156862745`, 0.10980392156862745`], Editable->False, Selectable->False], "\[Rule]", "\<\"#ae1c1c\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.6745098039215687, 0.06274509803921569, 0.06274509803921569], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.44967320261437915`, 0.04183006535947713, 0.04183006535947713], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.6745098039215687`", ",", "0.06274509803921569`", ",", "0.06274509803921569`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.6745098039215687, 0.06274509803921569, 0.06274509803921569]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.6745098039215687, 0.06274509803921569, 0.06274509803921569], Editable->False, Selectable->False], "\[Rule]", "\<\"#ac1010\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.6705882352941176, 0.011764705882352941`, 0.011764705882352941`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.44705882352941173`, 0.00784313725490196, 0.00784313725490196], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.6705882352941176`", ",", "0.011764705882352941`", ",", "0.011764705882352941`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.6705882352941176, 0.011764705882352941`, 0.011764705882352941`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[ 0.6705882352941176, 0.011764705882352941`, 0.011764705882352941`], Editable->False, Selectable->False], "\[Rule]", "\<\"#ab0303\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.4549019607843137, 0.10980392156862745`, 0.10980392156862745`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3032679738562092, 0.07320261437908497, 0.07320261437908497], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.4549019607843137`", ",", "0.10980392156862745`", ",", "0.10980392156862745`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.4549019607843137, 0.10980392156862745`, 0.10980392156862745`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.4549019607843137, 0.10980392156862745`, 0.10980392156862745`], Editable->False, Selectable->False], "\[Rule]", "\<\"#741c1c\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.5019607843137255, 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[0.334640522875817, 0., 0.], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5019607843137255`", ",", "0.`", ",", "0.`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.5019607843137255, 0., 0.]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.5019607843137255, 0., 0.], Editable->False, Selectable->False], "\[Rule]", "\<\"#800000\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.5529411764705883, 0.1411764705882353, 0.13333333333333333`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3686274509803922, 0.09411764705882353, 0.08888888888888889], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5529411764705883`", ",", "0.1411764705882353`", ",", "0.13333333333333333`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.5529411764705883, 0.1411764705882353, 0.13333333333333333`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.5529411764705883, 0.1411764705882353, 0.13333333333333333`], Editable->False, Selectable->False], "\[Rule]", "\<\"#8d2422\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.7215686274509804, 0.054901960784313725`, 0.054901960784313725`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.48104575163398694`, 0.036601307189542485`, 0.036601307189542485`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.7215686274509804`", ",", "0.054901960784313725`", ",", "0.054901960784313725`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.7215686274509804, 0.054901960784313725`, 0.054901960784313725`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[ 0.7215686274509804, 0.054901960784313725`, 0.054901960784313725`], Editable->False, Selectable->False], "\[Rule]", "\<\"#b80e0e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[0.6666666666666667, 0., 0.], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1.`", ",", "0.`", ",", "0.`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0., 0.]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[1., 0., 0.], Editable->False, Selectable->False], "\[Rule]", "\<\"#ff0000\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.8549019607843137, 0.07058823529411765, 0.07058823529411765], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5699346405228758, 0.047058823529411764`, 0.047058823529411764`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.8549019607843137`", ",", "0.07058823529411765`", ",", "0.07058823529411765`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.8549019607843137, 0.07058823529411765, 0.07058823529411765]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.8549019607843137, 0.07058823529411765, 0.07058823529411765], Editable->False, Selectable->False], "\[Rule]", "\<\"#da1212\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.6588235294117647, 0.09019607843137255, 0.0784313725490196], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.4392156862745098, 0.06013071895424837, 0.05228758169934641], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.6588235294117647`", ",", "0.09019607843137255`", ",", "0.0784313725490196`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.6588235294117647, 0.09019607843137255, 0.0784313725490196]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.6588235294117647, 0.09019607843137255, 0.0784313725490196], Editable->False, Selectable->False], "\[Rule]", "\<\"#a81714\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.6352941176470588, 0.25098039215686274`, 0.11764705882352941`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.4235294117647059, 0.1673202614379085, 0.0784313725490196], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.6352941176470588`", ",", "0.25098039215686274`", ",", "0.11764705882352941`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.6352941176470588, 0.25098039215686274`, 0.11764705882352941`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.6352941176470588, 0.25098039215686274`, 0.11764705882352941`], Editable->False, Selectable->False], "\[Rule]", "\<\"#a2401e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.5843137254901961, 0.16862745098039217`, 0.21568627450980393`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3895424836601308, 0.11241830065359479`, 0.14379084967320263`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5843137254901961`", ",", "0.16862745098039217`", ",", "0.21568627450980393`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.5843137254901961, 0.16862745098039217`, 0.21568627450980393`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.5843137254901961, 0.16862745098039217`, 0.21568627450980393`], Editable->False, Selectable->False], "\[Rule]", "\<\"#952b37\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.596078431372549, 0.1803921568627451, 0.1803921568627451], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3973856209150327, 0.12026143790849673`, 0.12026143790849673`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.596078431372549`", ",", "0.1803921568627451`", ",", "0.1803921568627451`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.596078431372549, 0.1803921568627451, 0.1803921568627451]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.596078431372549, 0.1803921568627451, 0.1803921568627451], Editable->False, Selectable->False], "\[Rule]", "\<\"#982e2e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.2980392156862745, 0.1450980392156863, 0.1568627450980392], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.19869281045751636`, 0.09673202614379087, 0.10457516339869281`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.2980392156862745`", ",", "0.1450980392156863`", ",", "0.1568627450980392`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.2980392156862745, 0.1450980392156863, 0.1568627450980392]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.2980392156862745, 0.1450980392156863, 0.1568627450980392], Editable->False, Selectable->False], "\[Rule]", "\<\"#4c2528\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.396078431372549, 0.14901960784313725`, 0.2235294117647059], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.26405228758169935`, 0.09934640522875818, 0.14901960784313728`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.396078431372549`", ",", "0.14901960784313725`", ",", "0.2235294117647059`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.396078431372549, 0.14901960784313725`, 0.2235294117647059]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.396078431372549, 0.14901960784313725`, 0.2235294117647059], Editable->False, Selectable->False], "\[Rule]", "\<\"#652639\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.8156862745098039, 0.43137254901960786`, 0.49411764705882355`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5437908496732027, 0.28758169934640526`, 0.3294117647058824], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.8156862745098039`", ",", "0.43137254901960786`", ",", "0.49411764705882355`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.8156862745098039, 0.43137254901960786`, 0.49411764705882355`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.8156862745098039, 0.43137254901960786`, 0.49411764705882355`], Editable->False, Selectable->False], "\[Rule]", "\<\"#d06e7e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.592156862745098, 0.14901960784313725`, 0.13333333333333333`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3947712418300654, 0.09934640522875818, 0.08888888888888889], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.592156862745098`", ",", "0.14901960784313725`", ",", "0.13333333333333333`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.592156862745098, 0.14901960784313725`, 0.13333333333333333`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.592156862745098, 0.14901960784313725`, 0.13333333333333333`], Editable->False, Selectable->False], "\[Rule]", "\<\"#972622\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.5764705882352941, 0.1607843137254902, 0.12156862745098039`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.38431372549019605`, 0.10718954248366014`, 0.08104575163398693], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5764705882352941`", ",", "0.1607843137254902`", ",", "0.12156862745098039`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.5764705882352941, 0.1607843137254902, 0.12156862745098039`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.5764705882352941, 0.1607843137254902, 0.12156862745098039`], Editable->False, Selectable->False], "\[Rule]", "\<\"#93291f\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.6666666666666666, 0.1803921568627451, 0.1803921568627451], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.4444444444444444, 0.12026143790849673`, 0.12026143790849673`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.6666666666666666`", ",", "0.1803921568627451`", ",", "0.1803921568627451`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.6666666666666666, 0.1803921568627451, 0.1803921568627451]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.6666666666666666, 0.1803921568627451, 0.1803921568627451], Editable->False, Selectable->False], "\[Rule]", "\<\"#aa2e2e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.5764705882352941, 0.24705882352941178`, 0.20784313725490197`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.38431372549019605`, 0.1647058823529412, 0.13856209150326798`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.5764705882352941`", ",", "0.24705882352941178`", ",", "0.20784313725490197`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.5764705882352941, 0.24705882352941178`, 0.20784313725490197`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.5764705882352941, 0.24705882352941178`, 0.20784313725490197`], Editable->False, Selectable->False], "\[Rule]", "\<\"#933f35\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.4666666666666667, 0.1568627450980392, 0.1450980392156863], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.3111111111111111, 0.10457516339869281`, 0.09673202614379087], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.4666666666666667`", ",", "0.1568627450980392`", ",", "0.1450980392156863`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.4666666666666667, 0.1568627450980392, 0.1450980392156863]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.4666666666666667, 0.1568627450980392, 0.1450980392156863], Editable->False, Selectable->False], "\[Rule]", "\<\"#772825\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.3764705882352941, 0.07058823529411765, 0.0392156862745098], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.25098039215686274`, 0.047058823529411764`, 0.026143790849673203`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{ "0.3764705882352941`", ",", "0.07058823529411765`", ",", "0.0392156862745098`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.3764705882352941, 0.07058823529411765, 0.0392156862745098]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.3764705882352941, 0.07058823529411765, 0.0392156862745098], Editable->False, Selectable->False], "\[Rule]", "\<\"#60120a\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[ 0.2784313725490196, 0.18823529411764706`, 0.1803921568627451], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.18562091503267975`, 0.12549019607843137`, 0.12026143790849673`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.2784313725490196`", ",", "0.18823529411764706`", ",", "0.1803921568627451`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[ 0.2784313725490196, 0.18823529411764706`, 0.1803921568627451]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.2784313725490196, 0.18823529411764706`, 0.1803921568627451], Editable->False, Selectable->False], "\[Rule]", "\<\"#47302e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[1., 0.13, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6666666666666667, 0.08666666666666667, 0.2666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1.`", ",", "0.13`", ",", "0.4`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0.13, 0.4]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[1., 0.13, 0.4], Editable->False, Selectable->False], "\[Rule]", "\<\"#ff2166\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[1., 0.21999999999999997`, 0.27], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6666666666666667, 0.14666666666666667`, 0.18000000000000002`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1.`", ",", "0.21999999999999997`", ",", "0.27`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0.21999999999999997`, 0.27]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[1., 0.21999999999999997`, 0.27], Editable->False, Selectable->False], "\[Rule]", "\<\"#ff3845\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.91, 0.13, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6066666666666667, 0.08666666666666667, 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.91`", ",", "0.13`", ",", "1.`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.91, 0.13, 1.]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.91, 0.13, 1.], Editable->False, Selectable->False], "\[Rule]", "\<\"#e821ff\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.89, 0.33999999999999997`, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.5933333333333334, 0.22666666666666666`, 0.6666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.89`", ",", "0.33999999999999997`", ",", "1.`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.89, 0.33999999999999997`, 1.]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.89, 0.33999999999999997`, 1.], Editable->False, Selectable->False], "\[Rule]", "\<\"#e357ff\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.97, 0., 0.7954], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[0.6466666666666667, 0., 0.5302666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.97`", ",", "0.`", ",", "0.7954`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.97, 0., 0.7954]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.97, 0., 0.7954], Editable->False, Selectable->False], "\[Rule]", "\<\"#f700cb\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[0.98, 0.06000000000000005, 0.95], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6533333333333333, 0.040000000000000036`, 0.6333333333333333], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.98`", ",", "0.06000000000000005`", ",", "0.95`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.98, 0.06000000000000005, 0.95]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[0.98, 0.06000000000000005, 0.95], Editable->False, Selectable->False], "\[Rule]", "\<\"#fa0ff2\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[1., 0.14, 0.19999999999999996`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6666666666666667, 0.09333333333333335, 0.1333333333333333], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1.`", ",", "0.14`", ",", "0.19999999999999996`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0.14, 0.19999999999999996`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[1., 0.14, 0.19999999999999996`], Editable->False, Selectable->False], "\[Rule]", "\<\"#ff2433\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[1., 0.4, 0.43000000000000005`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6666666666666667, 0.2666666666666667, 0.28666666666666674`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1.`", ",", "0.4`", ",", "0.43000000000000005`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0.4, 0.43000000000000005`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[1., 0.4, 0.43000000000000005`], Editable->False, Selectable->False], "\[Rule]", "\<\"#ff666e\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[1., 0.08999999999999997, 0.22999999999999998`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6666666666666667, 0.059999999999999984`, 0.15333333333333332`], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1.`", ",", "0.08999999999999997`", ",", "0.22999999999999998`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0.08999999999999997, 0.22999999999999998`]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[1., 0.08999999999999997, 0.22999999999999998`], Editable->False, Selectable->False], "\[Rule]", "\<\"#ff173b\"\>"}], ",", RowBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{ {GrayLevel[0], RectangleBox[{0, 0}]}, {GrayLevel[0], RectangleBox[{1, -1}]}, {RGBColor[1., 0.09999999999999998, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio->1, DefaultBaseStyle->"ColorSwatchGraphics", Frame->True, FrameStyle->RGBColor[ 0.6666666666666667, 0.06666666666666665, 0.2666666666666667], FrameTicks->None, ImageSize-> Dynamic[{ Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], PlotRangePadding->None], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"1.`", ",", "0.09999999999999998`", ",", "0.4`"}], "]"}], NumberMarks -> False]], Appearance->None, BaseStyle->{}, BaselinePosition->Baseline, ButtonFunction:>With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0.09999999999999998, 0.4]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], {0, {Left, Bottom}}, { Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], DefaultBaseStyle->{}, Evaluator->Automatic, Method->"Preemptive"], RGBColor[1., 0.09999999999999998, 0.4], Editable->False, Selectable->False], "\[Rule]", "\<\"#ff1966\"\>"}]}], "\[RightAssociation]"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.812298784979437*^9, 3.8122989346985025`*^9, 3.813846336154127*^9, 3.814467613565513*^9, 3.815937884871498*^9}, CellLabel->"Out[2]=", CellID->608383389] }, Open ]], Cell["Open the documentation page of the paclet:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8122989518392563`*^9, 3.812298959720752*^9}}, CellID->566125290], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NotebookOpen", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8159362087661934`*^9, 3.8159362375084705`*^9}}, CellLabel->"In[3]:=", CellID->538065275], Cell[BoxData[ TemplateBox[{ FrontEndObject[ LinkObject["nnqwp_shm", 3, 1]], 58, "FrontEndObject[LinkObject[\"nnqwp_shm\", 3, 1]]", "58", "\"ColorUtils\"", "\"C:\\\\Users\\\\rhennigan\\\\AppData\\\\Roaming\\\\Mathematica\\\\\ Paclets\\\\Repository\\\\ColorUtils-1.0.0\\\\Documentation\\\\English\\\\\ ReferencePages\\\\Guides\\\\ColorUtils.nb\""}, "NotebookObject"]], "Output", TaggingRules->{}, CellChangeTimes->{3.815937900318037*^9}, CellLabel->"Out[3]=", CellID->510556083] }, Open ]], Cell[BoxData[ PanelBox[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzs3WusbNdhH3Y1kYGgQIo0SYEGRQo7Qdt8qhWwaCqzKRAgKCIB/dA0LZDz LalNSZAtw1ED04maowcjxKEck4WVKAFlXpa2K9GUBBngtVhR1r2ErtUrmZBo UQqZK4qcS12ydinzAVGiZEqn+8yex36tvdd+zMyamd8PCxLvmT17r7X2Y9Z/ 9mN+7O//7N++5U+87nWve+efyv7nb/+9n/8b/+Af/L1f+J/+TPaP//kd73zb W97xUz/5pnf8bz/1lp/6B//N3/+T2R//r+x//sXrX/e68/8++V/foiiKoiiK oiiKoqRW3vx3/q6iKIqiKIqiKIqSSJHUFEVRFEVRFEVRUiuSmqIoiqIoiqIo SmpFUlMURVEURVEURUmtSGqKoiiKoiiKoiipFUlNURRFURRFURQltSKpKYqi KIqiKIqipFYkNUVRFEVRFEVRlNSKpKYoiqIoiqIoipJaiUxqT/6Hr5uk7Ly9 iqIoiqIoiqIo6RdJTVEURVEURVEUJbUyVVKbveHHZj/+o5KaoiiKoiiKoijK +DJVUjubk9QURVEURVEURVHGl8FJLctl33rfP8r/+/lf+Nk8qT1/6zvyv3zr tn/cGNx23l5FURRFURRFUZT0y+Ck9oOXX8rT2Xc+8+BZwXd+Z/HPH7z0oqSm KIqiKIqiKMdQzvrYeW0jyxNP/LsP3PkrnZNl0/zRt/5o8qUPTmrfefh32vv/ O5c/s52k9oGrZ2c3PvnTu1uDO6/A4Hqe/+XcFz+w67od4epQFEVRFEU5pBKf v/YoqWUR7Puvfrc9rMVMM6wMTmov/B+359c3Xv9rf+WPv3k9H/F/74mvzd7w l/JrI7MJeiW1n/74jXLUu3HfO+M6cNzI/Hy5DW+/9b6sOldDHT5/dfmuTUSD eYaqBah3fvKZs7NnPn5reeJf+fxZS1WDHTXv8B1ltDu/OF/DwU7LI+Tn7xza dckltdIGM23J1mNtkyjvTa3LjZ9SURRFURSlpRxkUntzVxDbXEx7c/+kNvvx H33xX93xw++9mo/svvEX/tQPXnrxmf/ur+avfvO/f+MPXn7p6b/yF/JXs8le /NAdszf8WFdSm2eNcmr4wNWkktp5DQvBYeNJLc8ylaiyGFRXljWPbzGhplzP 9ii64ZIntVC15y2KTmqVVZNIUmvbYKYr89nWwns5g7ctOn5KRVEURVGU9nKo Se3N4Ti20Zj25v5JrXKJ49P/xX98Hh3+1s0/ePGF1/7w//3m3/xr5+PGv/6G ymStSS32lFCw67aQ1FrT0GaiwXm3VEbg2YKeuVE9ETYfbEel2npSq5+L2VI5 T2o3nglExfkauREZP+urJomkFh2fB5fllatNSe3OX4nM8vFTKoqiKIqitJcD Tmpvbgplm45pbx5w9eOf/5PFCPbUX/zT2f8++3f+1ku/+q9e+j/vevZ//JvZ P6//V/95Kab9+T/ZktTGX4N3oEmtPtv5aZqPDw8mqSW1+z7+xaaMmUfUT35e Umsrq9UXsx4bUv/oKRVFURRFUUrlsJPam8vRbAsx7c2D7lN76i//ucXFja9+ N/vnD1999bn/5c35X579H/7GD//4++d/fO21RZT7S3+29T612GvwimcQatdJ hh6UEZ64cJ9UZ1Irz63wx8DVj6XpR5wrrJ4sO69z1paGyzKLQ+uojlpefNjQ otIdZIuL6+ptWebr/LLVwqvLCxc72p4ntXc25YJFM5uuHqzNuW3VtNSk+FLD jXvxjepfq473Bjs8XCKSWnxsdE5NURRFUZSh5ezQk9qblwHtU5/+9BZi2puH JbW/9GfzgeT5s/pffKFySeSTf/bfe+35/+/JP/cn8n9msa4tqTU/IqNS5iPn ahRaR5jyGDhi4rNa6Oh/Ti2Q1Cp3+vzK58fcCFZe6GoppfaWpunVUdURfr1n stBUmKCUqpaPoVgmwXw9Fq/MbF+zi6RWP6O66vZyUgvXpHnVFPthnj0r0y// WVrLvRvVt1bltVaK2/l/t8wwWLqTWvxp610+ZEZRFEVRjq+c9bHz2sY0Z/Ip Eyx5TMv+dwvLGnz14+wNP/bCHf8s+4+Xf+1Xn/qLf/q7v/vwd37nwaf+0//g 5d+4O/vjC//in16/6T9bZLeWqx8jvsNvupitNMBuOb3VPHH9Pq/Jklr16Rbj SrEOhQH5neuLBotD614dFUhqbaP04tvrN8dVUmGgPsuyakKlY8//mc+krSfD WbWxJtVurKTRcmcOb1R3rXo+giZusq6kVgmqLSV+SkVRFEVRlFo5hqSW+Dm1 Va7/wbe//Uf/9H9/8s/9ieyPf/zN69/4T/79p370z3zv8a+eT/Yfvf6P/tm7 f/idV9Yn2oYnteYzC4GE0mviwqvTnlPrfr5H+SK3cD5ap6d1hPm7hRRTrGTf tjcltVA/rJSSWv3BJh1/WZdCPqr2ZKE55Q2juSYx96mt/1Lf3gp/GdSoAbVq j/OBGbZuS6F4lZ9ejAlf8VMqiqIoiqI0loNPaunfpzZ7w4+9+KE7fvi9763G kj987Y/PE9wPXjv74Q8rV0KeP6X/X90x+/EfDd+n1nmJV2CCxd1M807rSmqB iRclECiGJbXlP3Pjn4HffJVg6RLBZXv7tr07qVVG77VzatMktXUIrV3JWbry M1CTAUmtblhSG1ir8LcTbTMMllBSy++2i3koaPyUiqIoiqIowXLYSW0/nv1Y /uXr3He/8LvP/PUfv/5f/5XvP/nvVn+M/OXrruHoVs6pNQSKHrcdNTchDwVj H0K4qEbhZFOhzsW8M/k5tdYmT5nUlsGzfHKzkNQi7vkafk6tZxPWfxlcq1Ad Bj7EsjGpVe9YbN/Adv+oTEVRFEVR9r8ccFLbl99TW5XvPPw7xbMSs7/6l5/5 b//L4l+yCWKSWudDRaa/Ty3ml6PvLD9AfthtR3c2PoW+54ZxntG+WL1ebn4e 6vNXS9dtTnCfWltSKz0sZdKktv55tcrzNAJJrfzYll5JrfVZo+OSWnytAnVo n2GwNCS1zlsOB0ypKIqiKIrSXg41qbXHsY2GtcFJ7QcvvbhIZL/zYCmgfWbx zx+8/FJUUvs7y4fGV0fXxavj6pcXroeXDU/Vi5y4NE01l5XH0k0Pw298okjh XZP8sNfygYSVxLd8knyxkv3a3nn1Y+kXySsPVJw4qS2aU5y4ePVjW03aV03D X+YbWyEQ/crnBzZqRK3yDb767Mf2GYZKPam1X1FcDIB+PU1RFEVRlMnKQSa1 mCC2ubA2OKllPfyt2/5x/t/P3/qzeW54/hd+Nv/Lt973j84KDxLpSGrnpfKQ jcq4ve0xCx2/VNUx8bKUf2Ks4eK01QRtv6dW+CmuqGF2RAlcRZmP5Gv1jG97 xBNFCnd1La7A3FRSm09ci8blZ0I216R91TQ3LbCuezdqVK1Km0rx7GFwhuEd p57UmuTVria18JSKoiiKoig9SvOwImDntY0sTzzx72IiWDbNH33rjyZf+uCk Vg9uZ03RLDqpKYqiKIqiKIqiKIsyVVKb/fiPzt7wY5KaoiiKoiiKoijK+DJV UossO2+voiiKoiiKoihK+kVSUxRFURRFURRFSa1EJjVFURRFURRFURRla0VS UxRFURRFURRFSa1IaoqiKIqiKIqiKKkVSU1RFEVRFEVRFCW1IqkpiqIoiqIo iqKkViQ1RVEURVEURVGU1IqkpiiKoiiKoiiKklqR1BRFURRFURRFUVIrkpqi KIqiKIqiKEpqRVJTFEVRFEVRFEVJrUhqiqIoiqIoiqIoqZU8qZ0BAACQDEkN AAAgNZIaAABAaiQ1AACA1EhqAAAAqZHUAAAAUiOpAQAApEZSAwAASM0kSe3i La973Rt/+dokFdrH5ZOe4jaxL9vHvtSzl4NsVC96IGDvO2bvGwBA8jqS2vlH UdUtF7MXrv3yGzc5Em5Y7nyx4amXyy9VbJT5nFqWmpbgmjoE81VR1L2CJ0xq taVvqmNb6zndht1diSmbu5nR7LZ6o6LWOTFV2Ivx/LxltRXd3M2raUeuhV13 TGj50Uf+XTcAgMMXkdQaP4q2kNTi59iS1M5fGjjQ3EFSG1HbdAcNIxq1fHtl Bhdv2VpSa1j6+d82s1kkk9SmXMxE86tsRTtMaoWl5hm+a2OI7oH6njJy3+mj KaotvqOoVH59YJTUUj3oAnAohia1AVP1MTyplY1JW9tPamOWmOygYVQ3Nn/T H/vOsUlt+NKHSWIdppnUEjnBXWtMTFaJ7YF6G7fa6oZqZn964xsbKzXJFrLr 7V1SAyB5klqQpDaJEY2aqj+G9c32138S61BSa1FvTETF9iSp1es5P6P3y9U6 TLeB7Hp7l9QASN7gpNY2Ei7e2DPsg6zjI7CygNLUq39U7ynpO+Ipf14vZltY cv375+ZlBXpjMcP8bW/85V8eWduuQUO5NyoXE5Zqcm3d9MKb8ncU21IfU9Ze GrcK4gZM7d0b1TeNok6o1bsu1BWF9pQmaBgDBzq5+XxOe58PGOUHOqvpz8Wz K8FWF97YGUV6bEX1+nRv4eGdd3jnrDeTmB6otbK4iZarH9x3wkfXkau+erJs cellZR01H2zPojq57bjd0ITQUhvqOijTxie1iINM594NAANMn9RKn6FDvxRu GVtX7w1ZfLY3Dh4mPKfWtJjVq7Wb48rDqsbeWMywluk2cE5tvqjKAKNyL9/r 6pmi1r7idVC1FgfGLyMaFXOVVXv3jklqcdVuWInhrlj2aqVvOraxlg27tBc0 POGhsB3GC3VWPbkWuyjc6h5Jrc9WVH45bgtv3nn7aE7Li+gY0QOth8eYc2rB t0+x6hu/m2o9olb3spZO7jpud6zEhs2huoZ7tzgyqcUdZDr3bgAYoPezH5s+ OdsGY8MuEKkvt+nDcaE8SNlkUqt9q7sapzYvpa03GkaLY5Na95pqXFJgDF67 EKr+l8CKnWYVdL+xq3unTWrFHi6NTtvqWB/LVaaujXVD21hMiwaNVxvm0bjr VXvk/N8RG0Cfc2rBmbQfV+K28GDH9lBZUnj1Dzk8dndPy9unWPW16Fffl1pO sMVvvcXXm4/bDXOoht/5ZZnFufdvfX1Tb/jAiT3IdO7dADDAxOfUprrVIrjc xhc6vsGeLKnVrzUqjl8CF/uEeiM0dJn6nFrzC8ExUHfFQ38pX/21haQW3b3T nlOLmHNzVzTOsn1FBJbV+s3AyKFhuLO6dojmVvdMarFbUWC83Dzr9o7toTq2 b9qBW3qgvQPiLg4NTDDFqi9Gz1IOX21v1Rq07wtd66h7Twp8HZb95xvziyfz P7R8adDV2q5zatEHmc69GwAG2ERSC38/GW3Pktryn5XWtvbGbpNaZdwzMqnl bZ96FXSNpqO7d9CwPKpDm7eKQFdMltRau7RhO+ylpbPCp5FbWh2f1HptRZ1J rX0LH5HUwsfDzh5oPzzGJbWWo+vYVV+oa+C6zGr7N53USpvZ6r/zoLb+/4FB LT6pxRxkJDUANmHj59SG2cOkVnxX7Ij6MM6ptV/xOqJRHcPp6O4dNiwPvatt zj2vbjvbQFIrznfaMFJ8sRTUYi9NbN2sem5Fuzun1jW2r00Yu+IGnFMLz2fo 6bVFZStnbRdLrjV/m+fUVv9YBrRlVBsa1AaeUwvMQFIDYBOmfqLIRB9NweWW 721YT5xMUjuLHZltK6k1vtJxC8m4pFZeR6NXQXgQFtu9A4flgaX3SWqlWTTN r2NFjNrLpg2oxVcvlsfGra1uXRHzXbc5qXVsRV3rt0fH9hCb1EI90Lriuve6 6H1pYPOWb73lllsaavLGW26pRqLopNbzuF1YaiWpzp+SW9yjSn/o39TOtRl7 kOncuwFggOmf/VgYfC3+Pe0X+/klPrUrDAOf+COGLD2SWulJa5G90VSzkQOs wFtr37FXKjU2qZXnt7gEa5JVsJpdteeLndjdvcNrUNnYzgVjSL1Cla5YbqqV iwbbVkT7XlZ6a35xWmg77NfkjhOZ508BjW51eHeo9Ee/raj+hUyvLXzqzhnW A2flw2NENYNvn2LVz9UOqKU2VXJHdFLrPm53rsSz1cZXfc/Ux8zKwS7uINO5 dwPAABv5PbXlp/rweybKc6jOp3jvwPlyayOCxsr0rUevpFasaGCMU6lFc9cO rm3EADtUw9FJrTT7N9Z/J2lwoxorX5lRRPeOy4r1pbem0HBXLHqsNL9Sj/RI arWWL2/gCW+Hkdp3vWX7Gi/zamx1pdrF1i/6ojZ6j9mKar3RbwufPsZG90Db 4bG+p7T8pfTnKVZ9sSG1OTR8adErqZ11HLdrUzS1onbiqnlrjBR7hjTqINO5 dwPAAB1JDZiIa6HgUNm7AdiElqT2urCNVmlXy22pw9aWu3077OR2LZvBbjfC wRXY67FcCnvlbh12D8Rs8IfU6snbuNd7NwDJck4NtsNYDg6VvRuATZDUYDuM 5eBQ2bsB2ARJDQAAIDWSGgAAQGrypPYyAAAAyciT2osAAAAkI09qNwAAAEiG pAYAAJAaSQ0AACA1khoAAEBqJDUAAIDUSGoAAACpkdQAAABSI6kBAACkRlID AABIjaQGAACQmvik9s1vfnPTldmCw2jFNiXVY8/O7boWAAAH7jBGgPveioM5 p5bUihjsMFoBAACMdDBJ7Qj1inXORgEAwB6R1NhfTkECABybwxgBxrSiM6kd xomYw2gFFeNX65e//OUHH3zwox/96G8CAOynbCTzwAMPPPLII5OMr9J3GAP7 mFY4p3acWlL8YXxN0e7q1asf+MAH3va2t/0kAMABed/73peltgGjo8MYAR5G K1YkteN0GN9FDDCbze69997V0eyd73znBz/4wU8CAOyzf/Nv/s273vWu1Qjn n//zf/7444/vetjFWO1J7TBi6WG04sYBNWRXspj2T/7JP8mPYB/72MdefPHF MwCAQ/H973//0qVL73jHO7Khzs/8zM88+uijux58MYpzahyPX/3VX80OXLfe euuTTz6560MpAMBGvPjii7fffns25nnve987m812Pf5iOEmNogM+bXflypXs kPW2t73t+vXruz6CAgBs0CuvvPLOd74zG/n8+q//esww6TBGgIfRiiJJjSPx vve9LzteffKTn9z1sRMAYOO+8pWv5N9RP/nkk7sehTGQpLYvDu9bgm2azWb5 kx5feeWVXR84AQC24T3veU82+Ll69equB2IMJKlxDB555JHsSPWud71r14dM AIAtufvuu/MLinY9EGMgSY1jkB2jsiNVdrza9SETAGBLLl68mI1/fu3Xfm3X AzEGktTYjitXruzw6UP33Xefm9QAgKOSf1Mtqe0vSY1NywLaL/7iL+YXH+7q ntbf/M3flNQAgKOyk6T26KOPXll65JFHtrnoTciasGrO9n+fTlJjo1YxLber sCapAQDHZptJLRvg3XPPPf/wH/7Dnyz7uZ/7uQ9+8IOPP/74FuowlWz4+sAD D9x5551vfetbf7ImG9lmr27nUjFJjc1ZxbSf/umffuihh/KdtxjWsu08O3ps YWuX1ACAY7O1pHbp0qUskeVBJhvv3bZ066235n/MhoLZeG/T1ZhE1mmrtmTe /e53r5qTDWJXf89atIVHtUhqbEgxpuXnvr/61a8Ww1p+9Mh95CMf2WhlJDUA 4NhsIallI7oPfvCDq5NN9csdH3300eIEKZ9cy9qS5bLVZWBZtKzXNpsm+/tq suw/svFtZZqHHnpoqli6k6T21FNPHcyvgx1SWyZUj2m5Ylj78Ic/vEpqm/62 R1IDAI7NFpJansI6T5mtTrpl0WZzlRljNUbN6vmpT32qc/pVi7J3rcJaFkvz AfBUfb7lpJaFmq985Stf/OIXUw7U8bJYnbXly1/+srBWFIppudWOUCSpAQBM a9NJLUsrebSpn1eqy4bN+cWQm76SaoCsbqtTCTFtya1GvNl7sxHvPffcM/nI dptJbRXTfu/3fm+HD2yf0PXr17/0pS8Ja0XtMS1XD2uSGgDAtDaa1LJ0k59U ijkDlbt69Wo2/Vvf+tbtP0SxRTZ2za9mHPDgu8qj8/Y3qRVj2tNPP72FJW5H toKEtZWYmJarhLXUktorr7zyB3/wBxs9eNb91m/91hNPPLHlhR6qbA1+7Wtf 23UtAGCXNprUPvShD2Uzv/POO3u9Kz/x9Eu/9EubqNIw999/f+UixnhZ9lzd s7a/Se1QY1pOWMvFx7RcMawlktRee+21bBO9++67//XSZz/72a0cSs9li8uW 3jlZ1pxV9bKqZvnuwQcfFPEqsp7M+ueFF17YdUUAYGc2mtTyE2p9082TTz6Z n1bb1W/sVmTD17whDz30UK83ZvXPs2qjPUpqhx3TcsJa35iWW4W1d7/73Rvd YSOT2sWLF7Ps87WvfS17y9e//vXPzm3lUHquV1L7/d///ew/sv/N3vKJT3wi +8v9999/YMEkS6DZbjVs4ldeeSXrn83UCwD2w+aSWjbYy+Z86623Dnhvfrda 32S0IXkXvetd7+r1rkuXLmUj3lBM26OkdgwxLbersJbtKb/W5erVqxutw7CY lqs8un9DNYxJai+//HKWd3Z4cqpXUrtRjiHZP++9994srL322msbq+C2RXbI gIkB4BhsLqllOWvwRYx33nln9t5s0DJ5rQbIR7Dxt9rlsqHvRz7ykZawthdJ 7XhiWm4nYW11F2TIrbfeutHnt4yJabkthLWYpPYHf/AH2Wj/qaeeapkmy0Ff //rXs+05C3Tf+973ii89//zz2drPXqrcHpX9JatANvETc6u/Z3/8vbnsP/J4 lWeNbMqsDvkiGmPXjaaklskqlv29svQsfmZ/yWuV/Xd9bq+88kq2oHxxWROy v2RLr8TV7C+///u/X6z2qr2rfsiqmlc7q0Z9KS+88ELeOcW7/4qzyk8Ors4J 5i9lzfmt3/qtvG7531f9X5xV48Srmcd0RUtNAGB/bS6p5XP+0Ic+NOC9WX22 cOdLjGzY+da5YePP7F3F35zar6R2bDEtt5OwliWdUKjf9NN1xse03KbDWkxS yxLH3Xffff/992fhpXGCbBj/0Y9+9N57780SwW/8xm9k/7EKCw899FCeFLIJ 8v9YvSv759WrV7O/Z2/J/57NP79eMfvf7C933XVXHhyyv/zu7/5uVoHsj9nM K/NZuRFIapnsXVlNVv/Mdr1s5vlyswpk/13JcVnqyZqctyibIF/cZz/72cpy s79kM1nNMz/zmL0xb2xW4azritWuXDKa7RGrxmb/8eCDD1Zmldcw+++shtev X89eyv6Y/yV/KeuWvP9Xtc3vJcxjdePE+cwju6KlJgCwvzaX1D71qU/9ZP/H ieTy27tSSGr5syhH/sTb6jfU9iipHWdMy+0krOXnoOum+oX0RlPFtNxGw1rk fWrZyP/uufzcVuXVLIxkcWN1Cun+ufylbNi/mj7772yovzq1lP13Fi6KueDi xYtZWFidtcmC2+qcWmYVELLEUfznyo1wUsvmvKpS9sZssuKtW/kM8xNnZ/Pg k6fI1Zm7PDDGJLVsQXl78xN5WQNXJ93ypaxal5+pXJ0Uy2uVJ6x8VnnQy5ee LSXr4dVyKxc0ZhVe9WpW54/OhSYuJrXOruisCQDso80ltStXrgzOONlIb9Nj 1EhjruGsuHTpUt6u9JPaKqZlHnvssccHuXbt2s4fzZHVYVjls9CRN3+bYa1+ +vWDH/zg5hZX/P2IbAvPdreR11hmc8h/5n4TYS3+Kf3ZKD0/QZbltcrFipVr I/NTRfXL5LLRfjEX5EGmZT4r2d+L0SNPUqsEVJnDjaakltV8FamKqW3VtOyN Dz/8cP7PBx98sDJBLiapFeufddRdd921intZhxQnyGNpcW7Z9PmJv9WZrOKC iifC2m89y9JWttzQxMWk1tkVnTUBgH20uaSWjfre+ta3ZjMf8ANk+RtT+Em1 MddwhmaYP0ky5aT29a9//YtTyCLPtBXrJYtp+9WKyg1rm749LT/rXTTmF+fz PWWqudX1/T21LCXlFyiuAleWmPLLEVeywX8xMWWbfZ598lNjq9RQuRown0/j DWj5Ga7KX+pR5UY4qWVLz1JJ/t9ZPKzMrTJBFqDyCwUrYpJasf75zwSs/ll5 MMu9c8V+y39ZoHFW+enIluZnM88atbr6sWXiYlLr7IrOmgDAPtroU/p/6Zd+ acDMH3jggZ+c/3jZJqrU15hrOEOy6HrPPfdMNY7dRFK7fv16fvlf5t/+2387 7LRUZqNBo9M3v/nNwTXPZGO/L2794s/VDWtb+PH3bDvMNsL82ZK33XbbyONA fm9pNp/V8yqnTbh9k1ouCyB33XVXfkVcPpj/vZosO2Qj/CzIZMEnfzzIjXmS Kia1YoLIIkMoAtSDSa+k9sorr2T5ZRW+sprX3/vQQw+tUljjBGfzXFa58K+e 1IqvZjMsRtFKUsuWkj/ooyh/tT6r7O8t4SvLwtncsiZk/5E1v/0EXHHmnV3R WRMA2EcbTWqPPPJI/jiO+FtgstFdPlLt+6zFDcmv4czGn7uuSNCG7lM75t8X 2+09evkFt1u+9Hf8M3w2/RSgYUntqaeeWmWi/CRL48NG8nu1Vo8TzKNKKKlV Ji4amdSyVX/vvfeuanj//fcXny6SyyLY6pK/xgnOllcVFk8wZe8anNSyALta YkXfpJZVo7igyttbklpnV0hqABykjSa1G8vx27ve9a7I0yv5jTPTnsMaI0uO +fMWdl2RoM09+/E4w1oKj1K5dOnSlpd4GEnt+eefrwSxBx98MBuu5+fUslez /FIJHfn0V69eLUab1dm3/J+VBJG9pT6fxikb/3LWlNSyeV68eLF+G93qqZK5 /OEeqzfm1a5nxvz+u9VkefIanNTy3FdcStafeV915qNsocU5F88Y5k8UaZm4 OPPOrpDUADhIm05q2Wg/f4zGu9/97varubJMlMe0n/u5n9vt/U0V+a1DV65c 2XVFmm3099SOLaylENN24jCSWj44zyJPtvryp+U3nqZ56KGH8kv4Vgklzyb5 NX6f+MQn8tAUSmr1BWURY/WU/viklj8VP/+9gH89fwZ+8afKzpZZJks3WSLL F5SlleKNaZUJsli6+hGBu+Yenrv33nvHnFPL5pbNYbWU7H+z/87b25mPstrm b8wfq7JqQia/961l4uLMO7tCUgPgIG06qd2YP6P+1ltvzW+9Cd2c9cADD6x+ T2qjz7sbIB+CplarlY0mtRvHFNaONqbdOJSklmWKbFtdPfgiS2T1J+Q/9dRT WcLKJ8iG/atzcDfmt03lYS3LBfkNa/lLxf9eyVJVfp9Ulo+yZLE6x1SZsvG9 Wcwp3vOVvb0+TS6b7apFWbXrv0ldnCBLLqv5vPDCC3kzs0Y9//zzjb98vZKF muK5vO9973vZBKsH4Od/yR8Dkrd3NXF9Vtm7Kucf8zfmf8z++bWvfS2rWDaT fLW2TFx5tb0rOmsCAPtoC0ntxny0f88996weCnfbbbd9+MMfzhaa/TH77/xJ j0Up/JLayuOPP57XcMwPTmU98KEPfWgTNx9tOqndOI6wdswx7cahJDUAgEOy naSWu3r1avEh5EW33nprVpPVjzGlFtbyH7rKQuXghxneeeed2Rx+8Rd/cdqK 3dhKUrtx6GHtyGPaDUkNACA920xqua9+9avZQleP8n7ggQeK56rSDGuPP/54 /iNow35Y7f77788fS7KJ565vJ6ndONywJqbdkNQAANKz/aTWKc2wdvXq1fwa yA9/+MO93pjHtMxDDz20iYptLandOMSwJqblJDUAgNQkmNRupBrWPvWpT+Vh 7bbbbvvqV7/aOf2TTz6ZX/S40VZsM6ndKIS1pJ7POVi2jsS0G5IaAEB60kxq N1INa1euXMmfUZlFtg9/+MOhvJb9/Z577skvmMym3+iveG85qd2Yh7Uspg2+ ZS8p169fz9py5DHthqQGAJCeZJPajXJYCz3ef/uygf3qTFn+LJQslK1uu8te Kj41pfNX5MbbflLj8EhqAACpSTmp3SiEtbe+9a1JncR55JFHsrrlZ83qstpm r169enULNZHUGC/PWbfddtuvDZW9V1IDAJhQ4kntxvIJ+cMeurgFWRy7//77 V+PVT33qU1euXNlmqJTUGO8jH/lI43cOfW3uSHLfffdJagDAUUk/qdFOUmO8 J598cvDZtKKYJ+0M8/GPfzy/CnrXh0wAgC25ePGipLbXJDWOwZUrV7Ij1fvf //5dHzIBALYkv+rp/vvv3/VAjIEktX1xGL9Atyvf+MY3siPV2972tl0fMgEA tuSOO+7Ixj+XLl3a9UCMgSQ1jsTP//zPZwerr3zlK7s+agIAbNyLL774tre9 LRv8HMavGB8nSY2iAz5z9+u//uv572J8//vf3/WxEwBgs/ITau9///tjhkmH MQI8jFYUSWocidls9t73vjc7ZN199927PnYCAGzQpz/96WzM8zM/8zObe1wb W9Ce1A4jmR5GKxjv0UcfzS8DeP/73//cc8/t+iAKADCxF198MT+blnnggQd2 PfhiFOfU9kgWOZ999tld12K/Xb169Rd+4Rfyp4vcfvvtH/vYxy5evPhJAIB9 9ulPfzr73yyjveMd78jPpolpB0BS49g8+eST//Jf/stJfqobACA1733vex99 9NFdD7iYgKRGxZGcufvqV7965cqVSX6wGwAgBZcuXRqc0Q5jBHgYrVjpTGr7 dZNXqLaH0YpJHNLWCwAAh8o5tT11YN8YAAAARZFJ7TBCwWG0oq79HNx+nU+M dKirEgCAkMMYAca34jDOqR1GGEmwFc7cAQAcm8MYAR5AKwYktXQCxZiaHEYr tmm39dyXXgIAOCSHMQLc01Ycxjk1AACAQyKpAQAApEZSAwAASI2kBgAAkBpJ DQAAIDWSGgAAQGokNQAAgNRIagAAAKmR1AAAAFIjqQEAAKQmT2q/BwAAQBq+ 8Y1vSGoAAABJkdQAAABSs0pq3wAAACANzz33XJ7ULm3Y63Zk0+0CAADInZ2d vTgdSQ0AAGC87Se1L3/5yy+88MLZFj3xU69TdlW2uaIBAOCQbC2pbT+j5Xae Vo65bH91AwDAYdhCUttVRsvtPK0cc9nVSgcAgH230aS224yW23laOeay21UP AAD7a0NJLYWMltt5WjnmsuuVDwAA+2rypJZORsvtPK0cc9n1ygcAgH01eVLb dYOqdp5WjrnseuUDAMC+ktQUSQ0AAFIjqSmSGgAApCYmgn32s5+V1BRJDQAA tiYmpuUkNUVSAwCA7YiMaTFhTVJ7+q47Xn7u2nLJ11790h3PvqcyzU9867ns pYvPNr794vl7X76rMvG1b72n8peSV5+7+K27fuLphhk2TLyq27eqFZPUAAAg IfExrTOsHXVSe88tLzfHomuF5LWRpLbw3MVAKmyulaQGAAApi4lp9X9KauVy y8v5wuant1ZB6em7Lr6a/fFLtxROeE2S1Ep/WSzlrD7b+sTbLjtY3wDAFF6e D2myYcauKwLHKyamtfxRUsvKs1+aL+m5OxouQXxP5brEyZNaOSp+6RZJDQAY az2qWY4x9sS3v/3twe/9/tyElSHGd7/73ddee23w28es8fS1J7XIvx91UnvP HfNTWpGBaENJbVWN4pwlNQDYgVcv/kTr52PL7Qnbl48cGuLYPp5Te+yxxz72 sY8999yQ/s0y2v89t+9hbbH5LUaGDRZDzfKaDW607/mJZy9efLX+nISupUTK ctYDDzzw8MMPDwtrTz311H333Zf977hapKslqfV96TiTWh6vyiezdpHUlof9 1rdLagCwcYeR1PZOFtPumxsQ1rK8kGW0/O2f+cxnxpzi2bmJk9pyo11cQha9 lBh5TMu7fUBYe+KJJ+5b+uY3vzmiIukKxbHGv7e/epxJLd9uuzbvLSS1ek1C HwTby25bWscAkJKpTjdsw+Iqx71PaquYNiCsFfPC4NSQjlFJrfqu4pPMSwPL 8Rv5yG4fs8b3SEsi6+uYk1r5AY+Vw109am0kqeVvl9QAYLcktS3LhverM2J9 h+71vJD5xCc+8fLL+9olkya13GLguriQLG4pnWaz2X01kWGtEtNyjzzyyNC6 pEtSO/Sk5upHANiq6EHs4jO6OABeWNxVURpRzEcIi69hX/3SLU+vPt/fc8u3 vlSbQ+65ay8Xf3S1OGXp2dSFshzAN47nl7Mt/Zbr0+e/VdRQgb4VLk8zvz0q 2HVV+V1m9bDWfgdTKKa98MIL0UtOzgaSWsNbJvk6Ir/LrOIzn/lM+62CjTHt C1/4woiKpEtSmySpha5+nL/aL2pNffWjpAYAW7XJpJZ93LcNA0rVCGSxpy9e LCyiVrqSWmjMU3/2SK8Kl7/0Xpbg79U2yIb3ly5dqo/hQ2Eti2P1mJb9Za9j 2tleJbWz+Zm1LFBX1kLLc12+/OUv11dx9sdxtUiXpDaytD9RpFdSq52e80QR ANg/G01q+Uf8+nzTc8sLdSqLW41MCmFnnt3KN0c0Lai0uEr+Ws726bvuWD4P 8NrLyx+TrTSkR4WXs312da4t/43ankHgtddee/jhh2PCWhbHPvGJT9Rj2gE8 8n0DSa1hQ53wEt/nnnsuMqx94QtfqK/cxx57bHQV0iWpjS2tT+mvJbXGqyXj c1k4fC12N0/pB4Ad23BSq92H3jBxIL7V9Utqy9kGT7SV6hZf4cXbp/hFgJiw dsAx7WwTSW1xM+PETxQpLSEirB1hTDuT1KYoLb98XU9qi6NxfeKoqNXxy9fl CxIkNQDYgbYnQpdGtoOSWj3O1AfSi7dH/BxAr6TWNtuGh07EV3jaYX97WDvs mHY2bVJ77trLFxfX0Fa20skfm9Me1o4zpp1JapOU1Vaan6lfBqWn77rYdLpt eTB8bvXU09ctp+yMWg1/Wb239qASSQ0AdmDnSW0xZcwouk9Sa59t/dUe0XJ9 EvAnnv3StfGD/1BYywb8hx3Tzjbxe2rvuaWezTfxgNPGsJatnStXrhxnTDuT 1CYPazWvfqnh9FnzxNUTbaGk1vjei89WE1nbN2nRPwAnqQFAP5u9+jE+qcVc TDggqQVmW291n6RWHcmEnifZS+OJmNBZm4MxcVILzGdDP0XReMazrv2RnodE UpuuzE9vFa/gPT/mhDb78+fTrrftykN0+yS1V0sn8iQ1ANgxSa1vhQsvlUY1 T4e+3I7WHtYOL6adTXf142qsWH+saMxSBusMa8cT084kNWWTZdcrHwB2IJWk tk9XP1ZcezVwe9QAobB2kDHtXHidzjVvdU0b7epkQcOsNvrz7i1h7ahi2pmk pmyy7HrlA8AO7Dyp7d0TRRpNmAXqYe1gY9rZ+m6axnNhoVcDTxS5I5SXN5rU zgJh7dhi2pmkpmyy7HrlA8AO9E1q1Syzvm99aFILP07//HRV8V/h8DXZU/pj KvzcxfovXE+bBYq/mHzp0qWDjWnnlttVU9eFToyGejv0UwubTmpn5Z8m/9jH PjabzTa2qHRJasrmyq5XPgDsQPwgtnAr0OKcxfzHqVefpIOTWuGG9PfcUfjl 6/lzpwPha/EY6vab3Qb88nV3hZfnFgv3+68eyDb+6seVxx57LBvzP/zww6+9 9tpU80zU+nfP12u/eA9g/XRbeKNt/m2+LSS1zLe//e0srGUx7bnnOk8PHyZJ Tdlc2fXKB4Ad6DOIrfzCzuuWb8z/PjypnYWfHlZ5TMfypElx6W2La5ltZco+ v6d2S/1HaaP7sIfZbHb4MW2u5dlxjeG3baNd5r5ivut4Nt10Ky4La3/4h384 0cz2j6SmbK7seuUDwA70O91QelL0Tzx7MY9REyS1fObfKjxcOvDo+/WvGz8x P1n2cvviYmfb9yn95edgv2fVFQxVXk3zp5TfUb/KNNe+0S7j/HqD3FpSO3KS mrK5suuVDwAA+0pSUyQ1AABIjaSmSGoAAJAaSU2R1AAAIDWSmiKpAQBAaiQ1 RVIDAIDUSGqKpAYAAKmR1BRJDQAAUiOpKZIaAACkRlJTJDUAAEiNpKZIagAA kJqDT2oAAAB7R1IDAABIjaQGAACQGkkNAAAgNZIaAABAaiQ1AACA1EhqAAAA qZHUAAAAUiOpAQAApEZSAwAASI2kBgAAkBpJDQAAIDWSGgAAQGokNQAAgNRI agAAAKmR1AAAAFIjqQEAAKRGUgMAAEiNpAYAAJAaSQ0AACA1khoAAEBqJDUA AIDUSGoAAACpkdQAAABSI6kBAACkRlIDAABIjaQGAACQGkkNAAAgNZIaAABA aiQ1AACA1EhqAAAAqZHUAAAAUiOpAQAApEZSAwAASI2kBgAAkBpJDQAAIDWS GgAAQGokNQAAgNRIagAAAKmR1AAAAFIjqQEAAKRGUgMAAEiNpAYAAJAaSQ0A ACA1khoAAEBqJDUAAIDUSGoAAACpkdQAAABSI6kBAACkRlIDAABIjaQGAACQ GkkNAAAgNZIaAABAaiQ1AACA1EhqAAAAqZHUAAAAUiOpAQAApEZSAwAASI2k BgAAkBpJDQAAIDWSGgAAQGokNQAAgNRIagAAAKmR1AAAAFIjqQEAAKRGUgMA AEiNpAYAAJAaSQ0AACA1khoAAEBqJDUAAIDUSGoAAACpkdQAAABSI6kBAACk RlIDAABIjaQGAACQGkkNAAAgNZIaAABAaiQ1AACA1EhqAAAAqZHUAAAAUiOp AQAApEZSAwAASI2kBgAAkBpJDQAAIDWSGgAAQGokNQAAgNRIagAAAKmR1AAA AFIjqQEAAKRGUgMAAEiNpAYAAJAaSQ1oMJtdXprNdl0ZAIDjI6kdtdmFk5tC Ti/vunbsxuzyaX2zODm9HJPXbFEAABOR1I6acTVVl0/HbBK2KACAiUhqR824 mrKWnBa1UdiiAAAmIql1OL9b58Lp6elJpjLwPP/T6emFy1FXhaXJuJqSjqDW vVXYogAAJiKpNZud36sTHnPWnUTex5MW4+oubdFlbA+19P6OOr9te1hs5xfa t3JbFADARCS1qr4RrTKQ3a+8ZlzdRVKrbOCSGgDAdkhqBY3PvBtgf+KacXWX PUhqgSp2Zao+84qfqS0KAGAiktpC99mEfvYjrRlXdzmypNaxH3TP0xYFADAR Se1sunNp/ce1u2Zc3SX9pBaay+CtL7Q3nMRUyhYFADARSW3qk2mV0W3aYc24 ussRJrXzeV6+ULxb8+Tk9ELkKWJbFADARI49qXU+lXyUxHOacXW39JNaqIa7 2fhsUQAAEznqpBZ/Ou3k9MKFy7NZaeib/fPyhQst103uwcDUuLpL8kktOBNJ DQBgrx1xUos6nRZ12VfTfW7Jn06bM67uIqn1Y4sCAJjI0Sa1iJx2Entvztys eHptX8akxtVdkk9qwQpKagAAe+1Ik1r3dY+DHrKfz3Y/TqfNGVd3kdT6sUUB AEzkKJNaZ04bMaSc7cPPqK0YV3dJPamF5yGpAQDstWNMah0XPiZzSmzxxJKT k/LY9/wPp6cXLk8RCbcwrt5CK/rXaf4Q+pNydZrvSEw9qYXrd1BJbXY5W2X1 rWixHc0f9zNhIwAAUnCESa09qCWQ02bnTyiJfCplNkwdk3U2mNR234qmVdn6 I+dNb0grqc2yuDLPKycNoaWX4HY+cpOYeIuaZ+roNp1vRjvffQEAJnJ0Sa3j yscdX6DVGiQ6hqiDlreRpJZIK6phZNBFr2kltel+/i/9pJaFtGFZNP5nugEA UnZsSa19tL7TE2rxv+4WHKD2rv30SS2lVhRbEBEeG9e+pNavwRNtUWM3I3EN ANh/R5bU2geAuzuhNnpguhqf9hueTpvUUmvFKo3E/XReY3aR1Po1eIotaqrt 6HxDilsiAECCjiyptY50dzWsm2xg2r8ZEya1BFuxSCOR8aZ5iZJavwaP36Km a+Our2UGABjluJJaikFtwoFp/6ZMltTSbEU2h+gAGYguklq/Bo/doiYM/HIa ALDfjiqptY4Cd3KPWve4NH96fKFqs6jH4UWOUqdJasm24vRyfLQZkI0ktcnf 3vFg1vnDHUubUf4bED3aBwCwL44qqbUNA3cxsutKOCctD0XofL5iVIzYxl1F u21FU4VqqfF8uB+oZFpJrU/LB27RO01qw/fQ8m9CyGkAwAE4pqTWOqDf/qVS nb8X0DnYHP+LA+OTWuqtKBnwQEBJbbp10fn2sR2yeLC/yx4BgIMgqfUbGk+n /Tqv2Oq0zqV7rD46qSXfij7z6Vs1SW3it4c7u88D/p1OAwAOwzEltaQufpzq 4SbjfndgbFJLvxULg9evpNavVrtPagAAB0JSGzWsHWrKZ5uMSUvjhuX70Ioh dYmtl6Q28dvDne3GMwDg+EhquxgJTvsQyhFXdW7qrqJ0WjGkKkWSWr9abSip yWoAwPGR1HYxDpy4JsNDTkrj6s20YmyektT61Wpzz348fyBM3+fBAADsMUlt 1LA2kYoMnuGYcfV+tGLsipXU+tVqo7+nNm/W/DfVhrQMAGC/SGqjhrWDTP8M ysFzHDGuPoxWdJLU+tVq7Lro94sLEhsAcMAktR6jyIlsYHg9NIRuKKntTytG 1UlSm/zt57rPq5Wa6RwbAHCgjimppfJ7ahs4tzd0xD5iXH0YrRhVJ0lt8rd3 zyTY3P6/ag4AkLRjSmqpXP64gdM0Q0PohpLa/rRiVJ0ktcnfvp7P5dP+ac1D RwCAQ3JUSS2Rk2qHkXEOoxWj6rS5p5XEzvlwk9p8XsPSmgf6AwCH4aiSWiJ3 qh1GxjmMVoyqk6Q2+dsbZnj5wpC85twaALD3jiupbfKHt+Idxh1eh9GKbpt7 pMj4ix+PIakt59s/sG3x1lMAgA04rqTW8Vi5LQ3tDuOpiYfRim6bO6nW0lxJ LTT78ysioxObrAYA7LMjS2pJRLXD+CWyw2hFhE2dVGupdXTIOrqktlpM3Ck2 d6wBAHvs2JJaR1Tbzshu8gsHB89wzLj6MFrRbUMn1Tb+OPuDTmqLhXXnNafV AIC9dXRJreu3mrYysps45Aw/vTVqXH0Yrei2kR93mKbOR57U8iW2fvnirBoA sLeOL6l1/qzuBGdhugaHrVXoPbYccR3iqHH1YbQiwgYeGTpRxJLUdrdQAIAN O8Kk1nUF5Mjv4eejxq45TBlyxuSIcUPcw2hFt/ZsP2Rrmew0XcuMjiiptfWD pAYA7KujTGqdp9WG/hxT8ad6Rzzkvs/octwPD4wdVx9GK7pNe3fjhJfrTf+4 kwSSWuc56TpJDQA4PMeZ1LpPq82HzL3SWjGlLWfQ9v5pnkI5ctA/elx9GK0Y WcOsjvGLqW0mfVtbst0ncG4jqeXnpE8n6wZJDQDYV8ea1KKy2nzEGBHXwo+g G/ps+ZuizuqNfzjK+IxzGK3o1n0atjvZZ9tJ97ncnvWa/B663Sa14ttPok9s T/GDBwAAqTnepBYz+F6PGS9kw/DKRVnZvy9f6HxK+NBfbM7fGx6q1k/hDRqi TnCf0+5bsZ17o+Ki/Tzbl7eU+YYS9XvNUz8xc8hVvBu8ILazeQ3LPo9rHfd8 tm1DghoAsL+OOan1yWojjMlqq6F/4S1RP/o7ScyKvf5z163Y1lMsorLacMNS RWfnV7o+6/ms68NXF47tzOFbVOtjVhq+K5l1b0SCGgCwx447qZ1tPqx1ndTY yPJ7xJOo9DHugf0bb8X2nje4way2kV9mG7C4Dd+6GJzTJrrWPWoAwD47+qR2 tsGwFnmjzcTLn/Lx+D1mucNWbPPJ8BvaWEZVc1DICS1xfGcO2aI20a1yGgCw 3yS1uc77pfrrFZgmG6gOODMTM7Ce5OkiG2vFln/Da+pUEf/kjKABWS3UxxN0 5rAtahZxOez45gEA7A1JbSXqzqm4UWLPZ4wvFj926UMHpxHJI3rWO2nF9n9t ebpkP1Wi6B8fA0ue5AfRhm5RE+2DYhoAcAgktbLZyDF43GP9g0sfOlAdeVom 5pfAE27F9pPafKljU8UE59LKFeoZ1pq7ZprOHLVFjdkHp+5UAICdkdQaxT5W vTBC7H6ceK+Fb3uxHdee9T9LscVW7CapLZbde0sZG+c7qhMfcgKntabqzLFb 1PxLkx49u8FeBQDYBUmtXf6badmI8aQ2aDz/0+n5w8M3Nuo+TwGntSWvljv9 YhcLrC9uxMK234rdOH/4fWBLWTT29HxT2UpzV32+5S22oSYTbFH5zwrUN6HC NnQoGxEAQIGkBgAAkBpJDQAAIDWSGgAAQGokNQAAgNRIagAAAKmR1AAAAFIj qQEAAKRGUgMAAEiNpAYAAJAaSQ0AACA1khoAAEBqJDUAAIDUSGoAAACpkdQA AABSI6kBAACkRlIDAABIjaQGAACQGkkNAAAgNZIaAABAaiQ1AACA1EhqAAAA qZHUAAAAUiOpAQAApEZSAwAASI2kBgAAkBpJDQAAIDWSGgAAQGokNQAAgNRI agAAAKmR1AAAAFIjqQEAAKRGUgMAAEiNpAYAAJAaSQ0AACA1khoAAEBqJDUA AIDUSGoAAACpkdQAAABSI6kBAACkRlIDAABIjaQGAACQGkkNAAAgNZIaAABA aiQ1AACA1EhqAAAAqZHUAAAAUiOpAQAApEZSAwAASI2kBgAAkBpJDQAAIDWS GgAAQGokNQAAgNRIagAAAKmR1Ooun9507vRy3MQn2bQncRPvRM8a9mr98Dmm 3291gYZM3V90mGUbz8lNC9kmNNt1hdrt46ZeZAs/JGlsjdvYpvq2NOXP/ePZ Bw+mpXvXkMZNeu9acagktboeG+fswnLEmOqm3LuGW0lq6fdbE0ktBYsOX0m8 5/dzUy+yhR+OVLbGzW9T/Vua8uf+8eyDB9PSPWtIYJPes1YcrsNPaustsN3J heVX8yl/tzbAwZ1Ty+e3gx6X1HZvuTuvdtdZKmfUgptl+oeIuZb6b2gL39mO vLcm6LE0tsYdnlObZjvfTDdufx9MzuiWDttHZrPLFwpXatx0cnJ6YdzFGpte ZYtPwvW4NbIC/T6njmfDS5ykNjKpHZwtJbXR85PUjlK63b3vuUNSS9/B9NgO d+OU01DKdduSHSS1liFiOAdF1mOPklqfmbBth5/Uajq3vePeOJNPaosjlKR2 lJLt7t1tltMI139TXb7vPbZ9h9Nju9uNt7+dx0u5btsytqV995H8TNJ55Dk/ ibZKPfNTbPmMBma1RJNaz/45ng0vcZLagAkOmqQWJKntXrLdve+jaEktfYfT Y5Jak5Trti3bTWrLm56b887swoXhHS6pMSFJLTRBvgesvlpZfesSObfy8+ni L3quXC5dstwpw/toU23a2lt5it55JVu7Z1CregWctiVcPm3umMJMBnf7/I2l d9bfOCapzSerbVPVo2hU7WPbWN6UTs4fklifcMC21NmKUgUb95o+zajUtGxR 78GtaNoDmpceblTXZtm+A0aso94V7te1cfWPPB4WOiu8N0XsyENmW+2rsTta Wy0at4TyIqZcs1E9NvIg1nePiO7Dvp8yi3cF9unlcaD+0VEZg1aXMel2Plk3 bqBuy/4Y/mE9X+wsuglRG15p2puCs40frlTf2v+ossxpPXNIj117qsN+w6Gs d1Ib9Dk19fiWgSS10AQnFy43btqV97Vt3hXdzxMP7UvLGUya1Jqvzl4ecOvd E7iau/tK7vgjQEe/Nb9cO9SE3h4wC/Z68xXeI5La+aUUxV4s9l1k90a2MXTp fe0W+CHbUlsrAp15Uv5ycsi2NHFSq7ZipWHLb29U5GYZuQM2PaagV4V77wVx 9Y88HkbtTV1LrOu7k47f0XpVI27zHrFmu3pskoNYjz0iug/7fsp01bTQFV0n C+oj1fYemupzP74bGxo1Rd2C3R79YZ0NvBu3p/r74ze8lomLu0/Po2WhRr2P Kos39LoXre+uPflhf/0orf5Jrb1/JhunsQGSWnCCxX6x3PpmzSfKG+a2/qZm OWH+jUjXEWG9gMUbZ7MLjceSKZLaqpHFFha+qwt9Pp4UW3XacaxoqcDwfgut v3HdXvxaK3vfSVO/j09q8xFK0xEtsnv7ddH5F5azWXlu1UYN2ZY6W1FrRuM+ M2Rbar+ko98eseihjh28Z6Oir1zqsY76VHjoXtBd/8Wioo6HMXtT7J7Tc7bT 7GgtleixeU+6Zs+619HYg1jPPaK7D/t+yjQ1qvG81Xz1Nq742sg9JmJVO2HQ 537fboxscP+6TfBhXWvChebtd8D+3rH7dB0tIze5iKPKgKA2YNcefdgPHcoG Xv3Y83NqwvEtY0hqwQmKm2L4nfW/Db2ZoHUMWr7KZXRSC392NF9bEjyoLb/2 6d2w4f0WWH8j7uGY1S89aOzi8UktcGCN7d64Nq6PpM2NajrD0DPjtLWi64g9 aluaNKnVJm/5WBo/ymqsQtQ66lHh4XtBxCgx5ngYvzf1Smq9d9JxO1qTfpv3 5Gs2+Mfl7Cc4iPXZIyL6sO+nTE0tfC2D2oULp8092fClRf+kNuxzv63B/T4k RtZtig/r2nLC6yxyw4s9kLZ0dlSLoo8qkdtgfdb9du1NHPaLb9l6Ujucm2X3 iqTWY4KWA1B9S+77DUNoB2j4tBqd1Nq+TQrPomXy/lexDO+39qQ21Rc7Tatj gqTWOFl090a1MWLlFl6b7p7HyK8ox21LUya1mB08/nvXXp+A/dZRjwoP3wt6 foL3W1jjwa1fUoud7SQ7WvC9sQPN6dds69QB4w9ioT0ipg/7fsoE6189XGX/ zl9pHz9OMlJtrsb4bmw0Sd028GFdWlTM5ldfG9EH0uDRMrJFfZNa/KFy/K49 1cEhrv6bTWrOoG2XpNZjgtgj9uq7kMCdoo22mNRa97XwAab5q9z5vFp32+gP tbh+C9ZmULeX2jK7fOHCafHe6DGfzpG17te93W1s/0isvTpZUus3kh26LW05 qcUHtV6fgD3XUa8j0tC9YPKk1rU3DUxqg3bS7gV2bXsTBLWxazaux6Y9iIX2 iIg+7Psp09iYyofiOqBVolp8Zj/0pLaJD+vya0P29zHfePVr0caS2vhde7KD Q1z9N5TUJhho0Z+k1mOC6CN25dbZuC26dQxa+uvYcWlrD4STWotpklpcv7V9 6zeg2/P3XQjcF73FpBbZvV1t7Hl4nzqpRfZDZGNjF7PhpBYTJgYkteiP4H4j wGF7wXRJLXJv6pvUxuykpZcGbXvjd/Oz8Wu2de4bOYiF9oiIPuz7KdOo8vE3 f1v+j3wOpReiGnUkSS1iBfWswqj9PX5fDx4tI1vUN6lFH3/G79qTHRwC00dV eIKkNnygxWCSWo8J4pPaYvrSISzm0Y/lCdf38ZZnf7hJ7WzZ7pZ+61x/Pbu9 8GSl+dNmL88vvB//6Vw28QAy3EZJbXgrDiOpLV4advAZO4KN35t6JbWRO2np pUHbXuJJbVMHsV0ntcWEi3nO/1Gaf/GF6tqT1NpXUM8qjNrfE0xqq+FW5Ek1 Sa1Wg54fMYwgqfWYoG9SW75tttygOw8KjU+xrb1roqQ2ydWPEYYGnEC/RX8d G9Xt61t5y8eZ7Se1Id3b0Mb2z5/aqyld/RhjJ0ltn65+rE4Re/CZZATbZ2/q sSmM3kn7LjD43jSvftzcQWz8kHvU1Y+rKedzWd6kVqza+oXako46qU36YR18 LXrDiz+Q9g04fRrQPGlkVBu/a092cIh6ObDNTZjUlguKH98ymKTWY4KBSS30 1sCCT067ftdyovvUYg/Hga8so40JOOEbcfp8FR+ueXCCLSa1kd1brWnb50H9 tcmSWr+x7OBj+naT2qgRRssr/dbR2BFgj4PPuFFir70pfkcev5OWXhu27U0Q 1Uav2cDUGzyIhfaIiD7s/SnTOptsysqtaYV/53Orzuw4k9omPqxLL8V8eIw4 kAaPlv0CVdTwYDFtZAgcv2tPdXDItV++GXp1+qRWWJqotjGSWo8JIo/Ys8v1 dBWxJVc/iMICO+H6QoSucen6q7DAITawv44a43QeASL7LVSXQd3edBvgWeE6 7K0ktfjujWpj8POnabWP3pZqLza9Oqv34sCDemtSG9uK8NbW1ai2ZrWExbh1 1KfCAw8+fevfPN9ee1OPrX70Ttp7keH3Rm7e06/ZcPU3eBDrcfyt6f0p0zab bCbzBdcHvqeXm4Nae1IbtZ2HJp4oqY2s2yQf1sF11vDhEbXhxR5IW46WUS3q 1frVhtg8efZy8feox+/aEx0c2t5Ufm/9pZ7b2OBxWr4NFH/TnDEktR4TRB2x lxPF/BZkw2KjrvYtfNLNlosoXjfZPS5dHjIKy5uV5hH4KqZ8lm82v1J50DeF I/ptfbibLWrR6+3N7Qp0w3aSWmT3RrexMLfOn9ccvy3VZ1W8GmZxMXvDV4tD tqWO0wojW9F+I0Z7o5o3y/Di+qyj6AoPPvj0r39jd/XZm1qW2FW13jtpfVYD tr0Bm/d0a7a5Ixbz39xBrC0wdvdh70+ZRouodnraXJHFNSjBMWnok2zMdr6h pDZR3Sb4sL6pdBDp/OH2mA0vcvfpPFp2tSj6qFJp8HzW63mv7sFqymrb/OXr tp1kXflit6xvH2s5NRq5jQ0cpxVXdvd4lm6SWo8J4o7Ys7gnn9Wtt+7aO2tP 11kfUMvzb/h6sWtsW57H6aL2wdb3b1jjXjum36qNn08wtNsbm3Wy/KI2+Fkz a/1jXedWF9O98W0Mze2koQLjt6Wo5c4iJovOE/UaTNGKwIAqslGNm2XL4uLX UZ+zWgMPPgPq39RdPfamliXW9JjtJDta3/dGbt5j1mxrj43tn6n2iPD3QJWa BT9lmhTSQ7A7epyHmmI731BSm6ZuZyM28uUpl5Om94d/DruyegP7e8zuE/o8 jW9R9FFlOefGpwME3hu/a/dtSI+DQ1S3BNvdaxurtyLqI0ZSm5qk1mOC6CN2 /tVS4bul5vvNAvMPKi2ktITV/HuNrvOvpNbzyMNgwywC74h+PGvD1S7j+q30 1KHzifq9vTa39btWTVpddNPRkMAfq6JOvcV0b3wbK6u3ZV1NsC31X+6wbaml BuNb0TKgimpU82bZ1mlxfdWvwgP3gv71b+6u+L0puMTmusXNdrIdLe69kZv3 NGt2Nd+GHhvVP+P3iOiOiPiUqVmNLcNfN4a/gQp98I3bzjeU1CbaB9dz6ruR ryNWuSLha3167e8x+0X487TXJtewj7TIZx131Iz9YI1tSO+DQ+vcIo74vbax plZEfMS4+nFaR5jUUnW5fnXHwurscuQHGwBAH80nw4CdktQS0f4dY4/v5AAA eoo9jwNskaSWiNakJqgBABskqUGCJLVErJ64WnoC0eLxRoGrnQEApiCpQYIk tWS0Pk8k6uH9AABDSGqQIEktKdWn+Myfzx/75DYAgEEkNUiQpAYAAJAaSQ0A ACA1khoAAEBqJDUAAIDUSGoAAACpkdQAAABSI6kBAACkRlIDAABIjaQGAACQ GkkNAAAgNZIaAABAaiQ1AACA1EhqAAAAqZHUAAAAUiOpAQAApEZSAwAASI2k BgAAkBpJDQAAIDWSGnvr8ulN504vb3/BJ9lyT7a/4C476xGGm2Wb08lNC9lG Ndt1hdolu/Fvzeb2Mn3LNtneYC9IauytHeWS2YXluDq5TzhJbe8sVtlK4usu 4Y1/aza1l+lbtsn2BnviSJLa4ph0cqH8fXX+keswtTkb7eGjPacW7FVJbc8s B0urI9MslTNqLdvYjr+HXw8wS05OTk4vXN5G/43ey3bZt4HeO++/LXXfQQh2 47I3LyTUk+nuy0AMSc24dpMOM6ntmqR2KNJdYekeG3c+SN5cUtuCzt5LcZWn Z+cbYR/p7stAjKNOaou/OoJtzGZ7ON1h7maFe/VYe2RvJbvCEj42Bg7ms8sX TrdzNdfYlbbTvg18aVnsvqRSRqIC3ZikhPdlIIak5gi2QZLaJkhqByPZFZbw sbFtkLw81bHReh9iUsstWrYX+WO3JDVga440qV0+bb52ofFgFjooB0cFjUfG 2fwRb+tnvJ2cNh/ky0+Cm987ENvI0ltvqr11/jGct6LwBWql9rGL72pOZA/H t7byhLzzCSNHTOEP1cAMOivV+L5C9zZVtrFJF4orrCQ0kmrv1bxitXXcUoeB G9yE21L0FlfqrZPzhyTWJ+y3ruNa0bFb9WxGpaaNa31wKyI3vNZGxW1jgUNl zDoaVOF6zzXvIaGDcuzht6NzInqgbTMY0LfVJ840vS1y6d29F26afTm2clO1 4ij2ZSDG0Sa1xgNYYNAfOJ6tZlL9OKgGtVnogBmeZUnEk7tDizi5sF7C8mr1 0hix+AkSulW/eqFMTHMiejhyccEplwOvaZNazCoIJ7Vq9za1ezl5640Ord95 B+e+TGqXG+feMP6KXgWNFRm/LUVu8KG7Qmo31QxZ122tiNitBnbjxEktfsPr alTcNhb8fqo+24ZNv1+FmxcUnTXiD7/dnTOkBwoVHdC3LUntdMhGOCCp2Zf7 duO0rVg5vH0ZiHGkSS0XfRVLyzmU87TQONva53PxS6nZ5eoz3wqLuWn92ZZ/ O9j5cbA6IJ8U31p956Ia8xo3ZL/lTKrzqPVbbHPOWns4enGF1q2+pSudL5oy qcWtgpaktmhToabLdjbNYd2k2exC9JVH4V4tfjKfdNWhxyoILGjsthS5wa/n dmE2K8+tWtMh46LOVrTvVmO6MbAqB3+30L3h9WxU9BW2PdZRzwrXxJxTq29l fY5XUQfScA9EHtCGXr3cevTpXHrf3rMv9+/Gs6gJ7ctAHEkt6oufWvhanfa/ cNr4QvW4Xr9woF6loZeTxx4VW6e7HMoJyy/NSnWPaU5hrvUmxS8uXOvYe1J6 fFZGroL2sVJ1OeEvyrtOxvZZfKkON1XHKuE6xK3x0IJGbUtx7V0PASsv1J5w fzZ0XNTWiq7dalQ3TprUemx4QyNkVxWi1lGvCjfof59a5PGq54G0qQeiNoNR Sa3t2BOz9Ijeawhg9uUe3djUMvsyMJikFnUwCcSq7N/5K/Vr+rpnWr9IcthN ysGPl8CEjTVripell2KvSWocQQSumYhZXFvrItdf/6Q2ZKgWrk18Jm/plqgl 9anDuDU+ybYU1dsRG0C9Z/uNi1paEXtyceiOM2FSi1/pk5y3jQr9za/1qHCT 7mc/xhxC6/vgmANpr81gRFJrOwkSt/TO3uv82rFxzse2L4euD6zNwb7cVT2g i6QW97VP9XN9HdAqUa09qJ1/IF44Ld7a3ngFSej23SZTHLBbeyJvUfN3sO3N Cc43fnExTyqb8urHuFVwAElt4BrvrkKvOXf3dvvmXXt1stFdr8Hd4G7cclKL P1b02sZ6rqOJklpIy7tbj1djDqT9NoPBSS1w3Oi19NaIUX3Min25VJfYbtxG UjuMfRmIIalFnqCvfEjO35r/o/x1W+CL9NKNVeHDeuUO4ZjEFt+I7s+yFtVq xjWnPalFLK61dZtIalGrYGxSax+gd67KCZNa9BqPrkLPOXf1dvs6rjVr6tFd 17oY2Y27SWoxB7wBo7vYdbShpHbS9azBjtUz5kDabzMYmNSCh4deSw9GjKZe ty93dOOGrn48mn0ZiCGpRSa18vmO+T9KaaL4Qu3SkvWH43w0cXl+30TLoaw8 sGh/9OP2k1qP5uxjUlu8qW0VjE5q628nlzNePeQgYk0eUlI7W7Y+0NuHNLoL v19SC0waN8N2kcerxJNay9c4IyPGLHzksS/Hd2OAfbm7gkA7SS02qRVD2PIm teLM1y9Uzz+tbsQtB67uQ9n58wAb7h1oqtYGr36sVqpPc9qTWvygaHtXP1bf 27gKJkhq59M3fLkd9cE2YVKL3PZ7VGHMnBt6u+fVOCldMRVjJ0ltz6+Y6jcG jD5ejTmQDvkkGbL/jvrGqjSnpiv0xhyo68s57H05laS25/syEENSi/4cWn9Y Vm5NK/w7n2NphsEj1lTDkuhDdltzG88F9qpPn6TWe3Ftld5oUmt+/2Tn1E5O o36cOrraPeoQvQp6VmHsnKs1bdu866+l9BSCGNtNapN8rdPwSr91tNWk1uN4 NeZA2msz6L3/dl0W3WfpzR2yzrPVr5Psy1FNGzChfRmII6nFH0xWJ8zm76sf 3U4vNwS10Kfs6pr+4kfT5fpQPeKAt7xqo+FIXLpPoDWXxPZFj+a0zTW660ND iNaLdponbB4Ol1+IWwWjk1o16/cT7rw+dei59UcuqNeco3o7uHk3bRp91nVc K7p2q1Hd2J7UxrYivNI7jxU9t7Fe62gXSS3qeDXmQNpnM+i5/8Z/BMQsPTS3 ZeOHfkYe2b7cN6nZl+cT5yOogZ97cLSOOqkVDkr53zue3rGIaqentVnNZ7Q4 QdK1kPMnkBUv5F9OvqxjzC+0NrbuptIlPovbBeIv0Vl9VBfP7eRPb27+fGhv TvPU6x6OXNx6wsItD+VFdgaeQqZbzqB06eFqBrGrYHRSW55RizyJVhXs1SHn 9SJWQbAGo7al6A2+MLfOX2KNXtfdrYjcrcZ0Y8dJlJGtaL3QraNRfbexPuto m0mt1/Fq1IG0x2bQp28jWxu99M5zPKFDuH05rhuDiz72fblY3WGfe3Csjjup rVNA3CFkPXnos7f15E9pScszcMVPu6jnKbY1sGkx1WwUDjahmTR/1dnVnGrH 1OYUt7jghNnnyGn7RUHhWiwXUj0JGrkKRie1trb3eOBnrXp9x8DRqyBQgXHb UvwG37J5d/bNcoYNJ7wHt6KSsQd3Y7gGU7Si50pvfmxOrSmhxcWvo60mtZ7H q5jOCQ054zeD6L4Nz7I228ilt/Ve4HSKfblfN26iFQewL0tqMNSRJ7Wz8pOq zr9Ja53P6ogX/BK8+aPi/Cup1WFqORJfXU1ZnLA45U03tTx4umkhFwrv7fuQ 5MaZBH4nILo5qzmGejhqcfW2LaZquto02K7S+xe92ni5avcqGJ/UOoZgEZd0 NvbqkDFw7Cro7oEhc47f4Ls27+KUket6QCsit9DYn0RsqcH4VkSv9EBle25j sbPdclI763m8imlF+MrrXge0zr7tOErUU1D30tt7L3zpm325PEmvjdC+vJg4 3+ViPrCBtSNJapCSy/ULaBdW1wwNvYkNAIDDIKnBlrWfCvTQLAAAziQ12LrW pCaoAQBwTlKDLVs97vj8hoV1IJsV7iVw7SMAwLGT1GDrWp8UMPjh/QAAHBBJ DXai8oCx/Pn88U/6BADgsElqAAAAqZHUAAAAUiOpAQAApEZSAwAASI2kBgAA kBpJDQAAIDWSGgAAQGokNQAAgNRIagAAAKmR1AAAAFIjqQEAAKRGUgMAAEiN pAYAAJAaSQ0AACA1khoAAEBqJDUAAIDUSGoAAACpkdQAAABSI6kBAACkRlID AABIjaQGAACQGkkNAAAgNZIaAABAaiQ1AACA1EhqAAAAqZHUAAAAUiOpAQAA pEZSAwAASI2kBgAAkBpJDQAAIDWSGgAAQGokNQAAgNRIagAAAKmR1AAAAFIj qQEAAKRGUgMAAEiNpAYAAJAaSQ0AACA1khoAAEBqJDUAAIDUSGoAAACpkdQA AABSI6kBAACkRlIDAABIjaQGAACQGkkNAAAgNZIaAABAaiQ1AACA1EhqAAAA qZHUAAAAUiOpAQAApEZSAwAASI2kBgAAkBpJDQAAIDWSGgAAQGokNQAAgNRI agAAAKmR1AAAAFJz2EntmWee+X8AAIB9k43kdx0mduywk9pLL730DAAAsG+y kfyuw8SOHXZSAwAA2EeSGgAAQGokNQAAgNRIagAAAKmR1AAAAFIjqQEAAKRG UgMAAEiNpAYAAJAaSQ0AACA1khoAAEBqJDUAAIDUSGoAAACpkdQAAABSI6kB AACkRlIDAABIjaQGAACQGkkNAAAgNZIaAABAaiQ1AACA1EhqAAAAqZHUAAAA UiOpAQAApEZSAwAASI2kBgAAkBpJDQAAIDWSGgAAQGokNQAAgNRIagAAAKmR 1AAAAFIjqQEAAKRGUgMAAEiNpAYAAJAaSQ0AACA1khoAuzebpTKTPXJs7e2k Q4DDIqlN5KU73/4bP/Km8/L626/vujJ7R+/txuzCyU3nTi+PnM/l05N8TudO Ti/v92Bpqm4h3uXTxcZzYcS2M8lM9sixtbeTDgEOzzEmtWde+u2Pfu7mZTTI ys1v/9ydn39p3Ey3nzVeuvb5x97y9gcKrXjgLR+9fm0ry57afiW1WTmY3HRy cnrh8l5+kztJJFnOZG3fE46ktnXLIfaoQfYkM9kjx9beTjoEOEBHltSyjLaO NpXy+rd/7refGT7nrWaNZ66/5e2BVrwpy2sjU+f27U9SOw9pNwXs37mkKSLJ ch4nFxatn+1laC2S1OLlg+PxPbXo85MpvjQYN5M9cqjtHbxRHWqHAMfsmJLa Og4Ew9qbPvfbo2e++axx/S2trTg/v7ZnYW1fktrq4prTC4VQNrt8YRnf9myE MEEkOcRUc4ht2pBFV+kppmOjAlg7nqT227eXTzx9/qXlhYIvXfv8526e//0t nx88++1ljWJDbi5c7nhteaLt9W9/bN+ugdyPpNY+gJ9dON27K24ktUaH2KYN MahmcjYqgLVjSWrPPHbz+irHpiDzzPU7R52H2lrW6FjQtc9fH3pacIf2I6kt zqgd0C0QklqjQ2zThiz2CT3FdGxUAGtHktRW56Fe/6YH7ux3M9r8jNvb12+/ +fbHmm5n68wa/eazqufqfN/yL+tLH3te4lh6jsq8AtevBbriWpZbb3/g5jeV J+5d1cIMqw8/+dxvP/NSfVar3itOP7/zLoUnpaxvyOqZ1OZXR67ubjspXzpZ mXT+sJLCYxRPGk/U5VVZVKRw61zlRrnygm+qL3h5W8d6RsVqdtx1N7uwun+/ qNY91Vqcz7hpzpGNanhjVzOH1SQ8VJyuRZWHZrZtGttr+KrCF1q2h/D9mpVe 67VJV97doz7TzaSxyyo6jwGRrQ6+PW7plfZ2bbehr5qiDlDDurHesLYNPmKj at+n0tkAAKZyHEltnW76nbJ55rHQgzturs6nNan1n08edspXbOb30BUW9Kbo R6AEKjC/CrQ04TwiRd7E11nVfNHBh58U2r5u1M0fvf7btzc89SWFc22rJ4v1 +LI39ASS2j3vhZvdwsOU1cSry4NKsy8MH4JPPikNTdZJrf4Ax87xSPNbyu+Z hRrVMELqblR899bnP6Amjet5uhYF+i9uFLjRhmcvNM++ULPLjTG91GtDNumm MXZUfaabyVlbYgi/Z71merS6UfzSq+1tj2qNQS3+ANW/G6s907nBx2xUUfvU LjcAgGkdRVL7/OdWA/4ed6IVLpiMeGpHOKkNnc/Nby8FltVFm9cKj6+MOt/U WoFy/up46Eq5ad1VbX/4SWFdxDzspe/J0A0oDDVOok5+rJ9Asp56NVwoD4VW Ty27UDjhslpe9TzFYuxxetpcldWIpzy78wU3jWFW0y5PtMziQ2nb4LBQjUot hjSqdf6tzRxYk4Y2TdeiVdcXZpTPKWIQuOmGN7yjb0+dDdukW7fPzvpMOpPC tOtqd2etXq0Ovj1u6bX2RuyNpc2r/wEqftsINaxzg4/ZqAJHiRQ2AIBpHUNS W0WbPqP9UnZYP7ijcIaoPLdQUhs+n3AQa4g/tesJmyqWLWj1s3GFCpSi4jzV vr70A3MvBa4d7a5q6eEn66s9z38r4eZwL+XPe8lfKMbSJB5oWf7Wt/1qtfB9 bfkrlRdmlxvmtVxeaNTUFpC6n1W9nk+tks0LDs8inGrq7Z81DnvaG1UX38yh NanOeMoWjbgXZ/MNbzjf1r4hBmoyYJMeVZ8pZhLa8MtXCrfp0eroyZqX3tDe 4HbVcDTqdYDqvW00Lz9ig49JaoGX09gAAKZ0ZEkt+iH8hdNwtYDQeC1lIKmN mE/rGcDmk1Cvf/s64ywsT6g1pNTVS+VHrFxrSHzrqoZOhDVUtfgUl45rF0tx sjyr9B42Ur+GpjGwtX6wN0a1Rs2XLLVenhf/7W/LfGKfqhGarv2uvqbRUL/n eMQ3c6qaTNuiwUlt+w1veWnQs1fiN+m+9ZlgJuGpRz6RMOp5RD2X3jR5YMOq H456HqDGHismTmrN80l5AwAYRlIb8JamV5sDxVTzaa5k4J6y4tM/1otomNsi fwW65aVs/nfe/rnKlY2FvNn1FMoepzLbZrU+o5fUrw/Ub0epDHlaw1j8h37f sUevJ1ROMJ/ALNpTQs8hUpPoZk5Vk4lb1PJFf7utN7xtuYOS2iQhq7E+U8wk mChGDtTjuqrf0hvn2TiLhljW8wA19lgRv8FvMaltcwMAGObIklrs1Y8d6WB5 pqwww+asMdV82syf01gNa8s8Vbz+MFSq3XJ+YWTDMz36JrU+CWuqpFa6I2GI Yc91bHp7VFUCw43Z5Wyu54+OOwlMOsG5sM6Jp0lqwWrUZz9ZzXtOGVmT6VtU PDcb/djH7Tc8OHWP2gzcpHeR1DpOEvc5QnS3uv6WXktvnrohajSEjL4HqAmO FZEb/I6T2oQbAMAEjiGp9X+iSCE4jEpYU80nqs7FRybWHxTZmtQK59SWT9r/ keWtZ/Pb3xp/GqC9ql1tD028Z0mtutyIx5gVVOPN5fBzoWPHHrH3l3XNZ2RS 66zGyKQW38yparKRFtXOzHaecNh+w4NTd7whn2DUJr2LpFY4GTn4gRLRrW56 b4+lt+986782nQ3qe4Ca5jx+zAa/46Q2xQYAMJ2jSGo9bpha2KdzagX1s4fr CsTMrdBR5bvqBiS1nZxT26Hqwxv6fgM7K4yczr9vvnD58uz8UYyT3L8TXKhz ajs8p1aYd2kAG3UR2R6cUxu/Se8mqQW/8el+hEvfVjfPIXrpoXlWolrblZPx B6iJrrjOZ9a2we88qY3bAACmdRRJrfIbZBFv2Iv71BrUzh72ukdvPXE1Ew1J agd+n1pN5TO/3x0865s4ej13uiWpHfh9avHNnKomm27RWWGQ3/ZzXVtv+ELf pDbFJr2jpLa4g+t0fWKs98Wpka1u0mPpwXmWolrz/VW9N84pk9pyno0b/O6T 2ogNAGBqx5HUShEmMOB/6c7bCz8kncCzH0NJLUtAr397829eN4SjtgpUBTNR 80y6qlrs8/hnP6ac1Gaz8Gd1bVzcKzKFH4zWe+zRZ7mbS2od1Wh617BsOzax xNdk0y2KfMf2G57rm9Sm2KR3ktTyvw08e9Kz1aEZRC49PM9CPZqDWs8D1GaS 2oDdZgtJbdQGADC1Y0lq5WdrVH4v7Nry5qzGc1s/EvgdtB8JPLK+7++pxc1n qRiazn+hrPCrZ8VfxF6HmnIF1j9qltXh/Na2m5vOAM6r9FJ9tv2SWm3R19a/ p5Z1eMyv0Z1LJqnNP8BDv8jcNOyJOENSeXdwNNXrSry25ZbD5gaT2nS/YhYS 38xd/55ac6Bu2pKiLknbfsML82o8+9CygFGb9C6SWijYROnb6tAMRie19ZMd W+YYf4BqX1bksx+jN/i22W0+qY3aAAAmdzxJLebxGqXr9Ao3bTVPXM4UpSRY vNSw33xiLymMbUVXBXo1uWdS61p0U5xMNqkV7lw4Ob/TvPDJvv6BterYYnXL Sukds/yBA01fIxfur6/ce98n1KzrWlzuYoaRv5E0PqlVmr+qxWlgzNr7DFR0 M6eryVTzKa7v9XaxnFFsn2+x4aHtYZ34VueSFxWaYpPe4Tm1gQ8X6tnquBp1 Li3ctJPT07YzRNEHqLHHil4bfHij2uI5NQ95BBJxTEntrPKAxFpwqF1SGA4a N9ezSfFiv+isVJtPVPxp/Bm1VSsabgoLv6UyfeNT/c/PxC0TYr+k1tX2PUpq Z7UhV1Xj7eb1n8kOTN/8KLaTC5cvN3zF2x1qCsGyPstZzHwmSGrnrwaa3/eR b6Oa2bcmxZVRv6pzkha1bRd9znBM2/Ah20Ntw+14/GmfTXo396mF+zbmfqVe rW7QZ+lR1wm2LzT6ADXyWNFvgw9vVNu4T23cBgAwrSNLanPzHyC7uXhhXuli yIr5pXrrB5I8ULqAsOzaR9ePuK/9HEDkfGKfKHIt0Ipwlnlp/kvZD3S2utiK 9TTLHNo7qUW1fT+SWm6W/0RSjw/v/Cvqk87pi2Pq9TRNF+PEhZp5smxd7MaT WnM1imck+zYqZv7BH2qKrMlZ4aefmp6aP1WLKvPJZxTZ6sZqjG34sO2h/By/ 81oUZjhqk95NUmsdqd8UnFfx/bGtbn539NL///buHreNJA3A8ATeEw020gnm Coo2c+BDKNvEkW+gaAFjY8PhQIAAZxsZmMAR7QuMTqC1KInsn6rqqmaJ/GQ+ DxTsiGR3s0gv+lWxi3XZsrjPqv+D6nGdWsMbPvemOkapHfwGAOjoHEsNABJ2 F3glbnv5r9U67d659xIA0Sg1ALh/nk0pTA696EVMp907914CIB6lBgD3pVX2 R7e/0Hn6affOvZcAiEepAcD94Aql7aVaw0vghhdOvdRH3067d+69BEA8Sg0A HuUXKTzGbMpp9869lwAIRqkBwM5mukjhw/KDR1ue/bR7595LAESi1AAAAKJR agAAANEoNQAAgGiUGgAAQDRKDQAAIBqlBgAAEI1SAwAAiEapAQAARKPUAAAA olFqAAAA0Sg1AACAaJQaAABANEoNAAAgGqUGAAAQjVIDAACIRqkBAABEo9QA AACiUWoAAADRKDUAAIBolBoAAEA0Sg0AACAapQYAABCNUgMAAIhGqQEAAESj 1AAAAKJRagAAANEoNQDO0WZz6iMAgBKl1sndh3f/+ccfDz9v3n8/9cEAU5vr y98fXN2c+khCOdthubnaPu/fL6/lGgBRnWOp/bj7/PH24jmsfv5cvLv98OXu sI0epdR+fL34Y3/Y5Z/Vh/Ht46enLfxx+zl9l+9vn/fy9sv6Z/OabDY311eX j6e0j6d3l1c3/iD/qpxtkpSd67A8h5pUAyCwMyu1n432KZs2724//1i/ZaX2 i9rcXA0Kbezy6ixO8h5Pal/7qfwJkyTyAL72Uls9tk9P/PK1PnEAzsE5ldo+ prJ1k22Tho0rtV/I82nsNsoGk2jbKbZz+YP80yC89jPa0yVJ6AF85aUWemwB 4EDnU2qf3w+L7NPbL3ffnm65+/bl9uLQ7jjNdWoVVfUS2zyXUtt9QOrqJpVj m5urszhB/EVOhpVaklIDgLDOpdQGs1Fv3n39lrjD9w8fD7lUTan9cp5PYc9g 1qzsKVhf+8nw6ZIk9AC+8lILPbYAcKAzKbXdhNqbPz59aLsYbTvj9m7/8Iv3 X1OXsy2WWtt2dse5m+9LHnlLqVUeQJdSG63Zst3X928/0luYDtegqU+bgc8T amuugBkvP5JdfeTxJPmpBMcP2j5mes/8wTwd7CwqZxu9TswOTg5jd1ne1WgN lZHFQdk8bGc8Bo3BOx3E5KGn7lge7fyxr3zV9sM1P778JY6zg6jde87qAX++ XGv/fHJvwtIBJ95a+fGujMPRscz2UDG25VcqeRT1/yTzYzF19n/qAWC98yi1 fBeU/fj6NnNp28V0O8VSa9/OY5eNP7GZ6KbaUms4gINLLbOv7SdOB3f7cvuP 1Eb2TZ2c+jyetaG2uc6cQSbO83af3MqsWjI4xSuf3CZDLbcUymwJhf0HyEaP uLy+vko9fmFU9pfwNT1svInaMVwx2smDWPWqTYdrfj5+UzeALXtPjdZBA74v tf1FmaNjSDyvyrdW+t9QVaelj2V4OBVjW36lCqVW9U9y/yyzjZYfQQCochal lomCBUvLd1yMPi2ZL7W127l4N1qmMlkuVaXWdgCHlVpxX+MNDkZs99SeH94+ 9dnbys+E7U4fB+fYoz/mJ3eSeMTsAaUDSoXa7tuiBif7uyNJnjpfXV1tNzKN g8ah2C2pdz14PteZEUgZjOH1ZBAnj1432vNDWLWd3HBlRyT33Nv2nt382gGf vAmvn2fyUm/C8QFXvLUSrZab/k0e02BEHvcwfVhxbMuvVKnUUi9IcjR299/f dz/4PpIJwKHOodQG6VF//j9aKPLi4/fnlPj+dvChvsHWcqW2fjtP81C7hyw8 tVxVtR7Afps1P+NSGwzCz23uvqJusK9RFQ6y7vH3+wm1k397eM35ZO5BiUdt kidvidO86abmp7jZ0BjuNX/4j7eMbtiUT+ubo3Vzk6iX2jnKQQYs7GbtaGfD o/VVa2zX9N1b957cwSEDPljedHoIyU00vbVmdx9/1jKn/uKzmlLL3Fwutap/ ktlBrnuaALDkzEqtetmNwTTcxXSlkeRnKTOldsB2amYAl59a8wEcUGqFGbHd TeOZwfHxPx3P6SfU1q0mUn5M6pyucJqZuilz/jo/KyyeJ87PpxdSrNOSE1Xt 21AnnUa766tWPtTCy1y/93qVf2xoexM2vrWmG6lMsM6llt5OsdSaRiN/KZ5Z NQAOo9RWPCR1a7rUem1n9VNrP4D1pbbfWuLIdxU2OYx9Le4+7TkryhNYUWpL D2k60St+ojGZGvMZtcyBzM8hj1NqVZupnsrsNdqdX7Xabazfe73adTua3oSN b63xHp6up1t+NoWZrYaj71xqhblrpQbACzmzUqudrFlY1+J5omqwwXRh9dpO xVNLl1r7Aay/Tm24/knuJ/ESDGb92uY986sO1CoEQfunHxdPjOebbC211Ilh 4pSwalyOUWqbzc3N9cMKksN18Uqbqd9Vr9Hu/Ko1HuuKvZf31DrgC8cw233r WyvxsMrnMlynI7Nm6dLRH6HUcnf36UcA+jiHUmtfUSS12EVqg0uF1Ws7WUtV teIAVpfa6HOb+VKbbXO8CEnLhNpLllp7nix+VK1Dqc1TLfW3+/yqeAMvWmrj 9dWzO8496Ypd9Rrtzq9a0vJSJgeX2toBX3g6s923vrWmT7TxXTRZ1LJxQc8j lNpgWtSKIgC8gLMoteHXXtctVWFO7ZA5tab1QCYzcadenH+n+RqhY8ypzVIt +SGr1j/o9y21zeBs/mEy5PrmZvOwnmDNZsypLe49sfkDBnzhGHJzao1zRaO+ a55n2oyKrXQV3OyRRyi17B+MlpfEAYBFZ1FqozUJqz5c5zq1FaV2yMotb959 mqwDeXKtqXaE69QGv398SPpqmNaU6Flq+yuM6r8IeX4f16lV7+qwAV+4W/bT jy0VsnuTbmpnCNObSa6SefpSe7pyb/A18YUPawJAm/MotdEHIDOzNncf3t9+ /pG4/6nWfuxSaoes/dj8fWqlfSXtn+zDdlITfKeUXz89rXzanToFXFNqw1TL LVvQuB5Kz1LLr9pXtZleqVY/2n1fteKhFgalfu9TBw5465uw8a01mYVrfvTi kZ661B5/Z/oMgBdyLqU2/pTdm3e3+2/7ur/79uX2Ytomy19DlrtKq/X71Oq2 k9bl+9Tap8Zy33w93tf7r/vy/XH3+f2ni/Ez2u/oqZ2Xrqo7usG33SZPpB9W PUisBHfwN3wNtlX62qrC+nJNlbl0St8wFZLd1P4jYgtntaUj32w2VfdsG+2e r1rxOSUH8MDvUzt8wNe1ydq3Vl2rba5Tk1LJj16WxvZoK4ooNQBeyPmUWs2S F6PZnPFKF4k7j7tjVILDxmnbTvdSa34iB5Tawr5yw7vfyOy7sE9tf767/UTT fmphcOnM8DRt13aDxQ82N8m73q8ttf3nrUp/zx8dyf64H5eeSE8r5c4398nw fDDjZErdd/T8RwtDLJ3VDod8f+RPG0mepR882v1etYWnlBzAtr3ntr16wFcv a1Px1ko9fnn4hk9p8C/uKtl4pbE92pyaRR4BeCHnVGo/PczsZDvi3eDTj4/y 3XExz6jhBywnn99r2M4LlFrjEzmo1Lb7epsp4oepzOdhyS11sv99w3L9L2pz M16AbiQ1E5K5e+PCdTVzBQsnvPkDv2ycJJot+bf8/QazB9zcVM8/ZNZo+H1+ MVbLaA+PbHoQvV616kGZxEvDs1jedtuAr3kT1r21Fi61zB9YafO5OebUfY5x nVr+veqCNQAOd2altvXj+4f3ny6Gn9MbfRhy4u7zx9uL/YIkn0Yf6hv79vE2 MU/Utp2XKbWWJ3JoqW339e3Lz177lB3h0vcmpK+eO7HtNMVgHfTL4knY472H J2w3yUmotaXW8NG27UTHZfncsWqtj9H6ew9bKe11et/NYDfVS0hOxzD7lVqV o30/+JKuVAH1eNUWnk9hABueReqQ1g/46j8XLLy1Sj1Ws1rPZEAeR6Rw18TY HmVFkVKqLT9LACg6x1IDgEPtrhlN3OZ71QA4nFIDgFaP02nLnwR2FRsAayk1 AGiV/4aE0e1CDYDVlBoAtNp/6/hoYdjtNXzptWEBoI1SA4AVSgvDmk4D4GBK DQDW2UxXqVxaGhYAqik1AACAaJQaAABANEoNAAAgGqUGAAAQjVIDAACIRqkB AABEo9QAAACiUWoAAADRKDUAAIBolBoAAEA0Sg0AACAapQYAABCNUgMAAIhG qQEAAESj1AAAAKJRagAAANEoNQAAgGiUGgAAQDRKDQAAIBqlBgAAEI1SAwAA iEapAQAARKPUAAAAolFqAAAA0Sg1AACAaJQaAABANEoNAAAgGqUGAAAQjVID AACIRqkBAABEo9QAAACiUWoAAADRKDUAAIBolBoAAEA0Sg0AACAapQYAABCN UgMAAIhGqQEAAESj1AAAAKJRagAAANEoNQAAgGiUGgAAQDRKDQAAIBqlBgAA EI1SAwAAiEapAQAARKPUAAAAolFqAAAA0Sg1AACAaJQaAABANEoNAAAgGqUG AAAQjVIDAACIRqkBAABEo9QAAACiUWoAAADRKDUAAIBolBoAAEA0Sg0AACAa pQYAABCNUgMAAIhGqQEAAESj1AAAAKJRagAAANEoNQAAgGiUGgAAQDRKDQAA IBqlBgAAEI1SAwAAiEapAQAARKPUAAAAolFqAAAA0Sg1AACAaJQaAABANEoN AAAgGqUGAAAQjVIDAACIRqkBAABEo9QAAACiUWoAAADRKDUAAIBolBoAAEA0 Sg0AACAapQYAABCNUgMAAIhGqQEAAESj1AAAAKJRagAAANEoNQAAgGiUGgAA QDRKDQAAIBqlBgAAEI1SAwAAiEapAQAARKPUAAAAolFqAAAA0Sg1AACAaJQa AABANEoNAAAgGqUGAAAQjVIDAACIRqkBAABEo9QAAACiUWoAAADRKDUAAIBo lBoAAEA0Sg0AACAapQYAABCNUgMAAIhGqQEAAESj1AAAAKJRagAAANEoNQAA gGiUGgAAQDRKDQAAIBqlBgAAEI1SAwAAiEapAQAARKPUAAAAolFqAAAA0Sg1 AACAaJQaAABANEoNAAAgGqUGAAAQjVIDAACIRqkBAABEo9QAAACiUWoAAADR KDUAAIBolBoAAEA0Sg0AACAapQYAABCNUgMAAIhGqQEAAESj1AAAAKJRagAA ANEoNQAAgGiUGgAAQDRKDQAAIBqlBgAAEI1SAwAAiEapAQAARKPUAAAAolFq AAAA0Sg1AACAaJQaAABANEoNAAAgGqUGAAAQjVIDAACIRqkBAABEo9QAAACi UWoAAADRKDUAAIBolBoAAEA0Sg0AACAapQYAABCNUgMAAIhGqQEAAESj1AAA AKJRagAAANEoNQAAgGiUGgAAQDRKDQAAIBqlBgAAEI1SAwAAiEapAQAARKPU AAAAolFqAAAA0Sg1AACAaJQaAABANEoNAAAgGqUGAAAQjVIDAACIRqkBAABE o9QAAACiUWoAAADRKDUAAIBolBoAAEA0Sg0AACAapQYAABCNUgMAAIhGqQEA AESj1AAAAKJRagAAANEoNQAAgGiUGgAAQDRKDQAAIBqlBgAAEI1SAwAAiEap AQAARKPUAAAAolFqAAAA0Sg1AACAaJQaAABANEoNAAAgGqUGAAAQjVIDAACI RqkBAABEo9QAAACiUWoAAADRKDUAAIBolBoAAEA0Sg0AACAapQYAABCNUgMA AIhGqQEAAESj1AAAAKJRagAAANEoNQAAgGiUGgAAQDRKDQAAIBqlBgAAEI1S AwAAiEapAQAARKPUAAAAolFqAAAA0Sg1AACAaJQaAABANEoNAAAgGqUGAAAQ jVIDAACIRqkBAABEo9QAAACiUWoAAADRKDUAAIBolBoAAEA0Sg0AACAapQYA ABCNUgMAAIhGqQEAAESj1AAAAKJRagAAANEoNQAAgGiUGgAAQDRKDQAAIBql BgAAEI1SAwAAiEapAQAARKPUAAAAolFqAAAA0SSb688//ywUWe5WpQYAANBF rsVyOVa4SakBAAB0UcixeZHlfq/UAAAAOiqX2jDKkr9UagAAAN0lm2veZYuZ ptQAAAB6yWXXpM4WM02pAQAA9FIor3msle+s1AAAALoox9ffS6uIKDUAAIDu Fvvr76WvV1NqAAAAfdUkWCWlBgAA0IVSAwAAiEapAQAARKPUAAAAolFqAAAA 0Sg1AACAaJQaAABANN1LreMGAQCAs/XXX3+d+hB+EUoNAADoRan1otQAAIBe lFovSg0AAOhFqfWi1AAAgF6UWi9KDQAA6EWp9aLUAACAXpRaL0oNAADoRan1 otQAAIBelFovSg0AAOilstT+9+9//vPf/0v9+rdn89sLt/73X7mHPdzyr/82 PosIlBoAANBLRak9BdesxLa19RxV2zsN71K49eG/nv5je8MgzHp22mMJ9tlW BaUGAAD0Ui61/dTXrNSmjTX+RenWh/+5v2nYZn3n05QaAADwShVLbTf5NZgF G9w0qapJjGVv/dljg23tu61rp/020GmTC5QaAADQS911avNSe8iq1CVmj78r 3jqbU9v+tlun/ZbRYdMDfz7b/UapAQAAvawstcSk2aTF8rdOr1N7+J/jejuI UgMAAF67U5Ta38ML4B7utuu0/JKQlXKZ1j3WlBoAAPByTlRqqY0XloR8DZQa AADQy8lLbbRqyfzytUiG82jm1AAAgJezdkWR+W9Sl5+VHzD+bW5JyDiUGgAA cBxrS20+RTa6T/nW4UZG34dtTg0AAOCAUnta/iP7VdflW5/vMtxoeU4uPKUG AAD0ckCp/T1cqzF1c/HW7LVs+yUhI8jNo5lTAwAAXk5dqZ0vpQYAAByfUitT agAAwPEptV6UGgAAQDSPpebHjx8/fvz48ePHjx8/fkL9/B/0AT2N "], {{0, 467.5}, {583., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{583., 467.5}, PlotRange->{{0, 583.}, {0, 467.5}}], Alignment->{Center, Center}, Appearance->Image[CompressedData[" 1:eJzdmsluHUUUhi3YsOQVeAu2WWYbxAMkwkTZGMlBQjwfHuV5xHgCD+Ah4JAw T3G+9I+Pzq3qLld3142dHCnRdd/q6v87Q3V3nfvBg8/uffrOyMjI4/f47979 L+6Mj9//8qP3+ePjscePHo6NfnJ37PPRh6PjHz54l4N3/v/36vPlcGx4Mw/b XuTZTcvM1dnNblD2f+3t9eC01fxvnrUlKqs/LfifPEtDFaHIV+6F/d3GmojS LP31x8pN0l/O/mw2PyzGiUG6UaSdX6vcFP7h7PdB818FRAFLOhzd9AfOD5QH gn+7sl8HzY4HUAFLTji66ffOrxUfK/9l0JpYApBEOHIoYoQm55t4L1tSn1/Z s0Gz457IWAykNhwdEJr0m/O9eJMtqT9X9rSyi4uLp870lScSiwfx4UhQ5OgX QqDfnG/KA8E/VfZjZU8GTQc1QGiGYyBBODxFnE75IfD65XyuKG8jQ4JReH5+ fnZ2dnp6enJy8kNl3w+aDvItYxgpKLEoKEzrC8RTZAbCIzTpl/MRj3LJRo/U Hh8fHx0dHR4eHhwcfFfZt4Omg3zLGAZzCjiwCIQ5fV4lKPogyP9ci4tyaTSg GUnI29/f39vb293d3dnZ2d7e/qayra2tryvbqkwH+ZYxjOQUiJgBELyBTzxF B4TMEBBxroX+pgWhgxEUUQSxyKSwd6sAoakEyFuSB/8XRCB8xIKEJLhW4wmK NIJfiIIUYkL8g6MIAX4riEBqkY0UFM4hxKLw1R0jGEUtgs+iIASqAoJODhdE oFioCwuEX6N8IGpzqQnBh0D6FQJmJmPJIq5YEGF9fZ3qJrIKRJBOTYHIRPAL KRMqi1gPyd6CCKurq+QSkWVmAqHVKQ5EBwS/kOrhgZm5BBHHaQURlpeXWXKV S2SpAuFXJzQEudSE4GvZZ5E9SKgQKD2cVhBhaWlpc3PTcikIRJBLQUU3IfhC UBUwlQqBSxBx7lAFERYWFjY2NrjfKZfiQCiXrBxqEdKFIAQm1B2BezFxL4gw Pz+/traGW5iZXMJLeoIKEJrKIY3gn+iEgJdIWpbBgghzc3NUtMqBXMJLtbnU FsHXshD0XIGXWI5I3YIIs7OzKysruIWZKTTLpRihtqIzEfRQbQikbkGEmZkZ FiVVdFwOOQhYLYIVgt4LmNBWVG5GBRGmpqYWFxeZk4WOctC6FDyEW0W3ioJH YKrXj+CfwPsjvAVR8AjUQlmE6elp7m7UlxBsXR0qQtlyNgTd3QoivEErUg7C m3hfeAvuzolnJGJ9C5+RLvOeVIf0sM2K2lQI+U+ql3nvC0N65aEQCCuF0P99 4dq3NuWSXhkKIvg7Qs+3trgcat96uArXovTIXhKANGZJJBlIaQqT5YVFkhvu 5OTkxMTEV1fGZ45wnG8Zw0jedDiRuyTzaC2KCznOohjBLIEQLK14SRT4jYzC gSxQeBIxLCyo4j61UJmgZHzWQb5lDCM5hRM5PVhLLQSZOxi1CPE+kg+EUXBR shcQNGgrlZQmLmhbqwydK1fGZx3kW8Yw0nZWpd8/2rXaR4oREoHwDxu2p63d bKpDO8O2Law94c3KbHPYtoUZqb1u7XJri9v0t9rNCxBqc8lv6BmFNue5rroJ 2pnXtnyw0S3jM0c4LuWMZLycn9Z/7Z5qE0KiueApLBwepLbF4JsLXjznKv8D /X325xMtKt9ZE4VehaxXIhC1SwxHmiVbnREv3vd6gi5Jol1Vqz8zEEZhjSr1 1+JelbWrzHRQXSoTH/TdCnZ5cii0RsUgYhGONx201mEgPrNL1QqhKZ2CurBG bZ+OZ5D/nTueiUA09Z2DpnPQwBXRhbOg+xy0nvv3nT1CgsInlQcJGuhGZBb8 DMB+AxA3aot0/4N08hRxOGp/xuB/yeA1xz9diJ3f5zcYaYracNy2X8IkKGrD cTt/jxQgpMMRswREsflhgfJrnZ+PkKbwIJ7F4+SYP9FP2OT8VvoTIAmWmChh 8Ylp5R3EpylilgRUrdWem7hWZ/2ZLAmitF07ZxHl3XD62PBkl6W7aZmvbKSc 9RfzEj7XSO4= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output", ContentPadding->False, FrameMargins->0]], "ExampleImage", CellMargins->{{49, 45}, {16, 5}}, TaggingRules->{"AttachedInlineCell" -> CellObject[171281]}, CellChangeTimes->{{3.815938288549184*^9, 3.815938288777177*^9}}, CellID->235080673], Cell["Uninstall the paclet:", "Text", TaggingRules->{}, CellChangeTimes->{{3.816693665641892*^9, 3.81669367012088*^9}}, CellID->650300133], Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"PacletUninstall", ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8123553809479074`*^9, 3.812355389765953*^9}, { 3.812355766713648*^9, 3.8123557684912767`*^9}, {3.814445481048813*^9, 3.8144454824922976`*^9}, 3.8166936638063726`*^9}, CellLabel->"In[6]:=", CellID->815526892], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107562], Cell["Save the paclet to a file instead of installing it directly:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8122990503098645`*^9, 3.812299060456869*^9}, { 3.8122991345984917`*^9, 3.812299135474493*^9}}, CellID->130384412], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"paclet", "=", RowBox[{"PacletizeResourceFunction", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], ",", "\"\\"", ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}]}], "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8122990648978653`*^9, 3.8122991196514907`*^9}, { 3.812299235014081*^9, 3.812299235863081*^9}, {3.812299473838435*^9, 3.8122994797815967`*^9}}, CellLabel->"In[13]:=", CellID->178821751], Cell[BoxData["\<\"D:\\\\lukas\\\\Documents\\\\ColorUtils.paclet\"\>"], \ "Output", TaggingRules->{}, CellChangeTimes->{{3.8122991164754868`*^9, 3.8122991386174946`*^9}, 3.812299281327573*^9, 3.812299364691061*^9, 3.8122995002084436`*^9, 3.8138463592731133`*^9}, CellLabel->"Out[13]=", CellID->848599011] }, Open ]], Cell["Install the paclet:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8122991628109617`*^9, 3.8122991684890203`*^9}}, CellID->200350681], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletInstall", "@", "paclet"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8122992217510805`*^9, 3.812299238700081*^9}}, CellLabel->"In[15]:=", CellID->414098752], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorUtils\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorUtils\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\lukas\\\\AppData\\\\Roaming\\\\Mathematica\ \\\\Paclets\\\\Repository\\\\ColorUtils-1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ "\"Contains the following collection of pacletized \ ResourceFunctions: ColorSearch, ColorToHex\"", Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "ColorUtils", "Description" -> "Contains the following collection of pacletized ResourceFunctions: \ ColorSearch, ColorToHex", "Creator" -> "Wolfram Summer School, Wolfram Research", "URL" -> "https://resources.wolframcloud.com/FunctionRepository/", "Version" -> "1.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Guides/ColorUtils"}, { "Kernel", "Context" -> {"ColorUtils`"}, "Symbols" -> {"ColorUtils`ColorSearch", "ColorUtils`ColorToHex"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\lukas\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\\\ ColorUtils-1.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.8122992816235733`*^9, 3.8122993649221077`*^9, 3.812299500431486*^9, 3.8122996357113886`*^9, 3.8138463794840736`*^9}, CellLabel->"Out[15]=", CellID->98255924] }, Open ]], Cell["Uninstall the paclet:", "Text", TaggingRules->{}, CellChangeTimes->{{3.816693665641892*^9, 3.81669367012088*^9}}, CellID->650300134], Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"PacletUninstall", ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8123553809479074`*^9, 3.812355389765953*^9}, { 3.812355766713648*^9, 3.8123557684912767`*^9}, {3.814445481048813*^9, 3.8144454824922976`*^9}, 3.8166936638063726`*^9}, CellLabel->"In[7]:=", CellID->552276944] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107563], Cell[TextData[{ "See the installed paclets in the documentation center by going to ", ButtonBox["guide/InstalledAddons", BaseStyle->"Hyperlink", ButtonData->{"paclet:guide/InstalledAddOns", None}], ", linked at the bottom of the main page:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.812345964587927*^9, 3.812345979010377*^9}, { 3.812346182278491*^9, 3.812346207038416*^9}, {3.8123463652953963`*^9, 3.81234636530805*^9}}, CellID->380814871], Cell[BoxData[ PanelBox[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzs3W3MLNdhH3Y2kYCgQIo0L0CDIoWdoG0+1QpYNJXYFAgQFJGAfmjqFsjz KUkdUgJtGY4amE7UXEVi1Di0Y7KwEiWQzMvSFkSZliEB91KEGItXJU3cSkRM iVKoXFH0c6krRQllkmooW7Kk23l2dveZnTkzc8687J7d/f1wLF/uMztz5syZ 2fPfedkf/hs/+Vdu/wO33HLLO/5Q8T9/5a//9F/8W3/rr//M//xHiv/4X97+ jrfd8fa/+WNvfvv//jfv+Jt/67/9G3+wePGPv+6WW/5x8X9n/z753+5QFEVR FEVRFEVRcitv+dG/qiiKoiiKoiiKomRSJDVFURRFURRFUZTciqSmKIqiKIqi KIqSW5HUFEVRFEVRFEVRciuSmqIoiqIoiqIoSm5FUlMURVEURVEURcmtSGqK oiiKoiiKoii5FUlNURRFURRFURQltyKpKYqiKIqiKIqi5FYik9rz//Etk5Sd r6+iKIqiKIqiKEr+RVJTFEVRFEVRFEXJrUyV1E7f8MOnP/JDkpqiKIqiKIqi KMr4MlVSu7kgqSmKoiiKoiiKoowvg5Nakcu++Z6/U/77pZ/5yTKpvXTX28tX vnn33w0Gt52vr6IoiqIoiqIoSv5lcFL7/rdeLdPZt//Fozcrvv0by//8/quv SGqKoiiKoiiKcgzlZoqd1zayfOlL//rn7vvF3smKaX7nm78z+dIHJ7Vvf/o3 utv/21f+RZ5J7eeu3rx542M/3vh3YvnFp27efPGjd01at955zrHQvSnNjXX2 ypnP/Nyu6zbraiozNaz+oyiKoigTlvj8tUdJrYhg3/293+0OazHTDCuDk9rL /9c95fWN1//8n/39r14vRzzf+dIXT9/wp8trI4sJopLaOz724s2bT923xQbf alI7myx6KHg4SW0xBm6s9WJbN+q/aKKrEV9WbG6sH//ojZ2Nse/7zNlWbe85 ZQQY1quzHGnf9ZEbW62V/qP/RJZiOzYPiYuNu9K53PgpFUVRlN5ykEntLX1B bL6Y9pb0pHb6Iz/0yj+99wff+b3yk+0rf/IPff/VV1787/9c+dev/g9v/P63 Xv3tP/sny78Wk73y/ntP3/DD8ye1s9Fa5Ey2mtSKIdmNG9EreDhJrRyL1tZ6 OSiqNXh0B9jcWIuxX8T4fL61ax1LL9YoeqRd77p5jLRrtdp2UtN/9J+Ispht 45C4mcG7Fh0/paIoihJTDjWpvaU9js0a096SntRqlzj+9n/5n5wNnf7ybd9/ 5eXv/dt/89W/9OfPPjf/whtqk82e1FJmssWkdvbRX0wTvZQDSmqhqhbt8OKN +omMxWDpxkfekbbh1m27m7U7G2nfeLFlqH+2RvHxvNF1sxhpb/1Md6PoP/pP V1lduRpKavf9YmSWj59SURRFiSkHnNTeEgplc8e0twy4+vGP/8FqBHvhT/3h 4n+/9qN/+dVf+qev/t8f+Nr/9JeK/7z+X/8XGzHtj//BI01qZ7VajCEXA7OI weQhJbVm2y6+Zv/o8IFlbiPtj3w0uFnLbfSx2JO8xzrS7i36j/7TXtabL2Y7 xh829+kAqyiKkmE57KT2ls1otoWY9pZB96m98Gf+2PLixt/73eI/f/B7v/f1 //Ut5Stf+x//4g9+/7tnL37ve8so96f/aNJ9asthxur6n+b3pdWvUstvpDde ubn+mnp5Yczmi5VFNP69rsxSfbRTnWExvur/TF98N17OpG040TvP5IUGWmnz HMSAFh5W6ic7zkanRU1qV53V16i/5j96fvFYvRsUf924A6i1D6yueirvIqz8 tdoBOtZ9Gb1Dm2O5mqGrvxpzDnbd5gaq16Sll6avVHqtet7b2uD6j/4zT/+J SGrxsTGDLygURVH2utw89KT2llVA+8QnP7mFmPaWYUntT//R8oP07Fn9r7xc uyTy+T/6H3zvpX/3/B/7A+V/FrEuOalVxw8bt6vU7iP4xafWH+XNT9j7PlP5 +N4YEbUmtY3nFWwOCMuxyub48GbK+a/A4wt65zlkoavJKoOiRZOej3gHtvCA EszgoTZfTRNR8/ZzIsv1qla4vQ+sHiOw2iLlpq9eWRd+eMX5nMuKNTbrutts jrTbaxI+J9LYQLXpg700eaVSa7W51TZ6ZvnvjhnqP/rPLP2nP6nFPzpmlw+Z URTlWMvNFDuvbczqTD5lhqWMacX/bmFZg69+PH3DD7987z8s/vGtX/6lF/7U H/7d3/z0t3/j0Rf+s//oWx+6v3jx5X/8D67f+p8vs1vK1Y+1wdXmWKL9sSF9 34W2pbPKvxtPGKhcshi4oKh7JPajjSseYy5S2pznkIWGr33aWLWBLTykVOdc GVBVWqY6NIqqec9Iu2uUVX178+amRrN0XkW2XoXaZl1f79rZku1Zo3cDdfXS kSvVX6vEa4ZHX4an/+g/vZP1JbVaUO0o8VMqiqIoLeUYklrm59TWuf77//7f /84/+D+e/2N/oHjx9796/Sv/6X/4wg/9ke8894Wzyf7E637nH77rB99+bT1x 8tWP1QaphangDV/hpLZ5LU13UmvO4fyV4Le7PV/5hq/2ab9qq/Fi7wSba7cc ZIZr1T2gjWrhjoZtH9+ej37Ph6B/tTIKrYfElJqHRtqBcV24DzS/PI955by0 pPizf7dm3nBNYiJ8XC8dtlIDatUd51tmqP/oP5P1n/r0bcfh8vRi/OXiYpqi KMrIcvPQk1r+96mdvuGHX3n/vT/4znfWn6U/+N7vnyW473/v5g9+ULsS8uwp /f/03tMf+aGJktrqP0vVb4ZbLgHqveKxNoZpGprUKvd6bNgYbY5Laq3LDUyw vPllRAsPK+GrvDYu8epc346a94+0O/rAhCPt8xDRuBKvdk1v+Gxp+ki7pZcm r9TAWrWfv+6aof6j/8zSf9qSWnkEjn2OU9yUiqIoSk857KS2H89+3Pzl69Lv /r+/+eJf+JHr/82f/e7z/3r94rBfvu7NEdV3tQ4Moq+9iRk/DAhN4UHaxrWL W01q0efU2lt4YFnWp3KyoFKfjQtEpz4n0tkHphxpr4JD5QEyf3VjpB1xz87w cyKJq3D+yuBatdVhlocQ6j/6T3cPCSa1+h2L3R1sdC9VFEVRluWAk9q+/J7a unz7079R/Vb29M/9mRf/u/+q+koxwYxJ7Ueb30t3JLWNB2XE3qf2o+G3V5be FpraZlWdT+88Uxfa0Vwdd+tEt/DQshhjf6Z+vdPiPMJTV6tD0ynuM+oaaW+0 56Qj7fOfx6o9D6FlpL25ZZNG2p2/1zxupB1fq5Y6dM9Q/9F/Zuk/gaTWe8vh gCkVRVGUmHKoSa07js0a1gYnte+/+soykf3GoxsB7V8s//P733p16qS28SjC zSlr36gvvimtPTW6J6nVnoK4mMnmn+qPgmwLTR1fXFdHaL3zTFro5tIbVzOe j0aGtvDAsnqgXC3xra4ObVzCGl3z3qvXuvrAxCPt5epUJ65evdZVk/Bz5jui dHsvTVypEbWq9cxlt+meof6j/8zRf5pJrfvCg2oA9OtpiqIoE5eDTGoxQWy+ sDY4qRUt/M27/27575fu+sly3PTSz/xk+co33/N3blYeJDJZUqtmwtD5pvMB QOWOjOXVU71JrTqTheat95VFt37Kd35PuzEa6Z9n9EI3S9dd+cNbeFhpuYqy HIlFPgQmVPOIJ0K094GpR9qLiTdOE2w+NqG9Js2u23/Ss6WXJq/UqFptdJXq 2Z/WGeo/+s/0/Sec1ELKateTWvuUiqIoSnIJH1Zb7Ly2keVLX/rXMRGsmOZ3 vvk7ky99cFJrBreboWjWn9QURVEURVEURVGUzTJVUjv9kR86fcMPS2qKoiiK oiiKoijjy1RJLbLsfH0VRVEURVEURVHyL5KaoiiKoiiKoihKbiUyqSmKoiiK oiiKoihbK5KaoiiKoiiKoihKbkVSUxRFURRFURRFya1IaoqiKIqiKIqiKLkV SU1RFEVRFEVRFCW3IqkpiqIoiqIoiqLkViQ1RVEURVEURVGU3IqkpiiKoiiK oiiKkluR1BRFURRFURRFUXIrkpqiKIqiKIqiKEpuRVJTFEVRFEVRFEXJrZRJ 7SYAAADZkNQAAAByI6kBAADkRlIDAADIjaQGAACQG0kNAAAgN5IaAABAbiQ1 AACA3EyS1C7ffsstb/yFa5NUaB+XT36qfWJf+se+1DPJQa5UEi3QYu8bZu9X AIDs9SS1s4+iutsvF3+49gtvnHMkHFjuYrHtU6+Wv1GxURZz6lhqXlq31CFY bIqq/g08YVJrLH2uhu2s53Qdu78SU67uPKPZbbVGTaNxYqqwF+P5xZo1NnS4 mdfTjtwKu26YtuVHH/l3vQIAHL6IpBb8KNpCUoufY0dSO/vTwIHmDpLaiNrm O2gYsVKrt9dmcPn2rSW1wNLPXpunW2ST1KZczETzq/WiHSa1ylLLDN/XGaJb oLmnjNx3UoSi2vI7ilrlzw+MklquB10ADsXQpDZgqhTDk9qmMWlr+0ltzBKz HTSMasbwN/2x7xyb1IYvfZgstmGeSS2TE9yNlYnJKrEt0FzHra51oJrFS298 Y7BSk/SQXfd3SQ2A7ElqrSS1SYxYqanaY1jbbH/7Z7ENJbUOzZWJqNieJLVm PRdn9H6hXofpOsiu+7ukBkD2Bie1rpFw9caeYR9kPR+BtQVsTL3+j/o9Jakj ns3P6+VsK0tufv8cXlZLayxnWL7tjb/wCyNr2zdo2GyN2sWEGzW5dr7qlTeV 76iuS3NM2fjTuE0QN2Dqbt6otgmKOqHWbLq2pqisz8YEgTFwSyOHz+d0t/mA UX5LY4Verp5daV3ryht7o0hCL2rWp7+Ht++8wxvnvJvEtEBjLatddLP6rftO +9F15KavnyxbXnpZ20bhg+3NqEbuOm4HVqFtqYG6Dsq08Ukt4iDTu3cDwADT J7WNz9ChXwp3jK3r94YsP9uDg4cJz6mFFrP+a+PmuM1hVbA1ljNsZLoZzqkt FlUbYNTu5bulmSka61e9Dqqxxi3jlxErFXOVVXfzjklqcdUObMT2pli1aq1t evpYR8fe2AsCT3io9MN4bY3VTK7VJmpf64SkltKLNv8c18PDO2+KcFpeRseI Fug8PMacU2t9+xSbPvjdVOcRtb6XdTRy33G7ZyMGukN9CyevcWRSizvI9O7d ADBA8rMfQ5+cXYOxYReINJcb+nBc2hykzJnUGt/qrsep4aV0tUZgtDg2qfVv qeCSWsbgjQuhmq+0bNhpNkH/G/uad9qkVm3hjdFpVx2bY7na1I2xblsfi1mj QePVwDyCu169Rc7+O6IDpJxTa51J93Elroe3NmyC2pLaN/+Qw2N/83S8fYpN 34h+zX2p4wRbfO+t/j183A7MoR5+F5dlVueevvbNrh74wIk9yPTu3QAwwMTn 1Ka61aJ1ucE/9HyDPVlSa15rVB2/tFzs09YabUOXqc+phf/QOgbqr3jbK5tX f20hqUU377Tn1CLmHG6K4Cy7N0TLsjq/GRg5NGxvrL4dIrzWiUktthe1jJfD s+5u2AT1sX1oB+5oge4GiLs4tGWCKTZ9NXpu5PB1f6vXoHtf6NtG/XtSy9dh xT/fWF48Wb7Q8aVB39r2nVOLPsj07t0AMMAcSa39+8loe5bUVv9ZW9vO1tht UquNe0YmtXLdp94EfaPp6OYdNCyPatBwr2hpismSWmeTBvphko7Gaj+N3LHW 8UktqRf1JrXuHj4iqbUfD3tboPvwGJfUOo6uYzd9pa4t12XW13/upLbRzdb/ LoPa+f8fGNTik1rMQUZSA2AOs59TG2YPk1r1XbEj6sM4p9Z9xeuIleoZTkc3 77Bhedu7uuaceHXbzRmSWnW+04aR6h83glrspYmd3SqxF+3unFrf2L4xYeyG G3BOrX0+Q0+vLStbO2u7XHJj9bd5Tm39H6uAtopqQ4PawHNqLTOQ1ACYw9RP FJnoo6l1uZv3NpxPnE1Suxk7MttWUgv+pecWknFJbXMbjd4E7YOw2OYdOCxv WXpKUtuYRWh+PRti1F42bUCt/vXy5ti4c607N8Ri1w0ntZ5e1Ld9Exo2QWxS a2uBzg3Xv9dF70sDV2/11ttvvz1Qkzfefns9EkUntcTjdmWptaS6eEpudY/a eCF9VXu3ZuxBpnfvBoABpn/2Y2Xwtfzvab/YLy/xaVxh2PKJP2LIkpDUNp60 FtkaoZqNHGC1vLXxHXutUmOT2ub8lpdgTbIJ1rOrt3y1Efubd3gNap3tTGsM aVao1hSrrlq7aLBrQ3TvZRtvLS9Oa+uHaavccyLz7Cmg0WvdvjvU2iOtFzW/ kEnq4VM3zrAWuLl5eIyoZuvbp9j0C40D6sY61XJHdFLrP273bsSb685Xf8/U x8zawS7uINO7dwPAALP8ntrqU334PRObc6jPp3rvwNlyGyOCYGVS65GU1KoV bRnj1GoRbtrBtY0YYLfVcHRS25j9G5u/kzR4pYKVr80oonnHZcXm0jtTaHtT LFtsY34bLZKQ1BprvrqBp70fRure9VbrF7zMK7jWtWpX137ZFo3Re0wvarRG Wg+fPsZGt0DX4bG5p3S8svHyFJu+uiKNOQS+tEhKajd7jtuNKUJr0ThxFe6N kWLPkEYdZHr3bgAYoCepARNxLRQcKns3AHPoSGq3tJu1Srtabkcdtrbc7dth I3fr6Aa77YSDK7DXY7kc9srdOuwWiOnwh7TWk6/jXu/dAGTLOTXYDmM5OFT2 bgDmIKnBdhjLwaGydwMwB0kNAAAgN5IaAABAbsqk9i0AAACyUSa1VwAAAMhG mdRuAAAAkA1JDQAAIDeSGgAAQG4kNQAAgNxIagAAALmR1AAAAHIjqQEAAORG UgMAAMiNpAYAAJAbSQ0AACA38Untq1/96tyV2YLDWIttyqrFvraw61oAABy4 wxgB7vtaHMw5taw2xGCHsRYAAMBIB5PUjlBSrHM2CgAA9oikxv5yChIA4Ngc xggwZi16k9phnIg5jLWgZvxm/a3f+q1HH330oYce+lUAgP1UjGQuXbr09NNP TzK+yt9hDOxj1sI5tePUkeIP42uKblevXv25n/u5t73tbT8GAHBA3vOe9xSp bcDo6DBGgIexFmuS2nE6jO8iBjg9PX3wwQfXR7N3vOMd73vf+z4GALDP/vk/ /+fvfOc71yOcf/SP/tFzzz2362EXY3UntcOIpYexFjcOaEV2pYhpf+/v/b3y CPZrv/Zrr7zyyk0AgEPx3e9+9/HHH3/7299eDHV+4id+4plnntn14ItRnFPj ePzSL/1SceC66667nn/++V0fSgEAZvHKK6/cc889xZjn3e9+9+np6a7HXwwn qVF1wKftnnzyyeKQ9ba3ve369eu7PoICAMzotddee8c73lGMfH7lV34lZph0 GCPAw1iLKkmNI/Ge97ynOF597GMf2/WxEwBgdp///OfL76iff/75XY/CGEhS 2xeH9y3BNp2enpZPenzttdd2feAEANiGv//3/34x+Ll69equB2IMJKlxDJ5+ +uniSPXOd75z14dMAIAtuf/++8sLinY9EGMgSY1jUByjiiNVcbza9SETAGBL Ll++XIx/fvmXf3nXAzEGktTYjieffHKHTx/6yEc+4iY1AOColN9US2r7S1Jj bkVA+9mf/dny4sNd3dP6q7/6q5IaAHBUdpLUnnnmmSdXnn766W0ueg7FKqxX Z/u/TyepMat1TCvtKqxJagDAsdlmUisGeA888MDf/tt/+8c2/dRP/dT73ve+ 5557bgt1mEoxfL106dJ999331re+9ccaipFt8dftXComqTGfdUz78R//8cce e6zceathrejnxdFjC71dUgMAjs3Wktrjjz9eJLIyyBTjvbtX7rrrrvLFYihY jPfmrsYkikZbr0vhXe9613p1ikHs+vVijbbwqBZJjZlUY1p57vsLX/hCNayV R4/Shz/84VkrI6kBAMdmC0mtGNG9733vW59sal7u+Mwzz1QnyPnkWrEuRS5b XwZWRMtmbYtpitfXkxX/KMa3tWkee+yxqWLpTpLaCy+8cDC/DnZI6zKhZkwr VcPaBz/4wXVSm/vbHkkNADg2W0hqZQrrPWW2PulWRJv5KjPGeoxa1PMTn/hE 7/TrNSretQ5rRSwtB8BTtfmWk1oRaj7/+c9/5jOfyTlQxytidbEuv/VbvyWs VbXFtNJ6R6iS1AAApjV3UivSShltmueVmophc3kx5NxXUg1Q1G19KiFmXUrr EW/x3mLE+8ADD0w+st1mUlvHtM9+9rM7fGD7hK5fv/4v/+W/FNaqumNaqRnW JDUAgGnNmtSKdFOeVIo5A1W6evVqMf1b3/rW7T9EsUMxdi2vZhzw4Lvao/P2 N6lVY9pv//Zvb2GJ21FsIGFtLSamlWphLbek9tprr33jG9+Y9eDZ9PGPf/xL X/rSlhd6qIot+MUvfnHXtQCAXZo1qb3//e8vZn7fffclvas88fTzP//zc1Rp mIcffrh2EWO8Inuu71nb36R2qDGtJKyV4mNaqRrWMklq3/ve94ouev/99/+z lU996lNbOZSeKRZXLL13smJ11tUrqlrku0cffVTEqylasmifl19+edcVAYCd mTWplSfUUtPN888/X55W29Vv7NYUw9dyRR577LGkNxb1L7Nq0B4ltcOOaSVh LTWmldZh7V3vetesO2xkUrt8+XKRfb74xS8Wb/nyl7/8qYWtHErPJCW1z33u c8U/iv8t3vLrv/7rxSsPP/zwgQWTIoEWu9WwiV977bWifeapFwDsh/mSWjHY K+Z81113DXhvebdaajKaSdlE73znO5Pe9fjjjxcj3raYtkdJ7RhiWmlXYa3Y U365z9WrV2etw7CYVqo9un+mGsYktW9961tF3tnhyamkpHZjM4YU//nggw8W Ye173/vebBXctsgGGTAxAByD+ZJakbMGX8R43333Fe8tBi2T12qAcgQbf6td qRj6fvjDH+4Ia3uR1I4nppV2EtbWd0G2ueuuu2Z9fsuYmFbaQliLSWrf+MY3 itH+Cy+80DFNkYO+/OUvF/25CHTf+c53qn966aWXiq1f/Kl2e1TxSlGBYuIv LaxfL1787ELxjzJelVmjmLKoQ7mIYOy6EUpqhaJixeu1pRfxs3ilrFXx7+bc XnvttWJB5eKKVSheKZZei6vFK5/73Oeq1V6v77odiqqW1S6q0VzKyy+/XDZO 9e6/6qzKk4Prc4Lln4rV+fjHP17WrXx93f7VWQUnXs88pik6agIA+2u+pFbO +f3vf/+A9xb12cKdLzGKYedbF4aNP4t3VX9zar+S2rHFtNJOwlqRdNpC/dxP 1xkf00pzh7WYpFYkjvvvv//hhx8uwktwgmIY/9BDDz344INFIvjQhz5U/GMd Fh577LEyKRQTlP9Yv6v4z6tXrxavF28pXy/mX16vWPxv8coHPvCBMjgUr/zm b/5mUYHixWLmtfms3WhJaoXiXUVN1v9Z7HrFzMvlFhUo/l3LcUXqKVa5XKNi gnJxn/rUp2rLLV4pZrKeZ3nmsXhjubJFhYumq1a7dslosUesV7b4x6OPPlqb VVnD4t9FDa9fv178qXixfKX8U9EsZfuva1veS1jG6uDE5cwjm6KjJgCwv+ZL ap/4xCd+LP1xIqXy9q4cklr5LMqRP/G2/g21PUpqxxnTSjsJa+U56KapfiE9 aKqYVpo1rEXep1aM/O9fKM9t1f5ahJEibqxPIT28UP6pGPavpy/+XQz116eW in8X4aKaCy5fvlyEhfVZmyK4rc+pFdYBoUgc1f9cu9Ge1Io5r6tUvLGYrHrr VjnD8sTZzUXwKVPk+sxdGRhjklqxoHJ9yxN5xQquT7qVS1mvXXmmcn1SrKxV mbDKWZVBr1x6sZSihdfLrV3QWFR43apFnR9aaJu4mtR6m6K3JgCwj+ZLak8+ +eTgjFOM9OYeo0Yacw1nzeOPP16uV/5JbR3TCs8+++xzg1y7dm3nj+Yo6jCs 8kXoKFd/m2Gtefr1fe9733yLq/5+RNHDi91t5DWWxRzKn7mfI6zFP6W/GKWX J8iKvFa7WLF2bWR5qqh5mVwx2q/mgjLIdMxnrXi9Gj3KJLVOQLU53AgltaLm 60hVTW3rVSve+OlPf7r8z0cffbQ2QSkmqVXrXzTUBz7wgXXcKxqkOkEZS6tz K6YvT/ytz2RVF1Q9EdZ961mRtorltk1cTWq9TdFbEwDYR/MltWLU99a3vrWY +YAfICvfmMNPqo25hrNthuWTJHNOal/+8pc/M4Ui8kxbsSRFTNuvtajdsDb3 7WnlWe+qMb84X+4pU82tKfX31IqUVF6guA5cRWIqL0dcKwb/1cRUdPsy+5Sn xtapoXY1YDmf4A1o5Rmu2ivNqHKjPakVSy9SSfnvIh7W5laboAhQ5YWCNTFJ rVr/8mcC1v9ZezDLgwvVdit/WSA4q/J0ZMfqFzMvVmp99WPHxNWk1tsUvTUB gH0061P6f/7nf37AzC9duvRjix8vm6NKqcZcw9mmiK4PPPDAVOPYOZLa9evX y8v/Cv/qX/2rYaelCrMGjV5f/epXB9e8UIz9PrP1iz/XN6xt4cffi35YdMLy 2ZJ33333yONAeW9pMZ/18yqnTbipSa1UBJAPfOAD5RVx5WD+sw1FdihG+EWQ KYJP+XiQG4skVU1q1QRRRIa2CNAMJklJ7bXXXivyyzp8FTVvvvexxx5bp7Dg BDcXuax24V8zqVX/WsywGkVrSa1YSvmgj6ryr81ZFa93hK8iCxdzK1ah+Eex +t0n4Koz722K3poAwD6aNak9/fTT5eM44m+BKUZ35Ug19VmLMymv4SzGn7uu SKuZ7lM75t8X2+09euUFt1u+9Hf8M3zmfgrQsKT2wgsvrDNReZIl+LCR8l6t 9eMEy6jSltRqE1eNTGrFpn/wwQfXNXz44YerTxcpFRFsfclfcIKbq6sKqyeY incNTmpFgF0vsSY1qRXVqC6o9vaOpNbbFJIaAAdp1qR2YzV+e+c73xl5eqW8 cWbac1hjFMmxfN7CrivSar5nPx5nWMvhUSqPP/74lpd4GEntpZdeqgWxRx99 tBiul+fUir8W+aUWOsrpr169Wo0267Nv5X/WEkTxluZ8glMGX7kZSmrFPC9f vty8jW79VMlS+XCP9RvLajczY3n/3XqyMnkNTmpl7qsupWjPsq1681Gx0Oqc q2cMyyeKdExcnXlvU0hqABykuZNaMdovH6Pxrne9q/tqriITlTHtp37qp3Z7 f1NNeevQk08+ueuKhM36e2rHFtZyiGk7cRhJrRycF5Gn2Hzl0/KDp2kee+yx 8hK+dUIps0l5jd+v//qvl6GpLak1F1REjPVT+uOTWvlU/PL3Av7Z4hn41Z8q u7nKMkW6KRJZuaAirVRvTKtNUMTS9Y8IfGDh0wsPPvjgmHNqxdyKOayXUvxv 8e9yfXvzUVHb8o3lY1XWq1Ao733rmLg6896mkNQAOEhzJ7Ubi2fU33XXXeWt N203Z126dGn9e1KzPu9ugHIImlut1mZNajeOKawdbUy7cShJrcgURV9dP/ii SGTNJ+S/8MILRcIqJyiG/etzcDcWt02VYa3IBeUNa+Wfqv9eK1JVeZ9UkY+K ZLE+x1SbMvjeIuZU7/kq3t6cplTMdr1GRbWbv0ldnaBILuv5vPzyy+VqFiv1 0ksvBX/5eq0INdVzed/5zneKCdYPwC9fKR8DUq7veuLmrIp31c4/lm8sXyz+ 84tf/GJRsWIm5WbtmLj21+6m6K0JAOyjLSS1G4vR/gMPPLB+KNzdd9/9wQ9+ sFho8WLx7/JJj1U5/JLa2nPPPVfWcMwPThUt8P73v3+Om4/mTmo3jiOsHXNM u3EoSQ0A4JBsJ6mVrl69Wn0IedVdd91V1GT9Y0y5hbXyh66KUDn4YYb33Xdf MYef/dmfnbZiN7aS1G4celg78ph2Q1IDAMjPNpNa6Qtf+EKx0PWjvC9dulQ9 V5VnWHvuuefKH0Eb9sNqDz/8cPlYkjmeu76dpHbjcMOamHZDUgMAyM/2k1qv PMPa1atXy2sgP/jBDya9sYxphccee2yOim0tqd04xLAmppUkNQCA3GSY1G7k GtY+8YlPlGHt7rvv/sIXvtA7/fPPP19e9DjrWmwzqd2ohLWsns85WLGNxLQb khoAQH7yTGo3cg1rTz75ZPmMyiKyffCDH2zLa8XrDzzwQHnBZDH9rL/iveWk dmMR1oqYNviWvaxcv369WJcjj2k3JDUAgPxkm9RubIa1tsf7b18xsF+fKSuf hVKEsvVtd8Wfqk9N6f0VufG2n9Q4PJIaAEBuck5qNyph7a1vfWtWJ3Gefvrp om7lWbOmorbFX69evbqFmkhqjFfmrLvvvvuXhyreK6kBAEwo86R2Y/WE/GEP XdyCIo49/PDD6/HqJz7xiSeffHKboVJSY7wPf/jDwe8cUs13JPnIRz4iqQEA RyX/pEY3SY3xnn/++cFn06pinrQzzEc/+tHyKuhdHzIBALbk8uXLktpek9Q4 Bk8++WRxpHrve9+760MmAMCWlFc9Pfzww7seiDGQpLYvDuMX6HblK1/5SnGk etvb3rbrQyYAwJbce++9xfjn8ccf3/VAjIEkNY7ET//0TxcHq89//vO7PmoC AMzulVdeedvb3lYMfg7jV4yPk6RG1QGfufuVX/mV8ncxvvvd7+762AkAMK/y hNp73/vemGHSYYwAD2MtqiQ1jsTp6em73/3u4pB1//337/rYCQAwo09+8pPF mOcnfuIn5ntcG1vQndQOI5kexlow3jPPPFNeBvDe977361//+q4PogAAE3vl lVfKs2mFS5cu7XrwxSjOqe2RInJ+7Wtf23Ut9tvVq1d/5md+pny6yD333PNr v/Zrly9f/hgAwD775Cc/WfxvkdHe/va3l2fTxLQDIKlxbJ5//vl/8k/+ySQ/ 1Q0AkJt3v/vdzzzzzK4HXExAUqPmSM7cfeELX3jyyScn+cFuAIAcPP7444Mz 2mGMAA9jLdZ6k9p+3eTVVtvDWItJHFLvBQCAQ+Wc2p46sG8MAACAqsikdhih 4DDWoqn7HNx+nU+MdKibEgCANocxAoxfi8M4p3YYYSTDtXDmDgDg2BzGCPAA 1mJAUssnUIypyWGsxTbttp770koAAIfkMEaAe7oWh3FODQAA4JBIagAAALmR 1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAbSQ0AACA3khoAAEBuJDUAAIDcSGoA AAC5KZPaZwEAAMjDV77yFUkNAAAgK5IaAABAbtZJ7SsAAADk4etf/3qZ1L71 pU/d+PgFRVEURVEURVGU4yw3p/DKdJbPfvz4hc/efouiKIqiKIqiKMpxFklN URRFURRFURQltyKpKYqiKIqiKIqi5FbyTGruU1MURVEURVEU5ZhLnkltkloB AAAcM0kNAAAgN5IaAABAbiQ1AACA3EhqAAAAuZHUAAAAchMTwf7aX/trkhoA AMDWxMS0kqQGAACwHZExLSasSWoAAACTiI9pvWFNUgMAAJhETExr/qekBgAA MJ+YmNbxoqQGAAAwue6kFvm6pAYAADChjqSW+idJDQAAYBJtcSz4evdfJTUA AIBJdCSyVJIaAADAJCQ1AACA3EhqAAAAuZHUAAAAciOpAQAA5EZSAwAAyI2k BgAAkJunJyKpAQAATEVSAwAAyI2kBgAAkBtJDQAAIDeSGgAAQG4kNQAAgNxI agAAALmR1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAbSQ0AACA3khoAAEBuJDUA AIDcSGoAAAC5kdQAAAByI6kBAADkRlIDAADIjaQGAACQG0kNAAAgN5IaAABA biQ1AACA3EhqAAAAuZHUAAAAciOpAQAA5EZSAwAAyI2kBgAAkBtJDQAAIDeS GgAAQG4kNQAAgNxIagAAALmR1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAbSQ0A ACA3khoAAEBuJDUAAIDcSGoAAAC5kdQAAAByI6kBAADkRlIDAADIjaQGAACQ G0kNAAAgN5IaAABAbiQ1AACA3EhqAAAAuZHUAAAAciOpAQAA5EZSAwAAyI2k BgAAkBtJDQAAIDeSGgAAQG4kNQAAgNxIagAAALmR1AAAAHIjqQEAAORGUgMA AMiNpAYAAJAbSY2jc3rx5NY2F65sZw6H4MqF1kY4olYYKpPWy6QaAECApMbR kdSmYZA/Riatl0k1AIAASY2jI6lNwyB/jExaL5NqAAABkhpHR1KbhkH+GJm0 XibVSHd6euXKxQsXLpwU6hU/e+3ChYsXr1w53XU1AWCMY0xqezs2YRqS2jQy 25G6qpPhpsmk9TKpRrQioF280L73BZ1cuCiyAbCXJLX8xyZMTFKbRl47Un9Q y2vbZNJ6mVQjwoCItunkwpVTgQ2AvSKp5Tw2yUtLu51c3LfRj6Q2jax2pJig ltXGyaT1MqlGt9Eh7dzJhb07XgFwxCS1TMcmGZLUJpzDIchpR4oLajl11kxa L5NqtDu9MlVIy7IbAEAXSS3DsUme2tLJ/o16JLVpZLQjRQa1nHprJq2XSTVa dO1oI11w6xoA+ZPUchubZEtSm3IOhyCfHSk6qGXUXTNpvUyqETJjTCtl0xcA oIWkltXYJGdtzbZ/wx1JbRrZ7EgJQS2f/ppJ62VSjbSKTed49lYA9pKk5oM7 Tms4yWXkG09Sm0YuO1J4a5xcuJj1jZWZtF4m1aiJPp12cvaraaebj3Q8PXuS f/QjSDLpDgAQIqnlMjbJnaQ26RwOQSY7UsvGKGqQ9TNwMmm9TKqxISqnnUT8 Rlrc00jy6A8AECCp5TE2yV9rq+3fOEdSm0YeO1J7UMv7caV5tF4u1aiIyGlJ G3Dq+QHA9khqOYxN9oGkNukcDkEWrdBSibJX5vwUnCxaL5tqnOu9P21ArU7n mCkAzE9S84EdpX1Al8OoN42kNo0cWqEzqGUd1XJovXyqEVOdURtuthkDwIwk tS2NTcp73Asbo4PC4o74SRd05eKFxpKqCxu0tPZGm2GIc1quRGgtzlbjwsg2 24ukFuww5Ua8cPHKfL8FtVpuo9GbbZ7BIL+tCuvFb/mJpZm0XibVSNdz7mtU hfqy2kxru+9HfgB2SlIb8mnd80X+5rRXLjTjRuC9Y3+ItRgQxD7t7Oyz+0Ln 5/bpKiedhMJSioQR8WnSKixmfmHQWCfrpJbQCD0bMXnBMR11Y5kde9J2Bvm9 QW1rUS2T1sukGkN1B7XRm6wnq0Ws7sEf+QHIjKSW/GF9M2qAuJgs6slj1Y/R YUOR4qN6WJpqTTrT/ZZRzColJ7T6SiS2WqZJbVgzpK9+aMmpCbnsNrse5Mdc 2zj/M0szab1MqjFG92FnitqMXcLBH/kByIyk1vmJ2yLi8zr5szqpAhF1iRb6 0N5WUov82rl/KUnNlmFSG9pdVus/PHUMXfJZQtzxID/uJrRZo1omrZdJNUbq POpMFKy7D5e9K3zwR34AMiOpDfm47Bkijht2pwxJRn9Yrxe6ueJbSGqnY86j pSwordV2kdQm2YqDRrKT9Z+GLQzyWytfP8ExV1TLpPUyqcZo2whqY6PawR/5 AciMpLZp5EC9ePsEH6Gxn53T5an6IreQ1Cas/Epsu2WV1CYcZ+9uyaPrMkBs UJvpByYyab1MqjGBzjWZ8K7CUcs5+CM/AJmR1IZ8bs06PLo1clwy5xB/G1c/ ztCIkeO5jJLaxHk1YUA7Q1Kumn0AmHKmbPqolknrZVKNKWwrqI07d3fwR34A MiOpDfnkSvqoLJ+2VXnEQcSTIyI+sHsek1ZbaLHU8mnRccvazn1q7YPtk8WD 6DeeUXYa9WjIqO2XS1Lr7UaLdqhvxe47+yKXHrGB6wsv2z+24889BEy6pHHq HwPMpPUyqcY0Oldm2oqMWNTBH/kByIyktmnipNb+BOauG/ljPkS73p7yFI+4 T+uuFR7zeV9fi/573Puedhb1rMksklp3J+p+dnfHe8c2wHIm7UuPuxdn5kF+ 4r1nk0a1TFovk2pMZHun1EYt6+iO/ADsmKS2acqk1vdRONNVOHGnlcrAM0Wq GPWJv55xys/8jH30QBZJbfiAq68KQ5+KkNKCvQP9eQf5ySs/XVTLpPUyqcZk Otdn4nrMntQO6MgPwI5JagM+7GI+r0ef2uiuSfs6JHwEx/8C6mxJbfEMyPRn RY/bhBkktZEnxbrnMbTrJDRA73xmHQkOSKlTRbVMWi+Takxn7BcXky2se6WP 7sgPwI5JakM+7Sb4Qru3Jt3zmOTzOt6MSW2YUdtw90mtvfpJrdk2m64qTDg2 H78jDTPodOI0TZ5J62VSjQltNakND0pHd+QHYMcktSGfdiN/PjWqKkM/r2cJ TtkltVEV2nlSm2y0lR7Vpnxww44G+QOv+5xil8mk9TKpxpQOIqkd4JEfgB2T 1IZ81m7lIe0Dh52zfGJnl9SGj3Ru7j6pTfi1eMushv2KXerSdzPIH3wd4/gx biatl0k1JnUASe0gj/wA7JikNuTTdrLP6+Ez6nmAWOeTA9Pll9TGbIIdJ7Up r19qq0jLnKZ9FPpOBvkjbjgbG9Uyab1MqjGtY0tq+3LkB2DHJLUhn7YZfF5H /JjSScrzFIfXcytJ7exHga6c/SzQhQsnJ32/B5V3Uhv+0MaEmaU+rL71LV12 Mcgf82SQOX/bYHutl0k1JiapRc9oq0d+AHZMUhvyaZvD53XKT/tcHPu5vYuk Vv5ga/zP9E7TcrN3gIl/hTnp8seJh8M7GOSPa71xUS2T1sujGhG/up00zwN4 9uNBHvkB2DFJbcinbRaf1z1rEvjcHv5N6xaTWpHPhqSzlJbLNKlN6UCT2ugf kxoT1TJpvTyqsc2kNnln2vOk1rcGDc6xAewvSW3Ip20un9fDxv0n6T9gto2k dvZDvNOEmKyT2uAhbppQLab+deGtJ7WxQW3Ug2gyab1MqjF1Upv4ms5OM/3y 9UEe+QHYMUltyKdtPp/XN8uEk/yZnXjr+bxJbeAatJLUwhslk0H+YDOfjhxz MlRSi9U2zy1e/jji/N3RHfkB2DFJbciHZFaf14v5DMw6sUOg+ZLa6cVpU9oZ Se0gk9rs140OH6RLatHa5rm9k2pjlnR0R34AdkxSG/Ihmd3ndTmzK4NST8w3 rDMltaRRxsnJyYULF69cuXJ6dsvF3j6lX1IbaAs3+A2+RUlSi9Y6z23dqTbq x6uP7sgPwI5JakM+JPP8vF7NM/1ju3dRcyS1uJh20vL8MkmtU7ASmQzyh9nK k1gGPx1fUovVOs9RCWqiFR51s+JBHvkB2DFJbcgnV9af16tZJz2hY8RXycOS Wu9Ir+fu971NauOfijHY1BeYbTOpbeeRmYMj0vZaL5NqzGA7UW1UUDu+Iz8A OyapDfnc2ofP6/Ui4r5oHf7IsyFJrXtQFnPL+yEmtdnvHcnjAe+TV31KA08j Hd1T+ufQvY0nqUxP4B91ccFBHvkB2DFJbciH5D59Xi8X1P+pPfTKr4lHh1vY BDtNal0rv9OTaukL3+Igf1tBravimbReJtWYQ/dWniBSjA1qx3fkB2DHJLUh H1r793ldLm3wlT/TJrVJnlC9t0ltl1Ft2vMx2xvkty9p2PB92PbLpPUyqcYc RiepbuOT4NEd+QHYMUltyIfknn5eD1/gpEltkuv/9jipbX2jxy06fUNubZA/ fbYdVPVMWi+Tasyi73bEMTXqOS8b1XJHd+QHYMcktSGfWfv7ed219gNvjpky qcWv8x4ntZl/R7zTpN+tb2uQP8dJyEF1z6T1MqnGPPqucx1ap2nme3xHfgB2 S1Lb68/rwOPr+0ye1JI/5ydIauMeE7frpLbFX/ltmO6pDdt6qvpMV4tOH9W2 13qZVGMevU/5HHRj7ETzPL4jPwC7JakN+czK4/N68eaTC2njloExacrHGIy9 +rF3KJd9UtvKY+4GLTl6FDzXqY+kJY1ayAxRbWutl0k1ZtL/+JiYp8OudN+j lbiix3fkB2C3JLUhn1k5fF5X3xo/cBmckiZ4XGNEHcb9oFFsdTJIan3rkTIU XczuyoXYgdv44flpxI+WTzb4m/K62821GPTlQyatl0k15hLzqM+eH1w8E/mc +oTVPMIjPwA7JakN+bTd/ed14I1nH9rdn7idg7Oej+vep7IlfNgPvc8m9teP x4xzI0ctE+SH/qu8+oeiN8uNehK53tELbl9uMfiN2ghTDfJnC2pDo1omrZdJ NWYT+7MMJ4u9ZPPAd3p65SyiRf74825uL9ufIz8AOyWpDfm03fXndedzui9c DAxder9dHn8yqxwyVZZ5NlwKn+jpG4bVZnU2r+iB160jn75YtERMPho9h5gm XcxsORRtbtDAFo3sfNGnLDa3Z9QJirSajKjp+AHmwEt6M2m9TKoxm9jvZUZJ 7UTHeOQHYJcktSGftrv9vJ7jV4DHPgajVXgcMO8PGfevTNTyB/+oVXxFJh+N xg67Zv8l6WkG+bMGteF3X2bSeplUYz4RF2iOcZK+fkd55AdghyS1IZ9bu/y8 nuOr5glPxUTOe9YvzCNWJ+qExPAb96LmME9LxPa/mYf5kwwAZ3+C/OC7LzNp vUyqMaPZwto2fzJ9mhnt8MgPwM5IakM+uXZ8DcxpyhVMvVKGLANGhm2zHzfu WNyF01abqa4dG/GrVgk1mXoIFr09xy52cXtM2zymGAJu4ae+hj8oJ5PWy6Qa c5r2cLda6aF1OdIjPwA7IqkN+bTd9d0KN6Mfa9Znyp+tTl7EwDMC69vA2uoS tQkiVmTcQ1Yi5jCqXcMLTBuDxjzBvHvNxqTlHlv5TeYxzzTNpPUyqcasYp5U GbnOg1Paoh7He+QHYCcktSGfthl8Xi/fP2IAM3jIkhoqOlYktf61Ordsyame gTjqcf9JVRnWGhv6HwDXuhKJS93YCKPScqetBLXRPz+RSetlUo15jYxrJ+NC WlmFoz7yA7B9ktqQT9tsPq+Xc0l7NGLk49+7F5kwUOg7NRX1HXGwzuOS2s3e AW7E987j5zCsPc6XMDiiVZcZuT0DY7zR26BF51PuJjwf0J22407P5tF6mVRj bunnlCbZRZYLP/ojPwDbdYxJ7XCVD8YvPrvrn95nr1woH+I86fLORk0X2peW MCoIzqqcz8SVbi66XHJzFaJHNePnEJrp4kH829uYi2WuFrn9rXAAMmm9TKox u9aj3ay7SJ62feQHYFskNQAAgNxIagAAALmR1AAAAHIjqQEAAORGUgMAAMiN pAYAAJAbSQ0AACA3khoAAEBuJDUAAIDcSGoAAAC5kdQAAAByI6kBAADkRlID AADIjaQGAACQG0kNAAAgN5IaAABAbiQ1AACA3EhqAAAAuZHUAAAAciOpAQAA 5EZSAwAAyI2kBgAAkBtJDQAAIDeSGgAAQG4kNQAAgNxIagAAALmR1AAAAHIj qQEAAORGUgMAAMiNpAYAAJAbSQ0AACA3khoAAEBuJDUAAIDcSGoAAAC5kdQA AAByI6kBAADkRlIDAADIjaQGAACQG0kNAAAgN5IaAABAbiQ1AACA3EhqAAAA uZHUAAAAciOpAQAA5EZSAwAAyI2kBgAAkBtJDQAAIDeSGgAAQG4kNQAAgNxI agAAALmR1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAbSQ0AACA3khoAAEBuJDUA AIDcSGoAAAC5kdQAAAByI6kBAADkRlIDAADIjaQGAACQG0kNAAAgN5IaAABA biQ1AACA3EhqAAAAuZHUAAAAciOpAQAA5EZSAwAAyI2kBgAAkBtJDQAAIDeS GgAAQG4kNQAAgNxIam2uXLj1zIUrcROfFNOexE182LbSFEkbZ59spyMFm+8g 2jTzldh99Vo2fV6Hr8PtnwRMu2Vz68wdttvPt7kDpS7Lzr17tkHOJLU2Cf32 9OLJrbfq5We21BQHelDZVkc63JFw5iux++oFapDf4etw+ycBU27Z/DpzB0lt 6PRMzzbI2bEktfMDeLeTi6fLdzinNoxzamM4pzbO+JUo5zBTK8RXb65qTH1O bZZ6Hm7/PGatXWU/z6lN0PMltaHT75XTKxcvnJyPP09OLly8ctr/tplsaTdk WpLaJEmN7bJxRjnckbCkNlkNUuYnqdHrwIaIktqEy9rPLhChfeBZ5LWdxLUD 2w2PxbEktYbebqnfZszGGeVwR8KjV2L5ybrrpDZbNSbeyvPU83D75xFr7yp7 uWWn6PmS2tDp98Rytc7O8J6nssUptuXqbj+rHdhueDQktcETsDs2ziiHOxKW 1KaqQRxJjUgHNkSU1KZc1l52gT6r82nBtbqyoysgD2w3PBqSWvcE5dWQ59+C LL4fae5jbXM7vVK5QDnu+uTKyenTzbd3vLuccmNJLZPWrpnecFJ704DaT9oU wXcu3lhfyPLwU1+BjSqt/7j4z+V/xbVwVPNWZrvZXypfqNU7UmMuXd1yszu0 1Da+qj0jhKQmbVaj9d2hZQ/q81Edozp1T8tcuRDeLWrziu/HadVLrsbFzXpc OY3an5IGh13rGlnPRqNM1T8Dsx7QY6OacUBnbhwHesc/PXv3lHWIqmFEP489 kPZ1lUmPPB2dJ+GYP7rnz9PP5z74JNZ/4LLG1m1jVjGHwSm3foLlSnX01eAa DdvE/bWM2w0jR7wD68BQklr3BCcXrwQ7eO19XYfcmpOeU97LUevF8H7V3OtP 23bAwLq1Ttqcecv11f1HnQmborUaq4+QykI6tmf9s32VC8LzDgxYwq1VX9Rq ti395TQ4p3p7do2Zg0148UrvNG1V7RshJDRpw6CkFt3nbyZ0jOiWCffRjUni d4qk6oXaZ0A1op6iED847NlnI+pZb5OJ+2fkylX/tLGloptx2NcOG7PvPm5G 7N1T1qG3hpH9PPZA2tdVJj3ydHWeyGP+yJ4/Uz/fxsEnsf4DljWybhENEjgM Trn1B1Qweq3GbuLuw0zcbhg54h1YB4aS1HomWHa+1W56ur7yeKM/Bua2mrB+ QqWvI1eWW/mKonjvSXhHWO5flS+T1tPWJj2v+nKup6cXW771CVxfvTp+R9Z/ iqY4b4vqBqh82RNYSCie1qrd1sIdWzaleTcmP908PK6Xd749Yz6mz9uhtj02 qpBc1b5Fxzdpw5CBZXyfT+oYSS3TP0iM2SkSqxcQVY2Lp+d9t62lomY8fJ9N +S588v4ZuXaVZVcWk9CMQzrzYuwZN7yL2runrENPDaP7edKBtGP7TXrk6f3a oa+qo3v+LP18iwef9KNl9LLGHxgDDdJ/GJx+68dZZ5moA0H6Jh4wPOvfDRvb p3N3HlQH0klqPRNU99n2dzZfG3wZe/NQUZtlY56nzRP+oc/18BqH6nmlJb+t v5uKqP8ETdFyiLjZ0hItW7RjjNYy/q+3UFzzts62OhAbtBLt7dCoV1pVY4fr /U3arMmgpBbZ5xM7xuIPkS3TN0aM2SkGVK+hrxrtX7n39JLITR+7z6Ykten7 Z3R9Wr+tiWrGYZ05crwSOfmUdej8a8LBP+1AmpLURhx5upNaf1Wn6PmT9/Pt HnwSRxTRy5qkbpuzijsMTr/1Y22etu66ODB5Ew8bnsUktYgR77g6kE5SS54g LgV1X2w/rGIpx9rGEaftGNSWZDo+xhO/1h7YFK0Hg+BCbrasYfliRGRNqmhH vm377Gg7qPXOpKsdIkRXNfRibJO2LTVtYBnZ55M7Rncd48aT8TvFJNXrrkbi GLt3xsP32bSkFjKqf8bNrtlj05pxss4cELt3T1mHrr+mHPzTDqRJSW34kSex 8zSqOlfPH9PPt3zwiax/6rImrFviYXD6rZ/i9OLm1YQn7Sey4zfx0OFZ4m64 XIF6o4ysA+kkteQJYs9Xrb/Iib7bv7di3R/rp6dXLl68UL0PODDc6B+Cdn5Z 2P9ROVVTdB4zw3UMrGKowgOTWnfzDkhqcZ/dQ4LaoKrGpt+o4dJ0A8vG+g/o GJV69bRM95f5MTvFqOpFVqOl8WO6SurX+D377LDR33T9MzDviB6b2IwzJrXo vXtLSS3p4D9nUht85Bmb1Kbs+RP1820ffOLqn7qsCeuWehicfuun27jK89Zb a88Ti9/EI4dnkyS1sXUgnaSWPEHClYUbt2ZG7vr9e0FjN6gfBCrL7P1iqfWr sg7pQ8EBTdG5gVr+2FiZ4GEjNanFNe/MSS3uM2xMVSP7R9yReLqBZdLHRMe2 jWuZnojUIeaTdKqk1vL+mC+EUzZ9xD6bOPqbvn8GltHfYxObcf6k1j/xdpNa RD/vms8USW3okWd8Upug50/bz7d98Imrf+qyEqffuG5wafXn1MPg9Ft/sM2H KtYbM34TR0wZNmFSG1wH0klqyRPEJ7Xl9BtHvd57S1OTWuWItnhK6pXFReZd n5XrKoQfazFLUktvimEfOuUfVq+HP9uTtmx88+48qY2satuCYpq0rS6ZJLX0 fURSW8+0c59NiSUz9c+2dezosZJa218zSmoDjzxTJLXlnwb2/Mn7+ZYPPpH1 P9iktvxT2rAtzWl94CWp0U1SS54gNamt3ra+XHnontR1PDup3avacggKPn81 9pRTnKmaYhUrEy+WqH66t3y2J2zZlOadN6nFZqPhVY1Kv7HDpcmvfjz/W3LH SNpHBkWkwJR7f/VjTcs+m/49wvT9s6mvxyY2o6sfOys/W1IbdOSZLqmtpkjr +TP0860efKLrn7qsaQ6M/bMK/HX6rT9arZLJm3jo8GzKpDa4DqST1JInGJjU 2t6aULHmIagvBYQ+K08u9Pym4XKygQemqZpi9YkRGVlrfzqbb9tne/yWTWre mZJa5GBufFX7DuFdTRpfndSBZWufj+4YQ/aRtu/349c8ud/GTdjVGaI6ypgQ 1H5Xx4hzQnMktd4em9aMMya11C9i5k5qSQf/2ZPakCPP5EmtZaqWOc7Sz7d4 8Imv/8Dj8MgD48bksYfB6bf+aPV5xu9344ZnkyS1sXUgnaSWPEHkIff0SjMD pSS1tkPlxrtDg/2blSutm9PGfyU9cEecrClC67v5l/DKrD/TFzWJHNqE65TS vLMltdVrobU9v4B+fFU79ojeJm15R2Nu55e0BNc6qs+ndoyklmnv+6lnP5L7 bdzSWjtD+2JD7+/d9JH7bGqrzNM/2xbX3mOTmnFYZ04bdHbv3dPWofOvCQf/ QUkt5YA85MgzOqmN6/nz9PPtHXwS6p+6rEkOjEtph8HJt37ZGpUfpg9ZvK1l kzV35/j9btTwbMhuOOa4z0QkteQJopLaaqKYn48MLnfzzb2/6bi+jPp0437Y 5s6V9mOsG+fcTheXbvftnHM0xUnL6oW33vLT/aTtS9jk746imne+pFYZjlUu SVleR7+ecnRVu/aIviZte8dGfTYuvQ1m0bg+n9oxUlqmOfVpozP07hQD+21w FTurMdsvX8fvs+317FmhSftnU2+PTWnGIZ05etAZtXdPWoeeGqb289hTFa1d Zdojz7ikNrrnz9TPt3bwGVD/6GVNcWAMNEjsKGmqrV/dY9t75Pl6LbZZdaOF qxk/6BoxPBuyG3Z98TKsDiST1JIniDunVv8RjfChrn251Sfjnmv/aeDNZVy4 Ejg/HZx0tbD6A446Jk790n5wU7TVojg4XAh+89d4V9cYLWrLJjTvfEmttSE2 gvegnhD4ijTYanEfThvO49fmFi9fD35lHNnnW9ujpWMktEyg3sEmCq3Y0OrF NV9ENU4i5hvckGP22Y56ti15s8qT9M/IFe2vUEszpnfmhEFnzN49ZR16axjZ zxOTWmtXmfbIM/Kc2uieP1c/39bBJ+lombqsCQ6MvQ3S3H8n3vrRXbJ1bi3v jR90DR6e3WzfDVN35zF1IJWkljxB5NWPN5ffnlS+jur8jfrNWZ3NffOBru0n w6pLWUeu9WUjzZq3al7ycLFW/4jn1U7YFIFKrKoQGJ0EKhE+YiQekWKbd9ak FmiJwNaI7gmd1wmGFz/geoeNbb7e4q0Dy5Q+32yO7o4R3zKrOVfr3b7Y9p1i UL8dWo0BP1QYuPJm4D7bWc/alPP1z6aYHhvfjImdOW3QGVmTieoQVcOIfp46 tGvvKlMeeUYmtcWLI3v+bP18Swef9KNlwrLGHxjbZ9bSHpNv/airHzeqWBl5 dQ9+4gddg4Zn5+9s9Nv03XlMHUhztEktW+Ev+qeacXC+6xP8yQfKXM3WiMdr zia1uZieXnUYbEfguElquRn4lWzcbNvm2vGtyT7y2T65WZt0pj7PMXMQOAy2 I3DkJLXc7CKpHVZQa3l8FcPN3KSSGhNzEDgMtiNw9CS13Mw0al0/vXbjOUTL h/XcejgD5dMB91PRaf4mldSYkoPAYbAdASS1/Mw2au18nkjcw/sztrl2Pton sL0mldSYgoPAYbAdAc5JarmZddRae1TPrYvn88c+hTFr5z/VcnIQ65OB7TWp pMYUHAQOg+0IcE5SAwAAyI2kBgAAkBtJDQAAIDeSGgAAQG4kNQAAgNxIagAA ALmR1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAbSQ0AACA3khoAAEBuJDUAAIDc SGoAAAC5kdQAAAByI6kBAADkRlIDAADIjaQGAACQG0ltPo/c86HXv/lDr7vn euMvrz5yz6Xb3nz216Lcds/1azuoHRNo38Rbc/2ORS+646mZpj9Sk2/ZYpcv d/apZtjn9MqFk5Nbl04uXDnd1oIHuHJhUcsLVzZfPClrvqtatci9YYPtFmzh lHkmvH3ksuaRWqksVwI4SpLafNoGe+Xr67LTcT6jSGqHauIt++Kz5Tczr3vz E49MM8cey4HmWt4jzsCw+PTiSZZVz71hW9pNUpPUgD11LEntqScWw6RL973Y +NNqEBUau54Na8PvihAe7K0Wd9tDr5YvXBs08y279tClaro8j5l3Xrrjoet7 sQpzkNQO1bbOqZVHmKnj22q4fnJxecLnNLcTP5umPqdWzm+GUfY+NKxzaiGS GrCvjiWpdQxQFyGuGp3OLVLV4HFUeLC3zIxb+mp9Km1JbZnX3nzpOEf+ktqh 2taWnSep7dswc+r6zpbU9q1h1yQ1SQ3YU0eT1F69785wHFtfi/i6O5+t3y9W pqrm63EOL6k1muLVa089e8edH2o9X3noJLVDtaUtO+67oFb7NsycuL7LM1+S 2jlJTVID9tTRJLW2oddZgnvdnU8UcaM5Xho5WjuCpFZaDv4DJyUPnaR2qCS1 bZLU5iapSWrAnjqepBaOSOVI6Z7r5cBsc/i6PA0XGNO+eP2+6sMb73zikRcD IaU+2FvdobZ5n9cy+xQTr05LvfrIQ0/cFnjYyKvXnnritjsvrS84vO2eQG4K zmdVyeU06xNhiwo8EXMurDOptQ9rX7x+x2aFHwkta7Femze+BSsRN7cxDdW4 qXDjKZ1nbfXUq7WZrCNqvVWfisytUbUNtsCioTqTV+r0HaL7/Prs6uZmDTdI 7KZf1qHMNY2zt623mrbswhEdqbJlX51kRer7yFNPNI8GoR4Y2edXzh8oUbG+ q2o5zZWL1acXnj2+MHC31WKoWr5z8YZbY0aup4sHI1bnfTEw6/CymvephZe4 +ezFYgmVpy9euRBY/ZgBd2+bxDRsY6bdrbGcZctMytXf/GNU8yY1ZtI8F5U5 rT378mLj4ZddIadr43VL6VqBKnYmr9Tpu6qZunOFFt5TwZRmA/bfESW10DCv DCDFQK78x+ZZofDjRNru2Go+fzs1qS1qshxb1m6du9Y2rms5D3jHU9fvuDM0 8SJ6NO8y6w1rA5JasKGay6o9CXM9Hn4kotkDWye5ocIN3jGr2x66XptJ8Uqz VWPSUHxtW1vgzkttz8NJnb6rnol9vtaqbQ0SuekrWmLm6lbT4NN7ao2Z1C2L ZNTcj17fOH0csyLNpBZs0uoqRFZ1Q1+gCP791tCDO1b3em28oyOanLalpIjR bny4qD96cV37044/91Qhqk0Sk1pUa3RFtXpQi2/e+MZMnWeREIJvqK1Aa8QO t3NP3E2qZ+tSVhmv+YbU6bvqOW7nalurnj4PHLojSmqhYd75KYByUFdNIsEL k9aPH7nn2dUDD8+zT3D8Fnn143JkeOelxdM5wjfTnf3yWuW82G2dg8ZyPteW E28MC9ffzK9n0nuVV2dSC90DeN5Q65MLy4bamMlqsvNVXpy7qS8ocm7pDdXW 4OeD/41zkUWw2hgnV4fot61Po7y47Gm9dzjG17ZSn/VZlY1zpq3hJXL6Dul9 /vXnp/DaGyRy028K7lPlXnzbnY0Gb95nmtiRmityX/OuzLgVSb4WOrqqAW1j 5dWY7+x8xOrhhetRcHC8vRixRg0KV4P583MIp1fqT0pMqm/gxVX9z+tTnu6L jApdy45qk/g5x7VGe1RrnFGLb97U2Jswz2U7XTmtTb05ebiRztu5svEudJ1V HFDP84qeVGt5HvRaYm309L21TNm5mu15oTl1ZJ8HDtcxJbWNa9UWqg9eazyE LfA4kdWAs5FrlkEmNIxPSmrtX5i/2nwSfjA9tc1nPfK8LXTmq/dOma6kFjhZ 2XrnWu0q0+Vse3Ji7NwWxjZUdYmRUWtjlF6KvRsxsrbt9Qlf+Jc6fYdBfb7Z qo0Gidv0DS17ZfHKffeEK1Pb3yM70mpFmif4lt9LrGseuSKJSS2pzzd0j5Vb T3aExtsJI8LT5nVe3Rf4dde3+WLs/WcJSS2tTVLmHNUabe0TvvQxrnlTrn5M nOetzci+aqfKnEPLWr7W7Ahxj+mMrGd7nw1Uc8D0HSbauRptN989l8C+OKqk Vh9TrW5SK/+rNgRqDPM6f5QtNLIaktSSBq6hs35t82mNWnGZIvz2F89P0wQa Khhzyj/VRrndgSh6bq1SGup8thEXhbbfoNdyR1WMZm0jOt7G0D11+g6T9Pmb gQaJ2vRNzYZdvFLUYX0l80rjJrWUjtTRPWpfbkSuSFpSG9nnuwbrHdfahb7L HzlEjBtopiW1YafouqaMbZOxjdJsjfAqhYJa5AyT71MbPs+NySt/az0Z2tHM A1q0Wc+IrRkXH1um7zDVztXoD7F9HjhcR5XUauOi2r1pmzku8CyC5Vir+16t yl9nSWpn4ejZO+65dP74gpgTeR3jybinz3X8nlrzmSRd61K/ynR99uf8Ws2a lLlV/zSwoW72beiouqUmtc7axjx4s9pRU6fvME2fv9l14rVj04fUd8zzgLb5 xUuzYyd1pJQgH7Uikx0NOvr8WuqwNPTX4aHk9PTKxYsXqo9/6BtoRoeL9bmI lic1JFY9tU2GNEpfawRCTHdQi5thWlIbNM/Nv51P35y48xkjiygSmUQ669kZ agJVSJ2+w2Q7V6BOcX0eOFzHldQ2h4uP3BP4cn41BAo8TqQ7TDWHx9Mmteqj BTeC0k6TWnDEGHzAQuu7Xtx4+EnzoYJpcxvdUN1/ip0yOqnF1LazPuG7L1Om Dzz9o3aieWyfb2uQvk3ftdBKDcMXMLecJovsSP1ZaePQ0b8iA44G8X2+riPk tAw9myPEIaHkSviJE9MltfrTJcKj19SkFt0mSY0S2xptt6Q1r8iLm2HigzSH z7OtmVqTWoe+pBZTz86N037XY+z0oad/rP482c4VTI8xfR44XMeV1Da+kG/c mFZ9JfTF9Q6T2jooLZ/U/dTi/qbQ6HfWpFZ9+7pKzbMzQ8aZi4cwnI91z5+i kDa38Q3V/afYKeOSWmRtDzapLf/UuunDNq4MXN6k1vipi8DVyzMmtYgVOfik VhnILh4jfmVxb1HcxVvJp4E2B+71J55kkNRSWqOWzMJBLX6G8Y05cp5tzTR5 Uous58EmteWfOvs8cLiOLKlVxm+1a6Uqfz0bxIZuBtnZ1Y+rp0DcVvuRpp0m tfNHK0z5i+GvXmvc+JYwtyka6mbfhg5MOSypRde2sz7tSS33qx9rApu+ReV8 9+omtfIPleuZF79on3JOPLxqXVc/tu0y4RWZ/a7Vqu1f/Xj+3ITNAeRMSW01 99PV4HXY3WRzXf2Y2Bob2SwY1FJmGNuYo+fZ9re0qx97Rdezc2u2J7Xcr36s TxHu88DhOrakdn7p1GKMVBsTrkd6oZ9X29kTRfpC1q6SWjVrhBoq9WERbcuK ntskDXW+xJmfKBJf287nc7bfpxY9fZfZnigSFPd0jvMz4/WniJx//dI8Y57W LUcG+ZFn2EfuQdt/okjrAHPepNayhF0/USS5NSrpLHjbVtIMxz6eJTGpRcWQ 6EekNMXXs/N5jR1RNXb6LrM9USTIY0bgqBxbUltf1th8pnftr6HR7PxP6e9I avU/rX5caYdJrfWp7K3PGK978XrzZ44by4qd2yQNVV1i6K+v9l/SdjMlqcXU ti0Rt12Dmjp9lyn6/M1Qg0Rt+rD1FymVm9TOa3v2SvgBidHdsiOONds2bkU6 jwbNfpJQ1YDwQHB1DVrSg8STklrjIfBX4r7+jz4NdKV5yVd7UosZyKa1SVpS S2iNcr7FG8LP10iaYVpSS5pn+9Ps+2JIwiYJLyGmnuFtVv3L5mxSp+8y0c4V +CGHqD5ftsbJxUFnLYG8HV1SW106dfY7uYF4srxoquWvs//ydccpntdXfrTr WuUJBrtNaq0/3VVpqPNxbPlU//MpVz+Z3fvTz1Fzm6ahqutbrlfll6/Pnv4R 9Sz3mFNI6bV9ffXupxfPO14zeaVO32V8nw80SPSmD1p+o/LEHY2OV96qdsc9 oXPiN6M7UqUBzx5tut5ATy0va3xdeh9uaZnzILz8kfrGD2r3VjWgbSC4foxc /I/zpl3+dev67pnTjccgTJLUVuPT/l9Artem6wEMKW0S2yjprbGMahdbHoSY MsPY2DtgnmUzXelppu7vCSozKJ/leOGku3cMqudJy9QtlYqdvsskO1c9g8X1 +fNb6JxmgwN0fEnt/PkJHZc2dXyx3/YUxNtawlF9VkPuTAk986EYjj6V8IDK 2ZJaNXGEV79Z88p1fcuhb32axoJi5jZJQ/Uusfm0k6EX+yXUNjhxOYy/Y/Op 9UOn7xLf51N+Ty1204csA04gjq16Y1vjx3Wk1S2r9wQqWfs57MgVaWuZ2sND go/H6a5qQHugCD0WYTkUjJ5HUHDGxVyjrnsLjjRDp4FiHy1Zf4RF7AMretok ulHSW6NS4+DjJOJn2PPwkND4PnKeFy4E27/+bIu23NDWzn3dI6kxwwsp0tOF 4Km55Om7TLBzBS7pjOjzkhoctONLaufjn/BX9+uRXsft/IuHvK2HZ+1PFw89 c2PgMwTOzmLcthqnrb7AT3hswoxJ7fwayMZMNhsq/INTL56v2nKah1qe/hcz t9EN1bHEtl8QGPGU/tjaLic+O5+yXv1lZc4fg9Ocedr0neL6fOJT+qM3fcuC Aiuyujqxq0tHdKTzx0hWnui43EaBGfavSHt/O//5+DJKb1Q7qs839DyKbnEe Yz3ia3nod/pTIM7OIJzU5xr5c1mBy83CFTitLmX5LMDQvDeelHc2UV/dY9ok pVFSW+P89E7b76hFzrCljsEL+pLmWd5Ht9GuLU8gbL94cLOdo584n9SYtW25 nHp9gWlg5mnT99R01M4Vfkp/f5939SMcsCNMagAAAJmT1AAAAHIjqQEAAORG UgMAAMiNpAYAAJAbSQ0AACA3khoAAEBuJDUAAIDcSGoAAAC5kdQAAAByI6kB AADkRlIDAADIjaQGAACQG0kNAAAgN5IaAABAbiQ1AACA3EhqAAAAuZHUAAAA ciOpAQAA5EZSAwAAyI2kBgAAkBtJDQAAIDeSGgAAQG4kNQAAgNxIagAAALmR 1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAbSQ0AACA3khoAAEBuJDUAAIDcSGoA AAC5kdQAAAByI6kBAADkRlIDAADIjaQGAACQG0kNAAAgN5IaAABAbiQ1AACA 3EhqAAAAuZHUAAAAciOpAQAA5EZSAwAAyI2kBgAAkBtJDQAAIDeSGgAAQG6O IamdfuM7/8/nvqUoiqIoiqIoijKsFJliyynmGJJa0bD/54e+piiKoiiKoiiK MqwUmWLLKUZSUxRFURRFURRF6S6S2hwkNUVRFEVRFEVRxhRJbQ6SmqIoiqIo iqIoY4qkNgdJTVEURVEURVGUMUVSm4NnPyqKoiiKoiiKMqZ49iMAAACSGgAA QG4kNQAAgNxIagAAALmR1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAbSQ0AACA3 khoAAEBuJDUAAIDcSGoAAAC5kdQAAAByI6kBAADkRlIDAADIjaQGAACQG0kN AAAgN5IaAABAbiQ1AACA3EhqAAAAuZHUAAAAciOpAQAA5EZSAwAAyI2kBgAA kBtJDQAAIDeSGgAAQG4kNQAAgNxIagAAALmR1AAAAHIjqQEAAORGUgMAAMiN pAYAAJAbSQ0AACA3khoAAEBuJDUAAIDcSGoAAAC5kdQAAAByI6kBAADkRlID AADIjaQGAACQG0kNAAAgN5IaAABAbiQ1AACA3EhqAAAAuZHUAAAAciOpAQAA 5EZSAwAAyI2kBgAAkBtJDQAAIDeSGgAAQG4kNQAAgNxIagAAALmR1AAAAHIj qQEAAORGUgMAAMiNpLYd15569o47L9325g+9flFe9+ZLt935xH1PvTpurtfv WM3tvhenqee5p55YVfWJR9L++uojDxWr1lvPOSsPAAB7TlKb3/U77lwGtGZ5 3Z1PPDI8p2SX1BaB9Oz1OyQ1AAAYQVKb2TKPdJRwFEqZeTZJ7XxlJTUAABhD UpvTq/dVzqbdds/1a+tI8uL1jT89NOwyyH1JakGSGgAAtJLUZrSKMy1Z7CzH 3XbPs8G71cr72s7fHr6prSvsxMzh2kOX1tW79tATt1UvyExMao/cEzpdeM/1 9nq2VL7IsPfUb+gbcYEoAADspeNMaq/8f9+55dZ/VpTiH/MtZR1eEq9v3DgT t3lT27PXNqZsS2qxczhPapVMt6ztTpLai8/eFqp2zEm6cl1q9Wm0GAAA7Ifj TGplTCvLbAs5j0urwBIlGHka2acUTmrxc1gntWq57aHFBDtIassWK165Y3n6 79VHVjWMSLurGZYLXYW+oVeWAgDALh1hUqvGtDnD2vlNWwlJrXLB5OvufHZ1 1d+rj9xzHqkqZ5dCCShlDtWkVlRy4/TTDp4o0jVZ/Gm19ZTL02rugwMAYA8d VVL79u/9fjOmlaX409RLO48Y8ad1zi+YrF+2FzxDF4g2SXO4dn7GqhFndpfU VvV/4r6HKs9gibE6j7as1fo/XQMJAMC+Oaqk1hbT5jmzNuCc2nmYaoa781R1 njtaLyCMnENoniu7eEp/+BLKN1+646HrkVFrPYdy9Wv/CQAA+0JSmy2pVc5h xZ7T6bzSLxCOuk5Lxcwht6TW9SyUyIsYz0+rLabvXgsAAMjV8SS1Wi678W9f K8qsYS392Y85nVOrRZ6aWX/5evNB/dU76Trarr6Oi4mdUwMAYE8dZ1J75Mnl mL/4x4yn1Xp+T+0sR5Q/c3at8spu7lNrT2rB03Mtb5woqZ3X4dVHVr/yFndq cj1P96kBALDfjjCp/Ztvfrv6evGfW7gA8iys3VN5PsbitFHgbNGOnv0YyjKV ZHf+2Pyb1SfnN85zjUtqbVcqrl/vC1ye/QgAwME4nqT2uWvf/OwX/11Rao95 LP6zfL2YYIbFbjzPsOUOrGowab1RqyMZRd7q1ZxDZ1LbCH0tNa+FoPrKrmab 9ntqr6/+ZEARaduv5ww2td9TAwDgABxPUtuZF6/f0R6dXnfnE4/Uz/i0Rq3b 7qnlqbYLCGPn0JPUWn4aO3Siban28MbEpLZxyWWjoaJOqNV+idt1jwAA7ClJ bTuuPfXsHXdeqsac8g61yOlbJu661StmDr1J7Uzj+R6vu/NSkfgaAbP06vqq zrN1XJ4aS7pPbXFvWvWq0c6GAgCAgySpAQAA5EZSAwAAyI2kBgAAkBtJDQAA IDeSGgAAQG4kNQAAgNxIagAAALmR1AAAAHIjqQEAAORGUgMAAMiNpAYAAJAb SQ0AACA3khoAAEBuJDUAAIDcSGoAAAC5kdQAAAByI6kBAADkRlIDAADIjaQG AACQG0mN/XH59lsKt1/eztKuXb739jfdsvKme69Fv7NZz+3W/EBoxhTDu+sW HMyGO5gVgQnZL9b2qyn2q7bHS1LbjsUw6nwcVYyk3nT7vZevZTWaarh275vy GvRt86hSLquywfYoqWW34YbZdTOW9qMxx3TXLZhhw+1mu8SvyLJ+tc1SHPdz P+xvXb3v1uQ5ityPw0KP6YYl8x2Zr127XNSxVsmcB0/b+JDKdcP17MqDd+qe WpZ/3u99sYekNruzA017jz374J5rwYvPkhHddzcfRh3V3t5Afdyq7zpiHMQo YrvN2N7r9qExs6/j4A2X23YZmdRWR/1sN9QuZJzUcut+05l4WDLPkbm7kpk2 /syf9VlvOEltLpLavK6tu+7md6nX1tcqzde9Rie13cghqY1sul0ntQORR1Lb A/lXfoakthupSW2z5sVR/005DzJ3I+ODY27dbyLTD0vm2IarStbruDjJlu9O NGd33o8NN/38JTVJbU7rr1Xbulix490uqW2S1ChJapHyr7ykVns9o1XauYwP jrl1v0nMMSyZYRsuQ8lOxk5jzP0hlf2Gm2H+kpqkNqMBn8nrr4vK700C57LP ++zGIwQWlynXp2pYV6W8zrl2oXPjOueuoXLX0ltWJjxVc4Gt1U5aelRrht4U vL+ksg1TtlH7KzGzCh6AQrNa1nn94sgN16xZMdm9aYfczSvpA5fRT9iMkRu6 rUrRvS5xmalt3qJ7Qb3dNaCtYoF1iDtQVCYNb/FBGy5tu3RdbdhokMgjw5i9 oHWQ3z4CjalVxEF1yJ7V8nplJSpzrU7Qt5uPqM3AOqfud1kfFmI297Ljxx6a Zx6WpL2xvYMN+kajv6JRB7RR3X6iw35g5fZjw0XNP62Sg5Na3Gdnc+3z+zZN UptP8uZu+WjY7EfLTrlxrGlO2fMp0zqqCS2r+SHYt/SIGiS1wOaHY8zSW1fx Tb2fZ91D34Rt1BcxImYVeFvw6FKfbsyGq15i0T9tWMul9L39c0gzRm7ojioN GJJNuKv2tWTPgoYntXDFapfrxR0oerf4oA03U1KL7DBj94KepNbIjjG1ijio DtyzWl5frsTtm1v3fKv27OZxTT1PUovb77I+LMR9hiYmtTmHJemt0dHBlm+P rmhUZ4s7oI3q9lMc9jvWL/8NF6hE+3pHVXJQUovpD8F9J8OcJqnNKe2U7KrP VGL/+t7R4Cdx9Tuaa6GjWseVG8Wfat9+ru+g6B4Yxy59/b1x/VLq/ubovfox Zt1Xr1W+LQuuYVod0rZRZ0tGzqr1fYEXKy8M33CVmlW+Ajy/DD668TZWbTmD 5ZsnbMbIDd1bpaRrbqffVVvELij1Gq2Wit0bnHPEgaK/eYduuJHXQp9/ENeP THHLre8Fq9Yfk9SCp9SiatV/UB2+Z7W8fn64aXzTHbvR+w/CHZG461DY+nr0 fpf3YSH2MzQxqc05LElvjY4OVmmos5YqOlHEl7wR+3XCAW1Mtx9+2O9cw33Y cM1at/TN2Ep2HSLODRsB1jdM/fqkTEhqs0lL5m39o7F7Lnt+S4hofl8Qf2ho Tt86VO5detzXpJHVSF56684WW61wHVK3UUfEiJ1VvSKL/37TvZvJbMoN1/55 kNZ2HRNuoRlrE0YcfBOGZDPsql11iljQsKQWqEDcYCDYKbtXaOCGG5XUzsNW Y2zeu9zRe0Gw5teu3RsahsTWqnfZI/asltdX35w3lzl4N28uZJ6kNuJjov6e 3RwWRnyGdph3WDL0A65tJB86fRW8xHbUJ35jK4/o9uMP+52V3JMNV39feLLo SiYntaT+UM1qaXF4iyS12STtWe2fCPW/xH9g9Y3fFt8EnV2zvXGiPvWkRvj1 wDcasQaMzYJLb5/DwPN6Y7ZR7ZX4WW2eLlsGtWubrzZXauyGCx1YIwcOvalh wmaM3NAxQSa+182xqyZWKdxJJkhq4b/0HChilj54Dx2c1M6PQB1zb/vL6L1g XfOANzUGcUm1aj+oztAzW2fZv9HjD8JxbZqc1PqmzP2wMOIztMN2hiXRb4zY CKvDT2M/qo9Uoj/xe0c+I7r96MN+m/3bcKH5D6tkX9uF82f8CHD9pV6Wp9MW JLX5pMTzjp4Y/LZ3ZFLr+E2OaZLa2SvVJcQ8TqS/2kkfwR2GDZLHbKPIjRj4 U/W/V0FtM8Btxra4CrS9PuIURuxkEzZj5IaOqXn8is+xqwbFL2i6pNbIgBEH ipjVGbyHDuuQq1rX/xi53PF7Qeuy2sclMa3RfVCdoWe2tkRvOyQchHeU1PI/ LAz+DO2ylWFJ9BtTD12rC0A3+1DC8SRq5DO823dMMzKp7emGSxjqdPwpMakN GAH+/+y9B1BcW5rnWTGxERu7sbPbsxPTsTE9M1U9ET29091V1R3bXUbvvar3 6nlbenpW3hu8EEgIECCMhBUghDfCe58k3nsrfOK990h4kNs/9xNXiVWClAi9 +n6RcePmzXPP+c65Ser+dM4959n/i+xRT2NTUybb+U+QXTW15/+DIAwjaH02 AHwbg+gU+xVq3WCepRc3Bpva6o+e/yfQc1GT17MNRI1NbdWF3vu3ZBvy+k1N sR+KvWZqG4163F65r9DUVknvmrptM6pniTf/UWVT21bKN+JnYWf/hr64Skq+ LVGeqa3KZSUbRb9sit757ElTezMv3Btnantw5OMybGpK5NnFV+TS7+box83G 8L5yU1uVeavjuU3+Rl4YxnZL3+mv/wtieC2jH+WOyIuanKA9N7lNi9vwyMbH N7+QCv5Ds5ujHxW80Ht9mNO2Q9ql0Y8K/lDsYESQ4gFv99dg6yf3X/72Yuem Jh762dohmTv+vVrzo7qnRj9uo1KvydTeuJ8Fxf8N3ZLduC155YPoNs5m9S+V gv8QKHDnsxdHP76hF26LWitv9ON2v1UrEryzxcN3BTY1ZSKq/WZfsecrFW72 I7L2O/jKTE2R46/Q1LYoV/Fkipb+0qq2cQYvcY02jlCBrMS05xxXidqmhxUM YLuBKf4PTdKL7iZeeTO+8EK/MKRtfeuU8Ke6VUwKFPSqTG1NgYr+UCjQvDv+ C93er8HKvcymobzkLd1Lmppw/gYdfi/xe7Xq1G1+M9cXqLipKfpnrkiltmNq CsS8zf+VeqN+Fl7+PyGfR6rU2xJFT9zqbv3cFpMKrslHsXZR+M7nJb72SjS1 N+TCbXTexgErfhe0TVPb3t+J3DVdaeGX+78QZcCmplyed8OufjD4+bTnK98m uf9vFf8YXmqCZblvYOtGSeWPyy3R+EpMrXVlLly5Gis8wfVmYW//v1V/tnZC XtRTbjrdzdnkD33n12iTW6AXZyWfdpP/od+gSV5CscXA5GYY3nJpy3VsULVd mKV/ywv9wpC29a1Twp/qxiha0M5MbfVTLxtN0q/oD8WLm3fnf6GKXxfF/pXd 5hdm1SoG4iMuOze15xFs8FXZOioFflS394WRb9VNarfFN0vRi67oJX5Rmyoc 8w5+6/biz4LC/4bu4O5yF25LFDzxRf0qP1vfCM8v+7Z/T7b3g/ZSX3tFf/ZX fg0Uu3pvwoVTpNbbK2v7praNO8C15yrg4q8DNjWlI3dDvQHyf/Arf7RrWP2d 2c7vwLoMV//f65rPaDT8qzK1jaur0Pd/s7C3Vfctmn3HprZRbIpdI4WuzqbR bXRvJ1/FTf5Takd3L5u13L5tzIu0Wduv++/sV9GMil3oHYS01bfulf+pboZC Be3M1DbJWD4TRX8oXti8L/EXquh12aJSP1Poq6BIqm38FShwt7e9qBT7UVXw V2XDZOtrt+U368V/U4o1taJ/DwrG/PK/dXviZ0Hhf0N31g+wC7clipz4QlPb PMTN/h91qyIV/EF7qa/9tn72V4RC8V7SPX/hFKj1Nsvaialt6/uw+sztX5Nd gE1tV1g1YZHwLdhoUZCn9D8K++RSrf+/vO3d/q3J7/n80PJzID2bU+qVjn6k /7tYVeMtF0hUKOzt3vqub/Vzis2etfUv9Q6u0SYRvjgr+dM3+7dJkQZ5ia/N s6+HkHIbQ79Xtf0GX/dX2IwKXugXhbS9b92r/lPdlBcXtMPRj45r22Ojb59C PxTPUm7evC914RS7Lgqb2jbKdTy3tnkUv3ZbXxTxf47ls3pRVAr+qCr2q7K6 dlTOJv/BvsU364V/5go09TbaVJGYt/t3t2d/FhS93DsesaX825IXnviCL9iz JpC/5d63b4t1CxT4u1bkB+2lvvY7+P/k7UrB3r9wL8p/e0HuyNQo662+D5sq 2Q4vizJhU2MY5sVsUy+YPQxfS4ZhmNfM5s/DMswq2NQYhpFHfEDi+ZGkHf+3 LbMHYVNjGIZ5vbyS+WGYvwjY1BiGkWez8d0KzMTCvBGwqTEMw7xetvlAAfMX DJsawzCrWL/W6j7FHu9j3gzY1BiGYV4rws8w/wozisCmxjAMwzAMwzAMs9dg U2MYhmEYhmEYhtlrsKkxDMMwDMMwDMPsNdjUGIZhGIZhGIZh9hpsagzDMAzD MAzDMHsNNjWGYRiGYRiGYZi9BpsawzAMwzAMwzDMXoNNjWEYhmEYhmEYZq/B psYwDMMwDMMwDLPXYFNjGIZhGIZhGIbZa7CpMQzDMAzDMAzD7DXY1BiGYRiG YRiGYfYabGoMwzAMwzAMwzB7DTY1hmEYhmEYhmGYvQabGsMwDMMwDMMwzF6D TY1hGIZhGIZhGGavwabGMAzDMAzDMAyz12BTYxiGYRiGYRiG2WuwqTEMwzAM wzAMw+w12NQYhmEYhmEYhmH2GmxqDMMwDMMwDMMwew02NYZhGIZhGIZhmL0G mxrDMAzDMAzDMMxeg02NYRiGYRiGYRhmr8GmxjAMwzAMwzAMs9dgU2MYhmEY hmEYhtlrsKkxDMMwDMMwDMPsNdjUGIZhGIZhGIZh9hpsagzDMAzDMAzDMHsN NjUl8fjx4/UHHz58OD8/PyswNzeH7cyrg/IE9HZaADvyBzc7RQwGpzx48GBq amoHRaNqtF1cXNyw+rvDkydPEM/o6GhfX19XV1cH81OnXaCzs7O/v39ychJ/ Za/ru8cwDMMwDPMKYVNTEutV5dGjRxAZNNT4+PjY2BhtIRQjAqM7YmQF7CO3 CQH5bFEK7l3p4Mhq6JTxFcYEdhbPmBwoC6IHWXstzf5U0GEEgCoMDg7i1r2X +csAYo4rjm/gzMzM6/ruMQzDMAzDvELY1HaBhYUF+MvQ0FBPT09ra2tTU1Oj QENDQ72ATCZr2D44q34FvEWGzQKUP6XBPkpsaWnBEZmAeHrjauhI0wpiDjuI BCXithmGCDnd/daGow0MDAwPD0M/8bV8wPzUgZhji2sNTaOO1Lm5ud3/4jEM wzAMw7xa2NSUyuPHjyFosKeqqqrS0tLCwsKcnJzsFTIFsrKysncETqQcMjIy KJPc3Fwx/ywBOkisOT1HgJJRPpS4oKAgPz9/ffoXRpIhkJ6eji1yLisrQ8Vh TLszEvKRwOjoaF1dHUwTd+xQNtji69YIRumQqeFa48vW2tqKv7Wenh4cnJ2d 3YUvHsMwDMMwjJJgU1MquFeENVRWVpaUlBQVFUGC8gQKBfIFcLy4uBjbwu1D VoUMscU+HREPkqBhB0eKVhDPpbeilwEKBkZJ0W4rEsoNOUDc0tLSkpOTU1NT 8VYmk+3ODTNKmZ6eHhwcRIP39/fPzMzMCyxsxOJWyCfbIqUiaTY+Z82xDXPY IvOt49/o0x3GuWFBO6i1XFu9IMX6bDdssfVXk3bwHRgbG+vu7h4SwJdhF754 DMMwDMMwSoJNTUk8efKEungqKiogPqUrQMroLbYkOGVlZUhDHylOiQDtkyWJ H4lGJlob3oqFipQJkJSJukemRim3FQxOQW5iv2FKSkpCQgJ8DRmOjIwsLS0p e54HehYPN+ddXV0PHjx4IvBoNQ8f4vVQiGSzbj6c9FhI+RDbx48f4ciGyR4/ fpbnFmmQlfxHeLu+dBxck0w+5UaZLxf89Mlm8Qufrq4d5SZk9fzYJjE/y4RK R1ZP1hb0+EW1flaifAxiW23W7GJ91xe3YYvRBaIIxYslRPUY1jY1NYWfI/ha a2vr5nVkGIZhGIbZ67CpKQncPc7NzeF2kfqzygUgMmJfFcyIRh5SnxcNXFQc 6gUT34qjGcWxjvLDLOWTEdTXRoKGtzRqEWRmZlIm2wpGLJq69rBFPomJiVKp FJmTOil7nofhFfr6+nCv/ljg4TqWBDYSDZIXnPRISEYi8PDpk0ervUbYfyK6 wnKaJ0/IQeQzXNZEZCX30XLOVPqT56UvSwwKXH36EzGlXADPP9rE4J4Hv/rT xxTqo0ei7yynfPJkKwml0leyeiz/kVjrdVUWWU4lF8NKAA83bii5Nl+SC/JZ GyKKNS0mtvzSuotLVwV/d9PT0x0dHQ0NDRuFxzAMwzAM82bApqYkFhcX0SYt LS1QGNgZmgimVlxcDIshY4IcJQukpaWRKKVtBxKr9Ucy1iGmTE1NTV4B++Rl ADv0UVJSUkpKCmW1rWBweooAPaFGYyDxFqaGTxsbGwcHBycmJpTa4DTgbWRk pL+/H2KI9scd/rphcgvCDf7SyOhUZU1/WlabNKU5IaVZmtqcldeBI739kzOz 8zCVR49gCMsj7UbGpuoaBjNzOxKElNipkw3idMpqaWlxfn5hdGyquWWkoKQ7 Kb0lStIQLWnILexs6xjD8f6B+w3Nw1W1A00tw2Pj0yQUg8MPKqr6ist6WttH xyemJyZmOrrGSu/1ZuS0Z+d31DcO4SDpyPTM3MDg/dr6wbyiLrxqZYPDI1Nz c/PIqrpuYDn+1Ob4pKa4xMbUzDbkieJmZ+cRXlVtP2qEIto7xx5MzSLOqak5 FFdc3lN2rxc7LW0jeYWdkuSmpLSW9Oz21Kw27MdKG/OLu/oH75MGzS8sTN6f aW4bwcG8os6GpmEERuNJJyZnGpuHM/M61uQQl9iEQoeGHyAGRFhU1tPSNnr/ wSwNW3zwYHa5phU9aCikTE5vLSnv6eweRzWfPoXcPUS2za0jRaXdaECcjkye PFm2wsGh5RYrKkVuI5OTM4hhw3GQdJBMrb29XSaTKfUrxzAMwzAMo1TY1JTE /Pz8+Ph4Q0NDVlYWmVppaSn1o5E6wW6SBEiatmVGopet8TXxyBamRoWSkeFT mglETCCfybbiQYbIHFucSHOM4K1EIklMTKypqenp6RkdHVVqg0MGYWrUp4Zv I923z69mYWEeOoBXZXWfiWXuZ9+HfbA/+LMfwvYfiTylLjWzyYtPbGzvHIUA PH68tDA/Pzz6AIZi71J8QlXyxY/heB1XldxyLsbBkdEHKGJ+YX545H5RaZf7 3XKNKykHjkb98Yug974MumiQBm2B0+UUdLjdrTC3zfMOuCdrHKKevqKybn2z TPXLyYHhNTC45pbhKInskmHa5z+Ef38yxsG1WNY4SKMiB4fuZ+a23biVf1wl /qSaxO5OUUVV7/0HMzX1AxZ2+Uj/4dchHx1Yfh25EG/jVAQJmpycrqrtM7XJ /fpo1LmLiUERNZ1dY0uLC339k0ERtShU1ygjPLY+WiLTuZb+8Tehn3wb+vWR qP2HI9EU7/85+IpJRum9nidPlsc9PpiaaWga8gmqRD6n1BOcvcqq6/pROlqy s3ssJKr2wqXkj74Jkc/hg/0h161ya+oG0MIWtnkqOsl+IdVd3WM45cGDmTrZ AOK5ej3z2xPRn3wb9s2xKN1r6WHRdS1tw0+fLkHWWttG/EKqcNbBM7Gm1nnw uKdPlyMpXm6xLJVLyK0Kmjk9DfVbQKXWXd/lIzMzM1NTU2xqDMMwDMO86bCp KQncMY6NjdXX10OFaPRjYWEhnIi6n0S7AWRq24UsTJz7cY1byX8qgiPyhZKU 0eST8pM3rslTwWBE94Sg0UEyNalUWllZ2dnZCYdSaoNTnxpK6e3tnZiYoDW4 Z1czNzeLO39IQUpmy+ffh/3VL2794tfO734V+OXBsK8ORnx3IhqeEhVfL5jF HBQMnmV9u+CYSvwn34R++HUwXlCboxfirR0L8go7RsceTNyfKrvXc9utBCr3 0YHg9/cHvfdVEITlon5qrLShuKwrNKpWUy/l66ORl43TIXQUanxSI7L6lz96 m1jllN7rLq/sueVc9NYn/v/Lf7L6D39rDynLyW8T4nwChXH1KYNR/vxXzv/w W49TGgmpmS0oNzOv7cDRyL/6hf3f/tpl3yd+KBFR2ToVVlT1PHgwnZHT+ufD Ef/r/2PzX/7hjrZBallF9/zcHLIytc5Foe9+EejsWRqX2HDFOPP3H/n9939x +cWvXP7+39x/+ZYnYtC7nlH2zNQeDQ1Ppme3QiH/9b27v3rb66yWND6poX9w YmF+rqtnLCymVlU36Xcf+srn8PanAdDSuoZBxLn/UMSv3/a+ZpHd0DQ4PT3T 2Dzo7V9x4VLidyeivjoY/ul3y036+ffhiDAyrg7ZQnura/uMb2ajrL/+O0c0 NUwWF+3x40cJyY1Qwl++5XXNIgseev/+NJwMorbu+i4v4E5TQcLUePQjwzAM wzBvNGxqSmKNqZWVleXm5kKRyGXSVkY8kl7tzNTWSBZ1ihFif9maVQBorGPa yvhGeVMT5+qXn29fQSgTsjPqJSQlTEhIgKnh64HbZmVPxEdz/WHb3d09Pj5O 9+0zq5mdnYGmPXm8IElugCZA074/GeV+tywyrhauBCP786FwnWtpKelNQ0MT tbI+G6eC709GH70QZ26TGxBaFRhWZW6bi7c4CC2qa+hv7xz2C6mCW315MPy8 tvSOFwxIlpDckJ3fVtcwUFHZExheraab9NWhCJ1r6YUlHcJDWI9jpbL3/xz0 67e9jG5mlZR3lVZ02zgV/u4j33/3H60gXz+ejkEOc/PLAwKrBHP5zfu+MLV/ fc8HRSSnNw2PTCZnNH3xQxj8CNbj5FESEVsLM4KmjY7dX1iYS81shof+7K9u /u//2fbQ2ZiktKbR0fuyxgGSIJhaQFh1Z/dYSXmvnXPhgWOR8DWo02XjNE// 8oKSjsHBiUePFh8+XGxtG0atz12UfvR18LtfBh48E+PqXdrQNLC0ODc1Nd3a Ppxb0GZ7Z1UOXgEV96r7JianUIWPDyy7laF5Zp2sH9KHNj+pJvnwQMglg9SQ yGokuONRckZD+s3xqMtG6SkZTQODE9V1fbDXX73t/Z/+zmHfx/43b+U3tQzh uiHxRwdC/vH3nvpmGfeqYeJTUGkI48xG0Iz9bW1tbGoMwzAMw7zRsKkpCXH0 I/youLi4vLw8JydHfEaMVkAD4sjDncmaKFlifxkNQRQfQ8NHa6YTkZe7dLm+ OfnV2dJXuskUNzVamo1ioOoghsTERIgbvh64be7v71dqg4um1tXVNTo6Oj09 TaPg5Jmennr6ZOHRw7n4JBlM53cf+t60z2vrGJqdnb5X2QML+/z70C8Phjm4 FNbU9aZlNR9XjX/nU/8rJunFZZ3Lp09NlZR36l1Px8ETqpKUzKaC4vbLxul/ +iromEpcQGhlZ/eIMIpv6fGjeQQga+wPjarRNkiB2RmYZRaVwtQe4iURSofd mNvmlFZ0lt3rsncp+tOfA//67xz/5289zmgmhEbX9PaPzc3O5Be1q19O+ud3 vP/5D95QoSvG6amZMJrxxLTGr49E7PvYz9apoKd3VCj0MWX+5MkCTO3rI5H/ 189v/c3/dIKp+YXcq67tLb/XZWGXi0I//yEM0iT02T2tqu01scqGG+oapcUn yvoGxp48mUf7PH48/+jRfEVVt5l1zgm1+Iv6KWqXk789HqV7LQ0hPVyaQzM+ fbqIV2XNqhz6B8eFqT+WUMfPhTqa2eTcq+qub+i/7V4MP4Wp+QRWLF+Ipw9b Woduu5d8fyr6wNHIW84FdfV9sGMrx/w//TkIWvr+/qAL2omxCbL+gXHU6Ntj UTBWE8usypqe8fH7kG60z9RGQNMmJibY1BiGYRiGedNhU1MSMDXcLjY1NeXl 5ZWVlaGJsEMdXuJC1dTJtf4BMcVNTewRw1vqsJMKQJHEnjv5oYy0vDWJG/md 6GXymrbdYGgiEcpTPh/SRtS9paWlt7dXqQ1OpgY6OztHRkbopn3dEskPnjye f7g0G5dY/8WPyx5haZ/X0Tm0tDTb0zMSGlV9Sl3ywf4guBWECG+/OhT+h8/9 73gUDy4LyDxeQ0Pjzl4l734e8MWP4TCgkMjq709GvfNZAHykqrZnZnaa/OXp 04WFhZnm1sGw6OemVljSTh4XL5QOzzK3ySkp74Cs2d0pfO+rwL/9Z5f3vgzU MUz19CsrKlseMSpNbTitIYGpvfWx/6EzMYbmmcnpjX39YzgOF3vrE3+b2/ld 3cNCiQ+FLSRxLimtcf/hiP/2T86//9D3wiWp9e38qPjatMymG7dy4ZiQRGgU mVptfa+ZdfahM7FwQOjbwOAY6oj2efJ47tHD2Yzs5tMaCQfPxNzxLHZwK0Jr fHs8MlpSBwNGAiquum5VDoND44IzLqKOMDVECBvNLWxLz242scz++JuQI+fj oJloHwQwPDwuSZZp6iV/8m2IzrVUtE91XQ9MDRL69VG8ImFwQt9lX1pWE9rw tx/4Gt/MgveNjU0ihtmZ6Q0Xwsbf3fj4OJsawzAMwzBvOmxqSoIW4YWp5efn l5eXV1ZWYmfNgEPq4Upfeb5su3Ik6h51ZsHOYmNjIyIiwgTCw8MjIyOjoqKi o6NjBCQSCbwJPkXrrOXm5oqdemL33HafUBOR778Tx1hS/1pVVVVra+uumVpH Rwf2ccd+fx04BpFZWpyOky67EvXR1NT1TE7ehzUUFLdDheBKP56OhoW5epd+ /G0IJCI8umZ2dvrxo1m85uamIuNrP/suFMks7HJv2OW++2Xgh18HB4ZXIpPF xRnBDu/PzU3Pzk61tA2Gx4imllFY3EYSJ5qamXVOcVlHSVkHhOvdLwJ/+Zbn 4bMxUJtbzgVBEVVZuS2wRVXdRJQFxzmmEmdonpWY2tDbN5KS0fjt8ah/+r3n obMxt92KkCwpraGkvHNwcGx6+kHissdFwO+Oq8Rdu5GppZ8MJUQtoGzICgIV m1AnuNJiUSmqnIHwLuqnQCpb2gZQwfm56fn5qfGxidCoKpRySj0eepiY1nDk fOzH3wS7+ZR29wyjFKgc6ltUsiqH1rZBIed5cmEytZSMJrTDFZN05AYjyytq Q0vC9YaHx4rLO0ytsv/0VdBJtXjYXGV1l5VD3pFzsSq6iWe0EuCG+mYZuC4J yTKcS6ZWUdk1OjoxPX0fMay5vpO4BvfvjwngK8emxjAMwzDMGw2bmpKYnp4e Hh7GvWJeXp5oaulyvVfUvUWeJT8QUUFIi2jhM2SVlJQETQsNDfX19fXy8vIQ 8FzB29vbz88P+hYfHw91ooXPaCU1UjP5YMTn1BRHnMaEOuwyhIlTxDUIampq 2tradsfUBgYG6Jk4um9fA44t+8XCdKy0DsLym/fv4s6/qqZrfHwCr6qabhgN 5AJ25uBaaOuU/8H+oM++D4XXLC3OkKk9XJqRJMu+PBj+uw99NfWS8frNB3eR Jk5at7g4jcyXh95NTkLTZmYeNLcOhEVXQ2G+OxGlb5pesGxqgsVI6774IWzf R36m1tlwpeLSdujJHz4PQJ6XDFOcPIquW2Xj5elf5h1QjgiPXYj99njk0fOx +qYZ0pSGnt6R9Owm6OTf/E+n//Gvbgj4/T8HHT4Xi0yKSjtGRsakKbIDRyPe +dTf0CLDzrnghGrcWa0EL78y+OD7XwV9/kNojKRW6CJcKCxpMzBLR3haV5Oh e00t/TC1hfmpkZHx6toee5dC5APRKyxpR0rsoKYIDBUZGBx99HAGzltQ3Cqf A6r89Mn8kydzVMe3P/VHk8IcA8IqLxmmIuZlYy1pQzOirUZHx+9Vd5nZZENa vz8RBdm8V9VpaZ8LwdQ1Sr1snAY5vWaRieP+IffgfWgfE8vs8nudCG9qanJq aoNLDEYFYGo89yPDMAzDMG80bGpKgkwN94rQorKyMphaQUGB+FCYaFvyfqSg IomThOQJYB+aFh0dHRISEhAQACODl7m7u7u4uLitAGvDQX9//6CgIPhaVFQU lC0lJYWeL6MAsuWQnwcyQ27k5Jr5IcXevYzVoyszVh6ao9lFYGqwp915Tk00 Nbppn1gNDsARYCKQL9HUKqthauNj4+OVNV3m1jmwhk++CXFweW5qMQm1iwtT jx9B1mZgeZKk+i8Phomm9luY2newudqFhalHSzNUJjRtZuY+xAfyAoWBhuib kaktD6FczuHHsN9/6GdimYWDRSXtN2/lvvNZwPv7g1Cof0iFtkHK4bMxV03T XLyK8YJwnVCNP3g25opxGiysp3cYpvbDqWVT+3sytf1BR56ZWvvwyFhCsmz/ kfD3vwq0vp3n5V92/qL0uGo8cjY0z3jn04AvfliO9unTOUSC0vVXmxoaB5Xt 6BxEQVdM0qB1pzUkfsEVeJ3SWB4aqqIjDY+ubm3rh7dC1mBq8jk0t/Q/fTL3 5PFs7GpTCyRTOxVNxrq0BKudgVRWVHVCV3//kd/3J2FqsgrB1CBoKNrCLsfA PMPaMT8wvNLMOvsPn/vv+9jX1CYHpjY8PPbgwSReExtBptbS0sKmxjAMwzDM Gw2bmpKYnZ3F7WJDQwNUiJ5Tg6mJHVjyrJnoY42vZa5D3qpo2TKYFxzNx8cH LhYugLe+vr7YBgcHBwkEBgbiCAzOycnpzp07Xl5ekZGR0CiIJHWuyTsgWVjG ypBIGpkpPhAn7tMTdlQFeYkTR3VStxosta2tDQ6l1AaHF4umhu24wNhqcAAa Mjd7P0ZS+/n3oYKpZcLU8NHAwHBuQYuBafq7XwRCKHwCy5y9ij7+JhivkMjK qQcTSwtTeE09mAyPqfrku5B3vww0t82GTbz7ZQD8xS+4fGR0dG7mweTk+MTE +PT0/ampycam3pDIKk29pG+PR0K78ota8L3AKy6xTpjPZNnU8otaC4vbLGxz IDUQQGhajKTmrFbC25/6HT4bfcs5Pzi80sm9UFUn8cfT0TqGKQnJ9V3dg5Aa 5PmPv/c4dDba0a0wOKJSmlJfVNrW1z/84P4ERAxZvftFgKVDblhUlblNNjTK wDz92IXYX7/jDUmMk9Y+fTKDSBDSVdN0ZIUgUc2Gpt6F+Qd41Tf0oAVOqce/ 92UgXPXcxYQzmpI//Tno3/5095tjEYinprbr8SPY1nRe4aocUOUnj2ZwHHoL y0MtzGyyk9MbQqOrLxulfnssUtswJTu/ZWlx6uHS9MDgCKzN5Gbme18FnlSL S81sKLvXjiY9fC5G1yj1tnuhq0+Jm0/JLeeC4ypxv37b861PludgKavoGBwc QTvjNbYRIyMjbGoMwzAMw/wEYFNTEnNzc7hpbGxshKmVlpaiiQoLC2mgozjR 4pqeNfnpGUVlk59FXz4ldaXB0UJCQkjE4GWhoaFxcXHx8fE4Dl+Ljo6OjY3F Fm8jIiJgao6OjlZWVvb29t7e3jgO1RLLle+wowDoo7wV8vPz6dE2MQzqSpM/ JX1lHkgak0mT9t8T5n7cBVNDEX19fc3Nzd3d3bS82uBqcGBmevT+5Eh4TOWn 34X87kNfM+vMelnn5MRIY1OXb3DZKbX4T74N0b2WnJBc4xdc+vkPIe986m/v nNfe0Ts7M45Xe0efo0v+Hz7z/+z7EE+/It/g0m+Ohb/9iZ+RRXpxacvI8ND8 3PjC/HLK8fHh2rqOoPByNV0pnEXramJ2fuPTpw8ePZwMiax4f38gPNHcJqu4 rKWguNnEMmPfx74HjkZExlUmpdVBkf7f37r/4XN/4xvpsQnVSK9jmPzdiUgt vUS8bWntiZFU//lQ2O8/8r1pn93Y1D0/N/Hk8f2HS5OPH96fnhqj2r31MUww U5JUExJRccMu65xW/O8+8v1vv3T+8sdQnL60MPlwcTI7r+GKcQrkS+2yNCC0 rKauA5HPz46jLtetM788GPrB/sD9h8MOnYn87kQE9v+/93zQIGifnLxGFIpX Vu6qHFBlVH9uZjwithJNhEoZ38xIy5JJU2oNzNI+OhB88Gx0TEI1inj6+EF3 d19cQo2mXiJ0GO2TkSMrLG66bpX5/Ul4X6JXQElCci3qrm+ahgb/+a+cBVPL Kixp7unpHxkZwmtwI/r7+7HF14BNjWEYhmGYNxo2NSUhmhrsZo2piXOJrDe1 3BWol0rsdBM/Em0OxyMjI52cnG7dugXtCgsLg4vRLCLiRCKkadTLhk+hci4u Ls7OztiRSCRUtNhHJv/Mmny3HRytqKiouLgYpibvktiKT8mJlpcuN70kdmjV AOpTU/boRzI1OFp9fX1LS0u3QNdqcGBstG94qDcovOTjb4LgStcsUssrmnA8 LbP26vUUWMzB05EunrnFpQ2RseU/no7Y95Gvlp40Ob26s7MLr5SMmotXpRAQ yEtkbFliapXGFckfP/PDWa5e+ZVVzRPjA/cnB4YGezs7O8srGsOjy5D+w68D T6rGxCTcGx3pQ1mOrrlvfeL7zmd+jq45NTUtBUUyA7OU33zg8/WRMBSakVWr cTnh73/j9o+/99C8kpCYUpWUVqVvmnzgaJjqpfjw6PK6+taw6LIvfwz57Yd3 zWzSa2pbUeLc7PD0FDx0CEWgdh99E/TbD+7qm6akZ9Xk5te5eOX9cDLiv/zj nf/wC4cvfghBKVP3B6cfDKZmVF8ylMLFLlyK9wkoLL/XNDkxMDnRn5BUeVIt 5p3lekUY3Uixcsgwt0m7ZCD97LvgX73liUhCI8tQEFKmpFfrrM4BwUyM9wcL LfzbD3wQQ2ZOLepoaZ/xxy/8//RVgJN7LhoHySruNaEFDp+NRMXNbdJzC+qy ciB0KXirohMfEFpcUtogTam6qJ+Ipvjr/3H7rY99r1ulZ+fVtbZ29PZ249W1 ER0dHT09PfjTY1NjGIZhGOaNhk1NSWzX1GhLRgY5kp/xnpyIOrbIp6jTKjg4 2NjYWFtb28LCwt3dHb7mJeDr6xsaGhoTExMXFwdTg8QhZUhICA5iH8chUMgQ /lVQUECyRpOByEsiTSYZHx8P3cOW1rCmLeQLpyAY6BsyoWflxI5C+QUIUgSq qqp2x9RQBG7Ua2tr0eztAm2rwYGhwa7+vk7/kMJ3v/D7+S+dvzoYYuOY4e2f b2qVevBMBBzkmnlKclplY2NrZk41JOXrw2HfHQ+/bJR42y0bryvGid+fCNt/ ONTkZmp2Xk1pmczJPefQ6YjPvw86qRp981ba3YACv6CCsKiSjKyqktL6jKxq O6esH06G45QrJolu3rmOLllnNWPe+9L/6IWo8OiS5qbWvIJabYMEyMhHBwKD wovzC+pMrdJgYThyQTsOwWRkV6PcT74NOqEaHRhaVFXdGBJRgsQ//9Vy/Dds 0zzu5qFGEbElxaWw1FbsI3+cfvFqAoKslzWHRBSjFv/+v976d//R+k9f+QeH F0+M996f6E1IqlDVjfv4m0Dk7O6Th9P7+zuRA2r6x8/9/u1P3nomSdLkezn5 tZk5NdHxZZp6kn/6vce/vud90y5dJmtGS0qTK9Qvx0PKkANqV1RaPz7WMzrc 7RtU8IfP/P7xd+6IISu3ura2KSCkCC387pf+5y/GunjmoJUsb6WfVo9GeyJN aGRJVU1jUuo9rasJFI9fcGF1TWNuAdwt+Z/2efyfP7f/53e8rpokpWZWNTS2 dHa249W2Ea2trfgaNDQ0sKkxDMMwDPNGw6amJDYzNdFl5EVM7M8SfU3+yTVx mkdxXv38/HxIFsxLT0/v2LFjFy5cwA6szdzc3Nra+s6dOz4+PlAz6l+DnQUF BUHWJBIJziorK8PpyAdbqBaiQubUrYZPcQTmBb2CoCEH5IPcHBwcnJ2d7969 GyAQHh4OWUOyQgH5vjZxOkoaG/m6TK2pqWlDU+voaBse6h4c6AqJXDadv/qF A2QNQvHlj8EHjoTCIyAmoRElNbVN3V0dtXXNMZIK4xupP5yMgPj88XNfvLDz /clw4xspcdKKellLY2NLclqVlX3GCbXoT78Neu9Lv7c+vvv2p3dPqER5+uZX 3IMutCSlVF63TIUDwg3p048OBBw9H+XomlNYXA99zCuo0zGU/vItT4QEh8JZ OPfH0xF4q2ecCEWCqemZJH72XfBp9RioHMKLii374ofg//u/O/zi186/+8Dn j1/4ffJN4NELkbCt8goZvAxvf7nPEwJYUFTX0dEB3VO5FPdf/8n5f/vPdh/s DxBMre/+RB8sTP1K/GffBSFnL7/8snIZmiy/sO7q9aTf/Mn7/a8C3Lzzmpvb uro6Ozs7GptaXbxy3/vC/1/+4IWAEXZHeztyvqifgNhOqcW4++SXlMHUesdG evyCi979wh+Gpa0vhei1tLTBQG85Zx9XiYJdfnwg4P2v/NEgaDQ1nTifwMLq 6uU2J1OjeJBDdU1TRWWjs0fuxwcC/+Yf7qBcmFpaVnVjU0tXVwdeG5oa6O7u bhBQ6leOYRiGYRhGqbCpKYkdmJo4v6L8NIzyYyOpow2QIsGY9PX1Dx8+fOTI kXPnzqmrq1++fNnIyOjGjRs2NjakV25ubl5eXtCruLg4hNEl3HND1sgKKR9E SH1qRQLYR2JoGtTMxcXF1tb25s2bdnZ27u7uEDdPT09sUXR8fLxEgHrcUlNT kSF1/FHH3GsxNdyi19XVNTc3dwp0rAYHBgd6Bvq70zJrLhslffh1IGzi02+D vzkadk4rztw2PSyqrKyiASf29qChOurqW+Kl98ys0w+ejvz4myC8fjwdaWqd FpewrGloS+RZW7csa3c8cjWuSPYfDn3rE9+3P/WFaPgGFdXXt/T3dcsaWmMT KowsUr87EY7iPvo68JxW7G23nOzc2uaWdgRVVtF4xyMPpqNjmJiUWtXQ0Jqa Ue3gkmNqlXY3oLC0vKGwRObilXfFONnKITMZCRpbl0cJmiYjnve+8od5fbA/ EK50XCXa1Tsf8eN0KCcydHLPvVe1PLazrLzB1TvvuGr0Fz+GXDKQopTRkb6x 0T7YloNL9hWTJOQcn3gPctrS0p6bX2fnlHVWM/aqSTKyGhrsGR3pxWt4qCc9 qxrlntWMs3PKziusb21tLyiqR92vmCRb2mfGxFfArUaGkbJXmlx58ar0JGJw y0XpnR2dLc3tqDIqoqmX8OdDy0/AQdlUdSQed/NRQVwUFLQcj2sOxSNJvFdX 14LKonnRFIfPRp3RiHX1yisqaUC53d2deHVsBAydRj+yqTEMwzAM80bDpqYk 1phaZWUlJIiMTN7CxNWi1z+YRsojP4u+2LOGrPLz80NDQ69du3bq1KkzZ85o aGhcvHgRpqYvcOXKFV1dXT09PUNDQ0tLS39/fxhZX18fLhN0BupEfXNiDNkr c/7jIMwLOQcGBvr5+UHKxBGV1DGHg+J6bcDV1RU+iGTR0dEwTRql+XpNjZ5T o0eWOleDA7093T093XX1relZteHRZUFhJUHhpRC0+MTKnLy66prmtraOnp6u nu4uesqtvr41O68uKq4iMKwEL+zgLU7HR8tplp+K6mxobCsubYD+hEaV+QQW 3Q0sipFUQCiQVZ/wLBWMD24VGVvuF1wcGFoiSapE+ubmdgqyqbm9sFgmTa6C P9bUtrS3d8pkrUiQW1APicOnjY1tRSUyBIwjEMP29o56WWtmdm14THlQeAky 9A8pFmIrzyuob2xqQ3EZ2TXIENnCvFARbEvKGhJTqqLjK9Iylkvp6+vuW7bI toIi5FyDE1H31lZoDvy0NSe/DqejCGjmQH/PwMDyC5KLSLJya5FPbn49YqC6 o5Tl2PLrq6qbW1rb+4QnyFAELA++hk+bhJqiIWCmpWWNSanVIZGliBlbZFVa 3ohyUYoQTyvFk/s8nk4UhMwTkiqRGK2KCqLcDa+vqOdsagzDMAzD/ARgU1MS 2zI18QExOkIrUxcUFNDAQrEnDsdxEM5VVlZWXFwcFhYGUzt79iw07aoA1AyO pqOjo6mpqaqqqqKigh1TU9Pw8PDm5uaFhYXFxcWBgYHq6mpx5kbqC6PisCOR SKBpNMoxJCQERURGRsYIYIcmJ4HEwdGcnJwcHR3t7Oxggg4ODpDBhIQExCnW ZZdNbWhoCEXgFl0mk6G4HoHuddDMIr29PUODvaMj/SMjfcPDfcNDfXg7ONCL DGAZIsigrw+G0osEy8mElHiLg2LelGZgoBc54NOR4eUX9nFwVSbynw71IX1f 7/MEA/29FEOvcBAfIQFOESr0LAE+xUFKgO3gcvx9iJ/yHF4utK9fCIxqhwxx FsX5rIjh5fRUCpkOMqPIB+QqJR8PBSloVjcFtmHO8jlQzssph/pWpVypF+Uw vBIzEvSulNIrn9tK+/QJlR0RGr9/JbctWO4S7e1lU2MYhmEY5k2HTU1JyJsa rXxNpiZ2oonPdomzhVAPGr0tEMBb+E6qAKyKer5gVeXl5RUVFVAnqNmJEyeg Y1A2AwMDXV1dbW3tS5cuQdawc/HiRYibjY0NHAo3z0tLS/Pz87iJRTC0GhqB EmlqR6lUCjuDc/n5+dGc/9HR0fECUVFRoQJRAsHBwXfv3vXy8nJ1dYWmwdrw FseTk5PF5+xey4wiUAXcn7e3t/cK9GwCbvhHRwYmJwbxmhgfHB8bGBsdGBnu Hxzs6+t7flZfL5QBHtSPBEhGKfF2eTWAlcwpzfBQ/+jowPj4IOWJ3JAVBdBL mYwsZ0LF4dPhZa18FiDygmXiU4Q00L98FraoDU4ZEuKhBPgUB4UEFH+/GD+9 kC2lp9ohQ5RC1RGLQDLEiUwEc+pBZsNizgN91GZ0ELlRPKvbrQ8HKX4x5zU5 UM44cblB5GKgsMWGeh4zmmKlzTeKZ7k1qPXGxpYTP2/6TViWu74+nvuRYRiG YZg3HTY1JbG1qcnPty+aGsmauANHS0xMpM4sSFBcXFyCgEQiQSbILSIi4vLl y0ePHlVXV6cRj1A2FRUVNTU1LS0t+BrEzcjICBqFfBAJrQ3d1NRUUlICQZMK wK1oOGVSUpKnp6etre3t27dpuCOsDY6Gc1EirchG/WuxsbEkbkFBQbTENq2y jQTIhPr+RFND/rtjaqOjo6gdDXvr7OwcEOhfTV8fXsv0vwhF0ijCq8rnlceg YDuIKbebfnshbv+sLdILRtmP7zn3qTEMwzAM80bDpqYkNjM1Uc1IZ+htvoDY rUYdXvS8GCTI29ub5l0Unx0LCwuDQOHt1atXT506RXOJ0KBH7MPUsMU+jpiY mMDUoFfFxcU0Gx68CfvQKGgaioBbUT8dPfWmqqoKuXN0dHR1dUVZMDKkwemk iuRoKB2JQwSwT2u3YYtPoWb0hB31BtLK16h7e3u7sle+npycHBkZ6e3tlclk MDVaBHmA+YuBrjj0raurC6bW1tbW0tKi1K8cwzAMwzCMUmFTUxKKmxqNdSRT o8e7UlNTExISIiIi4EoeHh7u7u6enp6QNVgbDTjEW39/fzc3N1gVvExDQwNS ZmBgYG5ufuvWLXt7+5s3b5oI4IidnV1wcHBhYWFzczPuXZuamuAy1dXVpaWl OIioKioq4G4wQW1t7aNHj0LxzMzMrKyskJWLiwtKRwywRSRAPkFBQf4C0DQY HEQMUomAIWXQNJr+kR6v22VTQ4NPTU3hFh1VQ7Mvz/ghjDzsY/5iwOVubW3F 15u61ZT9lWMYhmEYhlEqbGpKYo2pUU8WjXgUTY2eVqOFyeipNFpvWiKRQIJo 7g5xbCGtWy3OvghNc3BwsLCwuHr1KjQNW2tra9gTMkFBUCekp9XQHB0dIX31 9fW4Rg8ePJicnBwTGB0dHR4exv1tZ2dnbW1tZGQkvO/MmTNQPz09PXgf8rx8 +TL2cRzuZmlpCQckT6Sn0lCXkpISWpFNnK+SrJNGb5Kpoe4dHR2Dg4NKbfBH AqgXTK2mpgZCipt2lPuC6SeYnwr4Gre1teGbXFFRAVODts/Ozir1K8cwDMMw DKNU2NSUhOKmBq8pKirCp/hIKpVC0IIFSM1oC9WKjo4W52CEuEGXXFxcIGIQ NJiUsbEx3mZlZfX3909PTw8MDNTV1cGh4Erx8fHYgZSJsT0RoP2lpSXoG9Lj XLjYhQsXYGqXBTQ1Nc8LYEdXV5eWADA3N4chent7I2daYxq1E3sGxUftsBVn FIE6wZh2rYMDBko9LNSrMsj8ZUBjIGlSkcXFxd35sjEMwzAMwygPNjUl8UJT E2WNTA0ylZaWBiPz8fHx8PDANigoCNYWuQI9DgZTw5ZsLlAAymZvb29nZ4dT 4EoTExMo/eHDh/CvoaEhunEdGRmZn5/fLNRHjx4tLCxUVlZC+k6fPq2qqgoj o646OJqWlhZ2rly5AlPT1tbGvqmpKUwN8QsrlHWVlpamp6dTRbAV14OD+qUL 1NTU7MLoR/nqoO6oMmSNulo2XB+Z+SmBq4xrje8Y/ujwp7c73zSGYRiGYRil wqamJBQxNXqkC46GgxKJRJz6Hvj7+0PHSM2gaTA4vKXZF6FsYucazexBH9G0 IePj42IMNCBQfPv48eMtApbJZLdu3Tpx4sSpU6dgZ7RwNq2jDWvD1sDAAKam rq5uaGiIOCFo1IVRUlIiLsomb2r0zB0gU+tX8tyP8qDx0Q4ID3fvuI1vZ37q 4Cp3dXUNDg5C0uW/8wzDMAzDMG8ubGpKgmShqakJOlZeXl5dXQ2joU40EjSi qKgIxxMTE11dXS0tLR0dHX18fAICAsLCwuR70ERI1miuRThaYGBgfHw8csAl gPHBB+VNTRziKA98bUFA/tPFxcXa2loPDw842unTp1VUVCBlsDNIGbb0tBr2 sYMExsbGEEmUSH12oqnR6EdxqTj5PrWOXRz9yDAMwzAMwzA/AdjUlMQaUxP7 1ERToz41HITpwMhu3Liho6Nz/fp1yJqzs7O7uzuUDUIEF6P1pmNjYyFoMDVI XFBQEM00AneDH3V1dfX29tbV1dXX19Pox6eCkVGfmryRQdBGR0fb2toaGhqa m5u7u7uHh4cnJyexxbkpKSl+fn4o3cHBwdbW1szMTFdXV1NTk1bQJlPDPo6j XBSHszo7OxEATDMjI0OcS4SGPmZmZsLg0tLSYKntuzj6kWEYhmEYhmF+ArCp KQlFZumH0dA8+TA1S0tLegqM1rDW09MzMTGxtraGN8HXaDkzJCNNo7n6AwIC IETQLihhf38/1An+Be16KvSmwdEeC4ghLS0tDQ0NwRkhUFAt5AP1QzwwqYYV EDC2FRUVUqnU3t5eXV395MmTGhoaNPoRmoZ9SGVCQkJHRwcqCAVDDogNlkfu STYqb2oosX13Rz8yDMMwDMMwzJsOm5qSIFNramraYu5H7BcUFEDW4uPjHRwc YGeQNajQOQHsXL161czMDMbk7u7uLQBH8/HxuXv3LjwLEtTc3IyWn56e7unp QRGQtdHRUdgZmdqa3rSRkZH6+nqchXMhgHZ2dnfu3AkODk5KSkJgJSUl9EAZ LUqFI0iDGE6dOoWorl27hvDU1NRUVFSsrKzS09PpmSD4GlIifpharoD4kBqt 302mBp1kU2MYhmEYhmEYxWFTUxIvfE6Nup/I1KRSqYuLi7GxMWzo0qVLGgLw I5ot/8qVK1A2Q0PD69evW1tbu7m5RUVF4UToz8TExPz8/MzMDPQKRdTW1kKg lpaW5OfhfypoGs3bj0JhVTA1kj4YX2BgYHh4eGxsbJwAIqFlrCMjI2/fvq2v r48wDAwMjIyMEMmFCxfOnz9vY2ODyOF9ZGpFRUXQtIyMDLFPTVQ2ek6NRj+y qTEMwzAMwzCM4rCpKQkytebmZkhZRUUFHKq0tFSc71F8pItMLTEx0cPDw9TU lIY+6urqYktrT0Pc1NTUqJdNS0sLsubu7g796ezshKBB06ampmj0Y4ewyjP2 FxcX5Qc94i30raqqCjIlkUigYDC1kJAQmrEkLCwM+xEREdj6+PhAAxHJXYE7 d+7cuHHjmgA9pAZTO3v2rJWVFYIfFpDJZIgfOWdlZclPaEnKhuNsagzDMAzD MAyzA9jUlIQ4+lE0tbKyMprvkeyMZkqk59SSk5M9PT1hahC0SwJ6enrkRzii qampoqICS9LW1jYzM6O1zCBf0LTJyUkoW0tLC7ajo6ModGlpSf7xNNI0uFJa WlpUVFRoaCg0zd/fHzvxAjTPP037j48gaL6+vkECKMje3t7ExATBXBFQVVU9 ffq0hYUFHLO3txceiuDhaDAy6isUp7VcY2o8+pFhGIZhGIZhtgWbmpKYnZ2F OjU2NtLox5qaGjI1vJU3NWxp9CD86MaNG/SoGkyN5lqErBkYGGBfR0cHx/Gp ubm5u7s75AiiNDExAUfLzMyUSqXIqru7++HDh/IxPHnyBLYISYSmRUdHQ8qC g4NDBCIjI2mKEuzjeGxsrEQiwdsIAZpvJCAgwMfHx9bWVldXV11dnXr3YGow SgQsk8lozWsEQJpGgx7FRb1p9CM9p9ba2trX1/e6rgXDMAzDMAzDvHGwqSmJ mZmZkZGRhoYGmlGkurp6w9GPtPI1jAYOdevWLXocjFadvnr1qoEArT1NT6uZ mJg4ODgkJSXR1B/Ix9PT09ra2tXVNSMjo6enZ35+ngKAtY2Pj9fX19NMj2Rk gBwNXgY7g5QFCyABLaiNLQ4GBgbC0XBKfHy8v7+/sbGxqqqqpqYmfO3cuXN4 i2QQTAgaIqe1BlAL0dTEifqhaSi9srISRoloX+8VYRiGYRiGYZg3CDY1JbGm Tw2mtkWfWmZmJlzp9u3bEDEaZ0h2JiI+vAaVs7e3h6l1CmDn5s2bWlpaOjo6 OA7VQs7Qw7a2NjgajAnZenh4uLi4YOvr6wsFg4hJpdLExESYGj4NXQH7kDhs IW60jhs0DcJFIzPNzc0NDQ1R0NmzZyGPQUFBopShRDI18Tm19abGfWoMwzAM wzAMsy3Y1JSEOPcjPadWU1MDX6OuNHo2DVvah+ZAamBJTk5OEDE41+XLl6kr Dejp6cHRLl68qKmpeenSJWNjY2gXPGhgYKCnpwfCdePGDQ0NDQiUmpoaDY9E Pj4+PtArGxsbZEiTRlpZWTk4OLi6utJ62dHR0VFRUWFhYXA0bNcMesROSkoK okVsMC/qlbtz5w6c8cKFC4gNNocqwD1FQaOOQqqg/OhHnlGEYRiGYRiGYXYA m5qSWFhYmJycbGlpgctUVlbW1tauNzXqUCMbkkgk7u7uECstLS14GS1+TR1q MDUchIjhOEzNzc0NmQwODvb19cGhbG1ttbW1T506deTIkYMHDx46dOj06dPQ OiRWUVE5c+YMtjTTvqmpqaWlpZ2dHZQNukdLswGoGTSN5hvBfkhICLKFWjY2 NsLFaEwjxM3f3x+nX7t2zd7eHtHiotPDdzR5CNWLKiXKWqYA6t7Z2YmAX/c1 YRiGYRiGYZg3BjY1JbG4uIg2aW1thbmQqYmjH8Xn1GifxA1GExgYaGZmpqGh ASmDmtF6ajQMEjswLxwxNDS8fft2enp6V1dXd3d3RkYGtOvSpUswtWPHjh0+ fPjHH3/E9sSJE2dWuHDhAvKE7uFcmCAyxD62FhYWNjY2ED1nZ2cImjjfSEJC Ai5ob29vT08PdlCWVCqNjIz08/ODJHp6ekLrsrKyygWgmVQXEXGWfpgawkO9 6urq2NQYhmEYhmEYZluwqSmJhYWFiYmJ5uZmek6tqqoKUkNPb2VnZ2MH2ywB 7NNISNiQlZUVjAympqqqCsNSV1fX0dGBVUGyyNf09PQsLS3j4+Pb2togUzgX 4oY0MDLIGm2J0wLnz5+HpkHl6FyaWxKZI+crV67QQgDQQ3t7e+plQwzQRjgg gh8aGoJkwbaio6Nhkb6+vjS9f2xsrFRAIpEkJibCxcThjlSjbAHswPJwek1N Dc/SzzAMwzAMwzDbgk1NSczOzo6NjTU0NMBZ4GiQNegMzCU1NTUtLY2mr8d+ SkoK9iFcMB0YkIODA03LD1+DqZFnkVIBembNyMgIutTU1NTT0wNLgmRBxOBo J0+exPbcuXM4EdsTJ04cOXIEsoZPkSedSxNL4gg9DYecxakmjY2NUTpikMlk k5OT09PTMDUavQkpo0fY4GsBAQFQNm9vb1dXVycnJ+zExcXRKEeqUZoAVRC1 oxlFYKyI9nVfE4ZhGIZhGIZ5Y2BTUxI0Sz+sJysrq6CgoKSkBMoGbUkWgMJg myRAsgagPD4+Po6Ojrdu3bKysjIxMdHX16epIK9evQqZgl5paWnhrZeXFzKs qqqKjIw0MzNTV1eHkZ06ders2bPQNFVVVRUVFYjbwYMH4Wskd/S8G86FtRka GpIPXhagXjxkjnIRT0dHB4InU2tvby8tLYWp0QLZkDVoGk0maWNjY2pqilPw EakZVSplBewnJiYiQ3w9Xq2pQYETGIZhGIZhmNcEbu1e1X0dswVsakpCnKWf TK2oqAimRv4impq818BoxLWnSYsCAgLgRHZ2dlA2aBpNKgIL09bWhh/B0aKi ouzt7eFZZ86cgalRbxqApiEZjhw5cgT6dunSJXHwJLbUPUdPq9EDa9hqamqi CFdXV0Tb1dUFTZuamqI+tdzcXITk5+cHTQsLC0NgwcHBiA2JaT5JRAsDJVOj TjTqK4Sm4Q8Z9YJRvtrRj2xqDMMwDMMwrxE2td2BTU1JzM3NQSiampogaKKp kcLII3oNjAY7NIyQDqalpeEPAX50+/ZtU1NTCBcs7OzZsxAxAwMDa2vrmzdv 6ujowMho/hDYGVSOxkxii+NHjx6FqdHEj7QoG3SMJv8ncaMuNmyRxtjYGDqG OHt6eqBpkDW4VUVFhVQqpRXWsCU9pNWxcQQi6ePjg7dQThr6KI5+lDe16upq nlGEYRiGYRiGYbYFm5qS2MLU1vsajR5EApo1MSMjQ3zUSyKRQNacnZ2vX7+u paVFc4ZAxDQ1NWkZNWjayZMnz507B01TV1eHr50XwPHDhw8j8cWLFw0EaPls mlpEXFMb1kaDKpF/SEgILuXAwMDs7OzMzExraytCpQkh4Wi05hppGvWshYWF 4S0iJM3cwtS6urrY1BiGYRiGYRhGcdjUlMS2TA1SlpmZSfMlQtPEx9loSCTN kH/79m1jY2MIGnWi0UyPBHwNakaDHuFr2CFTo9GPsDDR1HQEaBik2NEGlUMa MzMzmBesamRkBKY2Pj6Oywojc3NzCwwMjImJiY6ODhcgX4uLi4OLiXGK/YPc p8YwDMMwDMMwLw+bmpLY8Dm1DU1NnA0SO/AaqVSaKADNiY2NpQ6sgIAALy8v e3t7IyMjdXV1modftDOa7BG+hq14BEJ37NgxbDU0NGjQI414lO9Ww1Zcqe3G jRtkasPDwxMTEx0dHQjJ3d3dzs7O1dUVskb9aNjC0ahSsEv5MZybmVpVVRVy GxgYeN3XhGEYhmEYhmHeGNjUlMS2TE2cVAR2Q0uVwdHgTfAjf39/bIOCgrAD YzI3N9fS0qK10qBjampqtFI29ql/jfSNTI263vApdEyc8pH60cQp+oGOjg72 ra2tw8PDKysre3t7u7q6SkpK4GVWVlbGxsYoFL7m5OTk5uYGZ4TB1dfXy2Sy 3NxchJqcnEzDNdnUGIZhGIZhGOZVwaamJMjUaD01mBotey2uOJa6GlHZ6Nk0 mhXf29vbw8PD19cXyhYREQFZg6mZmppqamqePHkSFkYLW9My1vR42jkB7Jw9 exZpjh8/ji2s7dKlS/r6+rTONZkaQaZGM0DSfJLl5eWtra11dXUwLGdnZ5yi ra1NC2fjxBs3biAeWGdfX19nZyetAYdoYWoUOXUOiv2DbGoMwzAMwzAMszPY 1JTEtkxN7I0ix5FIJCEhITA1Ly+vgIAACFRMTAx8DW/hShcvXqT+MppL5MyZ M7SGmjgMkkZC4qNjx45B1rAPldPS0rooAO2iKR9prn7s0xFbW9vw8HDECU3D BU1MTIQYGhkZQQypzw7gFD8/v8rKSlStp6cHVYNCxsXFiY7JpsYwDMMwDMMw rwQ2NSWxxtRKSkpyc3NJZ0SpWUNKSgrUBlIGY6I1ywCUDTZEE3pg38nJydDQ EOaloqICIzt16hQNcaTONfmeNRgcPoKp4VMyO4gbthAuHR0dOJeJiQmyunz5 soaGBnTM3Nw8KCgIocLUampqEDZKv3nzJq22RqYGcUNgSICqdXZ2ZmRkhIaG IjCavpKqliGA/eTkZDY1hmEYhmEYhtkZbGpKYjNTI5ehHdHR6C2kJioq6u7d u87Ozrdv33Z1dfX19SUVkgjA1/z8/Ozt7WFV8Cx9fX2atx8KdvLkSZI1Uirs QOVoSn8aBnnkyJFDhw5hC2tTU1Oj/jV6xo0WztbT0/Px8SkuLu7q6oKFlZaW Qgytra1ptTV1AQsLCwQjk8n6+vqwTUxMhLghKrFPjWqXmZmJHTY1hmEYhmEY htkxbGpKQpxRJCcnp7CwEOJDC6XJm5oI9UNBaiIiIpycnK5du6ajo2NoaAgp g6xB3+Lj4+Pi4mBJEDfIGpTK09Pzzp07N2/evHTpkrh0Gi17DUeDVcHCsHP2 7FlYGHWribP64+3Ro0d/+OEHnEXLZCPZ5cuXvb29cSknJydHRkYQM4q4fv06 IiGn09TUhLjBzqCfbW1tcE84GmwOCkkLdlNdxP2UlBSpVEqm1t7ezqbGMAzD MAzDMIrDpqYk5E2tqKiorKwsPz8fCkNdThkbkZycDFNzcHCgJ9HU1NSMjIxs bW1dXFw8PDygUXA0mBrEDYoUGRlJ1mZpaQnVOnjwII1sJPOiVbDp+TIaDAlr o4NIcPz48W+++Wb//v2wNgsLC7ihjY0NrDAsLKy2tvbBgwewKgRDHWowQV1d XYSEcxFMdnY2NK2uri4tLS1SAEaGOuI4GShqR6vCsakxDMMwDMMwzI5hU1MS MDVa+To3N7e4uLi8vBymBoUhkclcB3VCQcGcnZ0vX74Mn9LQ0BDnZoQxmZiY 3Lp1y8fHJzw8PDo6Gr6WkJAAn7p79y5k6tChQ6KpiWpGa6vRpP1kcDQ88uTJ kzC7o0ePmpmZQaYqKirgWcgtNTWVRipWVlYGBARcu3ZNS0tLR0fHwMAARSAH KyurgoKCrq4uXHGJRIIwcBaCz8vLg6yRgaJ2yA37yI2Wxq6urkaevPI1wzAM wzAMwygOm5qSWG9qcJwtTE0cAAkXMzQ0hFJdvHgRlqSmpkZLWkOaoE6WlpaO jo7u7u7BwcEQopqaGtjQ1atXv/32W8ga6RhNJ4Kt+MAazT1y/Phxmi6SpoXE wdu3byOw/v5+WhwNYUC4EAZk0Nramh5PQwz0QBxygNmh0JaWFtQIpgbLg2Di CM4lO6PasakxDMMwDMMwzEvCpqYk5ubm1phaYWEhFIZEJktA1DR6S74TGBgI U6M+NV1d3UuXLmkJYAfSpC1w/fp1Pz+/iooK6A8yx9sDBw58//33NGM/PXcG sANNo+XV4Fmws8OHDx89epSWY0NieF9aWhp0Ly8vLyEhIT4+Pjo6+u7du7a2 trAzTU1NxEAlIhOcYmRkFBcXRyM5U1JS4HQ5AmJ1qHZ0hE2NYRiGYRiGYXYM m5qSIFNrbGyEf5WUlMCqioqK5E2NtvKmViAQFhYGIYJbqampXbly5erVq5Am Wq4askaThOBIQECATCZDs9fX17u4uJw7d47kiyZypPlDxLXVcBb10MH4NARI 35Ctp6cn7Cw8PDwkJARFBwUFubm5WVtbw/709PTo8TScTssB4AgMkfrRQJ4A 9aBlrSCaGk3UD6GDqfFzagzDMAzDMAyzLdjUlIRoatAWmFplZSWZ2pqOJxEc zxeIiIgwNTWlWUEuX76sLwBNo2fWaHZ9c3NzJIOpjY6OdnR0JCYm2tvbGxgY QMGo+0xUNuxD1nCilZWVs7PznTt37OzscDpZmK6uroWFhaurq7+/PzQNeYaG hgYGBvr6+np5eSElVI7m56e+OUQCs0Nx1AOIaOkJNarRGmhVNQBTa2trY1Nj GIZhGIZhGMVhU1MSZGoNDQ0QmdLS0qqqquLi4jWmJnauESQ+0CWYFM3TCMO6 KkCapreCtbU1xArNDv0ZHh5GKampqXfv3sVxIyMjaJ2Ojo6qqurJkydhajAy HPfz86N5SCBi7u7ut27dunnzppmZGc39iIP4KDIyMiQkBLIWExMjlUpRhKOj I7QRaRDS9evXbW1tg4OD09PTEWdBQQECphGbVB1CrI44bz+ZWn9//+u+JgzD MAzDMAzzxsCmpiTWm1pJSQlNkChvaqLjwH2KiorgPuHh4dAiDQ0N0dT09fVh ZzQSEltdXV3Yk4+PD1wJ+jM9PQ1Zq62thRPBtoKCgry9vR0cHHAWTUVy7do1 qBkEMDY2FgngYkjj7+8Ps/Pw8HB1dUVWkDJxsTYAU6PwcBASFyKAU5AgJSWl sLAQdcEW0Yo9g9jJFRB9DQdFU2tvb2dTYxiGYRiGYRjFYVNTEtsyNWga6Q92 IE0WFhaamppqamq0lpnYlQb5grvhIOQLhoVz+/r6YGoDAwM0KwjllpGRAcO6 ffs2DXE0MjKCuHl6et4VCAgIgAzC2mgp7XCByMhIlIuPoGnBwcGJiYnQRoRN uZF/0QrdiLOsrAyhUoeaOJHIhqaWlpbGpsYwDMMwDMMwO4BNTUnImxrUBrYC 8SG1IZ8SpQbAemBGZGqQJhsbGxiZtra2jo4OyRoNfaQH1vDW2NgYpgZv6ujo gKbRHPvQImQuGhb8C4JmYGCATHA6fM3S0tLe3t7DwwMuFhMTEx8fD1kTF9GG pvn6+uIs5FNcXIyYIWU0yrFUgN4if3xKvWniJJZUHXyauwJ9yn1qDMMwDMMw DLMz2NSUxGamJmqavNfQJIpQIWhRUlKSn58fJAtiRRMwQtYuXrxI4gZgajgO 4UJKtHxNTQ3sKTU1NTk5Ge6GHFAcykpJSbl7966ZmZmmpub58+fV1dVp+Wwr K6vbt2+7ubl5e3vDzsLCwmBncDd/f//AwEDkWVlZCfVDJiSVkLJiATI1Clh8 wk6sCz1kJ29q1B/HpsYwDMMwDMMwO4BNTUnIm1p5eTl8Cu5DLkNeQzNykKNR Xxt2SIhgN7GxsSEhIfCpmzdv6uvrk6xpaWlhi32YmouLS0REBARNnINRlD5k AlNDJhAxnA6z09DQwLnYubIC8kQmdnZ2np6ecDSkpElFkFVLS0tbWxuihWch KgqVEB1Nvh9N/FSsDgVDpgZQ9zfR1Fod9/0M7HNs3TxN0rkXJtn1mPYCQruc S9rBma1Jjuf2CZUU2HfOMWmbdX35HBiGYRiGYfYEbGpKYr2pYUsWQ+5DPWi0 T6ZGa2SLT4FlZmbGxcX5+fk5OTlZW1ubm5sbGRnRPJDwLLyFrEVGRuJEpKd+ NGRFT73hdJhaaGiog4MDzQYJ9PT0dHR0YG0qKiqqqqra2tqGhoYWFhY2Njb2 9vY+Pj5JSUn19fVDQ0M9PT2IVjQ1EZqTnxytYB1UI9HakAZVeHNNTQEt2m1R exNMrRWmRJ60fVN7Vr21bKO6L58DwzAMwzDMXoFNTUnIr3xdUVFRW1sL9yHf IakpKioitRGVTd7gaAfnpqamJiQkxMTEhISEeHp6QqnMzMxoHn5LS0uYGvKp rKxE5uR34hNwMDWc5e7uDqe7uoKuri4tfn3x4kUYH62mrampiePwQYgVfGp2 dnZwcBAxQ7KQjxgPBUxxYgdSiSPykVMCAm+hdRC9N9jUXuhFuy5qextqjuds 19RWLGuf2AkmSp+CbfzyOTAMwzAMw+wd2NSUxBpTq6urw1ZUM5qXg9SmSEBe fGhIIfWUlQjgI0hTYmJiWFiYl5eXra0tfO3OnTtSqRTZ0sSSpFHkUDidZoB0 c3OzsLDQ19cXZ/uHlMHysHPt2jWYmqqq6okTJ86fP+/g4IBMpqenHz16BFOD +sH1srOz5U2NBmdSEUhMBVFHISUQoYfa3nBTe4Gqsait5iVN7Vljrz3rWa6K ZPbyOTAMwzAMw+wh2NSUxBpTq6+vRyuJaiaaDlmPiGg6paWl5QJlK4hDIpOS kmjCRolEQksA0DyNNIEkTqmurkaJsKTQ0FBHR8fr16+To1G3Gs0eSaaGt5qa mmfOnFFXV3d1da2trV0U6O7upllK4FnyXWbkkrQvKqTYA7imIjiL1r9GtjRH 5eu+JjtgCxujj9bf/7cmrXpMat+5NY9JkU8IWcolFfNZe/rq56w2KfRFZcqf KDzHJSbd5Cmu1h2PYNwiyi3ZRLO2+ODV58AwDMMwDLOXYFNTEhuaGqmZvKnR Pr2lI7QD+SJNozQ4QkaGrZiydAXq2wLYoZGWlZWVkLiIiAiYmomJCa3CJq6j fVlAXwA7Fy9ehLj5+vo2NDQg7MnJyaamJsRJz6mt7yyjKlBIhHzkYng48bWY WkrG0z9GbvxK2X5um6rahjay2WNS8smemdq5c6uSUoq13VIr54vFb1TqJidt lGjfvo3i20Bhdt/UNndiRfsuXz4HhmEYhmGYvQSbmpJYb2qwJ+qEIqlZIzjy yiMmkD9C7katjQypow07OIhk8tnSkfz8fKlU6unpef36dS0tLXV1dR0dHZia gYEBvExcoI2624yNjQMCAhDk+Ph4T09PVVUVddKJgzCpU0/eMamgCgEqkaIV d5ADTRS5+6b2f3hs8Pr3Hjsxtc3u8rdQpuUerZXUG0yv8dzm1nZ9icP0nh9t pZkMNzc18dGs52ctd7D9bG3Qos7J96K1rkS8zmF23dS26PdS0LNePgeGYRiG YZg9BZuaktixqdF4QmiOOKOjmIzkiA5SPuRK4uNsYkrqvEtLS/Px8TE0NDwv QLOIQM0gazQSUk+A1sX29/evqanp6+urq6sjR6PuPJRFbigfhnzHn2iOpXL8 dExt49v8DVxkU1NYk3alT229USggOGuTbFbouqCfnbhWVpQzMJBNjWEYhmEY 5uVhU1MSoqnl5eWhfWQyGZmaKDuiha0RHHlTo0fV5HvWxH0afyg+xSbaE51F YpWamurt7Q0vU1FRUVdXv3TpEj2hZiiA43A0bW1tTU1NWJuvr29VVRWUCidC 8XJycsTH6JAbqkCxUeTiuE16K2qa/FN1OBeZvPmmtsGMFBtKgZBs8yfaxE/k nlPbuCD5PrmNk6y1vg3yWvvJZvK0k4GKL4RNjWEYhmEY5uVhU1MSMzMzIyMj DQ0N+fn5MCDsbGhq8nYjL2skQTS2kD4SR0WuGR653pVwOVAWdjIzM8PCwpyc nG7cuGFmZmZiYqKvr6+jowNlw5YeXoOmQeKgb3A65Ik4qTOOFneT77mjoteP hBT7BKmLTYyZ5qv8CZjaOgfY0Ak2eUTtOSvJN7erZaWQz2TtdCJP1znQFkqk YEo2NYZhGIZhmD0Km5qSmJ6eHhoakslkBQUFNTU1TU1NNJe+KDXkVvSsGT3q Ja9stFO+gryIrfE7MZm4T11g2CFXSklJiYmJCQgIcHV1tba2hqzBztTU1LS1 teFr2GppaRkYGLi7u2dkZNwTpj3Jy8sjKaOy1sxCuSYe+WQ4vbq6GjVFDMgB pcMWUf0329TWSMDGqvVKTO2p+GTaKmNbN4jxp2dqPKMIwzAMwzDMGtjUlMTM zMzw8DBMLT8/H/ICU8NWfNbs3upZQeht+auGllqDKKGUrKys+Pj44OBg+JqV lZWJiYmRkRGsTVdXF+IGX7OxsYHQIUIKZgfx0DcBJVZWVlIfHJlabW1tZ2fn 4ODg7rS8EkxtlaptYlovELAdJFy2Nsc1Iy9/sqMfeZZ+hmEYhmGYNbCpKYnF xcXx8XGaUQTt09DQAGOi3qh7Kx1P9JZMTfSjl0fUNPImlEtlUWcZrcgWFhbm 7u4OZTM0NNTS0lJVVTU1NQ0NDYVe1QqQbSnIPWG8JaAala+sL4C60+jHrq6u oaGh3Wl5ZZia3M3+pnKkqIFtw9TWp37ZGUX2rqnxytcMwzAMwzCrYVNTEktL S5OTkzC1nJwcmAt26uvraVggjAb2ROtTU1cU9UO9qmtxT5C+NUeo0Lq6OplM hi00Cr4WGBjo7OwMXzM3N8eORCJBPBArkjvFi0PmqA49HCeOloT0wdSoTw2m Njw8vDstrxRTEy2AlkHb7CkzGqy4/HDZ6on2Hc/te3E/GD6gU+XOffbg2uaD GLc3S7/CpqbUWfpXVgzYZDG6feKzeeIaB2tb6+VzYBiGYRiG2fO8KjVgU1vD wsLCxMREU1NTXl4evAk7zc3NUCQyMrFPTRygSLL2ypG/RigUttjQ0IAwUByU ChYJX4uPj09ISMjIyCgqKrq30ju2LZAbmZpYI8ofpoZsUbvu7u5dMzUlIf8c 2uYPmf3/7d15cBzXged5xe4fGzE7HdEbOxu7s729PbMxEbu907a7t8dum7bc tmW3D4mW1LYsmXbb8sX20U3LhyzJli3bstyWZFvURUm8b4IAwZsACBIgCB4A QRInSRyF+yRuAiBB8d4f6gGFrKrMrKwLSJS+n6hgFDJfvnx5FPF+eJlZzjer eUpqMRZN+puv05rUHNrhOWc5f3F41L5KvgYAAADfI6mlybVr18bHx1taWo4f P15RUaGIVF9ff/78eZNoqoPMpYOhH6vSxkQ2EwlNKjTZyqzUmuD0/mxwSM7k L+9MVSYPqp7a2lolteLi4sLCQq2xq6traGhovo9Jkma/PNq132+eCGJJCYuW hj3B0eXqRzP6Fr6s67MfZxe0Lha1lPOC/kpqd6L2XtTDL1NVAwAAgO+R1NLk 1q1b169f7+3tNQ+0P336tCKM8ovJNeYKw7PBJzSGbihLH63aXG9p3oeub9R7 hcf6IL3R9IQDY2hB1azcpx+11YcOHVJSUwbs7+8fGxub72MCAAAALBgktbRS PKmsrDx27FhpaanJayaXmehUZbk9Ld4xrHhjlElhZkV1dXXmgZBqjBlNM7Hx 7MwdZwnntdDFkObSSvMN2u3t7ePj41evXp3vowEAAAAsGCS1tLp+/Xp9fb15 CqLyWugbqxXZQrd3Vc3ktVQ9+9H22YxmLSadKZdVBr+GWy0xjxkxt5iZIGnS Vrz1m01QDeZLurWxxcXFimmaOzIycvPmzVu3bs330QAAAAAWDJJauo2Pj7e3 t5u7wEIDWyYTmRvExNwgNgeqglcnmjE1c+D0xlwMaS6PtA6oxVWzdYjQhFBN aWpqGhwcnO8jAAAAACw8JLV0u3HjxtDQkMJaQ0ODIpIC2vHjx4uKig4fPlxS UqL3J4NOpJPWcuzYMb3RisrKykKr08SjQXpfXl6uWWZiaWmpFomrfrMKMRd5 Kv0ppvX19U1OTs73EQAAAAAWHpJaul27dk07R5lFYU3hRWFNQUa5xqQhhaNT p05VpJlWoSBmLn0UM1FvNN1ELf0YunzRRLa4WmXqN0upEm1jIBDo6uoaHh7m 9jQAAAAgASQ1AAAAAPAbkhoAAAAA+A1JDQAAAAD8hqQGAAAAAH5DUgMAAAAA vyGpAQAAAIDfkNQAAAAAwG9IagAAAADgNyQ1AAAAAPAbkhoAAAAA+A1JDQAA AAD8hqQGAAAAAH5DUgMAAAAAvyGpAQAAAIDfkNQALAR5S++SpXkRkwN5y5cu umvGouWBeWkcfM/h/MnY9SaAj9hCt4BONgBekdQAd8F+ymxHRV2VRUuX5wXo rkhg+SKHvpuZY9tpcF7IlW0nxEy8a0F1IwOBPJ1QEWcUp5STVO2uBZrU+IjF ZWanhDdZZ8w74+NFUgMyEEkNcDTVR4z+vR/6/a/f/nPdoMR6YOljegbRDQp1 mBxnxd2bsOmETFflo/0Ri/sZtZC2ZE6kcnct0KTGRywutkntnfPpIqkBGYik BtgLhP6YHP4H2UDoYqC5/83vu6Tm1DWY/UN8VGMT7UxEL+e/vRHDzF6JPKGC o0bvkL5kHFK7uxZqUuMjFg+7Bus/bMdQm2FIakAGIqkBdkJ/m3X6rafu4lKS mtsVU4uWBgOt7cVUCfQlFn43crpv7aszysdSvLsWbFLjIxYHpwYvtLHBBJHU gAxEUgNsxPWL3dI7CP25P6LDk2e91W2RzXWT5m64iLtxwu6tiLxfxO4P6jHX E7OpLje/uO6p6EumtBIzz+ZqKpueVMw9FN4Jsb8fJVit6zbG3s9h6wp7mEKo VYGw1i7yGBji7Cw6dbqipyfZ2pRsbKzjF/szkuTumm6F9Z7S8BtKZ/db+HZO lUlggzwXS77zzEfM60fMJVo6534vRzqyjN1Zk4r/5O94+KSk8CQHsBCQ1JAx Cg7f+fsc+1dBnFXF10uc/t26NPyeGtcOT/CSrugVRpstFTOpORSw68U5NNXS EO89y+i+0Wzv0fzhP2pW5H710vK4u5G22+hhP7s06C6beq1rjmG6Vo9nVbxJ LeHWJr2xXs7wmCdesrtrqrxtM2bWMX2/1yK7QpHt8HRCJnTeJoSPmM0Wed1V YetL5NT18jeyVP0nH2PfpvQkB7BAXEodkhrml5Lav3/L5vUnb8Wd1Jzu4rc3 +xs4+u+oM91Ny59OQ7dNhAekiCdK2pXy8CA4SwtCj2OwlHdraliBOH6tR+2s 4ARTQWQ/0vmZBbFa7v3SLLdt9Lif7W5RtPazZiueWTyeqDb9h3DV7LZMAkkt sdamZvEYZ3jMEy/J3WVzFk3fURreib0rfIAhYBMH4/woxX/exo+PmNePmNP/ kLZDap5O3dCSkbcqR/2NLDX/ybvs2xSe5AAWDpIaMkbqklqcF17N/BXU6WnZ nrrbzvXG/Hu5y4oiu3jOTU1CxMZYu44RF2c59yJjtjzebmQc2xhdj/3hmW6S w2Rvf/K3+5u4/dc+JHD1Y2KtTWpxr2d4Yiee593l4WmH0w1yCB1RmTLWCZnE eZsAPmIeP2I2DQ4EltukUs+nbszjl+L/5BP4bRK1ypgnOYAFhKSGjDHfSc2m dNSlSa5zgn8enbqRIezqFS9JLdZYW0T/MtV/XA3rkszcQWNdoXVWRDfKa8vj 7kY6b2Ps/Wzfx0p0fU7rj4ogNhclJp7UPLc2qcW9nuFJnHgedpeX2j3uT48n ZDLnbSL4iMWT1Gw43J8Z+9S1GTBLqJ6ZBsbaMzH+GpeSkxzAQkJSQ8aY56sf nUe6nM32D52/OMpLUnP5RWx370mqk5r1T7YRf+K39lbsVu655anpRnrcz+lN ahGLW58QYFnlgkhqns/wlJ14trvLS0fU4/70eEImc94mgo9YMknN7XrxmKdu xL1hkY8TSfV/8jHutEvJSQ5gISGpIWOkMKnFN6iWdFIL3X9grusKTN+R4/3q x3lOatZqLXfQWBowOyti3XPajfS8n+cyqYWtMrL/TVJzEL67Mj+p8RFL7OrH 0LdiRm2/94R1J/T3gbDENr2OVP8nT1IDEI6khoyRwqQWuuTF281HyVyvEirm 1JdYAFc/WgYho7uKoREA297CXF6a5X0/z0NSi2rcAkpqHrY91Sde+O7K/Ksf +YglltRm2xR561fCZ+TUfW+WCJbq/+S5+hFAOJIaMkYqk9rsX0qdfrtZvnjX e1fIbV1e8lfcPST7B0CkPqmFbmUPu4PGuk4zy/FP26l/3IH3rs4cdSPVwXN5 7KHD9noZP53P+9S8b3y8J15cuytqRNJpididWI8nZBLnbYL4iCWW1O7MXr9o k+AS+r/QY2j3sgnek1oqT3IACwhJDRkjpUnNelVL+M3kgdB3ioZf/2L/qzp0 P/ryyDqin61sffby7PeWhtUbXTKitZ4eLe7Sq5ipJ+5f6jNXGdksa5nlcolo ih8h7trVibWf05TUzFkzffXT7PTZRkRvnbW11i+z9UtS83iGJ5TU4tldNmeR 7QPMPXRi4/ooJXLezk6N73PGRyzRpDbbsLhP3cDy6DNwet9FXDWaov/kXbY1 hSc5gIWDpAY4cr8FIfT70r0f4VJJRD82sn5zX0R4vZYuWeTv+KhZESuJ3VRL S+L+pT67CU79BOcVe2l5Sh534HU/pzOpOYqqwXa3TN8s45+kFs8ZnkBS87y7 nMon0on1dEImfN7OLhnfgA4fsSSSmv1lErFPXccSNv+vupfzuGdctzWVJzmA BYKkBrgKe9bc9O/WiO9zit2PiK5jadjzw+7cCXsw2PTTxezrnSo4W1X4w6cj 5tl+La17UxNOarN/8HX+m75LrTFbnpJu5B2P+zl996mZv7OHP5pgkeMTwK2j aDNfZuuvqx/DWupyhid4qVl8uyuiFeEf1Dg7sbFPSI/F7OqfGS+Mc3fwEXPa No8lQwOJYdsY69Q152BYAbuTIUX/ycf+Lzp1JzmAhYCkBgDAnHG6cQwAgAgk NQAA5kraHusDAMg4JDUAAOaK3ZeeAQBgh6QGAMAcifriagAAnJDUAAAAAMBv SGoAAAAA4DckNQAAAADwG5IaAAAAAPgNSQ0AAAAA/IakBgAAAAB+Q1IDAAAA AL8hqQEAAACA35DUAAAAAMBvSGoAAAAA4DckNQAAAADwG5IaAAAAAPgNSQ0A AAAA/IakBsyrkWfuO/O397Ucne92AAAAwFdIakCUq+uXKT2dX98VNaerd8lU sDrzTLnDrGW9HfGtKwVJ7egfHJpklLf8bSINm3fmKIS/lp1/JmdkoW0IAABA IkhqQDSTfZbkXI2Y3pFz3kQGx1l/GIlzVSQ1J3ZJbfrVcjQ6RAMAAGQWkhpg w6SbqNhlMpFt8IkRlxyR1JzYjGx2lE+PaS7AzQEAAIgPSQ2wYxugghOXtTyz zGFWIoGLpObE4RrU6QtQ7a5N9YOu3mcs460dOS0+bScAAPA9khpgZ/rSu7D4 E8wIS3Kumgsdo2fZpaGrR/9wfon1NqvyiMsmZ5NaR3nLkmUuJR0lmNS6Rp5Z dj50SeGSZdGXFIbadvVoTsuSqJIdYTWcfybqilBve8CJ092CkYemo7xXzZhd xXQLvTSmZb2WtU/KiTbbnCQzo7HBUyWOQwkAABBCUkPGKDh85+9z7F8F8ddm 4tiSsPGRmYAWzD7RsyJvXpt5/EjEa0nYRZUmDZ1fYndPVvTdcLYSSWpmYtQr vBLTNtvX+Wf+cD52gz3tAScek5rj7WyRO6TLZXPCk1oKmj116WyHpSqPhxIA ACCEpIaMoaT279+yef3JW4kkteiAEwxEpktvLoOMmGUfc9S975jJGqHbrCwl Q/HB+lTDq0enH13i6Rq/2bvnXF7WpBaKD3+wrPEP0Wu0tK38akf4smZMamYY bqbBYXnQ4x5w4pDUpjNmKFupWHDXzRYL7T1r/poJUMt6Z4cOu0JjhdaSSTb7 zuzOnN4bI8HLZa17GwAAIDaSGjJGipNa5B1k1nRmuv3hs8LHZRwfBRn5rBLH +9Scnj8ZLd6k5tS2qDXat226WOTi04ODoWDleQ84iU5qV6cuEL3vjIfFo5Z1 vFkvchuTbnZ4PdNhNiK7AQAAxEZSQ8ZIdVILHymbuUnNzAq7Vc3uJrXgsrYj YhHjcc5PFPEcDeK8+jHWt8XFapv9pZ5R1XreA06cn9Jvc8/d1OjY1N1qYTes RTTGdhdFbmPSzZ4VsaO8R28AAIA7JDVkkJQnNevwSuRTRCy3qtklF5fvAou4 Mco5qXn+Ku04k5rL0ybthhETTGre94ATmxqWTD0DJHK9R+3umAtPas7hNHIb k2922F5iTA0AACSMpIaMkfKkZs1KlpvUjNkRFrtRGJJaqpJajDv1Zr6L/PyS P/Qe7bra0XW1w2bZOU5q3KcGAABSgKSGjJH6pDZ771X0lW+hW9Vs44ynlGFZ ReZd/eh9DzjxUoPdlynYLev56sdUNZtnPwIAgGSR1JAx0pDUZnr4OWE3qRnT 10MGZ0XnKYc4E80pqTllEOdGen5Kf5JPFPF4n5rnPeDEe1JzepK/h8ebODxR JPFm29zPyPepAQCARJDUkDHSkdSs3zsWGYUss+w69qGHvfdav4W5o2tkfU7L kshnP4Y/Z15lZh4p7+V6ubi/Ty2+p/QnmNQ87wEnnoa3pp97abmwMPhF2Gci t2V2bGt2ky1fNW77lP6Emt3V+0zYF+21JDE8BwAA3tFIaoCb2a8Pix72mv26 MfveuMMXKIcP7rh9u7THTn6av/k64aTmcQ848XYhou0qlplvEg9bduaOtqiS 0duYVLMBAABSg6QGuLrqPLwVevqEy1Mmgt+tbHlIxZJlLZZvuL4TSkPrp0aC QlHifFxPn0gkqd2ZGrmzrHGqYUcjM1HSSS04PdYecOL5lrGukWeWzSavYOX2 y1oG0UIlnZ69n3CzAQAAUoOkBuCdK87vswYAAJgzJDUA7wQdOecjbz0rn77K 0ctjWwAAAOYYSQ3AO4H9fWrBx6rMd9MAAABskNQAvCME7wS0PipkybKW9Tw/ HwAA+BVJDQAAAAD8hqQGAAAAAH5DUgMAAAAAvyGpAQAAAIDfkNQAAAAAwG9I agAAAADgNyQ1AAAAAPAbkhoAAAAA+A1JDQAAAAD8hqQGAAAAAH5DUgMAAAAA vyGpAQAAAIDfkNQAAAAAwG9IagAAAADgNyQ1AAAAAPAbkhoAAAAA+A1JDQAA AAD8hqQGAAAAAH5DUgMAAAAAvyGpAQAAAIDfkNQAAAAAwG9IagAAAADgNyQ1 AAAAAPAbkhoAAAAA+A1JDQAAAAD8hqQGAAAAAH5DUgMAAAAAvyGpAQAAAIDf kNQy0UhlzlsWOZUjsYq8dbjVvqrWw56KxazOUo9dc+JZl3W1I62Vh3Nywtet nw9XVrZGrCSicjseVggAAADMDZJaJorMTdHZKLKEQ0qJKuYUs6ILRlQYO6l5 Xtd08dbDkeWj5FTONoKkBgAAgIWEpJaJ4slNbikluh6n+GRXMqzKmEnN+7oc CsfIXiQ1AAAALCQktUxkE2SsoSdmrHIp5xCf7IvaB6U4KrCPapGhK+dw64hl 64JXRLo1wH2wDgAAAPABktpcujRx7a6/fUsvvUnnemxjTyi12I4u2SQ1ay3W e8G83PYWVTRGUotjXRGrcrxzrlXlEk5qYSthrA0AAABzjqQ2l0xMM690rsc+ 90wHjlBkCXsSR3QasVZyuDWsSvf4dLjSpqx7UotjXeFBzXuIIqkBAABgISGp zRlrTEtzWHPITVMBJTQrp7LVNY1Yk83UTPfsEh617kRnLdekFs+6wkYE48hQ Me9TC2sWSQ0AAADzi6Q2BybfvhEd08xLs9KwwojcNBtSDh8+PJtLXNNIZHiK EV4i1hi9vFtSi2ddYXMsNdkHsXieKEJSAwAAgI+Q1OaAU0xL28haZG6yfxak 15GrmVlu5aOSWmQVLkktrnXNUVIDAAAA5hdJbQ7Me1Kz/2Jql+RlF55cF7BJ ao7hKCISxbkuh6sf40pqhDIAAAD4HUkt3SJyWc/AFb3SHNZijHBNBxXn4OXh u8dcLkp0iFsOOSnedcV6oojTVpHUAAAAsJCQ1NLNmsjyT3SaiXozx0nNerNa jCsMvX6ttNNXtDlerBhjOY/rinpKf3jqIqkBAAAgE5DU0i0Uxy4OT1qn68c5 TWrupWIOhMURn5wvpIyVuryty+abrytnv/o6NUmNJ4oAAABgfpHU0q02MHzm wqBeEY951I9mugqkep3JJLUYGcXhiR5ua4wKVrZLeV9X5BwX8TxRxHlckaQG AACAOUdSy0RJJLWYEcU+PrmvMTwl2S4Ux7qm57Uejp3WSGoAAABYoEhqmSjx pOYhodjGpxhrjLlMPOuyzh9prTyckxMW2fTj4cOVra0uX9pGUgMAAIDfkdQA AAAAwG9IagAAAADgNyQ1AAAAAPAbkhoAAAAA+A1JDQAAAAD8hqQGAAAAAH5D UgMAAAAAvyGpAQAAAIDfkNQAAAAAwG9IagAAAADgNyQ1AAAAAPAbkhoAAAAA +A1JDQAAAAD8hqQGAAAAAH5DUgMAAAAAvyGpAQAAAIDfkNQAAAAAwG9IagAA AADgNyQ1AAAAAPAbkhoAAAAA+A1JDQAA+Na+oLSu4vbt21euXBkcHOzu7m5v b29FKrQEtbW19fT0jI6O3rhxI60HEchIJDUAAOBbc5DUFCLGx8cHBgb6+voU K7qQOgq/2qtDQ0OXL19O60EEMhJJDQAA+NYcJDVltN7e3v7+/uHhYfVnxpAK Cr/6V/tTMc0MVk5OTqb1OAKZh6QGAAB8K31J7WbQ4OBgXV1dQ0OD0oQi2+jo 6HxHnAxhkpr2pyJwIBCoqqrq7OzUxCtXrqTjaAIZiaQGzK/r168XFhb+9Kc/ Xbx48fvf//677777c5/7nH48dOiQZs1365B6HHG/4Yj4XPqSmiLDxMREX1+f YlpPT8/ly5evBr2dnGsW7nNdSroUcKohohL3Yi5zbZud2H4wb7Sfh4aGOjo6 LgZph6fjaAIZiaQGzKPi4uIHHnjgySefLCgoUD9B3UL9Rmtra9OPTzzxhGYV FRXNdxuRShxxv+GI+F/6ktrIyIgShIJDe3v72NjY7aCbSbgRdOvWrdAq9D40 3ZTRKqJbElpvqKS1koh6ImZZKwkVc1pRqCovlYTanPDeMG9UoVLb+Pi4+orK a4FAwOsRAt7xSGrAvNBvrpdffvnHP/5xeXm5U5lTp049/vjjKub0KxULCEfc bzgiC0X6klr/jO7ubuWIW0E3knA9KJSSQrWZ6aGcFZGhTDiKKGkNUybHRdcf XUkoYTmFtVBVHitJCVPh5OTkxMREa2vrhQsXUnkUgYxGUgPmhfp+zz//fMzL 9VVAxVR4blqF9OGIxyNv6V2yNC+d6+CILBTpS2rmYryBgYGenp6xsbFr164p ByVzvZ9JUuoRdXV1dXR0qObLly+/HX6poSJhX19fc3NzfZDe6EdNtBbTey2o xduC1EgVuHr1qqlf7xUtA4FAQ0ODatC/LS0tmjIyMqIyJtApFqkZqlmLNzY2 qti5c+fOnz/f3t6u6arfNMPMVXRSJWqJeZy+lk35ZZBikpqaqmak42gCGYmk Bsy9Q4cOPfHEEx7vqlaxn/zkJ4cPH45nDaajK4uWc5lJYPmi+d4VaTrisQ/z Qj0R0p7U0vkZDATyli5atOiuWYsWLV26PI9LvhKUvqSmqKIQZMbUTH5RoLia BDOEpDSkE2z//v2VlZVKWzp/QlFFa2ltbT158uSuXbu2BunNiRMnlF80KxSR FNPUsLNnz2rDd+/eXV5erugXGvVTa4uLi7ds2bJx40b9m5WVtWfPnpKSEiWg wcFBLa42KHgqhZWVlWmW1rJp06b169dv2LBBp7GqUv2qxMw19Wzbtk3vjx49 qtSmVauAiWnJ7I0QU4/q1CaQ1IC4kNQykOmXeuyYBfKWL7V2KdSjUIfC0xrc VhIqYa15kVNfJbq0tYfm1tcMznPZ1IDZvkWemjFHrl+//ulPf/r06dPeF6mo qNAi3h9uYN2hSffQ4zqf5pFzO+c7qaXviIc+Gw6hxnIi+P8AhklvUkvjZ3Aq pEX+32f9b9ByGNL6yVooH1tP0j2mpqSm8DIyMqKgpEBxJQnmMj8lEWWfN954 w8SiiYkJMxamVQQCgdLS0p07dyo6bQzSG/2oiU1NTSpgSo6OjurHgoKClStX qh5lqHPnzg0NDZk76RobGxWvzFCv8pfeK4tlZ2cfPHiwrq5OxbQhw8PDWkT7 TTW8+uqrq1evVkmtTk3q7OxU/Q0NDaG5q1at2rx5s8JaTk5Ofn6+EqIyrElY yeyNELVH/5pHQSqpcfUj4B1JLQN5/hVtE6c8des8dP9cqr5rUVT3y2NSs+m4 uSW1wHL3LtPSmIk0PfLy8p5++ul4l/r5z39+4MABb2VnzoDlKemsLZQun3/b mb4jbvls2KUa62w/7hgX6U1qaTsiM3t86n8XSyQzg2wktUSlNamZYbWOjg5F G5MpLidBIevatWuKSBs2bFixYkVhYaF5Lr3JX1rLkSNHFKlyc3OLi4vPBmmK fty+fbumqIAZlTMDagpoylbr1q1TgCorK+vt7TVjaiYJKqZpqfLy8pqammPH jqkSRS2FO+UgbYv56gHtNwU0FVMSVKs0q62tzcytra3VXLVT7dHiquTEiROq ROV37dqlVShVJbk3Ipgn9jc3N5PUAO9IahnI26/o2XExa58iMPsX4RjjZUtd Y4BNG8zwlnOv0rFvZtLY0qV2q3NMavabFxpkm8+ua/yXMk4pKip6/PHHPRWd 3fkp6a0tlC6ff9uZviM+/Zlx+CxOfzqWLyWpRUjXEZkOak7N1v+uS0lqCZiD pNbe3q7wMjExcTl4hV7CzGV+ykRbtmxZtWqVTjOFL3WQzKWPmq5YtGbNGuWp 1tbWiSC9OXjwoCYqT6mASt68eVNLKbjt3LkzLy9P256VlZWfn9/S0mIepWjq X716dUlJiblSUe1X+c2bN2u6QllXV5c2R2lLSynlKQwq5ZlNVtBTC7VUdXV1 aK7Ka6J2hSpRs9WY48ePm7vnTCOT2SchimkjIyMkNSAuJLUM5OlXdKhLYVMq 4NrfCHWhpsOQy1VXbhHKIZE5JrXl060Kr9MhqTmvZLZEWJ9pLt13332hX5re aREt6KWkdd87HwfXvR2abh2UsY5HhkXwPOv1s4tsxipnTxlLWJ8tGQirYVH0 cYm6hNUsG4hcg2M7HTY2/NLf9F0Wm74jHtowmy2c/ovKzLzwkyD2Lg2rPuLI RV8h7e10SmjV6ZCmIxLHZbaxPlme9pLl4235DC3NS+zjYDPd6QSY6wsS0p3U zIM1BgYGTKBI5ruezcWTdXV1oaSmDKWEoonqJp0+fXrDhg1r1649efLk0NCQ edrG8PCwftTE9evXq4BikcJaY2Pj7t27FaM069ixY+ZmNFVrHloSkdSUAfv7 +6uqqnbt2qVKFO6UhrQ5Smp6v2PHDmWxnp4es8k3btxQY3Qyq7zmahVKZ52d nQqAmq6J27ZtU1JTeAwEAmpk8vskRDFNG0tSA+JCUstAXpJarH6QXecuakmX qObWBqfuTKyk5tiTcKgp/j8nx/iLeIp84AMf0C/ieJfSb+f3v//9HgqG73rH A5GipOZQILxeh0LBmpbaXaIakSqcLqWdXUsCXVOH24nScfDTd8QtPenIAx35 sQlP17F36Wz14YHBraSXzn9cq07XRzFdR2T6PPTwX0+MM9bbXpo+6BGfoZQn NfsTYC6H6+YgqbW2tuq90kSSHSHzeMPa2tqIpKaaVb8yl0LQpk2bqqurVWwy SG/0oyZqlgoocynRKDFt375dyUuhRoFLaWvjxo3l5eXmwYzWMTuFLK1XkUoJ qLCwUIkvNzdXSymp6d8DBw6opOJYaWlpTU2Nsp6KaRXaZP2opJadna2lNNE8 TUXpbP/+/WqMFtRWmGG18eD3oCVDzTaNFK2CpAZ4l+Snz4qk5hceklrsblA8 HXmbetzbYL9Y7KTm1h2NqiiBjsTcJLW77777ircnzll5TWqRu8gpTsfbtXYb H7X8hT109ay1/OwzYWZHBcIeehJaPpBnE+NVNGK4a6aYx3ZGb5RNy6cvjE3H wU/fEXf8u4l1Z9gnNS+71HLgllsPcXRPPa7Tyfuq0/VRTNsRmd1jUxuZ5/4F vy5nrLe9NPshih7kiufj4Djd4QRYHv0ZT690J7Xe3t6Wlha9MZkiGea5Gco4 mzdvDiW1kSBFqqKiIvPsDhW4fPmyedqG3phkt3r16uLiYmXGtra248ePK6kp LjUH6Y2W0uIdHR1aiwLX1q1bQ1dXmvq1IhVQJVlZWYpyJqkpdikArlixQtPX rVu3YcOGgwcPamO14apE1WotmtLU1KQAqLCmWfpx27Zt5sGV5ssLxoL3lyVv MEifCp79CHhHUstAsZOahyznUCQyGTn9zndfg/1cD0ktqpBdUkv8Bo25SWoP PvigfrfGu5THqx+je+UOUS0FSc09BMY8S6aLOUyOdfiiWxVH19Ttwt00SN8R D9swy55zmu4qegfO3AZnGwI8BSuPgctx1Wk6Qmn8DNo++9H+ytp4/6eKKj8z phbfBegJXf1oW3TOotqcJTUTKEaSYG5zq6mpsSa14eFhk9TMXWCapQLmnjjR G1NekerIkSONjY0KbopLymK7d+8+HbRr1y6FrL179yqC9ff361/FMWv9Yr4a QBOVs5TCTFLTfotOaop+TklNswoKCkJJzXx5gblwMXkmqWldJDXAO5JaBkpj UosORk53AKUrqUUs6z2pRV9OlIlPFLHdh94n2k53OpaxxtoiL5GMXJfD8k6T p0a8pu7cCf/OhYSS2lw/bCHtTxSZ3rBQggr/WDj1qmPv0uS79E7/PyS86tRI 91N9ZrYvKrHZXNbrfB7G3EuxLzJPV1JL8/GJlL6kZq4DNElN/5rIM5QEc6Fg dXW1ktfKlSsLCwtbW1sVT5RTenp6SktLlZs2btx49uxZRcLQczaUiTRx/fr1 x48fb2hoOHXqlLnjTJXs2bNHeU0JS7UpnWmW0pNClklqimaqX+tVLlPEy8/P X7t27Y4dOxSFtF0qpsClSrKzs0tKSqqqqtQwFdMsVaIfNVf1KKlponnupdau PKjGaIergPk2bbUwmX0SokaS1IB4kdQyUPqSml0uiqsX7jrXW1ILL+ec1CIr 8k9SS+NT+h12of1tWskmNZe+mt3IZ+JJzeUbqhJLanPby0znEY/cEssNSpET o54C42GXpiOpJbnq1Ej/N2VYBayProm6eNH+6kdPe2kek9rc/rUjrUlNAU15 RFGlo6PDfL1aXxLMA/DPnDmzadMmZStzqaESisKO1lVWVqb8pbCm3NTV1WWC od4cPXrU3L+mIHbhwoWioqItW7aYpLZ9+/Zt27atW7furbfeUgpTNFPSMc/9 CCU11d/e3l5eXp6bm6tMp/ylKKTNMV+crSxm7kQz11uOjY0pNGkprUuhLJTU 1ItTyzVx69atWpE+Iwp6apuaneQ+CVFW1b9aF0kN8I6kloHSdZ+a23ekxXcF YsL3qUVVnth9avP7AGvzrbv6Ve59kdOnT2uRmM9AcHlyR9SuXTBJLXRLmbmA LDB9608yVz/OdVJL9xG3uwEvKvREdfA97NLUJ7WkV50a6TsiLqIuro51XXHM vURSS5pJago1586dUwLqCGpPgsKIcp8SmRKTspWivQlNZhhLOcg8CWTPnj3V 1dVtQXqjHzVRoUynmXmEo4KbspjikkJWQUGBCqjCN954IycnR+etQpnqURJU gfr6eq3XPB5EWU9LFRcXK+4pEKkZqkrJKz8/33zJmmiT1Ugtdfz4cc1VPaFQ pjJ6r1UrJKqShoYG1ZzkDrFSPOzs7NSqSWqAdyS1DOR5xMylHxRvUIvrup44 Rn5C08OrChW1TWoxo9q8f9WQfvk++eSTk5OTXgpfuXLliSeeOHToUKyCMYJa woMg83r1o9OpmkxSm4fjn54jbrdng5NsQnnsh8zMQVJLftUpk6Yj4iJq490/ WR72Elc/Js3EFoWI2tpaJYiWoOYkmFyjEKS889JLL23cuFE5q6SkRBlNEezk yZN79+5VOFJ60hYVBemNfty8ebNSkpKaCisoKeVpukKZIpgW1OK7d+9esWKF qtUiilHr1q1bvny5opnO5NLSUq0lKytLNSsbaikzbqXp2dnZq1evVjNU+bFj x9QwVaWNVZ1akXKfGctTlNOPphJFwp07d1ZUVGhzFCST2RsRAoGAdo55mmU6 jiaQkUhqGchTPzT09137K2+iOvaxf/FHPlvOtRdvNyuOpBaqf7ltUgulSodv /Zn3pCb6Jfv888/funXLvZgKqNjLL78cs0L39O3wlA8vI2XpeqJIPEnNS06M o2tqd4KnXcqP+B2P/WX7pOZll8bbpY95OiW/6lRKw2dwqcsXjTmMbXr/G0hq k5qXz77TUZjjR/LMUVJraGhIPql1dnYqrJmrHF944QWdY2+++aay0rZt25SG jgWZQLR27drVQXpj5paXlyupKVKtXLlSQezo0aOKNq1BTU1NSlJmEWUx1aD3 L774ok5LTVHUUkYzjwFRJdoQLaI0pHUpqb3xxhuvvPKKaYZymdKZataK9K/e a7qZqzWqHjVMlSjQKU+ZIb8kd0gE7ZwLQek4mkBGIqllIG85JDREFvZ9qoHZ +yPiGCTz1GsOWL47Nf6/9DqMmznWNrsZEQ9dCwRsnwRvrXNO+h+m+/f444+f OnXKqUxFRcVPfvITL53J2H0nh4GVu6wP2J/9blubMRmb2Bu6SMvTU/oTvPox eu1OJ5LzXx+cLxKck6f0G6k+4lMSSmred2m8A6+xT6ekV51KKT8iM3+Gmr5o cXb67EZ6+mR53UseLl2w+zh4/+xPnzph33Q+Dw/pT3tSU3yoq6trbGw02aQ1 CSapVVdXK++YL7leF6QYpXil0+ncuXNnz54tLCw0o1di7hQ7c+ZMfX19TU1N UVFRbm6u4pgqUW1dXV3d3d16ox81cffu3UeOHCktLTWPGVHNGzdu3Lp1686d O1WJYpq5GFJt0OaoTq1IYc2UVEwz37amBFdVVaXGHDp0SGFNoVLTFdN27Nih 8pquJKWAlvzeiKA6zdWPJDXAO5JaBnK7TNHr9YyRv4RjpD+HP/Z6q9uudFRv wW0h1/zo3IzoLszcD7Xol/IDDzzw9NNP6406DDeC9EY/aqJmeX1CXew/cjv1 1yP2yiKbeqJKRuWoSF6eXuL1iSK2x3H6cXh2F8XatDOOi3nTffBTdsSDEktq nnep96Tm+XRKdtWpl8IjEuO/HNe/N4WV8LiXvNwObLt6r599lwuqXQYPU28O kpq5T83cTtWWBHP1o3K6MtepU6fKyspOBum9opYZttNcBcPTp0+XBemNfjTD Z2ZWZWWlFtf7Tovm5mZz1aKaev78eRO1FM1UgypX+tNcpTNVYu620xv9qNo0 S8XUhhNBWp3ZWDXGOlf/KtlpimZp2dDNZcnsjQitM/epkdQA70hqGchzUgsW tjyVzPy2Dvv7aViVMZ/REXU/SkQ/wO47hexLe0hqs90It3aZ7YvYQJsttFY4 txfFXb9+PS8v7/HHH1+8ePHfBemNftREzfJYiZerkWw67Ja/pM/84dwhVeVZ z5JFYd+wFTHPMQEn/OzHO2FPwps+Q+2XdminQ7c//OR3Pj9TLCVH3Egwqd3x uEvjSWreT6ekVp0WKTwiwd0Q8X9O8P8+h1PL8ZPlZS/F+n/Z5WPr7WBNT1ke +UGZy5Q2Ja3fp6akpvig7GOuXTSDYgkz41mqpLu7uyeoe0ZXV1codpmRsohZ ZsHQrIiWmDpNYVPGtv6IRUIlrauLaIZtI5PZCU4U1lQ/SQ2IC0kNAABEmeun pDpJ95iagom53s+EoM6kqZLe3t7oZ9SbKGTCke0s0fveIGukMjHNTDcBLaJ+ M90atWxXZEpam2GtJ7qS1FJYU+U8+xGIC0kNAABEyfykNjg4qITSGbwkr62t zRqFEmNGppKpIbq2BOpMSRtSuy09wUSsfxsaGhhTA7wjqQEAgCiZn9RGR0cH Bga6urrOnz+vpBYaWkIKmb2q0Ge+b665ubmpqSkdRxPISCQ1AAAQJfOT2uTk 5Pj4uOJDdXW1eWpiZ9RNZEiedmkgEFAcNsNqim/pOJpARiKpAQAA30pfUrsZ NDQ0pKRWU1PT0NBgnsGYjudpvGO1Bb8+u7a29syZM0pqisZXrlxJx9EEMhJJ DQAA+Fb6klrI4OCgGf3piXpYB5JkroE0DxW5du1aWo8jkHlIagAAwLfmIKnd vHlzbGxsYGBAYc0MA6XwG5/fycx3zCmpDQ0NTU5OpvUgAhmJpAYAAHxrDpLa neA9a8PDw8oUHcGvjW5BKrQGv0S7r69PQVhxON0HEcg8JDUAAAAA8BuSGgAA AAD4DUkNAAAAAPyGpAYAAAAAfkNSAwAAAAC/IakBAAAAgN+Q1AAAAADAb0hq AAAAAOA3JDUAAAAA8BuSGgAAAAD4DUkNAAAAAPyGpAYAAAAAfkNSAwAAAAC/ IakBAAAAgN+Q1AAAAADAb0hqAAAAAOA3JDUAAAAA8BuSGgAAAAD4DUkNAAAA APyGpAYAAAAAfkNSAwAAAAC/Iallqtu3b1+5cmVwcLC7u7u9vb31naQlqK2t raenZ3R09MaNG/N9NAAAAID4kNQyleLJ+Pj4wMBAX1+fAkvXO48iqrZ9aGjo 8uXL8300EnEbSZjvowcAAJAsklqmUkbr7e3t7+8fHh7W0Rl7J1FE1b/aasU0 M6Q4OTk53wfEk5s3b165ckUtH0aidND17+joqPbkfB9PAACAxJHUMszNoMHB wbq6uoaGBuUURTb1Wuc7PM0pk9S01QqqgUCgqqqqs7NTE33bddch0yeor69P obK5ubmxsVHHrh5J0D7Unuzo6ND5f/Xq1fk+wgAAAHEjqWUYhZGJiQn1+dXV 7+npuXz58tWgt+1cs3CaeM2Z+1xrndE1u6w0Lk7bZd5obwwNDam7fjFIu2W+ j489HTLFCuWLpqamlpYW5TVFyw4kxOw67UPtyQsXLtTW1uq4X79+fb4PMgAA QHxIahlmZGRE2cSMzoyNjZl7dm5GuRF069at0IKhWdZ7fG4F2a5I01XYaa4q MQVuzIgubAoYLlvk0gazaaH6rVtn3mhBpbbx8XGdn+q9BwIBlxXNC9Pa0Bho V1dXf3+/DmIKP5jvNGPBC1+1D5XNQyOqmujbEVUAAABbKewgkdT8oH9Gd3e3 EoqJOTeiXA8K5TJrGTPRRK3Qj9ZVWFNY9Nw7UTFNK4oOa9aQZTKj7VMgQjEz em5EErRlCkxOTk5MTLS2tl64cCFlOzpFzBioMoViWm9vr/sYaPTgo/cRSS8D oJ4mJjcA6jTdZetizvIyotrX16fdO99HGwAAIA4ktQxjLvMbGBjo6ekZGxtT r1VBKbo3a5KajlpXV1dH8F4edWs1XaFGE1WDgt7g4KCCg3KEurhNTU0NQXqj 8pql8teCw1VaUSAQMPdV6d+WlhYtOzIyoqrMWkJda9WmFbUFaRWq2TRG0/Wj FjS3FwWC9F7BSuvSVpg2hNai6WqGWq61mGY4dd3NLJPUVP/58+fn+/hEMmOg 2nwvY6DBxGodXpzO1xETg2OUYaOQKhCMw9axy1vWMpoV/C6D2EtFtWG2ePDl SEvZLXsr5tYZ1raZqqLHUiNYR1S1e3XOuDQPAADAb0hqGaavr0/dfjOmpoNi 0srVKKaXq+7roUOH9u/fX1lZqbyg6VqktbX11KlTR44cqa6uNg+QLC0t3bJl y8aNG/Xv9u3b8/PzVV5rUQJSTCspKQnNzcrK2rNnj6YoE5knOVhjmhY5e/bs vn37du/eXV5eHrqNTquuqanR9E2bNm3evFmrUD0bg9QMFdNGHTt2bOvWrZqy KWjnzp2aovDlso1mZEr/ai3qrvszqXkdA50dJQxllqlIZ7JwMEzdCgalWyZz BaeEctMtE2usy6qApcxUgevXYy91e7byW5aSt6dz3+2I6XesBUxtM8vesVZo tsJp64zb4a2N2C1eRlR9ePQBAABckNQyjBlTU8/fDDmpm6qociWK6cSq76rs 88Ybbxw+fFhpyFwtVldXd+DAgW3btiklKT40NzdnZ2e/8MILL7/88uqgDRs2 KI6pmOoPBAIKVs8//7zmrl+/XmFNeUrlDx48qAJqhlKSCWujo6NNTU0FBQUr V67UGlWD1m5aODg4aJKaKn/llVdU1WuvvaYya9euVehTVAy1Yfny5WvWrFED cnNzldS0dtVgEln0Nooq17/mUZDm+RLzfXwimQvzYo6Bmn2oDR29dLmpefBk ReeZqu6+i5dMJBkemWhoGqis6bnQcPHiwNiVK1cHBseranqKS1tPVnS0tA2O jV+5fv3a+PikWbaqtrd/YGyqTG2vftTE8YlJFegfHK90XupMdXdf/5imTExc 0dyTpzr2FzTu2l9/sLi54myXGqBiZ6t7Dh1p1vTC4ubDJS0FhwMHCpuKjrbU XegbGp4I1nalqXngeFl76ck2tVYTdYZq+o3rtlt3LZjGpl76URO1Ui0+OqqA /7aXyyBDI6okNQAAsOCQ1DKM6fnr346OjuHhYZNWLkcxFyWeO3dOqWfFihWF hYVmhEuRwYQmBa7i4uLOzs6GhgaltldffTUnJ0fZTREsKytLSyncaW5jY6Pm Klspr5WXl2tZBSjFKE3Mz89XWFOFZkzEDKgpoCkbrlu3TrWpvFKYmqckZR7+ oGVVj7KY1q5MV1FRoaiobrYS1ubNmxXTNPfEiRPV1dVqlTZQSVDpRs3WZkZv Y4h5Yr/ing+TWl+QSdZqpNP44PVrmv62IlJz6+CGbdXf+VH+k78qOnGq3YzB KfKs3nj2l78reW1VxamzXcMjClzdv3r+6INfzvnW9/dv2l7d1j6k/NfdM7ox q/q7P87/9QulZ6q6zlZ3P/tiqapav7W6t3f0xo23NeWZ35XYLqViTz93pPx0 p/Z1U3P/hm1Vjz118N6Ht3/8wa1f+fae5/5wbFtuXe7eCy+tKP/6v+779ENZ ix/JfuBLOYu/uF3/Ln1s/5pNZwMtU2OsrW2DazdXLn3swNf/Zd+rq05pjWrt rVvX9Zq4HL515e3B6Tdv3bqh18lT7U/9uug7P8xbv7Uq0DKoXaEdot1iO5a6 UEZUAQAAXJDUMkwoqbW3tw8OqkM7YXqqEUwnVklty5Ytq1atUuwyV98pMtTW 1ubl5WVnZx89elRZrL6+Xvlo/fr1x48fVzhSNFME0yI7duwwX/ulzLV69eqS khKtVOvSehXxFKxUs5KdFjHXoemNpu/cuVOVKwkq7qkepSclNXPfnBKKVqcy qlAxTW1T0rx9+7YWN+3UWkpLS7VRU9fCBaeb4ZLorYugBDQyMuLPpBY6Xtp2 lzFQJRIdsUuXJqrrun/+2yPv/tCqex7Ysmv/9OaUVXT85BeHPrtk+/cezz9Q 2Hixf7T4aPODX87+H/7X5//sL1957KmCijMdV69ONjUP/OLfjvz13auVxQqL mw4dCXzuKznv+dCqp39zpKV14MaNq4dKmlWJ7VLv+dDqex/OUuVd3cM5e859 54cHFj+y/SOLN6kZ//TtPb9+oWRjVlX27nMvv1mulPfej639j//3y//Lf1n+ l3/35scf2PKNZfvWbalsbh0YHh4/drL1hz8r/NuPrnnXh1Z+8/v7du0739k1 dOf29Tt3rl8aC9+6fQpW1+7cuRl8Xd994MInHtzy7g+qtcVVtT3aFdoh2i22 Y6kLZUQVAADABUktw5iev7S1tQ0MDJioEv3d0CYO1NXVhZJaV1eXpmvxmpoa k9QUvhSv1L9VUlu3bp2SmtKEeryHDh1SaFKeMl8xbE1q6hsr61VVVe3atUvh TomsqanJ3IKkTKeJKnzy5Mljx46Zm9qUCtU8LWWu+jNJTRkwlNRu3bql6aad a9asUVJT/Sqs6Kd/TQg1p5/LF2ErAakqnyc17eqhoSGnMVAlJr1GpgbLun72 m6K/WrTyo4s35U5lmakbxE6eavvxzwvveyTrOz86sL+gvrdvuOho4P4vZd/1 p7/9d//xxSXf3JlX2DA4eOl8fe/Pnyt+94dW3r8ku+BQ48GiRkU2VfXTZ4sC LRevXZtUdlv8xay7/vQ5m6U+uPK+R7YfKGw4U9Xxs2eLP/W5bd9ctv+lFWXb cmvyDzUcPdFyurKj7kKPXkePt6j833x49X/+69cf+Ubu66tP5R1qaGjqu3Rp XHlwS3b10sf2K3P9/X0bNPe1VadU/+3bSmTXR0fDt27vuVu33tZ0vW7fenvn /vP33L/5v35g5VO/Pny2uku7Qjvk7as2+8ppRJUxNQAAsLCQ1DJMKKm1trbq vfluqWhmNEpBKZTUlJIuBZ/6GEpqR44caW9vVxbT+5UrVyp2lZeXK68pcG3c uDE/P9+MU2iutQbFDfWKCwsL165dq1ym7rFZV2VlpaKZltUimqg4pkrKysrM FYzm8kWzoCpUAxT3ent7Q2N/W7duXbFihZY6ceKEZqkSbaAKKIK5nJPqopsm SSAQ8HNScx8D1e7RS9taVdP5q+ePvO/jaz/zhazdBxQ9buhVVtH2s2cPP/Ro 7mM/PZhf2NDTO1RcGlAO+tP/9Mc/+8tXl3xr5/qtZ6tru06fbX/2xZJFn1z/ yNdzC4saDx1p/OI3d/7dx9f98ndHAi19V69eVr77wtd2/Olf/MF+qW/sLCxu LDra9E//vPv/+/s1y54oKDnWrIh85861Gzcmg42cMO0pKGpQGFTNv3mx5HxD j1oenH5NKe9Xz5c8+r09338q/3s/PvC5r2b/6OnCY2Utt28qkV0bGQnfuv3n VO2dO5r19s0bk3vyzt/3cNb77ln7zL8VV9Z0aleo2skrNvvKaUSVpAYAABYW klqGCX11lGKU3pi0Es1cFaaktnnzZpOzOjo6NF2LVFdXHzhwYPv27cXFxW1t beb6xtdee23Dhg3KUOYxj7m5uRUVFT09Per9Kn+FahgJUugoKipavXq14pVW oSCm9hw7dmzbtm2quTlIb7RqLaUAZb4OQPT+4MGDWrXmKtl1d3ebsT+tRcv+ 8Y9/VDPME0UU2UpKSpQitb2XggNqtptpDAapch/21UPJWjvNZQz08mUluImh oZGzVR2//F2xssy9D2ft2n8ueH3g9ZOnWpXUvvC13B/89GBeYX13z6BS2MNf y/2Ld7/2gX9Y/50fHXh+eWnO7pqDhxt+8/uSuz8zNZil94XFDSapKfs0BnqV szTl81/d8Rfvcljq6zsPFjWUHA98c9m+d39olVa3bsvZxqbea29fvnVr8u23 L7991SSy6wp0D3wp+/2fWPfc70suNPZMTk4ntcMljd/4131a6asry15aceKz S7I+/5Wcnfvq3p68fPvW1eHh0bCt21d3/fqV27ev6nXj+pXdB87d98hUUvvF b4vOVLUPDo1oh1y5POEylmodUfXn0QcAAHBBUsswEUnNRJWRKGbgpqamZtOm TStXrjQjYpquBTXRJDWlrVBSe+WVVxTHzN1nu3btOn78uGapA1xXV6c4ZpKa ssZwkHn4vyYqXqmAUlJjY2NBQYEW37179+kgVWKeIalEpsRnxtSik5q51Sg6 qZnHm1y4cMEkNYnexhCT1JqamnzYV7derWqGF20/XBMTY3oNDgyfqWxXsApl mTt3rioBnShvsSa1ru7B/EP1D301568/vPqr393z8+eKvv9k/q+fP5KVW63w 9dHPblJSyz9cr9hlktovflvc0NRzeWI8r/DCP/5T9t84LPXQV3eoQN35LoWs zzyc9dHFm7T4sy+W7M07d+5Cd3//8PjYpdu3Jm9cvxyRqhQwr1+7rK3YtqNa SfDr/7JHzTtQeP7L/7zrk5/b8saaU93dg5NXxlWssnp265TglAFv37qiOq9f m9i9f7bO05VtA4PDZp+4/I8UMaLqw6MPAADggqSWYdTbDyU1c3GgDEUxt3dV VVWZpKZgZXKWQlNoTE1JzTwxLzs7WxFJOUsxShlNBVpbW81lh4p1ym6mBk1U zQMDA+apI2vXrs3NzdXiqlOxy9y5pkqUzpTXlLa0lPKXKtSqJ4LMY/yzsrL2 799/9uzZrq4u89Xb5irN119/XS0pLS09c+aMpqjvrQJandM2hqiM/5OauVr1 ksMYqA6XXv39QwopyjKKV5/5wrad00nt7RPlzT/99VRSe+ypggMHL3R2Dejf z30l++7PbPjZb4r+8NrxR7+7+1vf37dyfcXzy4/d88DmqaR26MLBw/V6Y8bU 6hu7J8bH9uWff/DL2+2Xun/zA1/KVigbGBg6earll78rvu/hrHd9cNV7P7b2 K9/evWJNecWZtosXBxWsbt64vGt/3b0Pm1RVrPA1NKTjMzIV8V4/oST4/afy FS3VZr3RVvzqd0fKKrTtKjRSXdvxy9DW7a19++rErZtX9Lr29oS1ztNn2/oH hsw+cRlLtY6o+vPoAwAAuCCpZRglNQW07u5uxaWOjg7z9Wp9UZRf1H1VGlJ0 euuttxSs1JVVouns7KyoqFCSUlw6fPiwKlEuU5564403du7cqYjU3Nys5KW1 jIyMqBJNUdZbtWqVSWqqQbGrvLx8x44dymJ5eXn19fVaxHw7tklqyoCqcN26 dVrvmjVrVObChQtm8Etv9KPm7t2799SpU6rQTFc7zVrMyJ2mmESjTQiNIUZv Y4j57mxtiw/76hFJzWkMdGxsVK+L/UOnzrb9/Lmi992z7t6Ht+3eP5vUzJja 95/M35t/rr2jf3/BeWWie+7f9Pzy0lUbK/75B/u/+t09v3/lmIopiH3xG7kF h+sLIpPaJQWxB760/Z7P2iz1oU9vWPzF7Vrj21en7vwqKml47sWSxV/M+usP r1ZYW/KtnW+tqzhf33XnzuSd21esqaq6dmqstqPzorLhE78oVLO/8a971285 o9fX/2Xvxx/Y/N0fHdixp7altW9kZLT2XGcoqeXurb06Oa7cp5dWumtfeFLr HzL7xGUs1f8jqgAAAC5IahnGJDVltHPnzql32hHUHkVRrqur6/Tp0+b7y3bt 2qU01NbWpmB15MiR7CBzeaGCm+LVm2++uWfPHjOapgW1uMKF/i0rK1P+UuYy oUw1mweSKFgpcB09erShoUFLqX6tRVM0q7CwsKCgQLWZr3LbunWrQpmqUrNV ct++faELLFVhb5BZy8qVK7WgNsp8AZn+VUu0dW1B0dsYojabrxvwYV/dbIi4 j4GOjg7r1Xdx4NSZViU1haPPfGHrrr21d+5cUTg6Xhb46a8PPfTojmVP5O3J q2tr79uXf+7BL2d/ZPHGf3vpaFZu1W9eLFGI++mzh/7p2zv/+u5VS76Ze7Do Qv6h8498fYe5+vFCfdfYpZE9B+ruX5L1kftslnrP3auUy3btr3377fEb1yd6 +/orq1o3Zp35wc8KPv7Alg98Yv33fnzgSGljsD1Xdu2rvfcL22aS2tT3+tU3 dK3fcvrr39v9kcWblMKWPrbvm8v2fuz+zdoQNXvFmvK68wp0w3XnOn7522It qK3bsbdm8sqY1qXX1cmxnXun6/z5b4sqzirVDl66pMDuPprq9xFVAAAAFyS1 DKOef09Pj+JJbW2tsklLUHMURRvll6qqqvz8fAUoxaW9e/cWFRUdPHgwJydH PyoxKcc1NjaeOHFi7dq1r7/++u7du1U+EAioQi1rAqDylCLY8uXLN27cqAhW WlpqLl9U2lIoO3PmjAKjEp9qUJpTnZqiKKd6lM5UoapVBtSCWpFq01xzkaTa UFJSUldX1xlk1vLSSy9pLapfAVBTFN8qKytdtjFEbVbl5pmT8318InkcA+3v v6hXT2/v2armX/2u6G8/suZjn924JfvMjeujd+6MHz1e/4On8u57OOt7P96/ 50BNc0vXrn3VD3xp+wc/tf6Zfyvam1+zNefMc78vXvrY3vd/Yu3/+a7Xlnxz R/6hun35NQ9/Led996z72bOHampbhwb7c/dUffaL2z74SZul/vxdr973yLbc vVVjY4PX3h69cW30zq1LPT29O3ZX/dM/73rXopX3fylr597qGzdGb9y4lLOr 8jMPbX3vx9ao5qqaFtVccSbwmxeLFz+y7Z4HNj3wpawl38x56NHsj9+/6b99 dM2H79345K8KS080DPRfVOGnf3NIC9738NY9B6pv3bikrdOKJq8M5+yuUp1/ 9/G1v3z+sIqNDPdfuTw0PjY4ODC1w3qnxlUX3ogqAACAC5JahrEmtYaGBqcU 0xqkAopjCmvmWf2GUtWOHTuOHTvW1NSkekxSW7FihaJcdXW1Uo8WVNBTgFKy MKNdL774omLU6tWrN23apKrMMx7Ly8vVN9Yi+/fvX7ly5bp165SwzOKiypXF lL/eeOMN1azWqp1nz57ds2eP4piSmgor5XUFmbW88MILioTmmkn9qDx46NAh 5T4zoOaS1MR8MZwPn9LvcQxU0zS9u7vjQn3gj6+VfPCT6z74qXXLV5R0TD3b v3v3/rPf+Jdd//CPW37w1IH8Qh2j1u25Ffc9MpVrnvpVwaHimqPHzq1YXapc 9n/811f/p//80iNfz9mXX5m75/Tnv7JdseiJZwoqzjR0d3du23Hq3i9ssV3q T//TH+97eEv2ztN9vV0DA92DA90TY1NPQcnZdfrr39ul5Pi5r2zP3nV6YqJP ry3byz/5uc3/7aOrp2o+Xd/T3Zl3sPpby3Z/+DPrH/lG9s+fK/jdS4effaHw hz/d/5mHtrzn7lVf+Fr29tzTrS1t5RUXnvpVvuLbpz6/WZswdql38vLFy+N9 w4PdW7JPqc5g+is4WX6hq6tjoL/r4sUunYbaPy7jqn4eUQUAAHBBUsswJqmp V19XV9fY2Gh6sK1RQtOVDhTWFKyUsBSmTEoqLi7W4iYlmfRkBrnU11WeMl1i k9RMEFNuUprTslu3bt25c+fBgwcrKirUN1YuUwQrKirKzc3VKlRYS5mLJ/XG PLpEs1RAq1PN+vfIkSOqUBFMNShImqs0zVo2bNigtaiRWp3WlZ2dbRZUM1Rb 9DaGqGbTV/dnUjPJWpEz5vhgd5cOWfPW7PIvfSvno5/d8K3v71q+oviNNUef fCbvwS9ve/hr2b9/5ciZsxeUTjZsPfGRxRv+3/e/+diT+46U1pw737gtp+yh R7f/yZ//4b//D8/fv2Tbzr0VWTvKP/OFLSrz/Sf3nSg7197esmHryY991n6p /+5/fv4f/nFjVk75hQuNh49Ur998fM2GYy+9VvzYU/tU2yce3LzsiX0HCipH R7pGhjvXbT7+4c+s+6+q56l9R0qqq6ouvLby6D33b3zfPWufeCZvf/7ZkmO1 RSU1uXsqtNRfLXrr7z6+RtmtrPycav7JLw6850MrNXHZT/as33J8c9bJAwVn ysrrVqw++uF71//Fu1+7f8lWpTxt9ZbssryDZ7WUmqR91uqw2/w8ogoAAOCC pJZhQknNjNGYYYW2KKERB71XMcWEU6dOnTx5sqys7MyZMyaRmSsPzUNFKisr NdFcNjkzyjM1lqFusFm2LEhvlOyUzlSnWZEKKExpcRXT+04L1aaSmqUCmqXC zcGvJ1ZJTTEDgmaMKWItpp2KcuYJkKYx0dsYEhpV8XlScxkD1TRN7+ps04aW Hq/742tHvvLt3E9+bvPdn173wU+t/cji9f/45W2/eO7gvvzK7q72/oudylwf XbxBeecHT+07dqJOabWgsPI7P9rz53/12v/4Z79/4EtTSW177qnFj2x9V7DM yfJzHe2tm7LKPv7ARtul/t3//vv7Ht6yY1eFktHvXy3W6pTpPvjJte+7Z7Xe PPq9na+9VVpWfn5kuGtosHP9lpPKie+5e+WPfrb/QMFZVfKzZwsW/cO6jz+w 6c01pY2NzcHzrrW+IfD6qlK1870fW6OApgSnwr94rkDB7X/7f15+16I3P3zv uo8t3vDdH+5es/GYVqoV/Yf/svz/+pvXtVIlwc9/NevpZ/Ozd56qrKpXOFX7 nRIuSQ0AACxEJLUMc/HiRfX8FUxMsDKZqMNVaJwrRD+apczYWWiidSmTj8zc nqDoxY1Q5REtsa25a0aoAaE2RKwluklOlApU0udJTanTZQzU6OzQrmivr28u Kql95c2jSx/b8w//uPkj92146NHtTz9bkLv7dN25puGh7oH+LkW2x57c/7Xv 7nzljZIzlfXakRWnL6xYXfrV7+Yqnf301wVFR2oKD1c/9av8r39v5ytvllRW N2g/5R2s+uHPHJdSYS1VdurCS6+XPPy17E88uOme+zfe+/CWb/9gz8tvHj1U XHOhPhC8IrFzv9b+1P5vLtv12srS4pKagkNVf3ytRMWe+mVBYVH1xb7OwYEu vZQotZQao1nKngWHqo8crVm76eS/PL73U5/frIz24XvXf/S+jd/5wZ41G44r /f3gqf2ffmiLsuTHPjv1eujRbIXTHbtPV9c0ard0dbY7jaiaa19JagAAYGEh qWUY0/NXtFHXdGoUZib1ODExyvqUe71XDaGlzNyIidbFI56Qb0qaGGXoR1OD CWsh0TWHCodqcFpLdDtdBO/w6vbnnUrWq1VdxkCNjuANa1NfR97YosS0L79q U1b5+i1l2btOK7vV1k2NY/b1asd2VNc2HTxcrcR0oux8Y5OiSntTU0t5xYUD BVW5e84cPlJ77nyg7lxAb0wZzZ0a16ttKiyqcV/qQn3zkdK67bkVG7eWb9ha ti3nlOaqMZre2qpE3NHV2VEztfYaTT9Zfl5rUZI6euycflQjz18I9PZ09vZO vdRUpc7io3V5B6tLj59Tm8+dC1ScrldkU/2btpWv23xy3eayXfvOqj2nTtcX Hq7Rlm7JPrVxW9mGLWVZuRUqefpsQ1OwqWbPRCOpAQCABYqklmEGBweVYszF fuqmhqJQBDMmFT3dSxnrqJZ7Dckvm0w7Q7Q39G9DQ4MPx9TiGgNtnx6L7Oju UtLpunixu7+/e6C/u/9id19fV09w0HL6Wxi6Oi/2TU3v7eky9elfvZ8qP9Ad /H4D5d9OvbGW6Zpaqst9KU1Re/tnVq2XmqHGaI2hMVDr2s2K9EbFVPlMsWDo 7OjotqzRlFTlKqnVDczUr/Uq4mvrVKd1ev/MejtNTmu332nm2leSGgAAWHBI ahlmdHR0YGBAvV71S6dGWGaGn96BzLYrxCk7KA0pBzU1Nc338YlkxtTMxZle xkBnRh6VbnqGBntHhvtGR/qGh3oHBnr6eqeGIZWu9Ort6R4c7NV0FeueCjOd +lehUFO0yODA1Dr10pvpMsGVTi01EGMp6xTzUjP6L5qNCFv70FBvMIbOtlY1 9PaEjauaNoRq0EtxTD9qo8xrZKRPVekw6jU4s71T04eDW93f09vb7b7HzLcH +nNEFQAAwAVJLcNMTk6Oj4+r11tdXW2+iroz6ja0dw5teCAQUBfdDKspvs33 8YnkcQw0yRHGmEvZlvGylJe125bxUjIl651KoL29/hxRBQAAcEFSyzA3g4aG hpTUzOMEzVeYeXnyRoYxD5Osra09c+aMuusKsFeuXJnv4xNpdHRUB0spQzlC sdrpm68RL7Mne4L3ACqptbS0+HBEFQAAwAVJLVMNDg6GBhp6ox7H8U5gxqfM JXDXrl2b7wNib3JyUv8qQiqmqbUKbvoojY2NjSNp2pP9/f36CIwHQ7oPR1QB AABckNQy1c2bN9XhHxgYUE/VDDC5fDd05pl6UmJwMGVoaMikIX/SYboTzGuB ILVZyfrixYsDSI65AdBc+6pz4NatWz4cUQUAAHBBUstg6v8PDw8rrXQEn4DX 8k6i7W1vb+/r61NcNWnIzyYmJpqbmxsbG1uCj5RP4Q1c71jdwSfJ1NfXnzt3 Tsn3+vXr832QAQAA4kNSAwAAAAC/IakBAAAAgN+Q1AAAAADAb0hqAAAAAOA3 JDUAAAAA8BuSGgAAAAD4DUkNAAAAAPyGpAYAAAAAfkNSAwAAAAC/IakBAAAA gN+Q1AAAAADAb0hqAAAAAOA3JDUAAAAA8BuSGgAAAAD4DUkNAAAAAPyGpAYA AAAAfkNSAwAAAAC/IakBAAAAgN+Q1AAAAADAb0hqAAAAAOA3JDUAAAAA8BuS GgAAAAD4DUkNAAAAAPyGpAYAAAAAfkNSAwAAAAC/IakBAAAAgN+Q1AAAAADA b0hqAAAAAOA3JDUAAAAA8BuSGgAAAAD4DUkNAAAAAPyGpAYAAAAAfkNSAwAA AAC/IakBAAAAgN+Q1AAAAADAb0hqAAAAAOA3JDUAAAAA8BuSWjo0NjbuAwAA AJAp1MOf40xBUkuHoaGhRgAAAACZQj38Oc4UJDUAAAAA8BuSGgAAAAD4DUkN AAAAAPyGpAYAAAAAfkNSAwAAAAC/IakBAAAAgN+Q1AAAAADAb0hqAAAAAOA3 JDUAAAAA8BuSGgAAAAD4DUkNAAAAAPyGpAYAAAAAfkNSAwAAAAC/IakBAAAA gN+Q1AAAAADAb0hqAAAAAOA3JDUAAAAA8BuSGgAAAAD4jW3mevTRR10SmdNc khoAAAAApIRTFnOKYy6zSGoAAAAAkBIucSw6kTlNJ6kBAAAAQAq5JzVrKLOd SFIDAAAAgJSzzVzRuSxmTCOpAQAAAECqOMWuiHQWM6aR1AAAAAAgVVySV3RY cy9MUgMAAACAlHAPX5diPUWEpAYAAAAAKRczf12K9fVqJDUAAAAASC0vEcwj khoAAAAApARJDQAAAAD8hqQGAAAAAH5DUgMAAAAAvyGpAQAAAIDfkNQAAAAA wG9IagAAAADgNylPaimsEAAAAMA7Vn19/Xw3IUOQ1AAAAACkCkktVUhqAAAA AFKFpJYqJDUAAAAAqUJSSxWSGgAAAIBUIamlCkkNAAAAQKqQ1FKFpAYAAAAg VUhqqUJSAwAAAJAqJLVUIakBAAAASBWSWqqQ1AAAAACkisekVvnb9773t5V2 k++aET3fZW7Oo06LTc15NCfOrfADkhoAAACAVPGQ1KYDV1QSC6atmVAVLGQt 4jJ36qfpH4IzLMEslTnNJMHU1OUBSQ0AAABAqrgntdmhr6ikFpmxwie4zZ16 OzvLms1SO55GUgMAAACwQLkmtdDgl2UUzDIrIlVFhDHHucpjlrpmc1tKc9pd FimqMgaSGgAAAIBU8XafWnRSm4pVdreYmWmuc6PG1IJTU5bT7nKQgqotjswI TSGpAQAAAEiVBJOazaBZRBZznht5n9rU2/D0lhSSGgAAAICFbj6S2iXrDXBT xUI5zfmRkB45xbSUhzWSGgAAAID0maekZle5yyMhFwKSGgAAAIBUmfekFvbU kujb1/zEOo7GmBoAAACA9En0iSLRU+xuP3NfIHyq0yMh/YOkBgAAAGBuJJrU oofIwsq4z7VWEvZ92IypAQAAAEASSW368R+OX3XtPnemiLVS9zE53yOpAQAA AEiVJJLaJeuzGu1mu851vJdt9pGQfuA0jsaYGgAAAID08ZbU3rlIagAAAADm HknNHUkNAAAAwNwjqaUKSQ0AAAAA/MYkNV68ePHixYsXL168ePHi5avX/w++ chmq "], {{0, 522.}, {583., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{583., 522.}, PlotRange->{{0, 583.}, {0, 522.}}], Alignment->{Center, Center}, Appearance->Image[CompressedData[" 1:eJzdmsluHUUUhi3YsOQVeAu2WWYbxAMkwkTZGMlBQjwfHuV5xHgCD+Ah4JAw T3G+9I+Pzq3qLld3142dHCnRdd/q6v87Q3V3nfvBg8/uffrOyMjI4/f47979 L+6Mj9//8qP3+ePjscePHo6NfnJ37PPRh6PjHz54l4N3/v/36vPlcGx4Mw/b XuTZTcvM1dnNblD2f+3t9eC01fxvnrUlKqs/LfifPEtDFaHIV+6F/d3GmojS LP31x8pN0l/O/mw2PyzGiUG6UaSdX6vcFP7h7PdB818FRAFLOhzd9AfOD5QH gn+7sl8HzY4HUAFLTji66ffOrxUfK/9l0JpYApBEOHIoYoQm55t4L1tSn1/Z s0Gz457IWAykNhwdEJr0m/O9eJMtqT9X9rSyi4uLp870lScSiwfx4UhQ5OgX QqDfnG/KA8E/VfZjZU8GTQc1QGiGYyBBODxFnE75IfD65XyuKG8jQ4JReH5+ fnZ2dnp6enJy8kNl3w+aDvItYxgpKLEoKEzrC8RTZAbCIzTpl/MRj3LJRo/U Hh8fHx0dHR4eHhwcfFfZt4Omg3zLGAZzCjiwCIQ5fV4lKPogyP9ci4tyaTSg GUnI29/f39vb293d3dnZ2d7e/qayra2tryvbqkwH+ZYxjOQUiJgBELyBTzxF B4TMEBBxroX+pgWhgxEUUQSxyKSwd6sAoakEyFuSB/8XRCB8xIKEJLhW4wmK NIJfiIIUYkL8g6MIAX4riEBqkY0UFM4hxKLw1R0jGEUtgs+iIASqAoJODhdE oFioCwuEX6N8IGpzqQnBh0D6FQJmJmPJIq5YEGF9fZ3qJrIKRJBOTYHIRPAL KRMqi1gPyd6CCKurq+QSkWVmAqHVKQ5EBwS/kOrhgZm5BBHHaQURlpeXWXKV S2SpAuFXJzQEudSE4GvZZ5E9SKgQKD2cVhBhaWlpc3PTcikIRJBLQUU3IfhC UBUwlQqBSxBx7lAFERYWFjY2NrjfKZfiQCiXrBxqEdKFIAQm1B2BezFxL4gw Pz+/traGW5iZXMJLeoIKEJrKIY3gn+iEgJdIWpbBgghzc3NUtMqBXMJLtbnU FsHXshD0XIGXWI5I3YIIs7OzKysruIWZKTTLpRihtqIzEfRQbQikbkGEmZkZ FiVVdFwOOQhYLYIVgt4LmNBWVG5GBRGmpqYWFxeZk4WOctC6FDyEW0W3ioJH YKrXj+CfwPsjvAVR8AjUQlmE6elp7m7UlxBsXR0qQtlyNgTd3QoivEErUg7C m3hfeAvuzolnJGJ9C5+RLvOeVIf0sM2K2lQI+U+ql3nvC0N65aEQCCuF0P99 4dq3NuWSXhkKIvg7Qs+3trgcat96uArXovTIXhKANGZJJBlIaQqT5YVFkhvu 5OTkxMTEV1fGZ45wnG8Zw0jedDiRuyTzaC2KCznOohjBLIEQLK14SRT4jYzC gSxQeBIxLCyo4j61UJmgZHzWQb5lDCM5hRM5PVhLLQSZOxi1CPE+kg+EUXBR shcQNGgrlZQmLmhbqwydK1fGZx3kW8Yw0nZWpd8/2rXaR4oREoHwDxu2p63d bKpDO8O2Law94c3KbHPYtoUZqb1u7XJri9v0t9rNCxBqc8lv6BmFNue5rroJ 2pnXtnyw0S3jM0c4LuWMZLycn9Z/7Z5qE0KiueApLBwepLbF4JsLXjznKv8D /X325xMtKt9ZE4VehaxXIhC1SwxHmiVbnREv3vd6gi5Jol1Vqz8zEEZhjSr1 1+JelbWrzHRQXSoTH/TdCnZ5cii0RsUgYhGONx201mEgPrNL1QqhKZ2CurBG bZ+OZ5D/nTueiUA09Z2DpnPQwBXRhbOg+xy0nvv3nT1CgsInlQcJGuhGZBb8 DMB+AxA3aot0/4N08hRxOGp/xuB/yeA1xz9diJ3f5zcYaYracNy2X8IkKGrD cTt/jxQgpMMRswREsflhgfJrnZ+PkKbwIJ7F4+SYP9FP2OT8VvoTIAmWmChh 8Ylp5R3EpylilgRUrdWem7hWZ/2ZLAmitF07ZxHl3XD62PBkl6W7aZmvbKSc 9RfzEj7XSO4= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], BaseStyle->"Output", ContentPadding->False, FrameMargins->0]], "ExampleImage", CellMargins->{{49, 45}, {16, 5}}, TaggingRules->{"AttachedInlineCell" -> CellObject[171361]}, CellChangeTimes->{{3.815938295122986*^9, 3.815938295405979*^9}}, CellID->358060554] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Options", "Subsection", TaggingRules->{}, CellID->890561554], Cell[CellGroupData[{ Cell["PacletName", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.812346959244129*^9, 3.8123469664921303`*^9}}, CellID->900754557], Cell[TextData[{ "With the default setting ", Cell[BoxData[ RowBox[{"\"\\"", "->", TagBox[ ButtonBox[ StyleBox["Automatic", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Automatic", ContentPadding->False], MouseAppearanceTag["LinkHand"]]}]], "InlineFormula", FontFamily->"Source Sans Pro"], ", the paclet and context name will be based on the name of the resource \ function:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.812346967990383*^9, 3.812347009602317*^9}}, CellID->504465039], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8123470229137263`*^9, 3.8123470297532625`*^9}}, CellLabel->"In[17]:=", CellID->56201520], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorSearch\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorSearch\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\lukas\\\\AppData\\\\Roaming\\\\Mathematica\ \\\\Paclets\\\\Repository\\\\ColorSearch-1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ "\"Search for colors containing a given string\"", Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "ColorSearch", "Description" -> "Search for colors containing a given string", "Creator" -> "Wolfram Summer School", "URL" -> "https://resources.wolframcloud.com/FunctionRepository/resources/\ ColorSearch", "Version" -> "1.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Symbols/ColorSearch"}, { "Kernel", "Context" -> {"ColorSearch`"}, "Symbols" -> {"ColorSearch`ColorSearch"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\lukas\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\\\ ColorSearch-1.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.812347059994596*^9, 3.813846396084135*^9}, CellLabel->"Out[17]=", CellID->905858629] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Context", "@", "ColorSearch"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8123470454862447`*^9, 3.8123470648418627`*^9}}, CellLabel->"In[18]:=", CellID->952374195], Cell[BoxData["\<\"ColorSearch`\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{3.81234706537726*^9, 3.813846399292347*^9}, CellLabel->"Out[18]=", CellID->757211150] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107564], Cell["\<\ When pacletizing several functions, the default name is \ \"PacletizedResourceFunctions\":\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.812347187198048*^9, 3.8123472110552363`*^9}, { 3.813846414491728*^9, 3.8138464195106163`*^9}}, CellID->957756939], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.812347214694873*^9, 3.812347220478721*^9}}, CellLabel->"In[25]:=", CellID->255069346], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"PacletizedResourceFunctions1\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"PacletizedResourceFunctions1\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\lukas\\\\AppData\\\\Roaming\\\\Mathematica\ \\\\Paclets\\\\Repository\\\\PacletizedResourceFunctions1-1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ RowBox[{ "\"Contains the following collection of pacle\"", "\[Ellipsis]", "\" ResourceFunctions: ColorSearch, ColorToHex\""}], Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "PacletizedResourceFunctions1", "Description" -> "Contains the following collection of pacletized ResourceFunctions: \ ColorSearch, ColorToHex", "Creator" -> "Wolfram Summer School, Wolfram Research", "URL" -> "https://resources.wolframcloud.com/FunctionRepository/", "Version" -> "1.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Guides/PacletizedResourceFunctions1"}, { "Kernel", "Context" -> {"PacletizedResourceFunctions1`"}, "Symbols" -> { "PacletizedResourceFunctions1`ColorSearch", "PacletizedResourceFunctions1`ColorToHex"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\lukas\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\\\ PacletizedResourceFunctions1-1.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.8123474660915594`*^9, 3.812347528827813*^9, 3.813846415956976*^9, 3.8138465074443426`*^9}, CellLabel->"Out[25]=", CellID->993904691] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107565], Cell["Specify an alternative name:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8123470971554794`*^9, 3.8123471023887787`*^9}}, CellID->982795675], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"\"\\"", ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8123471111532497`*^9, 3.81234711693395*^9}}, CellLabel->"In[26]:=", CellID->814935235], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"MyPaclet\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"MyPaclet\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\lukas\\\\AppData\\\\Roaming\\\\Mathematica\ \\\\Paclets\\\\Repository\\\\MyPaclet-1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ "\"Search for colors containing a given string\"", Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "MyPaclet", "Description" -> "Search for colors containing a given string", "Creator" -> "Wolfram Summer School", "URL" -> "https://resources.wolframcloud.com/FunctionRepository/resources/\ ColorSearch", "Version" -> "1.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Symbols/ColorSearch"}, { "Kernel", "Context" -> {"MyPaclet`"}, "Symbols" -> {"MyPaclet`ColorSearch"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\lukas\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\\\ MyPaclet-1.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.812347145259123*^9, 3.8138465174788475`*^9}, CellLabel->"Out[26]=", CellID->960210313] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Context", "@", "ColorSearch"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.812347162419362*^9, 3.8123471688897657`*^9}}, CellLabel->"In[27]:=", CellID->840197940], Cell[BoxData["\<\"MyPaclet`\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{3.8123471695158997`*^9, 3.8138465176298475`*^9}, CellLabel->"Out[27]=", CellID->628768292] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["ShowProgress", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.8123474187265477`*^9, 3.812347421458686*^9}}, CellID->278316992], Cell[TextData[{ "With the default setting ", Cell[BoxData[ RowBox[{"\"\\"", "->", TagBox[ ButtonBox[ StyleBox["True", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/True", ContentPadding->False], MouseAppearanceTag["LinkHand"]]}]], "InlineFormula", FontFamily->"Source Sans Pro"], ", the current stage of the process is displayed:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.8123474231290326`*^9, 3.812347467384897*^9}, 3.812348950485141*^9}, CellID->334620419], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->868601298], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnU+u2zYQhx/aTZe9Qm9RaNdltyl6gBSNg25SICkQ9BY+jVa5ifa9hivJ lkSRM+SMTL9n2d8HtMiTKf4Xf+RwRP30x9/vDt+9vLx8+aH/37v3X3/5/Pn9 v7/92P/x+6cvf3389OHPXz/98+Hjh88///F9f7Hp//vahx/+fYIs7WGoreZw 7N46J/D6dO3x0AwdYKLZVz+g9wLAXdMdm32OrnA9S+Pfl8iOym/JCb0X4E4Q RpOmaQ5tx5PJWuBpaQ8XfWrvrOnPGTPpJr0X4C6QpuwXrT20b505gLfg/FDc 4xLQIbIAcBek48nZIjWCzMIzcpaye+z9iCzA3lAm7Rd7WTDOjFfO4bp29ggR rVGBTI/WZ934vHYu6UNK9rkguUtsSlyhn4oarhzsUvYFabQ919vwS1jaRjYw rtMMrQXe0dLRCnXrrdimckcSrnqKULeHmMmLrLGkrh5yypY06ZGZDmrqvUGK 5Ta1FsH4AAI8GYrIXqzIwfVpbGwPsVysb05/FwJlQkZjgji+pJHVDOYR2aNg bU9KoBnkrxDZUivUrTdLm7pFtliEuj2kiFnJfCJr6CHFkt5CZO1taipCrVYA eDh8Ijs/POdJ6rShuzxxk8fIMoudB9N1GtOt4YS9G+bLxzYNlMYmRhZMnceo 4sWRMZhwg/rTqrBpdQhF6FNMQ5mxtULderO1qU9ki0Wo3EMM3EZkyz3EWNIw k7ayZXqvq00NRXA/WQDPQ27EWF2ex6CVFWj90GuPdTo0pOZob97S2XtRtdxb bRaRXf2YFFSMITf6mYqQb4W69WZtU7/I5opQu4f4qGguLvYQY0n121X0avC1 qbkI97iJDfDm5ByfSo9WfLv+VMc3m8YKzcdTyPK8FMi+emQMltygi6x1pK0s svlkq9abuU2dIlsKWLmH+KgosuUKcfkyVRHZ+m3qfrIAngf1FR55pzIrDPoI ED2XtkEwb79L9iCDcsjuMY5gq2xfI7K3MRfnb61ab1e2qSqyhdLfoIc4eE2R 9U0Iqohs/TY9eZ8sgOchFVnFg/PORXaMdn0Qnu5fbAp2qiKyWjE2mtaqi+yY 60yFILLGvD27yI6/mJ8sgOfB/IwbxkY9rvjmigOtdKPibOUOVkFkLwPaYZnn X3Weln0XtVK9mdu0rsjeuIcUeANzsXHSVdFcXLNN4wRsDyDAU1BTZDUXjtSN SnCs2pikhnHfMx/sepENXgqtgqlKqtabtU2lupq36vwie/sesjlaY0mdGwq2 TlLH8cnXpn6RzacO8FxUFdmVA8R0qZXcqGYrdRO7/YevLcwvGoT26zHU6szH bvj7GC4Pp43PyDvDFCzN5XaRnYetPtUqHiGeZWClerO2aXTeb/ge7BZP1Ko9 xEkhi7aSur2G8iVdh7WcqlzsvcU2tc8T7E9W18onWXSyeUe7DrAb6oqstMeb DrNThGJI+RXCbDAtUGOLKwqW2+hzT/J1v7JtriHWpVvNerO2qRCsOR6Tpbx9 9VmvhzgpZdFU0s1eQ/kiSN0zPphNQZo6ZYK4F+NpbMqRFclooFxfvAbTegDY C7VF9hS7Pyh+VEJIJWj8XU8plCWMNVhVkV3Gz6ZJT1b0Dx4O+2jFerO26bB+ mQJdgqT2cpeJt1oPcVHOoqGkTlurqaRSyJdNIpvEI3YPcxGMTYDIAkBVtP22 7qiMNgAPTaebi5XZHeZiANDQd8Vc3i4AAAAQE/qXrPxyeMEBAADgWhxbZAAA AOAk9VO52jEHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAPbFNwCAnfDW4+UjkHwWTPjYNcScv1m66bNpfb/9DwDg7kFk q4DIbgGRBYBHZ4vIdl0bfGWyaQ72D0z2N8pD6vjlylt9D7ofzDXRi76Yef3n Ms/C8WoiWz3/r4lLZNeNiMgCwC5wi+xFRCJUEYvvjUfUtWDfRGSFVOcfhKJc mYNXFFkt/7tZRjtXsuEMDZEFgF3gFNlpXG/m9dIgksaRXVhQzmbWYTl8/qO2 yPaxSlmbFWpIeU6xG1aGh12I7NwUoSFhzL9txnMHeM3F7VI0RBYAdoFPZC+a GA3il+G+NFiKpuJh3JwE+xYiO+RN0JxlsmBIbDFlXyyygSprMes6Z4htrIhz 1oKFfrMSf2OlL6mWLfydxfZsyVtU2EaLMBDZbqkULa5TaJRAZAFgF7hEVlbB eU2YXUBl9kXz0V+FYip2KFR7EG2y6q15kbXFNglZGnoJ6BHZxC0r24zX5y1b 2KBmJpE9JvlTizXZJRBZANgFHpEVrHurkTk34LcGI2Z9ke1jvE5jL/IUrPxm ddE8uDIia40tFMXJMD/V9BzxYu/OuzotN8aJrkswrCWHheZiOp+ysSqLKW/B tXDxOi6Vj7HIrutEiiuqw+EnRBYAdoFHZCMRDASiLdlIVa/iTPzXo2ised9U C5fLqB63PbZZyFZW3SRcOMNRjdjyvqexBoSCGvMmbyyIeZNlvLCWRWQBYBf4 RXYcEBeBPY+1wU/yYGrxxaktssp+rFEBckqUyal6kyO2nFk+urre4Y3coLSb MteLoWx5szVlbgKQs8f3vyGyALALtqxk29SvNSuypmXsqb7IagtZq8jq+cno gKqljtjyUxaJ1ZtQ4YxG3I5dJDlW7D6SdB9VENlC3oxuw5tE9ryURWQBYBf4 92SngTzdmlXtp0bdvIHIymJgdofejciuEw/utYusHhKRBQDYyAbvYt8On9FU vET/CiI7eyDlk9JH+4zSFMzFptg2i+wpWaVbX0VdnJzWzlCKudhmBLDZ4xFZ AHhctrwn69FYq6lYj307mTW06DirhYoDZRfCpa1XS2zXi2y8O2rcfo6LdN55 3yCyNlvB1j1ZRBYA9oLzxKfkJZRu3qBVbKcOzbyFd3HGF2syhkYnPh0CS7hw qlLphKvMjMMcm0XI+nofX7gJjfbiC0Fzkx1zJ0PFa/sueBF2g8iuD9RapZq8 woPjEwA8Lu6zi+UTBjQHI+MBFArXHg+ouhfPv4qEhVECSSc0KPhjs4msnqT1 mIlVCvKBFc3Glew5pJiscBiFR2Qv8zZEFgB2waav8LSZo/LWo6x5L7AoApvI q+wpPvZvEJX0ddP80YDFUkjv3BRqz2iSHWMKDwPR2yIqp5huevJiFx6i6Mqb nGzmWMVT6ery4/gLIgsAu+B235N1eDzdkIzFGPbHvP+AyALALriZyN6Hxt5P PqACy/4DIgsAu+B2K9l7wed8BfdL2JKILADsgscXWRazD8KqGRFZANgFzyCy gwNO9kM1sAO6LmxDRBYAdsFziCw8Gt8AAHbCW4+XAG7+B2Tjlhs= "], {{0, 29.}, {315.5, 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{315.5, 29.}, PlotRange->{{0, 315.5}, {0, 29.}}]], "Print", TaggingRules->{}, CellID->937137117], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxOpener"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorSearch\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource["FEBitmaps", "SummaryBoxCloser"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorSearch\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\rhennigan\\\\AppData\\\\Roaming\\\\\ Mathematica\\\\Paclets\\\\Repository\\\\ColorSearch-1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ "\"Search for colors containing a given string\"", Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "ColorSearch", "Description" -> "Search for colors containing a given string", "Creator" -> "Wolfram Summer School", "URL" -> "https://www.wolframcloud.com/obj/resourcesystem/published/\ FunctionRepository/resources/ColorSearch", "Version" -> "1.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Symbols/ColorSearch"}, { "Kernel", "Context" -> {"ColorSearch`"}, "Symbols" -> {"ColorSearch`ColorSearch"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\rhennigan\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\ \\ColorSearch-1.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.8159380002267923`*^9}, CellLabel->"Out[1]=", CellID->818926965] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107566], Cell["Disable the progress display:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8123476524389935`*^9, 3.8123476630013156`*^9}}, CellID->125923766], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"\"\\"", ",", RowBox[{"\"\\"", "\[Rule]", "False"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.812347669980344*^9, 3.8123476743058043`*^9}}, CellLabel->"In[8]:=", CellID->612437113], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PacletObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorSearch\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, BaseStyle -> {}, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ Thickness[0.0416667], { FaceForm[{ RGBColor[0.961, 0.961, 0.961], Opacity[1.]}], FilledCurveBox[{{{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, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.5454, 22.5972}, {7.5464, 20.5002}, {2.5454, 18.4022}, {2.5454, 12.5982}, {2.5454, 12.5972}, {2.5454, 6.7952}, {7.5454, 4.6962}, {7.546, 4.6972}, {12.5454, 2.5992}, {17.5454, 4.6972}, {17.5454, 4.6962}, {22.5454, 6.7952}, {22.5454, 12.5972}, {22.5454, 12.5982}, {22.5454, 18.4022}}}]}, { FaceForm[{ RGBColor[0.898, 0.898, 0.898], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 8.3359}, {17.125, 14.0569}, {16.875, 14.0569}, {16.875, 8.3359}, {17., 8.1169}, {21.952, 6.0399}, {22.049, 6.2709}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 8.3359}, {7.125, 14.0569}, { 6.875, 14.0569}, {6.875, 8.3359}, {1.952, 6.2709}, {2.048, 6.0399}, {7., 8.1169}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8745, 6.2383}, {6.9515, 4.1733}, {7.0475, 3.9423}, {11.9995, 6.0193}, {16.9515, 3.9423}, {17.0475, 4.1733}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{17.125, 14.1392}, {17.125, 19.8602}, {16.875, 19.8602}, {16.875, 14.1392}, {17., 13.9202}, {21.952, 11.8432}, {22.049, 12.0742}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{7.125, 14.1392}, {7.125, 19.8602}, { 6.875, 19.8602}, {6.875, 14.1392}, {1.952, 12.0742}, {2.048, 11.8432}, {7., 13.9202}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.8746, 21.3633}, {11.8746, 18.3563}, { 11.9996, 18.3033}, {12.1246, 18.3563}, {12.1246, 21.3633}, { 11.9996, 21.4153}}}]}, { FaceForm[{ RGBColor[0.749, 0.749, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}}}, {{{8.292, 19.8594}, {12., 21.4154}, {15.707, 19.8594}, {12., 18.3034}}, {{17.5, 19.5274}, {17.5, 20.1924}, {12., 22.5004}, {6.5, 20.1924}, {6.5, 19.5284}, { 12., 17.2194}, {12., 17.2194}, {15.7, 18.7724}, {17.5, 19.5274}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{11.5, 8.5156}, {11.5, 6.4876}, {11.5, 5.4026}, {12.5, 5.8226}, {12.5, 8.5156}, {12., 8.3056}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{21.5, 6.4873}, {17.5, 4.8083}, {17.5, 9.5283}, {21.5, 11.2073}}, {{21.5, 12.7113}, {21.5, 12.2913}, {17., 10.4033}, {16.5, 10.6133}, {16.5, 10.1943}, { 15.707, 9.8613}, {16.5, 9.5283}, {16.5, 4.8083}, {16.5, 4.8093}, {16.5, 4.3903}, {15.707, 4.0573}, {17., 3.5143}, { 22.5, 5.8223}, {22.5, 12.2913}}}], FilledCurveBox[{{{0, 2, 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, 1, 0}, {0, 1, 0}}}, {{{6.5, 4.8086}, {2.5, 6.4876}, {2.5, 11.2066}, {6.5, 9.5286}}, {{7.5, 9.1096}, {7.5, 9.1096}, { 7.5, 9.5286}, {8.292, 9.8616}, {7.5, 10.1936}, {7.5, 10.6136}, {7., 10.4036}, {2.5, 12.2906}, {2.5, 12.7106}, { 1.5, 12.2916}, {1.5, 5.8226}, {7., 3.5146}, {8.293, 4.0576}, {7.5, 4.3906}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{3.2925, 17.7622}, {7.0005, 19.3182}, {10.7075, 17.7622}, {7.0005, 16.2062}}, {{6.5005, 10.6122}, {2.5005, 12.2912}, {2.5005, 17.0102}, {6.5005, 15.3322}}, {{7.5005, 10.1932}, {7.5005, 10.6122}, {7.5005, 15.3322}, {12.0005, 17.2202}, {12.5005, 17.0102}, {12.5005, 18.0952}, {7.0005, 20.4032}, {1.5005, 18.0952}, {1.5005, 11.6262}, {7.0005, 9.3182}, {8.2935, 9.8612}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{21.5, 12.291}, {17.5, 10.612}, { 17.5, 15.332}, {21.5, 17.01}}, {{13.293, 17.762}, {17., 19.318}, {20.708, 17.762}, {17., 16.207}}, {{17., 20.403}, { 11.5, 18.095}, {11.5, 17.01}, {12., 17.22}, {16.5, 15.332}, { 16.5, 10.612}, {16.5, 10.194}, {15.706, 9.861}, {17., 9.318}, {22.5, 11.626}, {22.5, 18.095}}}], 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, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}}}, {{{16.4995, 4.3906}, {12.4995, 2.7116}, {12.4995, 7.4316}, {16.4995, 9.1096}}, {{11.4995, 2.7116}, {7.4995, 4.3906}, {7.4995, 9.1096}, {11.4995, 7.4316}}, {{16.4995, 10.6136}, {16.4995, 10.1946}, {11.9995, 8.3056}, {8.2915, 9.8616}, {7.4995, 10.1936}, {7.4995, 10.6146}, {6.4995, 10.1946}, {6.4995, 3.7256}, {11.9995, 1.4176}, {17.4995, 3.7256}, {17.4995, 10.1946}}}]}, { FaceForm[{ RGBColor[0.965, 0.765, 0.749], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {{{12., 17.6616}, {16.945, 15.5856}, {16.945, 9.9376}, {12., 7.8636}, {7.055, 9.9376}, {7.055, 15.5856}}}]}, { FaceForm[{ RGBColor[0.91, 0.655, 0.635], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{12.125, 17.7627}, {11.875, 17.7627}, {11.875, 12.0407}, {6.952, 9.9757}, {7.048, 9.7447}, {12., 11.8227}, {16.952, 9.7447}, { 17.048, 9.9757}, {12.125, 12.0407}}}]}, { FaceForm[{ RGBColor[0.867, 0.067, 0.], Opacity[1.]}], 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, 1, 0}, {0, 1, 0}}}, {{{12.5, 8.5146}, {12.5, 13.2336}, {16.5, 14.9116}, { 16.5, 10.1926}}, {{7.5, 14.9116}, {11.5, 13.2336}, {11.5, 8.5146}, {7.5, 10.1926}}, {{15.708, 15.6636}, {12., 14.1086}, {8.292, 15.6636}, {12., 17.2206}}, {{12., 18.3046}, {6.5, 15.9956}, {6.5, 9.5286}, {12., 7.2206}, { 17.5, 9.5286}, {17.5, 15.9956}}}]}}, AspectRatio -> Automatic, ImageSize -> {24., 24.}, PlotRange -> {{0., 24.}, {0., 24.}}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ColorSearch\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Location: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"C:\\\\Users\\\\lukas\\\\AppData\\\\Roaming\\\\Mathematica\ \\\\Paclets\\\\Repository\\\\ColorSearch-1.0.0\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ "\"Search for colors containing a given string\"", Short], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], PacletObject[ Association[ "Name" -> "ColorSearch", "Description" -> "Search for colors containing a given string", "Creator" -> "Wolfram Summer School", "URL" -> "https://resources.wolframcloud.com/FunctionRepository/resources/\ ColorSearch", "Version" -> "1.0.0", "MathematicaVersion" -> "11.3+", "Extensions" -> {{ "Documentation", "Language" -> "English", "MainPage" -> "ReferencePages/Symbols/ColorSearch"}, { "Kernel", "Context" -> {"ColorSearch`"}, "Symbols" -> {"ColorSearch`ColorSearch"}}}, "Loading" -> Automatic, "Location" -> "C:\\Users\\lukas\\AppData\\Roaming\\Mathematica\\Paclets\\Repository\\\ ColorSearch-1.0.0"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.8123476987086887`*^9}, CellLabel->"Out[8]=", CellID->784603311] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Possible Issues", "Subsection", TaggingRules->{}, CellID->158766396], Cell["\<\ Locally created resource functions cannot be pacletized since the definition \ notebook cannot be accessed:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.812346772209038*^9, 3.8123468135695543`*^9}, { 3.813582478572628*^9, 3.813582479290304*^9}, 3.8183300274953327`*^9}, CellID->649054993], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"rf", "=", RowBox[{"DefineResourceFunction", "[", RowBox[{ RowBox[{"#", "&"}], ",", "\"\\""}], "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8123468163300943`*^9, 3.8123468400835905`*^9}, { 3.812347694445937*^9, 3.812347695149337*^9}}, CellLabel->"In[30]:=", CellID->208047600], Cell[BoxData[ InterpretationBox[ TagBox[ FrameBox[ PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->GrayLevel[0.15]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.65 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["\<\"LocalRF\"\>", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->0.9 Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], Background->RGBColor[0.968627, 0.976471, 0.984314], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 1}}, FrameStyle->RGBColor[0.831373, 0.847059, 0.85098], RoundingRadius->4], {"FunctionResourceBox", GrayLevel[0.15], "\"LocalRF\""}, TagBoxNote->"FunctionResourceBox"], ResourceFunction[ ResourceObject[ Association[ "Name" -> "LocalRF", "ShortName" -> "LocalRF", "ResourceType" -> "Function", "UUID" -> "380a4d1c-ee37-47cf-bd6f-03c3ebf2b682", "FunctionLocation" -> None, "SymbolName" -> "FunctionRepository`$380a4d1cee3747cfbd6f03c3ebf2b682`LocalRF", "Version" -> None]]], Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.812346832159754*^9, 3.8123468410024133`*^9}, 3.813846534033641*^9}, CellLabel->"Out[30]=", CellID->491415459] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", "rf", "]"}]], "Input", TaggingRules->{}, CellLabel->"In[31]:=", CellID->761481734], Cell[BoxData[ TemplateBox[{ "ResourceObject", "apierr", "\"\\!\\(\\*RowBox[{\\\"\\\\\\\"The definition notebook for this resource \ is not available.\\\\\\\"\\\"}]\\)\"", 2, 31, 1, 27279100130935867611, "Local"}, "MessageTemplate"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{3.8123468424171276`*^9, 3.8138465361032968`*^9}, CellLabel->"During evaluation of In[31]:=", CellID->31955501], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Failure", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The definition of \ \\!\\(\\*InterpretationBox[TagBox[FrameBox[PaneBox[GridBox[{{StyleBox[\ StyleBox[AdjustmentBox[\\\"\\\\\\\"[\[FilledSmallSquare]]\\\\\\\"\\\", \ Rule[BoxBaselineShift, -0.25`], Rule[BoxMargins, List[List[0, 0], List[-1, \ -1]]]], \\\"ResourceFunctionIcon\\\", Rule[FontColor, GrayLevel[0.15`]]], \ Rule[ShowStringCharacters, False], Rule[FontFamily, \\\"Source Sans Pro Black\ \\\"], Rule[FontSize, Times[0.65`, Inherited]], Rule[FontWeight, \ \\\"Heavy\\\"], Rule[PrivateFontOptions, List[Rule[\\\"OperatorSubstitution\\\ \", False]]]], StyleBox[RowBox[{StyleBox[\\\"\\\\\\\"LocalRF\\\\\\\"\\\", \ \\\"ResourceFunctionLabel\\\"], \\\" \\\"}], Rule[ShowAutoStyles, False], \ Rule[ShowStringCharacters, False], Rule[FontSize, Times[0.9`, Inherited]], \ Rule[FontColor, GrayLevel[0.1`]]]}}, Rule[GridBoxSpacings, \ List[Rule[\\\"Columns\\\", List[List[0.25`]]]]]], Rule[Alignment, Left], \ Rule[BaseStyle, List[Rule[LineSpacing, List[0, 0]], Rule[LineBreakWithin, \ False]]], Rule[BaselinePosition, Baseline], Rule[FrameMargins, List[List[3, \ 0], List[0, 0]]]], Rule[Background, RGBColor[0.968627`, 0.976471`, \ 0.984314`]], Rule[BaselinePosition, Baseline], Rule[DefaultBaseStyle, \ List[]], Rule[FrameMargins, List[List[0, 0], List[1, 1]]], Rule[FrameStyle, \ RGBColor[0.831373`, 0.847059`, 0.85098`]], Rule[RoundingRadius, 4]], \ List[\\\"FunctionResourceBox\\\", GrayLevel[0.15`], \\\"\\\\\\\"LocalRF\\\\\\\ \"\\\"], Rule[TagBoxNote, \\\"FunctionResourceBox\\\"]], \ ResourceFunction[ResourceObject[Association[Rule[\\\"Name\\\", \ \\\"LocalRF\\\"], Rule[\\\"ShortName\\\", \\\"LocalRF\\\"], \ Rule[\\\"ResourceType\\\", \\\"Function\\\"], Rule[\\\"UUID\\\", \ \\\"380a4d1c-ee37-47cf-bd6f-03c3ebf2b682\\\"], Rule[\\\"FunctionLocation\\\", \ None], Rule[\\\"SymbolName\\\", \ \\\"FunctionRepository`$380a4d1cee3747cfbd6f03c3ebf2b682`LocalRF\\\"], \ Rule[\\\"Version\\\", None]]]], Rule[Selectable, False]]\\) could not be \ obtained\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"PacletizeFailed\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The definition of \ \\!\\(\\*InterpretationBox[TagBox[FrameBox[PaneBox[GridBox[{{StyleBox[\ StyleBox[AdjustmentBox[\\\"\\\\\\\"[\[FilledSmallSquare]]\\\\\\\"\\\", \ Rule[BoxBaselineShift, -0.25`], Rule[BoxMargins, List[List[0, 0], List[-1, \ -1]]]], \\\"ResourceFunctionIcon\\\", Rule[FontColor, GrayLevel[0.15`]]], \ Rule[ShowStringCharacters, False], Rule[FontFamily, \\\"Source Sans Pro Black\ \\\"], Rule[FontSize, Times[0.65`, Inherited]], Rule[FontWeight, \ \\\"Heavy\\\"], Rule[PrivateFontOptions, List[Rule[\\\"OperatorSubstitution\\\ \", False]]]], StyleBox[RowBox[{StyleBox[\\\"\\\\\\\"LocalRF\\\\\\\"\\\", \ \\\"ResourceFunctionLabel\\\"], \\\" \\\"}], Rule[ShowAutoStyles, False], \ Rule[ShowStringCharacters, False], Rule[FontSize, Times[0.9`, Inherited]], \ Rule[FontColor, GrayLevel[0.1`]]]}}, Rule[GridBoxSpacings, \ List[Rule[\\\"Columns\\\", List[List[0.25`]]]]]], Rule[Alignment, Left], \ Rule[BaseStyle, List[Rule[LineSpacing, List[0, 0]], Rule[LineBreakWithin, \ False]]], Rule[BaselinePosition, Baseline], Rule[FrameMargins, List[List[3, \ 0], List[0, 0]]]], Rule[Background, RGBColor[0.968627`, 0.976471`, \ 0.984314`]], Rule[BaselinePosition, Baseline], Rule[DefaultBaseStyle, \ List[]], Rule[FrameMargins, List[List[0, 0], List[1, 1]]], Rule[FrameStyle, \ RGBColor[0.831373`, 0.847059`, 0.85098`]], Rule[RoundingRadius, 4]], \ List[\\\"FunctionResourceBox\\\", GrayLevel[0.15`], \\\"\\\\\\\"LocalRF\\\\\\\ \"\\\"], Rule[TagBoxNote, \\\"FunctionResourceBox\\\"]], \ ResourceFunction[ResourceObject[Association[Rule[\\\"Name\\\", \ \\\"LocalRF\\\"], Rule[\\\"ShortName\\\", \\\"LocalRF\\\"], \ Rule[\\\"ResourceType\\\", \\\"Function\\\"], Rule[\\\"UUID\\\", \ \\\"380a4d1c-ee37-47cf-bd6f-03c3ebf2b682\\\"], Rule[\\\"FunctionLocation\\\", \ None], Rule[\\\"SymbolName\\\", \ \\\"FunctionRepository`$380a4d1cee3747cfbd6f03c3ebf2b682`LocalRF\\\"], \ Rule[\\\"Version\\\", None]]]], Rule[Selectable, False]]\\) could not be \ obtained\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"PacletizeFailed\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Failure["PacletizeFailed", Association[ "MessageTemplate" -> "The definition of `rf` could not be obtained", "MessageParameters" -> Association[ "rf" -> "\!\(\*InterpretationBox[TagBox[FrameBox[PaneBox[GridBox[{{\ StyleBox[StyleBox[AdjustmentBox[\"\\\"[\[FilledSmallSquare]]\\\"\", \ Rule[BoxBaselineShift, -0.25`], Rule[BoxMargins, List[List[0, 0], List[-1, \ -1]]]], \"ResourceFunctionIcon\", Rule[FontColor, GrayLevel[0.15`]]], \ Rule[ShowStringCharacters, False], Rule[FontFamily, \"Source Sans Pro \ Black\"], Rule[FontSize, Times[0.65`, Inherited]], Rule[FontWeight, \ \"Heavy\"], Rule[PrivateFontOptions, List[Rule[\"OperatorSubstitution\", \ False]]]], StyleBox[RowBox[{StyleBox[\"\\\"LocalRF\\\"\", \ \"ResourceFunctionLabel\"], \" \"}], Rule[ShowAutoStyles, False], \ Rule[ShowStringCharacters, False], Rule[FontSize, Times[0.9`, Inherited]], \ Rule[FontColor, GrayLevel[0.1`]]]}}, Rule[GridBoxSpacings, \ List[Rule[\"Columns\", List[List[0.25`]]]]]], Rule[Alignment, Left], \ Rule[BaseStyle, List[Rule[LineSpacing, List[0, 0]], Rule[LineBreakWithin, \ False]]], Rule[BaselinePosition, Baseline], Rule[FrameMargins, List[List[3, \ 0], List[0, 0]]]], Rule[Background, RGBColor[0.968627`, 0.976471`, \ 0.984314`]], Rule[BaselinePosition, Baseline], Rule[DefaultBaseStyle, \ List[]], Rule[FrameMargins, List[List[0, 0], List[1, 1]]], Rule[FrameStyle, \ RGBColor[0.831373`, 0.847059`, 0.85098`]], Rule[RoundingRadius, 4]], \ List[\"FunctionResourceBox\", GrayLevel[0.15`], \"\\\"LocalRF\\\"\"], \ Rule[TagBoxNote, \"FunctionResourceBox\"]], \ ResourceFunction[ResourceObject[Association[Rule[\"Name\", \"LocalRF\"], \ Rule[\"ShortName\", \"LocalRF\"], Rule[\"ResourceType\", \"Function\"], Rule[\ \"UUID\", \"380a4d1c-ee37-47cf-bd6f-03c3ebf2b682\"], \ Rule[\"FunctionLocation\", None], Rule[\"SymbolName\", \ \"FunctionRepository`$380a4d1cee3747cfbd6f03c3ebf2b682`LocalRF\"], \ Rule[\"Version\", None]]]], Rule[Selectable, False]]\)"]]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.812346832159754*^9, 3.812346843291051*^9}, 3.813846536233859*^9}, CellLabel->"Out[31]=", CellID->203442567] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107567], Cell["\<\ If multiple instances of Mathematica are running, removal of the paclet might \ be delayed until the next restart:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.8123555827072783`*^9, 3.812355623166007*^9}, { 3.812355691868413*^9, 3.812355700109725*^9}, {3.8135824899327507`*^9, 3.8135824933769293`*^9}, {3.814471000732939*^9, 3.8144710077462635`*^9}}, CellID->553092305], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", RowBox[{"PacletUninstall", ",", "\"\\""}], "]"}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.812355704461569*^9, 3.8123557356777935`*^9}}, CellLabel->"In[16]:=", CellID->645494305], Cell[BoxData[ TemplateBox[{ "System`PacletUninstall", "open", "\"Some files could not be deleted from paclet named \\!\\(\\*RowBox[{\\\"\ \\\\\\\"AbundantNumber\\\\\\\"\\\"}]\\) at location \\!\\(\\*RowBox[{\\\"\\\\\ \\\"C:\\\\\\\\\\\\\\\\Users\\\\\\\\\\\\\\\\lukas\\\\\\\\\\\\\\\\AppData\\\\\\\ \\\\\\\\\\Roaming\\\\\\\\\\\\\\\\Mathematica\\\\\\\\\\\\\\\\Paclets\\\\\\\\\\\ \\\\\\Repository\\\\\\\\\\\\\\\\AbundantNumber-1.0.0\\\\\\\"\\\"}]\\), \ probably because they are open in the current session. The deletion will \ automatically complete the next time the Wolfram Language kernel is \ started.\"", 2, 16, 8, 16807097779766840845, "Local"}, "MessageTemplate"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{3.812355817507824*^9, 3.8123558667243443`*^9}, CellLabel->"During evaluation of In[16]:=", CellID->745804005] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107568], Cell["\<\ Similarly, attempting to update an existing paclet might fail in such cases:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.812356026020666*^9, 3.812356045305588*^9}}, CellID->129235781], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PacletizeResourceFunction", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.812355879972839*^9, 3.812355911925878*^9}, { 3.8123560139982595`*^9, 3.8123560201444235`*^9}}, CellID->561681313], Cell[BoxData[ TemplateBox[{ "System`PacletUninstall", "open", "\"Some files could not be deleted from paclet named \\!\\(\\*RowBox[{\\\"\ \\\\\\\"PerfectPower\\\\\\\"\\\"}]\\) at location \\!\\(\\*RowBox[{\\\"\\\\\\\ \"C:\\\\\\\\\\\\\\\\Users\\\\\\\\\\\\\\\\lukas\\\\\\\\\\\\\\\\AppData\\\\\\\\\ \\\\\\\\Roaming\\\\\\\\\\\\\\\\Mathematica\\\\\\\\\\\\\\\\Paclets\\\\\\\\\\\\\ \\\\Repository\\\\\\\\\\\\\\\\PerfectPower-1.0.0\\\\\\\"\\\"}]\\), probably \ because they are open in the current session. The deletion will automatically \ complete the next time the Wolfram Language kernel is started.\"", 2, 19, 10, 16807097779766840845, "Local"}, "MessageTemplate"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{3.8123559957774143`*^9}, CellLabel->"During evaluation of In[19]:=", CellID->392220818], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Failure", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"Failed to uninstall previous versions of the paclet \ PerfectPower, will not install latest version.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"UninstallFailed\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"Failed to uninstall previous versions of the paclet \ PerfectPower, will not install latest version.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"UninstallFailed\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Failure["UninstallFailed", Association[ "MessageTemplate" -> "Failed to uninstall previous versions of the paclet `PacletName`, will \ not install latest version.", "MessageParameters" -> Association["PacletName" -> "PerfectPower"]]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.8123558951015778`*^9, 3.812355926587836*^9, 3.8123559962714157`*^9}, CellLabel->"Out[19]=", CellID->260776972] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Source & Additional Information", "Section", Editable->False, Deletable->False, CellTags->"Source & Additional Information", CellID->346918952], 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoContributedBy"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Text", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->605210913], Cell["Lukas Lang", "Text", CellID->805077012] }, 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoKeywords"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Item", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->550320615], Cell["ResourceFunction to paclet", "Item", CellID->485138958], Cell["Local documentation", "Item", CellID->278784059], Cell["ResourceFunction to symbol", "Item", CellID->357041994] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Item", CellTags->{"Categories", "TemplateCellGroup"}, CellID->63169632], Cell[BoxData[ TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Core Language & Structure"}], "\" \"", "\"Core Language & Structure\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Interfaces & Connections"}], "\" \"", "\"External Interfaces & Connections\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data & Computation"}], "\" \"", "\"Geographic Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometry"}], "\" \"", "\"Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Higher Mathematical Computation"}], "\" \"", "\"Higher Mathematical Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Just For Fun"}], "\" \"", "\"Just For Fun\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Knowledge Representation & Natural Language"}], "\" \"", "\"Knowledge Representation & Natural Language\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Machine Learning"}], "\" \"", "\"Machine Learning\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Documents & Presentation"}], "\" \"", "\"Notebook Documents & Presentation\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ "Programming Utilities", {False, "Programming Utilities"}], "\" \"", "\"Programming Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["Repository Tools", {False, "Repository Tools"}], "\" \"", "\"Repository Tools\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Scientific and Medical Data & Computation"}], "\" \"", "\"Scientific and Medical Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Social, Cultural & Linguistic Data"}], "\" \"", "\"Social, Cultural & Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sound"}], "\" \"", "\"Sound\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Strings & Text"}], "\" \"", "\"Strings & Text\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Symbolic & Numeric Computation"}], "\" \"", "\"Symbolic & Numeric Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "System Operation & Setup", {False, "System Operation & Setup"}], "\" \"", "\"System Operation & Setup\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Time-Related Computation"}], "\" \"", "\"Time-Related Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "User Interface Construction"}], "\" \"", "\"User Interface Construction\""}, "RowDefault"], StripOnInput->False, FontSize->12], StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Visualization & Graphics"}], "\" \"", "\"Visualization & Graphics\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram Physics Project"}], "\" \"", "\"Wolfram Physics Project\""}, "RowDefault"], StripOnInput->False, FontSize->12], "\<\"\"\>"} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, ColumnsEqual->True, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{}, RowsEqual->True], "Grid"]], "Output", Editable->False, Deletable->False, CellTags->"CategoriesCell", CellID->732517034] }, 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedSymbols"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Item", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->822678636], Cell["ResourceFunction", "Item", CellID->59576503], Cell["PacletObject", "Item", CellID->664570986], Cell["PacletInstall", "Item", CellID->543676518], Cell["PacletUninstall", "Item", CellID->496238230], Cell["LocalCache", "Item", CellID->351751699] }, 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedResourceObjects"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Item", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->740191071], Cell["PersistResourceFunction", "Item", CellID->468392591], Cell["GitHubInstall", "Item", CellID->693173644], Cell["Pacletize", "Item", CellID->549278319], Cell["ResourceFunctionDefinitionViewer", "Item", CellID->356563292], Cell["DefinitionData", "Item", CellID->128372319] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Source/Reference Citation", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Source/Reference Citation", Cell[ BoxData[ FrameBox[ Cell[ "Give a bibliographic-style citation for the original source of the \ function and/or its components (e.g. a published paper, algorithm, or code \ repository).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSourceReferenceCitation"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Text", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->568416317], 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->"TabNext", CellID->343081869] }, 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoLinks"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Item", CellTags->{"Links", "TemplateCellGroup"}, CellID->503703789], 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->"TabNext", CellID->485448166] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Tests", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Tests", 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.3961, 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoTests"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, DefaultNewCellStyle->"Input", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->161936114], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MyFunction", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellLabel->"In[3]:=", CellID->667877521], Cell[BoxData[ RowBox[{"x", " ", "y"}]], "Output", CellLabel->"Out[3]=", CellID->993233288] }, Open ]] }, 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoAuthorNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, DefaultNewCellStyle->"Text", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->278925130], 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->"TabNext", CellID->567921317] }, 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]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSubmissionNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, DefaultNewCellStyle->"Text", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->613343431], 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->"TabNext", CellID->920818074] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"PacletizeResourceFunction | Definition Notebook", TaggingRules->{"CompatibilityTest" -> HoldComplete[ BinaryDeserialize[ ByteArray[CompressedData[" 1:eJwBdgiJ9yFib1JiAQAAAGkIAAA4Qzp4nK1ba3MbtxWtZavjyTiZOpMPnXza tGzrtGleTtL0MU0kUrLZkWhJSzlfDe5ekqiwCxbAimL/WP9eL/ZFErsg7w7j 0Yz52HMOHhcX916A0yP9YV8mC5ml8dnDQoHWXKbTR/r4OuNgpkf6aDjFt0/P GReZgmt8/f4ViwSYYaoNEyL89QCmPOUGcSNpYCLlXV9wSC3Ywz0CiHX44ga0 zFQE4UobSArQuybbuylrJTrS74VgBiDYCum+9DXjXX8O0V3zW/0DVd9D4DTg xe4GnEt1u4iZwcb/pZPwGugI/tEvKHh0N5Z9uVidZsbIVP+VLOlCHdGeX1QK AZF5zVOjX5Ll1iBH6Pc7hJIE/0f7A2X0a6rUQEaZxTH76VhKobeZuuqP5Wwm 4OfQL5gc/U926KcGHsy1/mqP9K3hAl+AriGOxhd+jUwp2zJIFgJN7y0ou+T0 P8nz2op35F965ddfVAwXMsoHTp+Sx9vLQV64+ARPuAFV2tq/Dphrh8tpwx92 tGEh5KoS1t/Ru7+JI7uOAddsIgAbucB1ybu4jgaUvKIQiRO0Co3iC9DfdhBc wxyxb7xiZ//J+D0T+LLSuVJygVOyutZ9qvQOEqchn/obggQZM3bM+iCE1t+T 1R0k2aDPHiKR6dwmc+d1iEE7XGSDPs8waFglEylGLIG9m+HaiW0DHb0/7dBL c2u84OlduRteHtDtJh15wl9BCoqJt0xw3M+lok+4iySvrFdgToSwRjIcaPrK 2oI5Yr/ZJVZC9u1Mm0IFhGzCiHjN4xhSu+zTGT2YcoCOYOAVtLEJxNf6C6pQ CXAEPvMKDGepVBDbcbhiBneIVOu/U8VawI7wV37hfCeqlN5M/o1uexjh+viR rO5hIC/O9WZRrSv9tw7iDtaR/Z1X9sJuxEwM00Vm9KsDvMEmETm4upAsbslH yMFVO96R/9wrf4kfJ0xYd7p+Zq/62g+34slOYiTLYFR/TVasMeRkZCTDOYvl 0nqIbzro1Chydlm9PZUPNxhysQisiWh6dukhcBrw3d4G2AwZLXNiO7MagzZ9 GYM+69qMVhpy+Fi9fZOZAcvdJjl8bEAd0T/vFa2UxiuMIv/RVXcT3Xn23USp 8+zvzpT8McWV1JrbOLBKCveN99raXSjZfyHQYLiL2YgOI8UWEA/TqaT7r3Y8 OQK4UnDPYVmnROQIwAHS+5tNBNdzTN0GfQW597+9uejQ31a8I/+tV/4GZhwF 1ElmZJjNZrgm681SD6iN2MVCjhgqkgr55h6U4uhmyBGDj4G82CuCrSCQvNjb 0OSoYQ1G/7xvV2mRbNS4/Mt6EzS2myU5VXCR5JpLBWwJychp4pXCrNjADq7O ppZ7CJylujGdTc1l6DwiFUGZ4qPvpFeh/Bydm1Fmf5sT07kZTQ7yVofBidQc k89VQaaKehx9q/MQOA342tuAkN3DVgheR84n1CZ4KciBZbFhnUyk6lDl3gCR yyQFpnvdbxtHH9wtmN2PVVLMD31wfRTkakXBEJaFR3K1YgtGDiPwofJQ6wLu QdDDCAdI3j7CuVzi8p/Z8yv69rGJIruMEL0un66Kc6MypBxwJuSM7jL8HGSX ERqWxkzF/L9QxbfnXADdZXgIyOWFYoPfyvYPqf016chFngJadaJoyujgpmzx 0X1YNqly8A7J8QaKHMYgJuFm7fjpYYyLJAfrLrA8OyUH6+14ulfJJjpSfGF+ hiMjh4tcsSyK5Nf6S/rcFgiyBY3Lgx7bw/MDerjB42j/drf2JahZh+KGTzqn IW/JOeRGLsuODw9Vr6nIxbMcFtrYg5z3+cTDZjDi35i3/dYhR967PNb3O/R1 46CtPoLD6Ihcwt1DRB+Q/MzLdmnCFD1S2YKRY7PbdJjOQfH8qGTMZjP0/DcZ 7qP02MxLQc7HCj/YUrYm52M+BvI4vOWwPDAB8FKQN3LLcPbA0Iqhlief1rSA OwmHZiXgVcZjEDyFDsdELWCys/+Jm3m189PDhQ0UubbTO+UmYYtLNkv5lJcX Psierio+tLGQg/ReeSfHFuv0J63Sm4+QQ2Ec3kk2qz5c1+/IobCHgFyZL/Bl 5S+XJlfmG1Dyjtkr74TEecmMnsRu4+h9zO8kxBDX4e2+w8S1vTaw5CSj1zjX pydZtc02OOhjvFUJ7TDGWzh6b8sT541iGPnEtoklZxK9YZpPT7n2OlyWcZGd JSvD6C5ZIekGfMG0Kc9EiiVD3tlqS3Ip6P21yHWBsMsQO0i6MV2yh7yRY1le 5upgTA0sXbY6dVj7YbpsA0tOTXvFTbWqmlP1mJyatuPpxmVjb6mYWlUuroN3 dLF01dqlvVkUQ93dpF2K6aP8Svq6gm0vqR/pxyepXWpPLmyB7YNeWbMaZckE Z+xl/u/Fj4h81p9LHkFRzAr/92g85zpIS9WALRaAMX1gZDCBILIHdhAHUyWT gAUpLEEF9wXzZ4GW+JdAMMWHMpyTIGEryxQspUImHcCDPf+A+PNgIIOVzIIl 13NLbdQqYJmRtkIaMSFWQSTTe+sU01lgthqETzP8tjiWF1Cp/4BdPT4VMrqb PsY+c2300141s8+qV1fMzPUHOJLFZdx8CqfHnvv0j8P8yv+z8vYuDnsGOF5P QiFN/1E+tFbm2WYCEb4fYiSd6UtkYTP7+PPKQIdpbMOv/Lrak/zh907ywWWY aoVPRxDd2esO+Wz+sihBhB8XPy64ZCmSqXfFuyJzCD9qMxwy+leVvdS18fqX CD33q9ZfIRxvCH3aQHizm63xs6MQPs9PgWEEyzqDOD5nQkP9xMc3kMh7OEsW mJ4W+UJVFXcf/cgOaRrfpnOWxqK4Cab1k7HK1s88Lxr3E09juRxzgzNRsvxC f1heJt1o8v8BGs6SpF7eUus= "]]]], "CreationTimestamp" -> 3.81894006681322`16.334517831912287*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.818940067448911`16.334517831984577*^9, "VersionInformation" -> {"ResourceVersion" -> "1.0.0"}, "TemplateVersion" -> "1.4.0"}, CreateCellID->True, FrontEndVersion->"12.2 for Linux x86 (64-bit) (November 16, 2020)", 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.9216, 0.3412, 0.1059], CellTags -> {"MainDockedCell"}, CacheGraphics -> False], Cell[ BoxData[ TemplateBox[{}, "ToolsGridTemplate"]], "DockedCell", TaggingRules -> {"Tools" -> True}, CellTags -> {"ToolbarDockedCell"}, CellFrameMargins -> {{39, 5}, {2, 2}}, CellFrame -> {{0, 0}, {1, 0}}, CacheGraphics -> False, CellOpen -> Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]]]}, AutoQuoteCharacters -> {}], Cell[ StyleData["Item"], DefaultNewCellStyle -> "Item"], 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[ StyleData["ButtonText"], FontFamily -> "Sans Serif", FontSize -> 11, FontWeight -> Bold, FontColor -> RGBColor[0.4588, 0.4588, 0.4588]], Cell[ StyleData["MoreInfoOpenerIconTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> GraphicsBox[{ Thickness[0.0909], 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:eJxTTMoPSmVmYGBgBGJJIGYC4oSnF5RuVyo58OlumvteXcQBxj//Pfjx0tkS Dp8u+SYJzFB0MORYIxP1RMZhgZT+XRU2BTgNE4epg+nDZe6cIwobijL44Xyg 7hTr+2xw/f2HvmrE9DPAzQcp+1n3xR5mz8MqkXXuD1/Zw+yB8WH2wPgwe2D6 YfbAzIfRMHGYOpg+XOai2wtzF0w/zN0w82H+gtmDKxxg9gAARU63WA== "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.0458], RGBColor[0.6274, 0.6274, 0.6274, 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:eJxTTMoPSmViYGCQBGIQ3b48/JRRi4jD3qBpin2m0g5n6j32194VhvNZnvdo vPUVdoh2sntxM0faQfiT4/m0q0IOQNnSwtvSDmxCIvbHYoQcLjHcY+L0knGQ 5n2gO0FByEEnVfJRxHUEvyM59o5bsyycz+jbwuuvLwfXrzL9/4S63XJw86+F vdHfrS4Pt38x4x5WoSnycPe9e33AUvmUvAPM/TD+46WzjygYiML5+R9aT4Yc FIXr/7QhIHuWuRjc/LJCoIvWisHt14zpP/T1hRjcfTA+zP0wPsx/MP0w/8PM h4UPzH5Y+MHcBwtf9PAHAM3Qoi4= "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQXTFnkfJOGwmHsNp125Lq2R1g/G8aMf2HvrI4KP39 VvrgjgAGH6b+c19wicp0IQf5LzlhtXoccL6BzzIut6WcaPLccP5W0d+n353k gfM99tfKWqTzwflL9x4UV7vMD+c3FbtN+dYmAOd/2hCQPeu7IJz/KEJ8+8UD QnC+Jsi5GcJw/uOls48ofEDw571ffsy7XATO/xEMVMEiCudffZ6l/W26qMPh y9qpkosEHN7Os9G5cgvBXwY0bsMnMQfN0wLHd1mIOQTtkGt9fVHCAehKtvgZ Yg5XK16qGXYg+DWJRqEGWSJwPsw/MD7MvzD+oi3mPw6l8MH5ORVVS3UO88D5 /1K/P0lU5EaYDw4QTjgfFh/o8QsASQbXkQ== "]}]}, { FaceForm[ RGBColor[0.6274, 0.6274, 0.6274, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic], True -> GraphicsBox[{ Thickness[0.0909], 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:eJxTTMoPSmVmYGBgBGJJIGYC4oSnF5RuVyo58OlumvteXcQBxj//Pfjx0tkS Dp8u+SYJzFB0MORYIxP1RMZhgZT+XRU2BTgNE4epg+nDZe6cIwobijL44Xyg 7hTr+2xw/f2HvmrE9DPAzQcp+1n3xR5mz8MqkXXuD1/Zw+yB8WH2wPgwe2D6 YfbAzIfRMHGYOpg+XOai2wtzF0w/zN0w82H+gtmDKxxg9gAARU63WA== "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.0458], 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:eJxTTMoPSmVmYGBgBGJJIGYC4oSnF5RuVyo58OlumvteXcQBxj//Pfjx0tkS Dp8u+SYJzFB0MORYIxP1RMZhgZT+XRU2BTgNE4epg+nDZe6cIwobijL44Xyg 7hTr+2xw/f2HvmrE9DPAzQcp+1n3xR5mz8MqkXXuD1/Zw+yB8WH2wPgwe2D6 YfbAzIfRMHGYOpg+XOai2wtzF0w/zN0w82H+gtmDKxxg9gAARU63WA== "]]}, { 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:eJxTTMoPSmViYGCQBGIQ3b48/JRRi4jD3qBpin2m0g5n6j32194VhvNZnvdo vPUVdoh2sntxM0faQfiT4/m0q0IOQNnSwtvSDmxCIvbHYoQcLjHcY+L0knGQ 5n2gO0FByEEnVfJRxHUEvyM59o5bsyycz+jbwuuvLwfXrzL9/4S63XJw86+F vdHfrS4Pt38x4x5WoSnycPe9e33AUvmUvAPM/TD+46WzjygYiML5+R9aT4Yc FIXr/7QhIHuWuRjc/LJCoIvWisHt14zpP/T1hRjcfTA+zP0wPsx/MP0w/8PM h4UPzH5Y+MHcBwtf9PAHAM3Qoi4= "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQXTFnkfJOGwmHsNp125Lq2R1g/G8aMf2HvrI4KP39 VvrgjgAGH6b+c19wicp0IQf5LzlhtXoccL6BzzIut6WcaPLccP5W0d+n353k gfM99tfKWqTzwflL9x4UV7vMD+c3FbtN+dYmAOd/2hCQPeu7IJz/KEJ8+8UD QnC+Jsi5GcJw/uOls48ofEDw571ffsy7XATO/xEMVMEiCudffZ6l/W26qMPh y9qpkosEHN7Os9G5cgvBXwY0bsMnMQfN0wLHd1mIOQTtkGt9fVHCAehKtvgZ Yg5XK16qGXYg+DWJRqEGWSJwPsw/MD7MvzD+oi3mPw6l8MH5ORVVS3UO88D5 /1K/P0lU5EaYDw4QTjgfFh/o8QsASQbXkQ== "]}]}, { FaceForm[ RGBColor[1., 1., 1., 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[ ButtonBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], "\"Click for more information\""}, "PrettyTooltipTemplate"], ButtonFunction :> (NotebookDelete[ CurrentValue[ ParentCell[ EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}]]; If[ And[ MatchQ[ CurrentValue[ ParentCell[ EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}], Blank[CellObject]], CurrentValue[ ParentCell[ EvaluationCell[]], { TaggingRules, "AttachedMoreInfoTag"}] === #], CurrentValue[ ParentCell[ EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}] = Inherited; CurrentValue[ ParentCell[ EvaluationCell[]], {TaggingRules, "AttachedMoreInfoTag"}] = Inherited; Null, CurrentValue[ ParentCell[ EvaluationCell[]], {TaggingRules, "AttachedMoreInfoTag"}] = #; CurrentValue[ ParentCell[ EvaluationCell[]], {TaggingRules, "AttachedMoreInfoCell"}] = MathLink`CallFrontEnd[ FrontEnd`AttachCell[ ParentCell[ EvaluationCell[]], #2, "Inline", "ClosingActions" -> {"ParentChanged", "EvaluatorQuit"}]]]), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["InlineMoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ ButtonBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], #4}, "PrettyTooltipTemplate"], ButtonFunction :> (NotebookDelete[ CurrentValue[ ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}]]; If[ And[ MatchQ[ CurrentValue[ ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}], Blank[CellObject]], CurrentValue[ ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoTag"}] === #], CurrentValue[ ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}] = Inherited; CurrentValue[ ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoTag"}] = Inherited; Null, CurrentValue[ ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoTag"}] = #; CurrentValue[ ReleaseHold[#3], {TaggingRules, "AttachedMoreInfoCell"}] = MathLink`CallFrontEnd[ FrontEnd`AttachCell[ ReleaseHold[#3], #2, "Inline", "ClosingActions" -> {"ParentChanged", "EvaluatorQuit"}]]]), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], 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.0444]], 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[{ ToBoxes[#], ToBoxes[#2]}, "PrettyTooltipTemplate"]]& )[ Mouseover[ Graphics[{ GrayLevel[0.65], Thickness[2/45], FilledCurve[{{{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}}}], FilledCurve[{{{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], Graphics[{ RGBColor[0.9882, 0.4196, 0.2039], Thickness[2/45], FilledCurve[{{{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}}}], FilledCurve[{{{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]], "Click to copy to the clipboard"], (RawBoxes[ TemplateBox[{ ToBoxes[#], ToBoxes[#2]}, "PrettyTooltipTemplate"]]& )[ Graphics[{ RGBColor[0, 2/3, 0], Thickness[2/45], FilledCurve[{{{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}}}], FilledCurve[{{{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"]], 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.5373, 0.5373, 0.5373], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain", StripOnInput -> False], Background -> RGBColor[0.9608, 0.9608, 0.9608], FrameStyle -> RGBColor[0.898, 0.898, 0.898], FrameMargins -> 8, StripOnInput -> False], TooltipDelay -> 0.1, TooltipStyle -> {Background -> None, CellFrame -> 0}], Annotation[#, Framed[ Style[ RSNB`$$tooltip, "Text", FontColor -> RGBColor[0.5373, 0.5373, 0.5373], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain"], Background -> RGBColor[0.9608, 0.9608, 0.9608], FrameStyle -> RGBColor[0.898, 0.898, 0.898], FrameMargins -> 8], "Tooltip"]& ]& )}], Cell[ StyleData["ToolsGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{ 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`TemplateInput[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, { FontColor -> RGBColor[0.8275, 0.2078, 0.]}], { FontColor -> RGBColor[0.9137, 0.6039, 0.5]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC 1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7 qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/ m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}], Evaluator -> Automatic], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`LiteralInput[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, { FontColor -> RGBColor[0.8275, 0.2078, 0.]}], { FontColor -> RGBColor[0.9137, 0.6039, 0.5]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC 1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7 qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/ m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}], Evaluator -> Automatic], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`DelimiterInsert[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, { FontColor -> RGBColor[0.8275, 0.2078, 0.]}], { FontColor -> RGBColor[0.9137, 0.6039, 0.5]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC 1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7 qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/ m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}], Evaluator -> Automatic], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`SubscriptInsert[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, { FontColor -> RGBColor[0.8275, 0.2078, 0.]}], { FontColor -> RGBColor[0.9137, 0.6039, 0.5]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC 1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7 qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/ m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}], Evaluator -> Automatic], ActionMenuBox[ 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`$SuppressDynamicEvents = True}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, Null], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, { FontColor -> RGBColor[0.8275, 0.2078, 0.]}], { FontColor -> RGBColor[0.9137, 0.6039, 0.5]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC 1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7 qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/ m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}], Evaluator -> Automatic], { "\"Insert table with two columns\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`TableInsert[2]], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`TableInsert[3]], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`TableRowInsert[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Sort the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`TableSort[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Merge selected tables\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`TableMerge[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued", Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]], ActionMenuBox[ 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`$SuppressDynamicEvents = True}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, Null], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], {FontColor -> GrayLevel[1]}, { FontColor -> RGBColor[0.8275, 0.2078, 0.]}], { FontColor -> RGBColor[0.9137, 0.6039, 0.5]}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCj08dhCBkQWRlQKmbsSY3g9WhKNYErhiu7NGRXTeC 1b5ePg63AsgGigDFEcoe3LsZZ/L95nk0xwBFgOJAWYhrgVpuReljdTZQHCjL AAbEKCPSNOLdRqxPiQ43YmIBDWCNUwCVRq3x "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCd04cgiBkQWRlQKltPjqbbcQhCMiGK4Yru3Vo92Y7 qZexWn+yTSAIyAaKAMXhyp48uLfNW+tNvDZcDQQBRYDiQFmIa4FattlJoqmB IKA4UJYBDIhRRqRpxLuNSJ8SH27ExAIxcQoAZdNqHw== "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQPEUCL2EAWRBZGVDqx7vXP18+gSAgG64YruzVq1c/3zy/ m2hx2ZQBgoBsoAhQHK7s2bNnP968uB1tAFcDQUARoDhQFuJaoJYfj++gqYEg oDhQlgEMiFFGpGnEu41InxIfbsTEAjFxCgDlLITg "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}], Evaluator -> Automatic], { "\"Insert comment for reviewer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`CommentInsert[]], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`CommentToggle[]], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`ExclusionToggle[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued", Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> { DefinitionNotebookClient`$ButtonsDisabled}]]}}, 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 -> { "ColumnsIndexed" -> {1 -> 0, -1 -> 0}, "Rows" -> {{Automatic}}}, FrameStyle -> GrayLevel[0.75]], "Grid"]& )}], Cell[ StyleData["MainGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.0222], { FaceForm[{ RGBColor[0.8745, 0.2784, 0.0314], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.074}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.074}, {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:eJxTTMoPSmViYGAwAWIQLckSxqe7SdlhmnN3zvPblg4w/smyffOl/K0cEp5e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcLUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzAHLC+HjtHICGz32fruGQC1Zo57BASv+uCpsW RP9Me4g9YjoQe3gcHICqlx/z1nNgAAEFB4j6Y/oOQMvOfVd2gLhjlgGEz+zg oBnTf+irhiFEfw/UvDJDiP2+9g7qhhxrZGYZQtS9sHP48vdKxcs2Q4i72u0c pEHOSTSEuxfsTiFDiPhCWwcXoHd+rzRwWOS67fPfEFuHx0tnH1EoMHDYUJQx 8a2MrUPQDrnW14IGUPfaOnzTAFq0VR8aXrYOoFA6V64HcccvWwfTuF2ePEy6 UPPtHIC+CH68VBvOP70QaNFeLTg/X6j5wKlELYdPl3yTBCLsIP7U0YK49y3U PR80HQJ6p+cJHbaB88HqZ1jD1QNdUyWSZwWJH2stiHtuWcLdC+ND4lvfwbzT MeHpBEt4+IPld1lA4p9DH+LuVgu4eeh8sH18hnA+2J6velB3aUHSyxE9iP8U 9aDpBMH3A/rWskQHYt8JBQw+TD0kPpTh5sHSMzgd/0TwYe6B8WHulY1Ksb7f rwDng+PHSQES31csIPF7UREePgCOg02w "], {{19.051, 14.242}, { 19.051, 27.594}, {23.828, 27.594}, {23.828, 26.543}, { 21.426, 26.309}, {21.375, 26.258}, {21.375, 24.219}, { 21.375, 17.535}, {21.375, 15.602}, {21.426, 15.547}, { 23.828, 15.316}, {23.828, 14.242}}, {{24.578, 18.75}, { 24.578, 23.078}, {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.078}, {30.578, 18.75}, {30.582, 18.289}, {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.316}, {33.684, 15.539}, {33.789, 15.602}, {33.789, 17.641}, {33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, {31.328, 26.512}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234}}}]}}, { ImageSize -> {Automatic, 32}, ImagePadding -> {{5, 0}, {0, 0}}, BaselinePosition -> Scaled[0.25], AspectRatio -> Automatic, Background -> RGBColor[0.9882, 0.4196, 0.2039], 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 -> GrayLevel[1]}, "Rows" -> {{None}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], FontSize -> 24, FontColor -> GrayLevel[1], StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", ItemBox[ TemplateBox[{ StyleBox[ TemplateBox[{ "\"Function Repository\"", "\" \[RightGuillemet] \""}, "RowDefault"], "Text", FontColor -> GrayLevel[1], StripOnInput -> False], "https://resources.wolframcloud.com/FunctionRepository"}, "HyperlinkURL"], Alignment -> {Right, Bottom}, StripOnInput -> False]}, { TemplateBox[{ TemplateBox[{ "\"Open Sample\"", "\"View a completed sample definition notebook\""}, "PrettyTooltipTemplate"], DefinitionNotebookClient`ViewExampleNotebook[ ButtonNotebook[]]& , "\"View a completed sample definition notebook\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ "\"Style Guidelines\"", "\"View general guidelines for authoring resource \ functions\""}, "PrettyTooltipTemplate"], DefinitionNotebookClient`ViewStyleGuidelines[ ButtonNotebook[]]& , "\"View general guidelines for authoring resource functions\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{"\"Tools\"", PaneSelectorBox[{False -> GraphicsBox[{ GrayLevel[1], AbsoluteThickness[1], LineBox[{{-1, -1}, {-1, 1}, {1, 1}, {1, -1}, {-1, -1}}], LineBox[{{0., 0.65}, {0., -0.65}}], LineBox[{{-0.65, 0.}, {0.65, 0.}}]}, ImageSize -> 8, PlotRangePadding -> None, Background -> None], True -> GraphicsBox[{ GrayLevel[1], AbsoluteThickness[1], LineBox[{{-1, -1}, {-1, 1}, {1, 1}, {1, -1}, {-1, -1}}], LineBox[{{-0.65, 0.}, {0.65, 0.}}]}, ImageSize -> 8, PlotRangePadding -> None, Background -> None]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]], BaselinePosition -> Scaled[-0.1]]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.35}}}], "Grid"], "\"Toggle documentation toolbar\""}, "PrettyTooltipTemplate"], DefinitionNotebookClient`ToggleToolbar[ ButtonNotebook[]]& , "\"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.9941, 0.7098, 0.602]], "Grid"], TemplateBox[{ TemplateBox[{ "\"Check\"", "\"Check notebook for potential errors\""}, "PrettyTooltipTemplate"], DefinitionNotebookClient`CheckDefinitionNotebook[ ButtonNotebook[]]& , "\"Check notebook for potential errors\"", False}, "OrangeButtonTemplate"], ActionMenuBox[ TemplateBox[{ TemplateBox[{"\"Preview\"", TemplateBox[{5}, "Spacer1"], "\"\[FilledDownTriangle]\""}, "RowDefault"], Null& , "\"\"", True}, "OrangeButtonTemplate"], { "\"In a notebook\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`PreviewResource[ ButtonNotebook[], "Notebook"]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"On the cloud\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`PreviewResource[ ButtonNotebook[], "Cloud"]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued", Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]], ActionMenuBox[ TemplateBox[{ TemplateBox[{"\"Deploy\"", TemplateBox[{5}, "Spacer1"], "\"\[FilledDownTriangle]\""}, "RowDefault"], Null& , "\"\"", True}, "OrangeButtonTemplate"], { "\"Locally on this computer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "Local"]]], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPrivate"]]], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPublic"]]], 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "KernelSession"]]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued", Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]], 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.0635], 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[ GrayLevel[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[ GrayLevel[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"], With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepositoryUpdate[RSNB`nb], "ShowProgress" -> True]]& , "\"Submit changes to update your resource submission\"", True}, "OrangeButtonTemplate"]], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.0635], 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[ GrayLevel[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[ GrayLevel[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"], With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepository[RSNB`nb], "ShowProgress" -> True]]& , "\"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.9882, 0.4196, 0.2039], RGBColor[0.9216, 0.3412, 0.1059]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> { 1 -> RGBColor[0.9882, 0.4196, 0.2039], 2 -> RGBColor[0.9216, 0.3412, 0.1059]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.9}, 5}, "RowsIndexed" -> {1 -> 1.1, 2 -> 1.3, 3 -> 1.55}}, FrameStyle -> RGBColor[0.9882, 0.4196, 0.2039]], "Grid"]& )}], Cell[ StyleData["ReviewerCommentLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{#, TemplateBox[{ GraphicsBox[{ Thickness[0.0222], { FaceForm[{ RGBColor[0.8745, 0.2784, 0.0314], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.074}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.074}, {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:eJxTTMoPSmViYGAwAWIQLckSxqe7SdlhmnN3zvPblg4w/smyffOl/K0cEp5e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcLUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzAHLC+HjtHICGz32fruGQC1Zo57BASv+uCpsW RP9Me4g9YjoQe3gcHICqlx/z1nNgAAEFB4j6Y/oOQMvOfVd2gLhjlgGEz+zg oBnTf+irhiFEfw/UvDJDiP2+9g7qhhxrZGYZQtS9sHP48vdKxcs2Q4i72u0c pEHOSTSEuxfsTiFDiPhCWwcXoHd+rzRwWOS67fPfEFuHx0tnH1EoMHDYUJQx 8a2MrUPQDrnW14IGUPfaOnzTAFq0VR8aXrYOoFA6V64HcccvWwfTuF2ePEy6 UPPtHIC+CH68VBvOP70QaNFeLTg/X6j5wKlELYdPl3yTBCLsIP7U0YK49y3U PR80HQJ6p+cJHbaB88HqZ1jD1QNdUyWSZwWJH2stiHtuWcLdC+ND4lvfwbzT MeHpBEt4+IPld1lA4p9DH+LuVgu4eeh8sH18hnA+2J6velB3aUHSyxE9iP8U 9aDpBMH3A/rWskQHYt8JBQw+TD0kPpTh5sHSMzgd/0TwYe6B8WHulY1Ksb7f rwDng+PHSQES31csIPF7UREePgCOg02w "], {{19.051, 14.242}, { 19.051, 27.594}, {23.828, 27.594}, {23.828, 26.543}, { 21.426, 26.309}, {21.375, 26.258}, {21.375, 24.219}, { 21.375, 17.535}, {21.375, 15.602}, {21.426, 15.547}, { 23.828, 15.316}, {23.828, 14.242}}, {{24.578, 18.75}, { 24.578, 23.078}, {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.078}, {30.578, 18.75}, {30.582, 18.289}, {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.316}, {33.684, 15.539}, {33.789, 15.602}, {33.789, 17.641}, {33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, {31.328, 26.512}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234}}}]}}, { 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 -> (ButtonBox[ StyleBox[#, "Text", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Condensed", FontSize -> 13, FontColor -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], GrayLevel[1], RGBColor[0.9569, 0.802, 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}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, #2[]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; Null], FrameMargins -> {{5, 5}, {0, 0}}, Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQvA6XhqPnQeIQhCyIrAwodd2K5Yo5IwQB2XDFcGXPAsWu mjNdNmVARkARoDhc2aswqWtWLGhqIAgoDpSFuBao5QqGURB0BWwgAxgQo4xI 04h3G5E+JT7ciIkFYuIUAMJyEaA= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQvA6XhqMHARIQhCyIrAwotcmIc7UuOwQB2XDFcGX3/MXX 6LEv12ZDRkARoDhc2cswqY2GnGhqIAgoDpSFuBaoZTWGURC0GmwgAxgQo4xI 04h3G5E+JT7ciIkFYuIUAJxlBG4= "], "Byte", ColorSpace -> "RGB", Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UJAXikHs/xgAqyAQvA6XhqN3hfYQhCyIrAwo9e36ma8PbkIQkA1XDFf2vtzt 28Obu6Jsl2uzQRCQDRQBisOVvYlR+nb99I5gU7gaCAKKAMWBshDXArV8unUR TQ0EAcWBsgxgQIwyIk0j3m1E+pT4cCMmFoiJUwBBtDmK "], "Byte", ColorSpace -> "RGB", Interleaving -> True]}, Background -> RGBColor[0.9216, 0.3412, 0.1059], Method -> "Queued", ImageSize -> {All, 23}, Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}], Evaluator -> Automatic]& )}], 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], 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.3]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {Automatic, Automatic, Fit}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], BoxMargins -> {{0.25, -1.}, {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.0556], 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:eJxTTMoPSmVmYGBgBGJJIGZigIIGAwcIQ8kBxk94ekHp9k9Vh8qXaoYcOfoO m+a+X37stKZDTP+hrxpzdOA0TBymDqYPl7n2pnG7PHlk4Pw5RxQ2FGWIwPWD jI3p54WbLxuVYn3fnwluD8S8H/Yo9gD5KPYA+TB7YPph9sDMh9EwcZg6FPdh MRfdXpi7YPph7oaZD/MXzB5c4QCzBwA/Dn+d "]]}, 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.1753, 7.4169}, { 7.7969, 11.3084}, {7.7969, 13.38}, {10.12, 13.38}, {10.12, 11.3084}, {9.7415, 7.4169}, {8.1753, 7.4169}}, CompressedData[" 1:eJxTTMoPSmViYGCQBGIQDQFKDg+rRNa5P+RzKPOXE8vSVYTz8z+0ngxpVHCA qBNwmPd++THv7/IO8q2vA3fICTpUvlQz5Hgj52DLdX1xga2QQxoYyDmcYLed HTpfGM6/k8GQ3+giCue7M1dwq7wQg+vnmbyyKdBTAm6+tsTUK5wZknD7Pec2 qB1qk4K772Y8iCXtAHM/jP/bquBcxyUEfyJ/ldnqOmW4/sWTrBh9WVTg5rt0 5zz/3akCt//sGRBQgbsPxoe5H8aH+Q+mH+Z/mPmw8IHZDws/mPtg4Yse/gBw FJLS "]}]}, 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[ 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[ 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[ StyleData["Hyperlink"], FontColor -> RGBColor[0.9216, 0.3412, 0.1059]], Cell[ StyleData["HyperlinkActive"], FontColor -> RGBColor[0.6144, 0.2275, 0.0706]], Cell[ StyleData["Link"], FontFamily -> "Source Sans Pro", FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.8549, 0.3961, 0.1451], RGBColor[0.0196, 0.2863, 0.651]]]], Cell[ StyleData["StringTypeLink", StyleDefinitions -> StyleData["Link"]], FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.9686, 0.4667, 0.], GrayLevel[0.4667]]]], 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["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.9059]], 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["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, StyleMenuListing -> None, Background -> RGBColor[1, 0.95, 0.95]], 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.8807, 0.611, 0.1421], CellFrameLabelMargins -> {{0, 10}, {0, 0}}, FontColor -> GrayLevel[0.25], Background -> RGBColor[0.9821, 0.9417, 0.8713]], 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.3684, 0.5068, 0.7098], Background -> RGBColor[0.9053, 0.926, 0.9565]], 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.5602, 0.6916, 0.1949], Background -> RGBColor[0.934, 0.9537, 0.8792]], Cell[ StyleData["CommentLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontSlant -> "Italic", FontColor -> GrayLevel[0.5]], Cell[ StyleData["CharactersRefLink"], ShowSpecialCharacters -> False], Cell[ StyleData["DockedCell"], CellFrameColor -> GrayLevel[0.75], Background -> GrayLevel[0.9]], Cell[ StyleData["ExampleImage"], PageWidth :> 650, CellMargins -> {{66, 66}, {16, 5}}, Evaluatable -> False, ShowCellLabel -> False, MenuSortingValue -> 10000, RasterBoxOptions -> {ImageEditMode -> False}], Cell[ StyleData["FormObjectCell"], CellMargins -> {{66, 66}, {16, 5}}], Cell[ StyleData["LocalFileInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", 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"], FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued"]]]}, {None, None}}], Cell[ StyleData["LocalDirectoryInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", 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"], FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued"]]]}, {None, None}}]}, Visible -> False, FrontEndVersion -> "12.2 for Linux x86 (64-bit) (November 16, 2020)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Name"->{ Cell[619, 21, 108, 2, 70, "Title",ExpressionUUID->"dc2ccd0c-a8e2-406c-9edb-56685ea63aaa", CellTags->{"Name", "TemplateCell", "Title"}, CellID->596409992]}, "TemplateCell"->{ Cell[619, 21, 108, 2, 70, "Title",ExpressionUUID->"dc2ccd0c-a8e2-406c-9edb-56685ea63aaa", CellTags->{"Name", "TemplateCell", "Title"}, CellID->596409992], Cell[730, 25, 154, 4, 70, "Text",ExpressionUUID->"ed9e7b1f-8643-48d8-b96a-1dc971ce474a", CellTags->{"Description", "TemplateCell"}, CellID->310250415]}, "Title"->{ Cell[619, 21, 108, 2, 70, "Title",ExpressionUUID->"dc2ccd0c-a8e2-406c-9edb-56685ea63aaa", CellTags->{"Name", "TemplateCell", "Title"}, CellID->596409992]}, "Description"->{ Cell[730, 25, 154, 4, 70, "Text",ExpressionUUID->"ed9e7b1f-8643-48d8-b96a-1dc971ce474a", CellTags->{"Description", "TemplateCell"}, CellID->310250415]}, "Definition"->{ Cell[909, 33, 1108, 27, 70, "Section",ExpressionUUID->"7df3c8ad-83d5-44fa-82b8-e45bee10b561", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->858465241]}, "Function"->{ Cell[909, 33, 1108, 27, 70, "Section",ExpressionUUID->"7df3c8ad-83d5-44fa-82b8-e45bee10b561", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->858465241]}, "TemplateCellGroup"->{ Cell[909, 33, 1108, 27, 70, "Section",ExpressionUUID->"7df3c8ad-83d5-44fa-82b8-e45bee10b561", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->858465241], Cell[146945, 3192, 1879, 48, 70, "Subsection",ExpressionUUID->"fee33052-3025-4e68-90b6-7341249cebca", CellTags->{"TemplateCellGroup", "Usage"}, CellID->77317143], Cell[152800, 3395, 1349, 30, 70, "Subsection",ExpressionUUID->"086aa49f-22fd-4f2b-8e47-54da41983a8a", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->85988701], Cell[161061, 3635, 6918, 150, 70, "Section",ExpressionUUID->"6dce0248-f2e7-46e1-9fc5-cca3a4466187", CellTags->{"Examples", "TemplateCellGroup"}, CellID->992818145], Cell[774396, 15434, 918, 24, 70, "Subsection",ExpressionUUID->"6cad0f92-4a94-4642-b66f-668a367f49f1", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->605210913], Cell[775400, 15466, 893, 24, 70, "Subsection",ExpressionUUID->"5ff53be7-6830-489d-a66d-ee1c7e70322e", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->550320615], Cell[776518, 15504, 166, 5, 70, "Subsection",ExpressionUUID->"3826cfba-53be-4d48-8ce9-f94cb38b903f", CellTags->{"Categories", "TemplateCellGroup"}, CellID->63169632], Cell[783171, 15733, 870, 24, 70, "Subsection",ExpressionUUID->"8c542f8b-29f3-492c-bfe0-0460f34a6734", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->822678636], Cell[784338, 15777, 920, 24, 70, "Subsection",ExpressionUUID->"8e46ff39-f279-467d-aba0-3f85a5e489ab", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->740191071], Cell[785581, 15821, 971, 25, 70, "Subsection",ExpressionUUID->"c7aeb9dd-b075-49a3-b610-412888b0bca6", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->568416317], Cell[787088, 15861, 823, 24, 70, "Subsection",ExpressionUUID->"d2aeefce-308f-47c7-b73a-7055b4ee1fe5", CellTags->{"Links", "TemplateCellGroup"}, CellID->503703789], Cell[788436, 15900, 1737, 43, 70, "Subsection",ExpressionUUID->"891daa0f-d043-4ed4-8282-94898232f4ba", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->161936114], Cell[790484, 15963, 1048, 26, 70, "Section",ExpressionUUID->"7e2fa38f-a3b3-4ca6-b681-6eb434193124", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->278925130], Cell[792081, 16004, 929, 25, 70, "Section",ExpressionUUID->"b3bcba1c-f078-49c2-b5eb-0cace511eb3f", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->613343431]}, "Documentation"->{ Cell[146803, 3184, 117, 4, 70, "Section",ExpressionUUID->"00419d5a-64cb-4fcd-a679-089d4198e251", CellTags->"Documentation", CellID->475424634]}, "Usage"->{ Cell[146945, 3192, 1879, 48, 70, "Subsection",ExpressionUUID->"fee33052-3025-4e68-90b6-7341249cebca", CellTags->{"TemplateCellGroup", "Usage"}, CellID->77317143]}, "Details & Options"->{ Cell[152800, 3395, 1349, 30, 70, "Subsection",ExpressionUUID->"086aa49f-22fd-4f2b-8e47-54da41983a8a", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->85988701]}, "Notes"->{ Cell[152800, 3395, 1349, 30, 70, "Subsection",ExpressionUUID->"086aa49f-22fd-4f2b-8e47-54da41983a8a", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->85988701]}, "TabNext"->{ Cell[154911, 3450, 200, 6, 70, "Notes",ExpressionUUID->"ec005244-2aa7-4f68-95a1-e66d5ac2a61d", CellTags->"TabNext", CellID->634001825], Cell[786555, 15848, 496, 8, 70, "Text",ExpressionUUID->"cc1ee9eb-11c2-4fa4-9433-f3c13acbdc17", CellTags->"TabNext", CellID->343081869], Cell[787914, 15887, 485, 8, 70, "Item",ExpressionUUID->"0ce37385-b326-4487-83ce-18125607ad98", CellTags->"TabNext", CellID->485448166], Cell[791535, 15991, 509, 8, 70, "Text",ExpressionUUID->"3208f12e-e11e-44b3-9d72-55d77dcc0f4d", CellTags->"TabNext", CellID->567921317], Cell[793013, 16031, 495, 8, 70, "Text",ExpressionUUID->"eb1e6dc0-70de-4873-aa18-da7f7e3505f5", CellTags->"TabNext", CellID->920818074]}, "Examples"->{ Cell[161061, 3635, 6918, 150, 70, "Section",ExpressionUUID->"6dce0248-f2e7-46e1-9fc5-cca3a4466187", CellTags->{"Examples", "TemplateCellGroup"}, CellID->992818145]}, "Source & Additional Information"->{ Cell[774218, 15426, 153, 4, 70, "Section",ExpressionUUID->"75d00f79-a4b4-4b18-b5cf-1097769e9e9b", CellTags->"Source & Additional Information", CellID->346918952]}, "Contributed By"->{ Cell[774396, 15434, 918, 24, 70, "Subsection",ExpressionUUID->"6cad0f92-4a94-4642-b66f-668a367f49f1", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->605210913]}, "ContributorInformation"->{ Cell[774396, 15434, 918, 24, 70, "Subsection",ExpressionUUID->"6cad0f92-4a94-4642-b66f-668a367f49f1", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->605210913]}, "Keywords"->{ Cell[775400, 15466, 893, 24, 70, "Subsection",ExpressionUUID->"5ff53be7-6830-489d-a66d-ee1c7e70322e", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->550320615]}, "Categories"->{ Cell[776518, 15504, 166, 5, 70, "Subsection",ExpressionUUID->"3826cfba-53be-4d48-8ce9-f94cb38b903f", CellTags->{"Categories", "TemplateCellGroup"}, CellID->63169632]}, "CategoriesCell"->{ Cell[776687, 15511, 6447, 217, 70, "Output",ExpressionUUID->"f13ada3e-328a-438a-a164-a5f9281bb32d", CellTags->"CategoriesCell", CellID->732517034]}, "Related Symbols"->{ Cell[783171, 15733, 870, 24, 70, "Subsection",ExpressionUUID->"8c542f8b-29f3-492c-bfe0-0460f34a6734", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->822678636]}, "Related Resource Objects"->{ Cell[784338, 15777, 920, 24, 70, "Subsection",ExpressionUUID->"8e46ff39-f279-467d-aba0-3f85a5e489ab", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->740191071]}, "Source/Reference Citation"->{ Cell[785581, 15821, 971, 25, 70, "Subsection",ExpressionUUID->"c7aeb9dd-b075-49a3-b610-412888b0bca6", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->568416317]}, "Links"->{ Cell[787088, 15861, 823, 24, 70, "Subsection",ExpressionUUID->"d2aeefce-308f-47c7-b73a-7055b4ee1fe5", CellTags->{"Links", "TemplateCellGroup"}, CellID->503703789]}, "Tests"->{ Cell[788436, 15900, 1737, 43, 70, "Subsection",ExpressionUUID->"891daa0f-d043-4ed4-8282-94898232f4ba", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->161936114]}, "VerificationTests"->{ Cell[788436, 15900, 1737, 43, 70, "Subsection",ExpressionUUID->"891daa0f-d043-4ed4-8282-94898232f4ba", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->161936114]}, "Author Notes"->{ Cell[790484, 15963, 1048, 26, 70, "Section",ExpressionUUID->"7e2fa38f-a3b3-4ca6-b681-6eb434193124", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->278925130]}, "Submission Notes"->{ Cell[792081, 16004, 929, 25, 70, "Section",ExpressionUUID->"b3bcba1c-f078-49c2-b5eb-0cace511eb3f", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->613343431]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 897462, 18019}, {"TemplateCell", 897645, 18023}, {"Title", 897981, 18030}, {"Description", 898163, 18034}, {"Definition", 898341, 18038}, {"Function", 898538, 18042}, {"TemplateCellGroup", 898744, 18046}, {"Documentation", 901327, 18089}, {"Usage", 901492, 18093}, {"Details & Options", 901688, 18097}, {"Notes", 901893, 18101}, {"TabNext", 902100, 18105}, {"Examples", 902836, 18121}, {"Source & Additional Information", 903048, 18125}, {"Contributed By", 903241, 18129}, {"ContributorInformation", 903478, 18133}, {"Keywords", 903701, 18137}, {"Categories", 903894, 18141}, {"CategoriesCell", 904091, 18145}, {"Related Symbols", 904270, 18149}, {"Related Resource Objects", 904484, 18153}, {"Source/Reference Citation", 904708, 18157}, {"Links", 904913, 18161}, {"Tests", 905098, 18165}, {"VerificationTests", 905317, 18169}, {"Author Notes", 905531, 18173}, {"Submission Notes", 905732, 18177} } *) (*NotebookFileOutline Notebook[{ Cell[619, 21, 108, 2, 70, "Title",ExpressionUUID->"dc2ccd0c-a8e2-406c-9edb-56685ea63aaa", CellTags->{"Name", "TemplateCell", "Title"}, CellID->596409992], Cell[730, 25, 154, 4, 70, "Text",ExpressionUUID->"ed9e7b1f-8643-48d8-b96a-1dc971ce474a", CellTags->{"Description", "TemplateCell"}, CellID->310250415], Cell[CellGroupData[{ Cell[909, 33, 1108, 27, 70, "Section",ExpressionUUID->"7df3c8ad-83d5-44fa-82b8-e45bee10b561", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->858465241], Cell[CellGroupData[{ Cell[2042, 64, 161, 4, 70, "Subsection",ExpressionUUID->"7bb8f7d6-32eb-4b51-b46b-49dee3108f2c", CellID->997366146], Cell[2206, 70, 1306, 31, 70, "Input",ExpressionUUID->"fe9746b6-46d7-4ba5-9c73-a17607e87deb", CellID->163640191], Cell[3515, 103, 269, 8, 70, "Input",ExpressionUUID->"1a4573d2-6b9d-4596-80cd-ff116efd11cd", CellID->81076531], Cell[3787, 113, 2004, 47, 70, "Input",ExpressionUUID->"6b75846a-3f62-4340-9b00-6fd45dadc352", CellID->38370286] }, Open ]], Cell[CellGroupData[{ Cell[5828, 165, 230, 5, 70, "Subsection",ExpressionUUID->"7cac1228-b7c1-4672-ac51-becc6f2ec94b", CellID->162410456], Cell[6061, 172, 1239, 30, 70, "Input",ExpressionUUID->"edd0a38a-455c-4dc1-93fd-b081299b41a1", CellID->657480657], Cell[7303, 204, 380, 10, 70, "Input",ExpressionUUID->"7bb1c465-ac98-4e74-b028-b5ecb720cdb7", CellID->40725774], Cell[7686, 216, 17585, 379, 70, "Input",ExpressionUUID->"396fe6c9-656f-4c20-8305-e015c67ab765", CellID->780379110], Cell[25274, 597, 4166, 97, 70, "Input",ExpressionUUID->"c0227df8-3a08-4167-bf52-f21b2f9db8a5", CellID->474406220], Cell[29443, 696, 7908, 164, 70, "Input",ExpressionUUID->"5883252a-31a5-42d3-a829-0f01c9446f7e", CellID->941234981], Cell[37354, 862, 506, 13, 70, "Input",ExpressionUUID->"cee07524-274d-4dcc-9018-56bba9a774d1", CellID->572445029] }, Closed]], Cell[CellGroupData[{ Cell[37897, 880, 167, 4, 70, "Subsection",ExpressionUUID->"e3469f86-7d82-46a4-9963-8c3ec3dff352", CellID->988897517], Cell[CellGroupData[{ Cell[38089, 888, 177, 4, 70, "Subsubsection",ExpressionUUID->"fd7cb52f-8671-43ee-932f-4412e960fb92", CellID->482156118], Cell[38269, 894, 589, 17, 70, "Input",ExpressionUUID->"34bad69c-54cc-4571-a041-19e6e35c00a7", CellID->173684637], Cell[38861, 913, 397, 11, 70, "Input",ExpressionUUID->"8dd83b8d-e6a1-479b-8b0b-85292ea1ee03", CellID->536236157], Cell[39261, 926, 2702, 59, 70, "Input",ExpressionUUID->"d52609c1-4686-440b-985d-94b17d8a8a2b", CellID->501615251], Cell[41966, 987, 3304, 84, 70, "Input",ExpressionUUID->"12ebe981-833b-4d19-859f-1a0e433ffa10", CellID->107922010], Cell[45273, 1073, 2731, 58, 70, "Input",ExpressionUUID->"d69cc120-f674-457b-a34c-35aa86b681a9", CellID->915815287], Cell[48007, 1133, 31131, 632, 70, "Input",ExpressionUUID->"33cf845f-619a-4b96-ab91-7f26ac418133", CellID->463311532], Cell[79141, 1767, 16708, 329, 70, "Input",ExpressionUUID->"a63da17e-2aff-4d80-88dc-ed8b10fd7c12", CellID->293629521] }, Open ]], Cell[CellGroupData[{ Cell[95886, 2101, 177, 4, 70, "Subsubsection",ExpressionUUID->"0a26b6a6-29e9-46eb-8632-a9d2d998aeea", CellID->792146519], Cell[96066, 2107, 4441, 99, 70, "Input",ExpressionUUID->"5675dbe7-da6c-4f42-9e41-725aa65d9025", CellID->430497382], Cell[100510, 2208, 2908, 60, 70, "Input",ExpressionUUID->"6dc79b82-7317-4992-a105-80d81613bd01", CellID->299783477], Cell[103421, 2270, 4068, 90, 70, "Input",ExpressionUUID->"25404062-2fca-4eb1-9038-c3dea9fb558d", CellID->144722475] }, Open ]], Cell[CellGroupData[{ Cell[107526, 2365, 175, 4, 70, "Subsubsection",ExpressionUUID->"1608bc28-ae41-438f-9b57-e3d5511b17dd", CellID->381401682], Cell[107704, 2371, 5940, 121, 70, "Input",ExpressionUUID->"03ff7601-966d-4af0-9e3c-808e6bc196cf", CellID->602732145], Cell[113647, 2494, 3330, 72, 70, "Input",ExpressionUUID->"06c9af3f-a0d2-48aa-a436-22adc14f42ac", CellID->803450804], Cell[116980, 2568, 5297, 117, 70, "Input",ExpressionUUID->"fcdc882e-86da-42d7-846f-a7873ac6a3bb", CellID->69179625] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[122326, 2691, 165, 4, 70, "Subsection",ExpressionUUID->"a3813e7f-9119-45ab-88a0-97b11a7f04d8", CellID->9456133], Cell[122494, 2697, 293, 8, 70, "Input",ExpressionUUID->"564245f2-5cff-4a44-bd61-a6b8eee88f8d", CellID->901195185], Cell[122790, 2707, 493, 13, 70, "Input",ExpressionUUID->"38c1fa78-b85b-487e-b826-cf8561968bcc", CellID->725142241], Cell[123286, 2722, 3330, 74, 70, "Input",ExpressionUUID->"aff2a88a-a04d-4c6e-9635-c516434f915c", CellID->522889070], Cell[126619, 2798, 20157, 382, 70, "Input",ExpressionUUID->"240c4847-281e-4d8f-89b6-fcbce8e4c959", CellID->672866399] }, Open ]] }, Open ]], Cell[146803, 3184, 117, 4, 70, "Section",ExpressionUUID->"00419d5a-64cb-4fcd-a679-089d4198e251", CellTags->"Documentation", CellID->475424634], Cell[CellGroupData[{ Cell[146945, 3192, 1879, 48, 70, "Subsection",ExpressionUUID->"fee33052-3025-4e68-90b6-7341249cebca", CellTags->{"TemplateCellGroup", "Usage"}, CellID->77317143], Cell[CellGroupData[{ Cell[148849, 3244, 158, 4, 70, "UsageInputs",ExpressionUUID->"3a2a1385-cec1-405a-9930-2f52be591457", CellID->415589021], Cell[149010, 3250, 721, 23, 70, "UsageDescription",ExpressionUUID->"7e1e1649-f0b5-448d-a5b1-3bc7bb0da293", CellID->522238241] }, Open ]], Cell[CellGroupData[{ Cell[149768, 3278, 611, 18, 70, "UsageInputs",ExpressionUUID->"830b60c1-65f1-4a42-9f24-c9d626cf6013", CellID->929360290], Cell[150382, 3298, 630, 21, 70, "UsageDescription",ExpressionUUID->"4c690651-f366-4908-8468-dfdfb225d85c", CellID->216039179] }, Open ]], Cell[CellGroupData[{ Cell[151049, 3324, 300, 10, 70, "UsageInputs",ExpressionUUID->"a42fd34a-d901-42b4-8e59-78c3012b95c4", CellID->234491822], Cell[151352, 3336, 92, 1, 70, "UsageDescription",ExpressionUUID->"f7768182-b8dc-4912-a413-85230703e68f", CellID->21642035] }, Open ]], Cell[CellGroupData[{ Cell[151481, 3342, 203, 6, 70, "UsageInputs",ExpressionUUID->"e9e54a12-34f4-4e88-930d-c22524c98df6", CellID->899917871], Cell[151687, 3350, 212, 7, 70, "UsageDescription",ExpressionUUID->"70c10943-6b18-4f68-8aff-20feb0c6d734", CellID->817667823] }, Open ]], Cell[CellGroupData[{ Cell[151936, 3362, 616, 18, 70, "UsageInputs",ExpressionUUID->"97544fc9-cae9-45be-a385-9a5c7d371d52", CellID->120857401], Cell[152555, 3382, 196, 7, 70, "UsageDescription",ExpressionUUID->"f91730b9-f6cd-471a-b593-09ec56b0368b", CellID->596281745] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[152800, 3395, 1349, 30, 70, "Subsection",ExpressionUUID->"086aa49f-22fd-4f2b-8e47-54da41983a8a", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->85988701], Cell[154152, 3427, 257, 6, 70, "Notes",ExpressionUUID->"3b17c03f-2237-41b0-952a-f687b920bbe1", CellID->505737131], Cell[154412, 3435, 310, 7, 70, "Notes",ExpressionUUID->"2e7d4da6-18c5-4245-ade3-859fca4ab501", CellID->945842244], Cell[154725, 3444, 183, 4, 70, "Notes",ExpressionUUID->"039445a9-2bad-4ac9-8728-b442d04ff050", CellID->554024925], Cell[154911, 3450, 200, 6, 70, "Notes",ExpressionUUID->"ec005244-2aa7-4f68-95a1-e66d5ac2a61d", CellTags->"TabNext", CellID->634001825], Cell[155114, 3458, 1393, 35, 70, "TableNotes",ExpressionUUID->"a6922144-8981-4baf-82e8-d5849ce6249c", CellID->667184426], Cell[156510, 3495, 1067, 30, 70, "Notes",ExpressionUUID->"4f9055e7-9f08-460b-a6d3-d669a848abbc", CellID->786545901], Cell[157580, 3527, 261, 6, 70, "Notes",ExpressionUUID->"c16346a5-f6f7-4228-9446-9a0b5ab52077", CellID->134878355], Cell[157844, 3535, 296, 7, 70, "Notes",ExpressionUUID->"c0bb2277-61e3-47fe-8107-e3cd6dde7285", CellID->252998375], Cell[158143, 3544, 306, 7, 70, "Notes",ExpressionUUID->"c714b080-e0c6-4d73-ab81-f8e510dc0d5a", CellID->362332257], Cell[158452, 3553, 685, 20, 70, "Notes",ExpressionUUID->"9e82416b-0c45-49f2-9a1d-3748048dcf60", CellID->15970232], Cell[159140, 3575, 1884, 55, 70, "Notes",ExpressionUUID->"8e60fdbd-41d5-4ba5-a270-e103b8f9a6d3", CellID->461544106] }, Open ]], Cell[CellGroupData[{ Cell[161061, 3635, 6918, 150, 70, "Section",ExpressionUUID->"6dce0248-f2e7-46e1-9fc5-cca3a4466187", CellTags->{"Examples", "TemplateCellGroup"}, CellID->992818145], Cell[CellGroupData[{ Cell[168004, 3789, 75, 2, 70, "Subsection",ExpressionUUID->"da9ae32a-a805-401b-b882-eef42cc4e82b", CellID->904125756], Cell[168082, 3793, 657, 21, 70, "Text",ExpressionUUID->"cbb52f15-3ff8-490c-9366-69b22ea1d285", CellID->875145491], Cell[CellGroupData[{ Cell[168764, 3818, 427, 9, 70, "Input",ExpressionUUID->"e7bb7d2e-afa1-428a-801e-e522616dbbcb", CellID->188670269], Cell[169194, 3829, 23470, 414, 70, "Output",ExpressionUUID->"cea77a8e-b330-4829-bbb0-31c793560a64", CellID->293285788] }, Open ]], Cell[192679, 4246, 153, 3, 70, "Text",ExpressionUUID->"d8dcf0d0-933f-46f1-8fe8-3086d6d9eb83", CellID->728860234], Cell[CellGroupData[{ Cell[192857, 4253, 264, 6, 70, "Input",ExpressionUUID->"7fdd30b3-168f-4735-8d2d-b3649fe7ea06", CellID->30312315], Cell[193124, 4261, 15731, 263, 70, "Output",ExpressionUUID->"620cee3d-d4f5-4e2c-8e06-6282c2af1610", CellID->488888757] }, Open ]], Cell[208870, 4527, 218, 4, 70, "Text",ExpressionUUID->"5176f410-d144-4f51-a5a3-4370ea6181dd", CellID->962474874], Cell[CellGroupData[{ Cell[209113, 4535, 231, 6, 70, "Input",ExpressionUUID->"bdc3b580-9538-4c06-b947-48d93922c6e1", CellID->881308311], Cell[209347, 4543, 12161, 206, 70, "Output",ExpressionUUID->"cbfbd42e-b1b5-445e-8a64-673bd074b6cd", CellID->204934190] }, Open ]], Cell[221523, 4752, 3111, 56, 70, "Text",ExpressionUUID->"e20d30e5-6723-4e24-b6ed-70a5bbeb9259", CellID->103618464], Cell[CellGroupData[{ Cell[224659, 4812, 245, 6, 70, "Input",ExpressionUUID->"9abf9db9-248d-49cd-a478-e090b9d7af08", CellID->729700213], Cell[224907, 4820, 523, 13, 70, "Output",ExpressionUUID->"3d83b9bc-84f9-43f4-ae70-bd19cd3c2819", CellID->526502585] }, Open ]], Cell[225445, 4836, 109138, 1799, 70, "ExampleImage",ExpressionUUID->"5739ed17-60e7-42cd-83f4-51a29ad3185b", CellID->405161419], Cell[334586, 6637, 150, 3, 70, "Text",ExpressionUUID->"beb9f1a3-4a55-40c7-8053-c1a7a9cbff24", CellID->708187681], Cell[334739, 6642, 361, 8, 70, "Input",ExpressionUUID->"9fc9e79f-2d3d-4e75-855c-f5a62616d336", CellID->978239695] }, Open ]], Cell[CellGroupData[{ Cell[335137, 6655, 66, 2, 70, "Subsection",ExpressionUUID->"da38666b-2bd3-4f78-a197-c132a0e803dc", CellID->204653245], Cell[335206, 6659, 168, 3, 70, "Text",ExpressionUUID->"d580860b-1a03-4ede-b0f0-68cdce6ddb0d", CellID->788122737], Cell[CellGroupData[{ Cell[335399, 6666, 454, 11, 70, "Input",ExpressionUUID->"2d44b75c-56d5-4c66-a909-8e0d3a431a01", CellID->434311063], Cell[335856, 6679, 22944, 409, 70, "Output",ExpressionUUID->"261c6d07-2b58-407e-a522-427011cede20", CellID->27372868] }, Open ]], Cell[358815, 7091, 154, 3, 70, "Text",ExpressionUUID->"31f56b40-d8b2-4ee0-95c7-0cef60e140f8", CellID->527404286], Cell[CellGroupData[{ Cell[358994, 7098, 325, 8, 70, "Input",ExpressionUUID->"37648674-58f0-42fc-b055-2a1b75458643", CellID->699432553], Cell[359322, 7108, 101346, 2626, 70, "Output",ExpressionUUID->"45226c98-4dac-41d4-a70a-59a806531bac", CellID->608383389] }, Open ]], Cell[460683, 9737, 165, 3, 70, "Text",ExpressionUUID->"efc9079e-5c35-4bbc-bc3c-503446fc7124", CellID->566125290], Cell[CellGroupData[{ Cell[460873, 9744, 260, 7, 70, "Input",ExpressionUUID->"45d0d48c-b439-4309-af2a-b9b169a84bb3", CellID->538065275], Cell[461136, 9753, 498, 12, 70, "Output",ExpressionUUID->"7e231ca5-41f4-4268-9f85-3c38caa12c61", CellID->510556083] }, Open ]], Cell[461649, 9768, 44532, 740, 70, "ExampleImage",ExpressionUUID->"f0f249cf-1358-46ec-8745-6cf07ed1dd8f", CellID->235080673], Cell[506184, 10510, 141, 3, 70, "Text",ExpressionUUID->"7890cd7c-b46c-449f-b509-97fc602fad41", CellID->650300133], Cell[506328, 10515, 390, 8, 70, "Input",ExpressionUUID->"afd4d06c-dbcf-4eb9-99ca-0a44a4234a67", CellID->815526892], Cell[CellGroupData[{ Cell[506743, 10527, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"a6663059-6353-49d7-8438-49c7e691c8e9", CellID->14107562], Cell[506889, 10533, 234, 4, 70, "Text",ExpressionUUID->"3c9fbce0-790c-447e-a1d1-b3f0d3fcfdf7", CellID->130384412], Cell[CellGroupData[{ Cell[507148, 10541, 557, 14, 70, "Input",ExpressionUUID->"6331eda9-9033-4f9b-8382-da2d45a7f84e", CellID->178821751], Cell[507708, 10557, 315, 7, 70, "Output",ExpressionUUID->"2401bf2e-7fbe-4a45-b6dd-9edba5aa3e34", CellID->848599011] }, Open ]], Cell[508038, 10567, 144, 3, 70, "Text",ExpressionUUID->"206c78a3-e851-45d4-958e-e20d58edcf77", CellID->200350681], Cell[CellGroupData[{ Cell[508207, 10574, 197, 5, 70, "Input",ExpressionUUID->"03053813-a1bf-4ecf-afef-77e46c8eb343", CellID->414098752], Cell[508407, 10581, 22843, 405, 70, "Output",ExpressionUUID->"885e0d36-15f0-4356-870f-a34861324d35", CellID->98255924] }, Open ]], Cell[531265, 10989, 141, 3, 70, "Text",ExpressionUUID->"5411b191-2285-4365-b3ba-0d61be23e2ac", CellID->650300134], Cell[531409, 10994, 390, 8, 70, "Input",ExpressionUUID->"99878e74-6cfc-4058-a367-2341c25a5f7b", CellID->552276944] }, Open ]], Cell[CellGroupData[{ Cell[531836, 11007, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"d03d0b92-9275-45fe-b892-412552cf58a1", CellID->14107563], Cell[531982, 11013, 463, 11, 70, "Text",ExpressionUUID->"ef3d644a-0775-4467-8be2-33c957939f3c", CellID->380814871], Cell[532448, 11026, 97179, 1603, 70, "ExampleImage",ExpressionUUID->"9deb3a46-fa6f-463b-ae08-f4a2c845d97f", CellID->358060554] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[629676, 12635, 68, 2, 70, "Subsection",ExpressionUUID->"7ba8b879-7dab-4fa7-b605-27e6b0ab5de9", CellID->890561554], Cell[CellGroupData[{ Cell[629769, 12641, 142, 3, 70, "Subsubsection",ExpressionUUID->"1beeeb49-0b70-451d-ab84-a2e7c6012dba", CellID->900754557], Cell[629914, 12646, 781, 23, 70, "Text",ExpressionUUID->"6d52461a-f63f-481f-b849-671096a0b1bf", CellID->504465039], Cell[CellGroupData[{ Cell[630720, 12673, 231, 6, 70, "Input",ExpressionUUID->"9ba8eb83-3c54-41c4-87c9-e603af404b0f", CellID->56201520], Cell[630954, 12681, 22672, 403, 70, "Output",ExpressionUUID->"95e085b6-fa1a-4c01-a4b6-616512971770", CellID->905858629] }, Open ]], Cell[CellGroupData[{ Cell[653663, 13089, 198, 5, 70, "Input",ExpressionUUID->"d5179ece-7075-4d21-84ff-9317d6266e14", CellID->952374195], Cell[653864, 13096, 173, 4, 70, "Output",ExpressionUUID->"2e410bd2-095b-489e-97c4-059725a4145f", CellID->757211150] }, Open ]], Cell[CellGroupData[{ Cell[654074, 13105, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"0247ad53-dafb-4300-9302-12ef4c534e15", CellID->14107564], Cell[654220, 13111, 272, 7, 70, "Text",ExpressionUUID->"1d0fdbac-7f92-496f-a61d-2548ab331579", CellID->957756939], Cell[CellGroupData[{ Cell[654517, 13122, 292, 8, 70, "Input",ExpressionUUID->"5bbb44d1-abdb-47d1-a27a-4361ad23672e", CellID->255069346], Cell[654812, 13132, 23184, 414, 70, "Output",ExpressionUUID->"2e4f29b4-6c46-4a0d-8263-2c90d2677af5", CellID->993904691] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[678045, 13552, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"d9c744e6-9546-4c1c-a20b-ffce4dd60505", CellID->14107565], Cell[678191, 13558, 153, 3, 70, "Text",ExpressionUUID->"202f573f-bb50-427e-9a87-08eefe09992a", CellID->982795675], Cell[CellGroupData[{ Cell[678369, 13565, 314, 8, 70, "Input",ExpressionUUID->"c77b6ab3-e118-4e0a-9b7e-0badb0b5e99d", CellID->814935235], Cell[678686, 13575, 22637, 402, 70, "Output",ExpressionUUID->"77fb35e6-eae0-4b6c-a1ed-9752da585001", CellID->960210313] }, Open ]], Cell[CellGroupData[{ Cell[701360, 13982, 196, 5, 70, "Input",ExpressionUUID->"810c075d-9363-4f58-ba54-fc12d128cc60", CellID->840197940], Cell[701559, 13989, 175, 4, 70, "Output",ExpressionUUID->"c76f73a0-36b3-4253-b861-fe0159c6f798", CellID->628768292] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[701795, 14000, 144, 3, 70, "Subsubsection",ExpressionUUID->"d3d7fee4-0162-4e3b-89e5-c16179b4012d", CellID->278316992], Cell[701942, 14005, 766, 23, 70, "Text",ExpressionUUID->"7b374adb-12cf-4138-bcab-c0c06595728b", CellID->334620419], Cell[CellGroupData[{ Cell[702733, 14032, 161, 5, 70, "Input",ExpressionUUID->"b105ab4b-f355-4eb0-ad62-27188d9cac44", CellID->868601298], Cell[702897, 14039, 3825, 69, 70, "Print",ExpressionUUID->"c2327182-0187-4e38-9f09-1253ef63ede3", CellID->937137117], Cell[706725, 14110, 22733, 405, 70, "Output",ExpressionUUID->"9fb2d43b-3c43-4266-a605-0b39c6dc59f3", CellID->818926965] }, Open ]], Cell[CellGroupData[{ Cell[729495, 14520, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"a0f29735-4876-4f86-b845-47314ba15eed", CellID->14107566], Cell[729641, 14526, 154, 3, 70, "Text",ExpressionUUID->"8560474d-b445-42d9-9235-fc181055930a", CellID->125923766], Cell[CellGroupData[{ Cell[729820, 14533, 302, 7, 70, "Input",ExpressionUUID->"bd612da2-1f17-47b7-9886-239280a79f7d", CellID->612437113], Cell[730125, 14542, 22651, 403, 70, "Output",ExpressionUUID->"8f7368b3-5572-4888-a761-effcb2cfbd16", CellID->784603311] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[752849, 14953, 76, 2, 70, "Subsection",ExpressionUUID->"a732e6ab-b2c2-45d8-b148-8d5c1d4d0747", CellID->158766396], Cell[752928, 14957, 312, 7, 70, "Text",ExpressionUUID->"49c1fd8e-6fea-47fc-a591-d5208dbb5a63", CellID->649054993], Cell[CellGroupData[{ Cell[753265, 14968, 339, 9, 70, "Input",ExpressionUUID->"5c8ee546-8d97-4409-b8a2-0933c5600ae3", CellID->208047600], Cell[753607, 14979, 1868, 52, 70, "Output",ExpressionUUID->"c01ae56d-a6ca-4858-95cc-3a0550c7e4b6", CellID->491415459] }, Open ]], Cell[CellGroupData[{ Cell[755512, 15036, 142, 4, 70, "Input",ExpressionUUID->"94b58123-f868-4633-86a6-d6b35d37672d", CellID->761481734], Cell[755657, 15042, 415, 10, 70, "Message",ExpressionUUID->"ef87434e-792c-4854-b820-10e47be1c82d", CellID->31955501], Cell[756075, 15054, 10111, 174, 70, "Output",ExpressionUUID->"48260bfd-028a-4e6f-89b1-191f98552973", CellID->203442567] }, Open ]], Cell[CellGroupData[{ Cell[766223, 15233, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"a225c360-57d1-496b-955e-28ff2a9f2541", CellID->14107567], Cell[766369, 15239, 395, 8, 70, "Text",ExpressionUUID->"53b48f8f-0dbe-4a63-b1aa-9a3cafaad113", CellID->553092305], Cell[CellGroupData[{ Cell[766789, 15251, 269, 7, 70, "Input",ExpressionUUID->"8c490b8e-f959-4566-9628-bd8432bf16b1", CellID->645494305], Cell[767061, 15260, 845, 15, 70, "Message",ExpressionUUID->"45129ee0-1d8a-4c3b-82c1-b398f3eb894c", CellID->745804005] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[767955, 15281, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"38ebeb06-2a59-4267-8498-18efdb8d60bd", CellID->14107568], Cell[768101, 15287, 205, 5, 70, "Text",ExpressionUUID->"b4d3cf2d-a4f6-4153-bab5-3c0faee2d6f1", CellID->129235781], Cell[CellGroupData[{ Cell[768331, 15296, 260, 6, 70, "Input",ExpressionUUID->"bb9a5231-a563-4b05-99f2-adeb2f710100", CellID->561681313], Cell[768594, 15304, 822, 15, 70, "Message",ExpressionUUID->"2c10fd57-7e53-4b77-bdbc-9f9787e3371b", CellID->392220818], Cell[769419, 15321, 4726, 97, 70, "Output",ExpressionUUID->"a22a3ac1-1cc6-4c97-94e9-e2e397d12ead", CellID->260776972] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[774218, 15426, 153, 4, 70, "Section",ExpressionUUID->"75d00f79-a4b4-4b18-b5cf-1097769e9e9b", CellTags->"Source & Additional Information", CellID->346918952], Cell[CellGroupData[{ Cell[774396, 15434, 918, 24, 70, "Subsection",ExpressionUUID->"6cad0f92-4a94-4642-b66f-668a367f49f1", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->605210913], Cell[775317, 15460, 46, 1, 70, "Text",ExpressionUUID->"a59ec670-cf73-4331-bf30-884daf78c874", CellID->805077012] }, Open ]], Cell[CellGroupData[{ Cell[775400, 15466, 893, 24, 70, "Subsection",ExpressionUUID->"5ff53be7-6830-489d-a66d-ee1c7e70322e", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->550320615], Cell[776296, 15492, 62, 1, 70, "Item",ExpressionUUID->"aa3542b4-0ac8-40c4-acf1-ca5674895a94", CellID->485138958], Cell[776361, 15495, 55, 1, 70, "Item",ExpressionUUID->"46ed2fe2-473a-480a-be8e-2c9f76f3759f", CellID->278784059], Cell[776419, 15498, 62, 1, 70, "Item",ExpressionUUID->"e770b739-51e9-44b2-a12a-ca0aa6cb81cb", CellID->357041994] }, Open ]], Cell[CellGroupData[{ Cell[776518, 15504, 166, 5, 70, "Subsection",ExpressionUUID->"3826cfba-53be-4d48-8ce9-f94cb38b903f", CellTags->{"Categories", "TemplateCellGroup"}, CellID->63169632], Cell[776687, 15511, 6447, 217, 70, "Output",ExpressionUUID->"f13ada3e-328a-438a-a164-a5f9281bb32d", CellTags->"CategoriesCell", CellID->732517034] }, Open ]], Cell[CellGroupData[{ Cell[783171, 15733, 870, 24, 70, "Subsection",ExpressionUUID->"8c542f8b-29f3-492c-bfe0-0460f34a6734", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->822678636], Cell[784044, 15759, 51, 1, 70, "Item",ExpressionUUID->"68ba8fe6-4951-4970-a924-d69c59601156", CellID->59576503], Cell[784098, 15762, 48, 1, 70, "Item",ExpressionUUID->"22626331-cc8c-4ab1-8716-23dfef28e150", CellID->664570986], Cell[784149, 15765, 49, 1, 70, "Item",ExpressionUUID->"7f67f8ad-c9e9-4695-a6a3-501080eeb5c3", CellID->543676518], Cell[784201, 15768, 51, 1, 70, "Item",ExpressionUUID->"3cd710de-02db-4152-95fa-b1b7e106e684", CellID->496238230], Cell[784255, 15771, 46, 1, 70, "Item",ExpressionUUID->"65052e7e-a37b-4ab5-b33f-68cdd9852a2e", CellID->351751699] }, Open ]], Cell[CellGroupData[{ Cell[784338, 15777, 920, 24, 70, "Subsection",ExpressionUUID->"8e46ff39-f279-467d-aba0-3f85a5e489ab", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->740191071], Cell[785261, 15803, 59, 1, 70, "Item",ExpressionUUID->"27d09558-a57b-47fc-874f-11bb965628d8", CellID->468392591], Cell[785323, 15806, 49, 1, 70, "Item",ExpressionUUID->"952184be-4da5-4302-9d56-ef6ceaddc730", CellID->693173644], Cell[785375, 15809, 45, 1, 70, "Item",ExpressionUUID->"ab055771-db2a-4d1c-9c16-89e2c7a69ed7", CellID->549278319], Cell[785423, 15812, 68, 1, 70, "Item",ExpressionUUID->"aee123e0-3c2f-4c22-8964-99dafce3e55a", CellID->356563292], Cell[785494, 15815, 50, 1, 70, "Item",ExpressionUUID->"9b4505a8-6ce8-465f-ae05-e9c30e9ad477", CellID->128372319] }, Open ]], Cell[CellGroupData[{ Cell[785581, 15821, 971, 25, 70, "Subsection",ExpressionUUID->"c7aeb9dd-b075-49a3-b610-412888b0bca6", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->568416317], Cell[786555, 15848, 496, 8, 70, "Text",ExpressionUUID->"cc1ee9eb-11c2-4fa4-9433-f3c13acbdc17", CellTags->"TabNext", CellID->343081869] }, Open ]], Cell[CellGroupData[{ Cell[787088, 15861, 823, 24, 70, "Subsection",ExpressionUUID->"d2aeefce-308f-47c7-b73a-7055b4ee1fe5", CellTags->{"Links", "TemplateCellGroup"}, CellID->503703789], Cell[787914, 15887, 485, 8, 70, "Item",ExpressionUUID->"0ce37385-b326-4487-83ce-18125607ad98", CellTags->"TabNext", CellID->485448166] }, Open ]], Cell[CellGroupData[{ Cell[788436, 15900, 1737, 43, 70, "Subsection",ExpressionUUID->"891daa0f-d043-4ed4-8282-94898232f4ba", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->161936114], Cell[CellGroupData[{ Cell[790198, 15947, 129, 4, 70, "Input",ExpressionUUID->"3ea0fd85-6a7e-4a55-aae6-0bd0dc1bc609", CellID->667877521], Cell[790330, 15953, 93, 3, 70, "Output",ExpressionUUID->"e600bf2c-8adf-4905-835f-360060588021", CellID->993233288] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[790484, 15963, 1048, 26, 70, "Section",ExpressionUUID->"7e2fa38f-a3b3-4ca6-b681-6eb434193124", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->278925130], Cell[791535, 15991, 509, 8, 70, "Text",ExpressionUUID->"3208f12e-e11e-44b3-9d72-55d77dcc0f4d", CellTags->"TabNext", CellID->567921317] }, Open ]], Cell[CellGroupData[{ Cell[792081, 16004, 929, 25, 70, "Section",ExpressionUUID->"b3bcba1c-f078-49c2-b5eb-0cace511eb3f", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->613343431], Cell[793013, 16031, 495, 8, 70, "Text",ExpressionUUID->"eb1e6dc0-70de-4873-aa18-da7f7e3505f5", CellTags->"TabNext", CellID->920818074] }, Open ]] } ] *) (* End of internal cache information *)