(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.1' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 419865, 8528] NotebookOptionsPosition[ 262388, 5535] NotebookOutlinePosition[ 404804, 8208] CellTagsIndexPosition[ 402995, 8158] WindowTitle->Loess | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Loess", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->786230840], Cell["Smooth noisy data using local regression", "Text", CellTags->{"Description", "TemplateCell"}, CellID->557153629], Cell[CellGroupData[{ Cell[TextData[{ "Definition", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Function", Cell[ BoxData[ FrameBox[ Cell[ "Define your function using the name you gave in the Title line \ above. You can add input cells and extra code to define additional input \ cases or prerequisites. All definitions, including dependencies, will be \ included in the generated resource function.\n\nThis section should be \ evaluated before creating the Examples section below.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoFunction"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Function"}, DefaultNewCellStyle->"Input", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Loess", "[", RowBox[{ RowBox[{"data_List", " ", "/;", " ", RowBox[{"MatrixQ", "[", RowBox[{"data", ",", " ", "NumberQ"}], "]"}]}], ",", " ", RowBox[{"bandwidth_Integer", " ", "/;", " ", RowBox[{"bandwidth", " ", ">", " ", "1"}]}], ",", " ", "x_", ",", " ", RowBox[{"OptionsPattern", "[", "]"}]}], "]"}], " ", ":=", " ", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{ "vars", ",", " ", "pts", ",", " ", "nf", ",", " ", "params", ",", " ", "inputDim"}], "}"}], ",", " ", RowBox[{ RowBox[{"inputDim", " ", "=", " ", RowBox[{ RowBox[{ RowBox[{"Dimensions", "[", "data", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], " ", "-", " ", "1"}]}], ";", " ", RowBox[{"nf", " ", "=", " ", RowBox[{"Nearest", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Most", "[", "#1", "]"}], " ", "->", " ", "#1"}], " ", "&"}], " ", ")"}], " ", "/@", " ", "data"}], "]"}]}], ";", " ", RowBox[{"vars", " ", "=", " ", RowBox[{"Table", "[", RowBox[{ RowBox[{"Unique", "[", "]"}], ",", " ", "inputDim"}], "]"}]}], ";", " ", RowBox[{"params", " ", "=", " ", RowBox[{"DeleteDuplicates", "[", RowBox[{"Flatten", "[", RowBox[{"Outer", " ", "@@", " ", RowBox[{"Prepend", "[", RowBox[{ RowBox[{"ConstantArray", "[", RowBox[{ RowBox[{"Prepend", "[", RowBox[{"vars", ",", " ", "1"}], "]"}], ",", " ", RowBox[{"Replace", "[", RowBox[{ RowBox[{"OptionValue", "[", "InterpolationOrder", "]"}], ",", " ", RowBox[{ RowBox[{"Except", "[", "_Integer", "]"}], " ", "->", " ", "1"}]}], "]"}]}], "]"}], ",", " ", "Times"}], "]"}]}], "]"}], "]"}]}], ";", " ", RowBox[{"Which", "[", RowBox[{ RowBox[{ RowBox[{"NumberQ", "[", "x", "]"}], " ", "&&", " ", RowBox[{"inputDim", " ", "==", " ", "1"}]}], ",", " ", RowBox[{ RowBox[{"pts", " ", "=", " ", RowBox[{"nf", "[", RowBox[{"x", ",", " ", "bandwidth"}], "]"}]}], ";", " ", RowBox[{ RowBox[{"LinearModelFit", "[", RowBox[{"pts", ",", " ", "params", ",", " ", "vars", ",", " ", RowBox[{"Weights", " ", "->", " ", RowBox[{"weightFunctionApply", "[", RowBox[{ RowBox[{"OptionValue", "[", "\"\\"", "]"}], ",", " ", "pts", ",", " ", "x"}], "]"}]}]}], "]"}], "[", "x", "]"}]}], ",", " ", RowBox[{ RowBox[{"VectorQ", "[", RowBox[{"x", ",", " ", "NumberQ"}], "]"}], " ", "&&", " ", RowBox[{ RowBox[{"Length", "[", "x", "]"}], " ", "==", " ", "inputDim"}]}], ",", " ", RowBox[{ RowBox[{"pts", " ", "=", " ", RowBox[{"nf", "[", RowBox[{"x", ",", " ", "bandwidth"}], "]"}]}], ";", " ", RowBox[{ RowBox[{"LinearModelFit", "[", RowBox[{"pts", ",", " ", "params", ",", " ", "vars", ",", " ", RowBox[{"Weights", " ", "->", " ", RowBox[{"weightFunctionApply", "[", RowBox[{ RowBox[{"OptionValue", "[", "\"\\"", "]"}], ",", " ", "pts", ",", " ", "x"}], "]"}]}]}], "]"}], "[", RowBox[{"Sequence", " ", "@@", " ", "x"}], "]"}]}], ",", " ", RowBox[{ RowBox[{"VectorQ", "[", RowBox[{"x", ",", " ", "NumberQ"}], "]"}], " ", "&&", " ", RowBox[{"inputDim", " ", "==", " ", "1"}]}], ",", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"pts", " ", "=", " ", RowBox[{"nf", "[", RowBox[{"#1", ",", " ", "bandwidth"}], "]"}]}], ";", " ", RowBox[{ RowBox[{"LinearModelFit", "[", RowBox[{ "pts", ",", " ", "params", ",", " ", "vars", ",", " ", RowBox[{"Weights", " ", "->", " ", RowBox[{"weightFunctionApply", "[", RowBox[{ RowBox[{ "OptionValue", "[", "\"\\"", "]"}], ",", " ", "pts", ",", " ", "#1"}], "]"}]}]}], "]"}], "[", "#1", "]"}]}], ")"}], " ", "&"}], " ", ")"}], " ", "/@", " ", "x"}], ",", " ", RowBox[{ RowBox[{"MatrixQ", "[", RowBox[{"x", ",", " ", "NumberQ"}], "]"}], " ", "&&", " ", RowBox[{ RowBox[{ RowBox[{"Dimensions", "[", "x", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], " ", "==", " ", "inputDim"}]}], ",", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"pts", " ", "=", " ", RowBox[{"nf", "[", RowBox[{"#1", ",", " ", "bandwidth"}], "]"}]}], ";", " ", RowBox[{ RowBox[{"LinearModelFit", "[", RowBox[{ "pts", ",", " ", "params", ",", " ", "vars", ",", " ", RowBox[{"Weights", " ", "->", " ", RowBox[{"weightFunctionApply", "[", RowBox[{ RowBox[{ "OptionValue", "[", "\"\\"", "]"}], ",", " ", "pts", ",", " ", "#1"}], "]"}]}]}], "]"}], "[", RowBox[{"Sequence", " ", "@@", " ", "#1"}], "]"}]}], ")"}], " ", "&"}], " ", ")"}], " ", "/@", " ", "x"}], ",", " ", "True", ",", " ", RowBox[{ RowBox[{ RowBox[{ "ResourceFunction", "[", "\"\\"", "]"}], "[", RowBox[{"Loess", "::", "badinputdims"}], "]"}], ";", " ", "$Failed"}]}], "]"}]}]}], "]"}]}], "\n", " "}], "\n", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Loess", "[", RowBox[{"data_", ",", " ", "rest___"}], "]"}], " ", "/;", " ", RowBox[{"VectorQ", "[", RowBox[{"data", ",", " ", "NumberQ"}], "]"}]}], " ", ":=", " ", RowBox[{"Loess", "[", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"Range", "[", RowBox[{"Length", "[", "data", "]"}], "]"}], ",", " ", "data"}], "}"}], "]"}], ",", " ", "rest"}], "]"}]}], "\n", " "}], "\n", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Loess", "[", RowBox[{"data_", ",", " ", RowBox[{"Scaled", "[", "n_", "]"}], ",", " ", "rest___"}], "]"}], " ", "/;", " ", RowBox[{"0", " ", "<", " ", "n", " ", "<", " ", "1"}]}], " ", ":=", " ", RowBox[{"Loess", "[", RowBox[{"data", ",", " ", RowBox[{"Ceiling", "[", RowBox[{ RowBox[{"Length", "[", "data", "]"}], "*", "n"}], "]"}], ",", " ", "rest"}], "]"}]}], "\n", " "}], "\n", RowBox[{ RowBox[{ RowBox[{"Options", "[", "Loess", "]"}], " ", "=", " ", RowBox[{"{", RowBox[{ RowBox[{"InterpolationOrder", " ", "->", " ", "1"}], ",", " ", RowBox[{"\"\\"", " ", "->", " ", "Automatic"}]}], "}"}]}], "\n"}], "\n", RowBox[{ RowBox[{ RowBox[{"Loess", "::", "badinputdims"}], " ", "=", " ", "\"\\""}], ";"}]}], "Input", InitializationCell->True, CellID->786495458], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"weightFunctionApply", "[", RowBox[{"Automatic", ",", " ", "___"}], "]"}], " ", ":=", " ", "Automatic"}], "\n", " "}], "\n", RowBox[{ RowBox[{"weightFunctionApply", "[", RowBox[{"fn_", ",", " ", "data_List", ",", " ", "x_"}], "]"}], " ", ":=", " ", RowBox[{"Normalize", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"fn", "[", RowBox[{"#1", " ", "-", " ", "x"}], "]"}], " ", "&"}], " ", ")"}], " ", "/@", " ", RowBox[{"Most", " ", "/@", " ", "data"}]}], "]"}]}]}], "Input", InitializationCell->True, CellID->601929048] }, Open ]], Cell[CellGroupData[{ Cell["Documentation", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Documentation"}, CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[TextData[{ "Usage", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Usage", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Document input usage cases by first typing an input structure, \ then pressing ", Cell[ BoxData[ StyleBox[ DynamicBox[ ToBoxes[ If[$OperatingSystem === "MacOSX", "\[ReturnKey]", "\[EnterKey]"], StandardForm], SingleEvaluation -> True, Evaluator -> "System"], ShowStringCharacters -> False]]], " to add a brief explanation of the function\[CloseCurlyQuote]s \ behavior for that structure. Pressing ", Cell[ BoxData[ StyleBox[ DynamicBox[ ToBoxes[ If[$OperatingSystem === "MacOSX", "\[ReturnKey]", "\[EnterKey]"], StandardForm], SingleEvaluation -> True, Evaluator -> "System"], ShowStringCharacters -> False]]], " repeatedly will create new cases as needed. Every input usage \ case defined above should be demonstrated explicitly here.\n\nSee existing \ documentation pages for examples."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoUsage"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Usage"}, DefaultNewCellStyle->{"UsageInputs", FontFamily -> "Source Sans Pro"}, CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Loess", "[", RowBox[{ StyleBox["data", "TI"], ",", " ", StyleBox["bandwidth", "TI"], ",", " ", StyleBox["x", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->35197956], Cell[TextData[{ "finds the interpolation of ", Cell[BoxData[ StyleBox["data", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " at ", Cell[BoxData[ StyleBox["x", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " by using local regression smoothing of ", Cell[BoxData[ StyleBox["bandwidth", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " data points." }], "UsageDescription", CellID->35237349] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Loess", "[", RowBox[{ StyleBox["data", "TI"], ",", " ", RowBox[{ TagBox[ ButtonBox[ StyleBox["Scaled", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}], ImageSizeCache -> {412., {3., 10.}}], ButtonData->"paclet:ref/Scaled", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "[", StyleBox["bandwidth", "TI"], "]"}], ",", " ", StyleBox["x", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->131625813], Cell[TextData[{ "finds the interpolation of ", Cell[BoxData[ StyleBox["data", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " at ", Cell[BoxData[ StyleBox["x", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " by using local regression smoothing of ", Cell[BoxData[ StyleBox["bandwidth", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " fraction of data points." }], "UsageDescription", CellID->314044687] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Loess", "[", RowBox[{ StyleBox["data", "TI"], ",", StyleBox["bandwidth", "TI"], ",", RowBox[{"{", RowBox[{ SubscriptBox[ StyleBox["x", "TI"], StyleBox["1", "TR"]], ",", SubscriptBox[ StyleBox["x", "TI"], StyleBox["2", "TR"]], ",", "\[Ellipsis]"}], "}"}]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->257550955], Cell[TextData[{ "finds the interpolation of ", Cell[BoxData[ StyleBox["data", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " at each ", Cell[BoxData[ StyleBox[ SubscriptBox[ StyleBox["x", "TI"], "i"], "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " by using local regression smoothing of ", Cell[BoxData[ StyleBox["bandwidth", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " data points." }], "UsageDescription", CellID->89525106] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Details & Options", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Notes", Cell[ BoxData[ FrameBox[ Cell[ "Give a detailed explanation of how the function is used and \ configured (e.g. acceptable input types, result formats, options \ specifications, background information). This section may include multiple \ cells, bullet lists, tables, hyperlinks and additional styles/structures as \ needed.\n\nAdd any other information that may be relevant, such as when the \ function was first discovered or how and why it is used within a given field. \ Include all relevant background or contextual information related to the \ function, its development, and its usage.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Notes"}, DefaultNewCellStyle->"Notes", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[TextData[{ "Input ", Cell[BoxData[ StyleBox["data", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can be low- or higher-dimensional." }], "Notes", Editable->True, Deletable->True, CellTags->"TabNext", CellID->53045600] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Examples", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Examples", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Demonstrate the function\[CloseCurlyQuote]s usage, starting with \ the most basic use case and describing each example in a preceding text cell.\ \n\nWithin a group, individual examples can be delimited by inserting page \ breaks between them (either using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"[Right-click]\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Insert Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], " between cells or through the menu using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"Insert\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], ").\n\nExamples should be grouped into Subsection and \ Subsubsection cells similarly to existing documentation pages. Here are some \ typical Subsection names and the types of examples they normally contain:\n \ ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Basic Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "most basic function usage\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Scope: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "input and display conventions, standard computational attributes \ (e.g. threading over lists)\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Options: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "available options and parameters for the function\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Applications: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "standard industry or academic applications\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Properties and Relations: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "how the function relates to other functions\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Possible Issues: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "limitations or unexpected behavior a user might experience\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Neat Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "particularly interesting, unconventional, or otherwise unique \ usage"}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Examples"}, CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", TaggingRules->{}, CellID->904125756], Cell[TextData[{ Cell[BoxData["Loess"], "InlineFormula", FontFamily->"Source Sans Pro"], " is useful when data is noisy but has an underlying trend:" }], "Text", TaggingRules->{}, CellChangeTimes->{3.76029166691883*^9, 3.8540293113550243`*^9}, CellID->774429530], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", RowBox[{ RowBox[{"Sin", "[", "i", "]"}], "+", RowBox[{"RandomReal", "[", "0.3", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.05"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{"ListPlot", "[", "data", "]"}]}], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->64118044], Cell[BoxData[ GraphicsBox[{{}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], AbsoluteThickness[1.6], PointBox[CompressedData[" 1:eJw10wlQU2cQAOAkQLiTACEEBqUylYJikaPFA/tv69SBERFw8AgUGAsyUkWt ClUQqRRRsYooWjxGLNWCCKIiiDocRlNQQkAggFjlTiAhJIFGOZSWZt/OvHnz 5v377e6bfQu27gqNZdBotNT/rrk7FZwblUEr3UXkYt5cFBFpnv0LQWAbPleR +e4FK/ecFxMf77kQEqXRPFF4Vwu+byDx8bunw/s6iV5rJhn+kaov6D14vpW0 eMRUewV0kLhtcyEl9XsME5MtezC/i/yyys+Z3Owh4sa5eE1yzVwCl4X0o9dD jnt4pdB6qfO9JDJHINgglaPfT/y3ea2W+A9h/gBhpWckZBxVYL0hcjGq+/4h FwV6cvJ0/3DJw7PD6A2TRFN/L6PfR9BTEOf2uCUfohToKQkvQ+Ye8ZkaPRUp SYnRpfuq0VOTI6HZslyNGs+rSb/stmtYlhp9DeGeDgk3uanEfC3hBUv6t8Ro sd446bZewWeABr0Jkv8bPakuQYPeBLlUEjJTlKdF7x8SVOBb8a25Fj0dyZQq wkRb1Oi9IwNtBV8vYlDee1LdctU3ZzXV33vSsN6EOyukvEmy7+x4RXknNd8U ueXEWel7iupvmmRNJYXxnlLzzhCnSj+LX4Mm0Jshvn660r3HqHk/kDfrN099 6Ka8j4TV5DhZxaD6myWCbqXT/U6qPxqUGdg/ivei5qGBS7SnFd9ChT4NWIKk jiQ7Lfk/3ZsODVsvNcW2UfXooGWlF8/WqdBjwIlHPed9IsfQY8DMsVc7bnkq 0WOAx3vCziii9scAWnx/GjlZLEPPAHK7aA4VzTL0DKEt1lSpmhpBzxD60pRO lYwR9AzhkjDV5/O7Q+gZwZmCEuNdvZRnBHfuDTkMBPWhxwRxVbh4jD2IHhO2 3UicuB7ehx4TPHaq61et60LPGN7IdutYQO2/MUQvuyJKPNyEngkcC6xY+8cV KXomYKQMORp8shU9E+h4cuH4JtMW9ExhxTfBfYfCLqNnCtPPdJ+OPS5Dzwyy 1/f6DZ/Jr9F7ZtBzS1YkDk1CzwzyK8Uvx4b2o2cOrjF3fox8fa1G75lDY9Y+ hv2MpEbvWYAgrGw2oawVPQtwXaos7DxVX6P3LOCThfLy6wGiGr1nCSWaj7pJ 01b0LKHpudQneLwdPRZ8GTGmcbB9hR4L3sbWmiWHStFjgfujcrFmRR96bHgp upmi29yHHhue/31gmU41iB4HoiGX2xvfW6PfLw60Lb8IpV/J0edAUOCUM+/d IOZzoJajiBt1kWE9DpySjbLuplKeFURMbxcEGw+jZwXfL3RcnlioRM8KlnBO eJaqFOhZQdrAvMUJU5RnBaHdrcnJ3cPoWQNzlzAlc3YIPWtwtRznVW1SoWcN oizDv7QxMvSsgRUs2ZjNH0HPGpp/Psdn3B5Czwa8fs6MW3BPgd/HBhbJQw4L F1D92QD7oODM891j6NkAFJ319iZUfzZwIsAt3iBZiR4XpAp2MXEbRI8Lp6+a 7+TBCHpcYP8wVd/QSPXHhf0ta9t3Tg6jxwXHa6GXa9cMoGcL+cWsxXV0yrOF 6jpJdcW6XvRsgREwHt8+IEfPFjb5auY3r3mLni1Yu73cGpVHeTzYWwHRktv9 6PHg9dEoh3N2lMcDpdeBc9urqP3gwSthWyv9O8rjgWeEOI1Z2I2eHRw5Um70 eMML9OzAzKO5Z0cXtY92sL1O/SznXQd6dpBNHzMWS56hZwcPmG5/Bl2pR48P MynOqQ/Shejx4cLTtZy0kFr0+CDPsRBLnxTi/8qHkwfvvvB2fIgeH5ilS7V3 5lfh/2sPi0c3QuZoI/kXQs2X9g== "]]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], AbsoluteThickness[1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.25}, {-0.982518466847809, 1.269177482415621}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[2]=", CellID->557009726] }, Open ]], Cell[TextData[{ "Find an estimated value for the data at ", Cell[BoxData[ FormBox[ RowBox[{ StyleBox["x", "TI"], "=", "2"}], TraditionalForm]]], " using the nearest 12 data points:" }], "Text", TaggingRules->{}, CellChangeTimes->{3.771003476734705*^9}, CellID->309140691], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Loess", "[", RowBox[{"data", ",", "12", ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[3]:=", CellID->337447623], Cell[BoxData["1.0545055603019613`"], "Output", TaggingRules->{}, CellLabel->"Out[3]=", CellID->708886313] }, Open ]], Cell[TextData[{ "Find an estimated value for the data at ", Cell[BoxData[ FormBox[ RowBox[{ StyleBox["x", "TI"], "=", "2"}], TraditionalForm]]], " using the nearest 10% of the data:" }], "Text", TaggingRules->{}, CellChangeTimes->{3.771003486735065*^9, 3.854029323394197*^9}, CellID->661623005], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Loess", "[", RowBox[{"data", ",", RowBox[{"Scaled", "[", "0.10", "]"}], ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[4]:=", CellID->56325002], Cell[BoxData["1.0462699960743795`"], "Output", TaggingRules->{}, CellLabel->"Out[4]=", CellID->515217328] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", RowBox[{"Loess", "[", RowBox[{"data", ",", "40", ",", "x"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.2"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[5]:=", CellID->528199399], Cell[BoxData[ GraphicsBox[{{}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.012833333333333334`], AbsoluteThickness[1.6], PointBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQN1gn1v9s67YT9rJgictOfeWOdbvfAelH/T3meF ebhM0CN7E2MQeGwv/GM9e3XwU6j8S/tr7ho7boa8sIeY9sF+/vQFGRZhr6Hq P9tvatcz0z/11j49DQS+2avdM/iyXPs9VP9P++P3T+1umvXe/uwZEPhjn5Ow b9p3wfdQ8xgcjs6LW28R/haqntHh1/LH206tfgU1n9nh398Tcbv1n0P1szgI /Ph/Pv/eI6h9bA4GHqcXzH5wB2oeh8OJuN71P4UuQc3jdGBI1bWcOnU31Dxu B4XljhkZHBv2Q8zjcbhwdePWObpn9kPM43MQyF5b9VP7+n6IeQIOd0qfcn/x vg9VL+CgU37epn7bo/0Q8wUdjnB/Utm66QlUv5CDyr3vU1+9f7ofYp+wwyc7 Xn0Gi2dQ80QcLARZT3kKPIWaJ+Kwoph39g7Ox1DzRB32TOvhf8/8AGqemMOC ZOktca9vQs0TdzgwU9bz/rnLUPMkHD7Ms9+zP+U01DwJBwaJjjON4fv2AwDf vOw3 "]]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.2}, {-0.6943360251406985, 0.9876111667463129}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[5]=", CellID->213950455] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Scope", "Subsection", TaggingRules->{}, CellID->204653245], Cell[TextData[{ Cell[BoxData["Loess"], "InlineFormula", FontFamily->"Source Sans Pro"], " can handle higher-dimensional data:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7710035492769623`*^9, 3.7710035555241117`*^9}, { 3.7710705808038483`*^9, 3.771070584246221*^9}, 3.8540294989291487`*^9}, CellID->491601926], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "j", ",", RowBox[{ RowBox[{"Sin", "[", RowBox[{"i", "+", RowBox[{"Sin", "[", "j", "]"}]}], "]"}], "+", RowBox[{"RandomReal", "[", "0.3", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.1"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.1"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{"ListPlot3D", "[", "data", "]"}]}], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->996378962], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsvYdfVHfWP55fEab3PkMT9x/4+X1293m2JdndJJsekxiTGE0x1sQYey9R wY4IiIo0EURAEBAEQZoUsYAiRZoIiGJDpZeZub9zzucOmuxuno0xFjLndfU1 3Llz+3l/3qd+vD7/ZtzU//u5556bJ4D/xn226IW5cz9b8q4C/nh/9rwZ02Z/ OeUfs+d/Oe3Lub///P+BlWP+r+eemw7/8DPnlBEhU78vT/p0nOIUpzztwoDi QbhwYohTnOKUfycPIsO/gwgnhjjFKU4Zlh/gwH8CC04AcYpTfs3yz7r/k9DA SUKc4pRfm/xLZX9oBHBiiFOcMrLlR7T7kWi9E0Oc4pQRJj+uy49c050Y4hSn POvyvyrvL6rdTgBxilOeOfkPYyWP50ycGOIUpzz98h9q6ONXZCeGOMUpT6H8 JJV8ssrrxBCnOOVpkJ+qgE+PwjoxxClOeSLyEBr3dCqpE0Oc4pTHIw+nYk+/ YjoBxClO+SXk56jVM6SPThLiFKc8KvmZSvSM6qATQ5zilIeWn681I0DvnBji FKf85/JI1GSE6ZoTQ5zilH8nj1Avnlr9eo7k5+zBiSFOccqwPFoteGw6lThR VL5IdtdfxUVpfnxLhhhtK+WPsJOtE0Cc8muWR/7mPx5VGjt2bMYUSe0K+WCw htuvZSufc8jwZvs/EGZ9KUmbLGpaIr+zQdkfpObC/xeQ+aniJCFO+bXJL/Gq /xL7fBAK4DOAxr4JooJZ0ta1Si5Ey8XouDgdrL/qr+biDb3hOoYesFnCx6KT X0kvLZHfWqPo3KTsD1DbwrVdgarhXT0oP/88nRjilJEtv9y7/ch3Cxp9ZY1q WLtn/X4UAsJkydl58tsb1dxeLXdAxx3Sw9ITBQBi4KL19T5K2CbpE1HqZHHV fFn7KsWt7xT3fJV921XWCO3APt21TcqGRdLrK2WwGZdi4CrcH/lkHE4MccoI k1/0Tf4lcKPtO1X2DFng28Ilz7uCpge+Izr8hbRmmbLPT8OF6rhYPXcYFgMu cXpuv/7aNjVsdmCC8NgUMZCN9tWAG8q765Q929WDETouyXh7lwY2sIHNEqbh 0gzcGbdfdBIfJ4Y45VmXx/Dq/pxD/MBkgM+VixQtq1XHCTem/dcohhv7PpKU zlPc2azpSTBwB/VcqgGW7r2athUybr+ucyfCQtg4wcBGJVgoLcsV11Ypbn+n 7PVTDYZr7UlGpBnwq3Atl6DnMoxckZk7/+gpx78UJ4A45ZmTx/O6PtxRGGIU fiNvXKkaVmH4cGauvG6ZMmeGLOgd4Vf/7QIq7/+WKGicKHumrHa96tIubU+S gUszDsTpr2xQnpwpgQ3SvhA3rFBwuzRWP1XHOkXzMjkssL53u5ILUQM/QdzY r+P2arhEvR1wI8fEnbI85nkDnSTEKU+/PM7386Fxw/9tUd5X8nMLFMAumBan fykt/FpWsVCRM1M29b9Gzf4fxI1tb4p8XxUmfi49sUpZ46ceOGyo365uCVCX zpHCt8FvCcqXKhAZInX2XZp7W1StaxTNq3ANrgTbJFKLHyK0XKiGSzIMJZKZ c8I8jBulsyUXFsse5R3538SJIU55CuUxv40PcTjQ2Zm/d9n6hihrhqzga3nS Z4gABz+RJH0qyZ4uPfWtPHembPpv0UjZ+oZw8+vC5X8VRH4khj/Pr1fZDhua /NV538oSJ4nHOmRwH5GKCF1XkObqRhV8bl6hGP6Wi9ZzoVqwU24HqQeitVyY mks39GaZ4DQaN6vOL5BVL5K1b1H+EjfnfxUnhjjlaZDH//o9HG6ADbLhVeHR qbIjUxA0At8Shn8gjp0oTpsiLZglW/GiKyMbYKHAZktecPUfJ2IgMBSvb/VX F82VsT/TZskubVJ37dEhPsQaekJ113egu6NhiZwHjTANF67jdiPxuLlJ2QvW SqoBk0COmzoP6lu3qWqXyy8ukt3YrLRGaB5ViPbhxIkhTnki8kTet596UFDM qb91AVhY97IAmEbMx+ijCHpbFPSOKHKCOGmyJGuadOnzrvP/5MpwY/0rwoV/ wc8bXhHA/z2Rums71KXzZMFvuvq/IcicJW3ZpL69Q9NNlKMvBv9vI8pxcbni bggZKQAaQZr79GO/hgtUcof0fQmGdn9181olgMytzUr27RPEjQfFiSFOeTzy pF6wh8CNab8d9c0fXFb/XRD5oXjXu0gkNr8m3Pq6cM97otiPxUe+kCz8s+vS FxAr/N8WffeyYP6f8fPal/D/jmCN/2uuO15zDX9PmPa5+Nwc6Y2V8u618iuL kbcMUvSkfjkaKaWzpUAnbAFqBgg1S+WtAeobvuQMCVJyoRpbkqEjUHN9k+rK asWdTQg1A9vp26dMnADilF9CnuxL9XC48e0fXZa/6BrwNoLGhn8I1vxd4POK IOAtYeQHou1vCOf/yWXV3wQMN9a+LFhAuLHqr66rXsQP6/7muu01QfxEcc50 ac1C+b11ip518qtLpdVzeI/H+W8RQwpnSm+tU/QHaPp2aeoWya74qztTjNYc M3eASEiohjug7w3R3fPX3PJF0LAHqHq3KK6tkD4llOOfxUlCnPKo5Im/Qj/p BBhoTP+ty7w/ua78q2D9ywgOW14VrPyrK0CH/5vCiPGira8JGNnImy3f8bZo HW2z7AXXZc+7rHoRnR4rXnTd864wa6rk1BxZ03JFt4+yd72ifbns4rdo8gym G898jR9ypkru7VB3B2p6QrTN6xUd+3WDJyz2k25cOmV07NdyMfo7wdrGdcQ0 tmlsIRq7v/LGd7KnFjceFCeGOOWh5Wl4Z378HH6Q1jXnDy6AGzN/5wIUIvMz 0Y43haCz218X+Lws2PCKIPgd4fY3BKv/5hpMXtCT8+TB74rWk1tj0Z9dYFn3 d8STTa8K4j8Rl86WVS9SXFuj6vJV9foorq+Q1c1DuOg7qBvMN6NrdIWsN1J3 N0hzw09tzzR1pRi58x5DeRZM4Tig5eJ0HXu1JUsV8Z9KGEuxRunsB7T3Vj69 fOPfiRNDnPKfy1PykvzIaYACguIPF5v4vSFc+GfX6b8b9dXvkTakf4rgsG+8 cPc7Qv83BDvfEga/LdxGGALrr69VnlusCH3HleHGvD+6rHgBfwVsJOQ9UdZU adVCectK5R1fNeBGj4/y5ip5/Xw0T3r2qrlsU8k0UfNm5VCS8VaQpmmdsjvJ 0J9ntp1yG8w0DR022A/q7q2X125Rpn4lZaDR5otuEC7TaN0kL58pZOefM0OU +ongcd3IRyNODHHKv5On6q34cdzY9a6IRUwSP5WAGbL8Rddv/sdlBuVmHPlU lDNFnPCxKGq8MPw9YeEMScT7wsC3kIEc/FDI1DniXUHG52IwUr79wygf8otG TRAlfyY5PUd2eYWyw0ddt1TZuUHV46u8vVreuBBBoMtPySXo2qN1V3dr7MfM 13ZqKxfLr0fp2A77U4xpnwgHQzTdmxXXgtT58zGee3mZvH296k40xmKsEZo+ gI7ZogtLpZU+igs7VBmTnjHoGBYngDhlWJ621+DHcWPPe0gqUj6XJn0qAUxY +5JgyfOuC/7kwrS4eKYk4zPcoGPt/TStoDcFu98RNK1RhL0riHpfkDdNEjNe sOwvLttfc42bKM78UlLytax+qeLWOlX9MmX+LFT8bl8+ipozBfdmD1NzRZab sfrBLHNrsPYMJXtULpSNfUD6A1V9kRicvbtR2bJcfsNHdS9KP1BgQV/HOtlQ uOZmsPrGPu31REPtTvXjvJ+/hDhJyK9cnsLn/u9OCUAj4G1RyPuoyAmTJLET xcHvCLe8Jlj3Etod8Dlxkrh4lvT4VMmZ+bIbG5WNqxW5sygH7A3BrrcFoe8K 970vjPtQWPIVBk2Ysqd+htSlabni5lpV7RJF8Wxcv+N13GHYe8L4j0SAQqe+ ltStkHHpxrvppt5sS1Ow9uQ8+e09CBHXNii7QrX2FPSLDoWqB6K0TXs0GVOE bSvkt3xV3ZG6oTx0jHTtUlm3K7hEPdg7HJg2Z91qn1A26S8hTgz5tcnT+aB/ BDeC3hGFjsfYaPRH4n0TRBHjRQAXDAFC3hWlfoa4kfa5pDFUd81P1bZNVUJJ ngFvCILfFoDNEv2BMHmSqHyu7BLlYxz5XJI9TTpMGAq/Rv4Q9JbQh5ylIeOE +2n7U/Okt4PUXLz+2BRh4VzJ5QDVUKqhPw5tkBubVT1UWW8NVA9uVw5Fa23H Ta2xuuKVspYNSvsOtS3H3JdqZPu371RZ92qwfrbUcide/5jv6uMRJ4aMbHma n+yP4MZOCovsmyCO+VB04CNx7MeIHsgNxovCx4uOfiEpnCU98Im4MVrfGqS5 vVdbTnkU/q8j34j6QBT7kShziuTyCkXjMsSNFCIbYJ40rVAWfIWgsWuc0Pdl BI3caRLYPvQ9YdxHolOL5e1+WAbLZZquxOr788xclgm2uReuu7VN3b9fbz+g 79ygvLNVaT+g5XJN3Hl3LtvMHdBzwRouTMuFaa77KG/7KnsC1QxAuEwjl29u 3aR4zDf2MYsTQ0aYPOXP8Qenl/KpOGqCKPR9UeDbIr83kF2EvIdMI/ZjUdJk 8SEqRjs4URz1oThrquTETGnsFEljgmGg0NITp6+hbPDtrwv2vCOMniCKnyjK nyHt3KCup4rXZAqYtq5UXlqmyJspgz1sflWw9Hl0lYAtEz9RvPNt4YGJYviq dZMK2wkeNXElbly5O5eDuNEXb7izQzN0wGAL112YJ7uyWWlP0HHHTdwZN+6Y CWvfADTiDUBUwELp2Kzs24W4YQ/HU+LSDP0HdU/qDj9+cWLIsy5P/4P7wRnm zpAmTsIKNSAbvv9Az0PAW0IyIkRxE/l8ziNfSA58LM6dLs0H3PhK1pVstBVY BtON9w6iNRH+nnDvu8IDH4qSHBWvdUsQN5ImI27UL1E0LFXAUYDGrPm765FP RZVL5ecWy49MkYARlDtPnjVVeslHZY/ScUeMXJGF5wxJettRU2eQ1hZn7A/S 5EyX1G5UcslURVtk4TJMHGwP0AEfMky843QvIQb5TjkAjYRfEW48KE4Aeebk mXhYcJIP9vs9+608Y4ok5XPJ7ndFq//Gp4MGvSUANGD6eH6+PGeGLH6S5MQs GVgusfPkd6J01gzTjcD7pWfDwgVoO3xw3D9Bhkn5XNmF+fLaxYrj06Vg6QS+ 4coDi6/q+Fx5xCRJ+QoFmDZ13ykHwnVcipE7gbjBnTADbnCHDL2hOi7OWLta mfqlpMxHyaUa8NscM5du4iIBGQzcCTfujDvb52AEpaPv01z9jhqThuNpcPG/ UvTgnCTkWZBn6Okw3Fj1N8HyF1y7N6nrlioKZsmyp8tC3hezBqHrX3L1ew0B ZPZ/Y9oGsIXSOfL0KdKS2TIwSbKXKm4GavqJaTByUviVtGeDituh4YK01gBt 80rlMIwUzZScni09B6TC4SCNfF9Y8rWkdaemeI0ydb781NfS9M/EpxfKu0O0 3GHew9m9S4W9euL1toNG+z79sVnS2C/EiBJHDGCAIBqARROu+x5exWit0VSb H6Xp8lN876s0/NWTvutPWJwY8hTKs/Us4Gy//v2o/R+J65Yp+7Zo2teqyubJ i7+Rs0gKQMeqF103vYIAMu+PLgw3Khcq8mfJimfLjn4haVgsv+aj7ArhycbO d4QnZ8vuAG4Ea7nd2u6tuL5igQIoSspkce5UccEMCWzg85Lroj+7bHhFEDpe VDhbdsNXyYVoaFGnThZlz5DcgZ8nGk5/Jamci9YNl6JHW+OgoWmrJmS86O5u LXfIyKUZ0eeZoHf4P83cWQ/+80Ett4cIxn6tdQ96a7loLTbugO2zjFyG0brv Ec/M8uyKE0OeBnnmbj6c8Jz/cdn/IeIGgEbnJk3DMmX5fEXEBMSNuX9wWfoX hIsNFPg48JG4aoH80jLFmW/loPVxH4sr5slurOYH9BUvuO55V3R6juw64EaI jgvT3dqAOps9TRr2vvDwZHH+dAngBtt47d9dgZwEvSPMnilt/U6JARRceNpw 1U+d8amocq60aQkyk0vzxNwBXcce7bG5cuRFAWq0TY4aueOm/t2ED3EGLpeM mipP/D9Bx4WquTgdF6ji9qpr54iIlhi5PBNXYOayjdZY7ZO+8U+jODHkiciz eLfhnOf/ySUKcGOpsmG5snW16vo69fkFin0f3u/jB9bERioziRgvKgNYWK2Y +4dRS593fZD/x00Ub/yHIOYjcfEceSvgRriO26cHQICvYGXYe+gpzZnKgwbw Db/XBcHjRNveEKZ9KalfoxxMxH7FXAraHXf8VJdWymtWKPoyzLCydRlCR9ks 0cklspDxvJvFnm1GL2geosftNbI+6tvDHTJwp9w5yhrlIjQXFsqrF8s5MHNC iHJkm7hiC1dq4XJNtkP6/oCRkwz2S4gTQB6DPLt3+LP/7/9d8hceN84vkFct UjStVJbOwQwuYAg316nKvpXtI20Fm2X3OMz/BPNkGcVPA9/G9R3rVHVLFHEU SE39XJI3U9q4QT0QrudiEAQOfiza/4Ew9F0hQEcQOUL9XhPAEvKucO/7It9X BImfSSrWKO8lGkHfWTSkA3FD0eanvhVnsB83929SXFogubxSXrFIVjtfem0Z n3COHtF8M9gd9/yVVjKUsKlgJoAJZo22bFFVzZfVLldc+05xb6vi+lJJ52rp kI/MtlkBlMOeahjYpXrS9/7ZECcJ+YXkmb6fU8aOWvGiK+BGxQJF8Wz0Wpyb j3bH8hdcSmbLOzeoKxcqYj9Cng8EI+BNYd506RKyXNa/JNhBVWxXVyvrlyji J4r3fSDKmYaWSPUqZdongr5I9Dwg05gg3DtO4PcP1/3vI2nZ9bZg1zvC+E/E kROIokwUl65RtgNulKN3wrZPd2ebqmmFojNCfy1SbwV7JNfSE6i6uk3V8J3i 0mLZrVVycnhquRILhlpyTb0s2Bqq4Xaq0A2SZbq3T3tlo7J2kaxhjfKGr7Jv q4KLUPevl9m2Kmy7VPZtCnuGcTCMfuWUnyJODHlU8qzfwKn/Z9Sav7lGTRCX zJZlTZMenYKmxNe/HxXwtrDkG3nLKmXZXHniZLRZlr3guuVVwbEvJRvJTcpK X7OnSYNed21Yokj4RJw4SVwwXVI8U1K4WDYQpS36EjeI+UAIG8CH6m/E15bg ziPHC6M+EB2fIYv+WLzy+VGMPPQADlxA14Q1Snd3m+rycsXNMF3rbu3QYaM9 0zy0X3c7THt1i6p1ufwe1dAxdyjaHQAdx4w8kgSrrq+Vn5snvbhKftVX0bhM 3rRedXuzatBfycVquVC1PUhl26e1h6i57UqAEZ63OOWhxIkhDy0j4I7N+O0o YA5RE0SAAIcppfPL/zPqq/92CXhblD9Ldn6BInu6FLgBMRDX9S+5bqZksD3v CIFdwIdjU6Vh4wSVcySAG1lTJcUzxNveEnAxOmuU1vel+w6QzM9FZbMlzQsl 3T7ytuXyJECYr2Rxk/Bwhavux0nteZah/fp7W9VXVivzF8gvbdcMxhmsqUYu 2zy8Ta8P4UaakTvrjpSjBL0ZXZHarp3q7i3KyrnSxjWKzmj91a3K2gWSlk3q O9vVtp3kI43WcGFqe5zOHqsDiwYwxIkbj0qcGPKfywi4Rc899xxQCzAWoj8U J38qif4QoWDqf42a8weXra8Ls6bJADriP5Gs/CuPAOv+7rr1VcSNgx+JDhMJ +e5Fl9gJyCtyp4iKp+OaoqUKsDUGw7R7qAjuwIeihMnitM8lJ2dJ6uZK+rYp rq9T1C1VAJlJooqVqh0a9GwEKLlkgzXPMhit79yivuevyf5aVrdB1bdPN5Rg qFvsmBaB5Y1H67jjZq7UrRcg5Yxbd6qxLUB9eYW8bpG8YbH85nY12/jmfu3V bZrOQIrwphi4QzouEqdRsKdj9Na2H2M3N9l01U55dOLEkH8nI+aeAG7MBYh4 TXDkc0nkeH6Kk2m/HTX3jy4+rwiOTJEmfy7Z865o5Yuuq15wOfaF+Moyeei7 iAaZX4hzp6HWLycH6Z53BKwc/sIa5WCYbihUG/iG60HyihyZKsn8Spr/jSx/ uuTCN+Lq2aJbW5SX1iqzpks3/B1/2xyhsxOd4A7o7MWWgWhD1xZ1z3p5wkRR 1SpF5x5t8VfUP5CKXzDhMwFzR9E8Kbb0pxtv7db0HTHeDFA3r1A0L1e00oRN Aylm7ixaPQ3zxD27tZiFfsyE6V5x2o7NCu6ExZZpuhOE8DIYiru98LXoST+K kSlOABmWEXMTxv6TsIY8X/+3y/w/u67+uyDxUwlzXY6lKlcAiqYlsrtrFTlf ioE8IFyMQwzxfdl1w8uuQEWSpkiafFUdgZq+Xdp95ALNmSXNWyAvXqrImS4N f0945itxEXX2q52HiLTxJTzctX06+1HTrQN6LkbL5ZgGYg3lG1XcNhW3E/U6 5VPROSrPh/VWNldshpE7ZuTyzAAdg5mmjr18yllniGYoSX9jnbI7XD+UbuEK MOH8to+sP1SH9W4UnLUm6q9tUQ7mW+5SYf6FOeLuME3NIqnTYPlFZcSozEPL yLgDTE0iJoiyZ0prlilOzJQe/FjsR4Thi7Gj5v/JdeFfcAKUAxOxN+BqMlKC 3hICx6hZgFlelfNkrOU4iM/Lrqv+6grbBL8jzJohTflMVPYVWispk5BsnFqq OLNWecFXdexLScg44ZZXXKsWIAicmy1pWy7dSLlkd6N09mRjXyL5No8Zr+7X tSyRcQFqLlRTPFea/bW0zgcdEYNHTIPJRi4XA7Ws3g2gw5ptuheuvbpOcdNP hZ7Vo5gLyh0x9CeZuFw3Lh03Htqn51JN3Cn3BxHyyOfiKzvU13eoGBANr3/S T2YEipNvjIzLx2qUF7G1eMLnkrOL5U1rlYWzpHETATeQPMz4nQsgxuLnETp2 vyta83fByhddZv5u1LbXBKmTxee+ldUvkh93pG+teMF13UuuS5932T1OiJOm bVVfXI/5V3eC1Vaa5eTCHMnBjwRVPqqjX0h2vSVgvyqYIb24RNbppyRniLx/ v86WYOCSjefXoYnRGaTu9lFyuzRctLY/TFuM0y0ho7DmuVmL3cCQ4RX8ohdX 7QUw0rVPeztADUfsj9cjD8kyckcNXKrBdszCHUPz59pSCZeFvxrKMtkLzAWU 3docoOGOmjsPIOuwpwKw6Nt85dXr5NXzxU/6+Yw0+TXjxki6dsCN5c+7fPc3 1/RZ0kYf1eX1qqLZsrhPxFsJN+b8wWX5iwIGHRtfFa56AUFjxu9GbXhFkDBR dPJr6elvkNXDn/P/5LL6b66wbHrJBWCheoG8xx8ti55gdU+i3p5q6N6o6ApQ nV4lPzJLnPqp2O/V7+WXoiKD+ZDrNhSptcXo7QmGxs2qpg2K8tkSu5/aHqrl 4vRcnOGcr+p2BGq37YyHvWG07aw7V+XB1XtxtV5cjRd3zqMnWtu9DxadNdWA GaE5JkSPdFbvZmYJqNZkZBQDh/RDKYbiJegIHYw1wLdD2ZZbB6j8LVnPJeKH yxsVl5dJnvQjGjnCtGbE6M5PkhF21YAbS/7isuUNQf48eUegtmWDuniOPH6S ZNNriBuL/uKKtbF/5edOAtBgC+BMzARR01J59lTsM7zrHeH6l7DXqN8rLjve ECRP5pPSuSPGoUzTUJHFFqzu267qDlLd3q8r9VMdniRe9QLfzfjUHFn7NlX/ Xs3AIaMtx43Ls1gjddZovR2WvTp7gMYeqLHv03FJSEJaQlCd7SfcgV3Y60Zz TaO5Ri+uwYur80LKcd4TDJDBw4ahZAOXRaCRb+aO8y04uDQTl4y4MRCBO2lZ LBnYp7Ud1t/cruYSETe4Irce5pJN0mNJy0HtjXDNje3KW5vkT/opjQQZVpwR pkH/iYy8SwbcWPgnl+D3RaeXK7GEZLO6ZJ48YZKEdelZ+1eX9X9zWfU3nhvM +t2oWYQby5532fO2AOwUWBk7QRjxrmDPW0g2Vr/owiKzZ79xpFGVufdtVXKh 2gEgHjvV/cmGtiPGpkg0W3pjUH/PL1Lc2Kbu2q3tiTVaj1u4QjdriLYjQG2L 1Nl2aW1ANvZq7Qf02Lcn0wTajfs85TFQ6G4958FdGs1d8kLoYJTjgid32p07 4cYfOs/MFVpYnjmXbkS3RhLixlCgunuDsn09ulY6feS9IRrsWpxhAtywn8Mk VQzRxuns+zVdRwyd0dreaGfV28+VBxVn5CnRj8vIu14WeJ3/R5cjk0UXlsh7 92jbt2tOLVSwFKyFf3Z50I4AuAgbJ4gc57rmRZewd4UV82Q5U8Vpk7ALaKWv IvdLEcsBA4n5UPTgDzt9FQP+KmuYpneXeiDVYD3r3l1k6aE2Ozei9HWrlbe2 qu/t0d2N0A9mW7iT7lyx5foGhTVMaw3SWLeobJHk4aRKEy6HpjY4ar6XbBos cuOqPbnLBB2MclR6cmc8bAVug0dNNjb/I2WQMm/nPSpasYVq+7aoBoM0HQGq mzv4ZiA8bhS6sSRVJBuxWlu4umH1/dkWnvSzerbl14kbI8mh8aAAbnzzP6N2 viU4/InoxmrFbX/13WBNxQpF/KRhV6cLUIuVZFMs+fOo3W8L4iYINr3sGuko RLXlmHvzzFf2as7RDPK+L7tuIvQ4OVPctkHJ0qg61sh6Nins0br+MM1gmtFW 7s41j2Y/7zpkaNmk7tiqvh2kvb1H13/Mwp1x5065YeZnkWXIXz3kyNpCzaVc 0IEEY2e0oSPa0J9lBjLD1Xry1gpQjipPrsxjMMfSecjQE69/8FdgtnRFIr3p D9Lc9VEOBKm7IrQdAGXhGsz+ShrGDQ/cFbCUeL2Ndeo45469B6kZ8pN+XM+q /GpB40mfwi8lgBsL/uTi95ogeZL41hpFwyLZQJi2dq3yEGWYp34sANAA1vHt H1wW/HFU6DiB36uuqZOEO17HeQ3Ik2nEQvWz7l2HDZe3KEvnSLaQkZL0sbB+ oaw9WHOTbIEby6T31smtEdrBaO3QUaP9PMZAuSYv7qRl4KjpZoD2xgb19a2a m7t1vZlmDqwPQIOTVGkCCnuSNzrs5NIczLd0Rutv7tB0bVJiz2GgE+fdETEY 5ajx4so9eo+Zb+zT347ke3cACuH/x809MfqBMN2dLerbG1S9weqBQ4a78foB TBvTE98wIlxUeCCHyTVjJ2Q/Zc8GKporRCcJQplTfrr8QH1GsDY9KCP1MgEx cuYrNr4hPDoZEQDb2mQYTsyUnp4lrvdRJH4hjhkvyJwsyPlMMO+PLvP/gOVm Ue8Lt/3Ddf3fXELGYfcMJBtHzehPKPPg8s13I7V13ynyZ4gPThCWfSO9tE55 M1rfX+zWvRkDnbdXSnsDVLYEvTXTyDHcADWv9hwqsNwN1bV9p7rio7q+S9uT YUZbA5T3pIVSuSx8bgYFRGx55v4M0+1Qbesa3r6wZ5uwgQYQGKAcDcw16tGZ bm7ZpW0LRqvEzmrcSty4XEtvvOHqZtU1OLFNqu7dGmuMtivDNJRp5MO1mdi/ FA8NqHXMzIFxtFPNdwkrMOPJnKJu6k75ifIrxI2Rd43+r7kGvu4a/IYrGCZF MyWV82XF31DnvXgdDLgJE3gHxa63BAkfCnM+F5ZOE877A1+juu89wdZXXMFI 2Ut5oe1BWu6EO/INwI0CC5dmvBmkrlgmPztXCrtt8dd0JBuHznv079cObUPo uOsj5w7qreQRxSOCfVHlYT/r3plovLZd07RSeW2ntivdbK/G9UAzsOSEXJo2 RwOfoUjtQJKhI0AzsBUtiKEiIhI5JmQmwDoaycVR4dGRYqrbhvreHqIZOEq4 UeoGZ9h/2NgOB1quuLZRdWOzamC/dqDIzVaMpXAAU7gZ4AZYJQAyaSZurwaX VEOXn4L3rwJuFDspx0+Tf9agkadTD8qIdGhsfsU18E1B8JsY+yiaJbVuU3ds UjWzetIMTK1s3aNhPTH2vC140LHZNB/jqpHvCba8AkaN6y76tn2PjisEg8KD O+OBnoF0E6ZYJBi79uiaVila/dR3Eo3WMuqhsYscBQd0WEhCEY2ymSKu2gN0 vCvPcv2AoXm7pnaxoi1Iey/NZKvy5Go8ETeOmQA6xrK8jiQ9F4X8YTBaf2cT 7u1uhH6ggHAjVY+ZXdlGjK3UY0jlRqKxeiPixpVdmp40wo0z7nCGg2nmG0Ha 5rWqqxvVAB29UVrsbwwE44IHV+nBPKh9WxRcsIo7bMRpm2CD4yY763wO3+ai tdKdODLnevsl5F9q0MhTq2EZkZfG0ABUfs87gtB3BHWL5dYAjS1aP8QmFgET PsN4nSIOKZ+gDZI4TdKeZLDnmG1hfMXHxTnizS+7wB6C3iTciNBzx2Gw9uBO e3BFbuhXPGLiYg2Dkfq29aorW9T34o22B9K5kdIkGQA6+kNIEy+gRXA9xVgX rK1YpaxZprgbqB5IMQ5dINwAhgDGAmV4DkbpbKDCEXga/eQmbV+rvB2u78ux gFEzloU/AAGAwDR6DZV7XI0zVKxHbGkK0txLMQ6CCQaMqMR96Jjl5h7dzWDd rS3qnmhDV6QOS9uagKWAZeQOTKPXV451uLB9tJbboebieM/qvQDqOngEU9YH fsVTJ/wk+XdKNCKVi3vqr4u9yWdWyG2hP5xXPep94ZGvpA+uiRjnuudNPvVi xfMuYeNQ30PfFSZPFjctlQ8FqPnK03Qj8vMM451QTfEyedyHaIaU+KpYcbr9 kH7IX9m14X5bjB3UeKcnXGsDoChw40pRK7F/+BEz4IYtxgCK2bZR1XmQsjRh QD/jhn1ygDMkI9+wkj5y5e69BZamKP0ZX77xhS1EzcXqsJPGOQ+u1J3LMnNH MYoxEKLtD1Bze9Vss+4dasClm3t1PccsXK3XWNacPEFnBybQOLrvtHtLjKGM HCANQZo+MKDg6OcBiDxsuW73YgydEfpOP4SgO+E69GkAXYENADZLHSnrURrs zpFq4A4bGNN4EPpsB3U3lknurZJyTvlR+VXhxlN+UfDqzvztqIiPRe2blEP/ 1A9z33hh5kJZxRbV8MZoXLwvmP07dFBsfcU1ctz91O76hTLADRr3PdE/gLhh 6g3XAiLByujJYmwnftQEdr39uNkWqukJUN3ahNBxahafC9q1U20FCwK0GygH QEeeG5dk5A4Y7HHGrgDtNR9VFzUURRvhrDuCBmhiCiojl2nqoSY5t1KNVUGa Hj/NgB+eCRAbzNuMo+gGQFYWYpo1St8fqO7ZoBzYrrLu1nD7tP2hmht+mtuR +p4si60Kc8vxKIf0QAYGo3W9NA9s515td6qx97Q7WkPl7ui4QGPKfeCIuT+K zoqVqGDhmwFnlQUzp8CMrhJiNRSWJQMn34Tfphn6EnR3WUuxKM0tX3nXOlm/ j8y20ZlH+q/lR/ToKVexnyrPhENjLM1akj1D0r9dNRig6tmhfPCr2E9EuasU F3dq4A0/RlGSzGni+E9EEe8LQ8ehTwPWVC2Sj31AcHAHvQaTAXAj02SN0F5Y pTj4iahlgwqbVAA9AKO+BCiHoS9Me49wJvETUelsSesquXW7cnCfFtl7rht3 ygM0EWcfOKC3JxoHduva16q6o0jRStwwQpFv5tJpaiSAjgxj/370jjaFakvX KnuDtP00uRscHSdlO0yTulL2BZdqssXqB8O0A8GawWCtHRjCQb0tFmdAuBNj 6M1zw1RzNtMB/CrdaI3X94XgnvsSDEPFbugpraXozFGKlZyEDxb7AcKNE2hA WbNNGGBNp6mXsiiwAmTjsCPxgyFJNrVJz6WZZ2s9h2/d4BY5t22ET079cPKr Ao0nfQoo/v9wCX7d5Uc2mPXbUdtfF1xcKOvdrOzfpuz1UwS+xm+PGj1FXLRR 1Riu7U039ifiy1/4jTRtimTvu8Ldbwt2UvNwFsEE7QNuDx/ABsFIQb0nmgaZ Ji5SW7takTVdgpMyx6DyIpMHqn/cMkBGR80qZcY0SdNWNU68GK7h9pNrMcOM 1kq6GadkPaDnUkxDYfqb61W9VIDG5Vvs5z0QnTKNPHSkG4dSDd2Uq9m/T9+3 R9e3W2ujeU/saTR9UjKbsdGCp3TECKgFto+VOqKjxzLD1BWtv5tg7C9y5xq9 uQZMIUMn6lGTLQVJQl+MfiDDbAO4aKCkjioPVqLCnfVgNAPOkDvrybWMGctm jWQLnNhRAxehZvNFjmWRGhafPeWGGAK8pQHNot6N8oZ5Ypu/kvNz4sYP5cdV 6SlRtEciT8m1bHzJZcerLiFvYmZm0keC3W8gICz/86jhDWB98QxxzXzp7e8U 3esVvRsVfVsUuGa57Lu/4q+OzJKc9le3xuqtuaaeg5j1VLZIljxZFDJOyDyZ 2V9SyDURjHojR8AC9N4ONvtRo/0EKWmkruk7Bbdbi/OrAnmIJjMfTIZCt6E0 VL3TSxUnF8i7ogy4EzBk4nQ0lJsROpKB5BPaAG7s03duVveF4jm079MPnXJH pcPQKs2OBIN7gbmPLIKBaEN/hL4/XGcl76sdLCOHW4Or8OTKPfHoR0xckomL M3GHTIhOeZb+JGNnsmngtAd3yZu77A2MgqDDbM8kP+pR82Chm52FV4ByXERD bMDh3cWdHHfjakbzuHHaDYgE/1UKNQuKo5LYkw53B4DJWTfMQKugUG+lR/Vs 0Z01ssZ5Ys5f6TRVfiC/Etx4DBcS857rv1x/+FNRydz7Ndrr/uoS8KrLGsro TpsluRypjR/vmvUpJWWRwIeK+dLaxbL21fL+jcrudWhxnJ4nbdquurEVx+5j c6Xnd2mupwAImDujdTd2qi+uVMR/KAx5R+BPTXhOUc07ql62BfU3hdpNJOqt e9VD4Rp7ggHgom2tktujQSPlELkaDlEiZZ7FnofKVTJXdnGdyhpvxOrRZCQG CAWnSK3AEgnREG4YrTGGvh3IZ6oXKdr26voK3TigHKChwG2A9h9B3BhM0g+l Yzuv/mgDoMdQFBW6ZpqBn/DcoH40ttQoosBKmpk7DEc0o8qXuFuPmbrSzUPn PBE3mr1572ihG5ujzVribqv05Fq90UgB0AD0OImOWSvOTO3OHTahwXIRcMOb ayPouECwU+XxPQuOGAh+gLOlBA8q2PdkSWv134pvLJNwAUr7Fidu3Jf/VZtG Bm48hquAdyx1ouCf10e+LyxcJLu0RXl8ihD+3PYKlp2yN3bzP1yPrla0UHOq IxMFp2eKiqeJYsYL6pfKm1bJr6xVXF6pGNiivLsevZTnVsjb9+s6I7TWUHXe EllNuO5Olnkoz3wnSnvVX3VprTx+gmDP24Ktr7ru/0B0kTrscfmg5u4ABUDC CUaMtv3aoR2qwQ2Koa0q6w416n4Mq1s3YIDjCDk/ieGfmCVt36FB1QP9RWJA udmsgiMfJ0xEipJstMYZ+nfy+V3NO7XdFDBFL0epG5a3p6LbxHrcZM00D8Yb B+KMA/HGoQN6ngKVUDZpjRfXOoar90YAwVO1cOkWjNfkuaGHs9SNd4o2EW44 KMd9rb9EsHCRnBvwGQ6dqLcFqRCFMi24z9oHcKOOPCTAJeAS4sH+UqO1Eq3h 4rTwYSyrqwXQu0goVObGqMigj/zuSqnTVBmW/0SbnnXceGxeUHjB8qeIDk34 HuUIeVtwYIIwZ879PpY7XkPnw6I/YeAj+CPxST9Nf6Gb9YJH3ufCwqmiM7PE jUt4f+adbaqWtco2XyQYp2aKq32Vt5MMg6DaCbohf2VjjL67yNKfY74VoW3d rCydeX9yxpTJ4jbKasDYxxkKdILKk+FvS9APhWAS5sBm5dAerT3RgIZMCnoS MLSRz+dtXvXTnJ0n69gNxgs5NGB8z6Hs6wuUv4G4Qf7DZKMtkW+1d8cf0eMu WDE1mAGOgZUsI+LGMWQptmzzYKJp8LBpMNk0hClhesY0+NvS5I3/VxLlAKzL duOOWpAwlHtwVZ59BeQUBdxoGcNdGcPV8B5LRJhkMnMAFmo80cRoHo1pXXCL QtSEb26YzlFPuHF1zNjvC0ZSjiETQ/MkWQ/oQRaQke8OVE2sqQjvRvtSyeB6 2b1V0mFC+CuXEY8bj/zk874U5XzxLzpgo2UxR1r2tTifSMWwRI8XHpooypiO 3obBGH5cZtBxeJY0dab08l4dVwx64XknmffRXVoib1mjuLsDh78rG1St65R3 dmsKpzva4wCLBmXcrW5cJh0sc+/JMt0I1d4OVlcvkbX7KSvnS8rnSs4vI7IB KlwGo7AXeg/Ouj+YnDAstqMmMBaoaJ2yOwBeTqB90eKralij7AzTo6VT4o7g c5IMkCpPDJrkkQ1Sgj+0pyJudEXqO/fqu6OJ7bMid9g414ynmm6En9hyLUOp pqE089BRM86Kkky4ccGBAPXk8GwYjSUwcLh8d+6YG1fsjmde6WmFozeORqYB uNE2BtgCbgwrj1nQH0J5qlihdsYN+QYcPdOEBhdhBbpNGgg3ro1h0MFdhfUE U+kUWCm24AK4AZRjrxoxB3DjkhciJNzqAr4XELdJ3rNWdmWdc+qE/1Snnl3c +CXO/NQ8aaOPIuuz74EDgYCkfJPylK/ywPuuYK2wt2vPW65JE4WpkzEn8/Zm Ze8eNXdAyyXo2WSpdZvVDZvUYPXjaF7vdS/D2LRAcn2FrGmJ7NJy+a1tSBiu blW3rFHe3qnBWs7jJhhSx7KAQqSmba0clKUrg+9w1bpB0eGYTqidMIe1mECv IDbk9EQT46Rb50H9rUDNtVWKniicSHEsKx4Hbn/anf9JMZohTb7Kyz6q3igD l2HBwOt5wgGg7rCfk2T4PDAd0kCGuTvO2BNr7EugbsBw0ItU5w6mSgo2/OQK LPYTbtYMszXLMnTcYjtmxnlMzvL5pajs1V6MdSBQnPHkigFz3JEsVREEARTA NmCktBJuXPFmXAVjJenYuQv/hMOdduML7QGv4DzhJ1e8uXOEG83e92kGgMk1 XPAzK32FBVgHPBo2a2QZBlOwCgYTzrH3oO2wfshHPugr7wlUVqz+VUOHEzQe QsDiqFin7M4wXVogyZyE4MCCIJEfidLny6oC1d2pBmuK/sxMBIq9b+GkqJmf izI/R6rAxdNYHKbGUohYHfohwcyPhmHOiCN+rWdXrvnKTvXNlbLmJbK6xbL2 jcrueH27v/rySsXNAE3fQSLVFCLE/cTqbm1RlnwtxvwrUuG7wYQVh/VcDqFB ohFVBkwG0JpL3qhEtZ49uZZrobrGNcrWbZp7ySb7BU97zf0sBTRnwEw4SdBx 1HRls3rwgBFtARjZq704sBRgJ7DDUuYwMfOjfLnHUJ5bb4q5/4h5MN1iPenB M4daGrJZ9leO2V7sZsuxYIfhAjdbnsWebeJ/fomKW0Hrz5HnAY4CBAmgo8gD /79IuAH7aSLcuIKcgWsnlQc2Arcuk2/vg4gBMAVGSqs3foD/4YdgtgDi1fO4 wfMNAg2u/TdjWfi11IK/StVz+zQYYQlXI80AGwfQ4wS5cTKN9kzjYITGvlnR 76e4yu7zr1L+c516FnHj0To0kieJUiZjp+vVL7qkfSquC+JjfHVzxfVLea9F 3FTJ8ZWKhlDtEIxfx0x9Yeoby/GrxI+EzL5oDdSg7zHBkS0Qo8PIJoDGPkfe UY1nbzEotebifAloZc18HNR6kww3dmqaVihvbFf3xOjtLJ8KBkcqAeumbEkk 6mRi2KIppJiC8Qt0RAAWXfRiQy3S+2Zva63X7aPmS0HaioWK5l26u0DywYoH zXL01cGfn0TigQN3trl9u8aeADt3Q6pfR2ZCmzfu8xTlix4nbUX/oZe11KM/ x20oz91WANSF1B+765DJgHOl6dFBWupup55+tpPugCE8Q4ANasgDCRSF/RBO 9SIoOxzFkz9uJXlLGnjc4M8TQCnHgrgBsAZYV0d0pZSyztoIW2ADuAo4hwoK srQQbjDYYbhxjXAjlyJE1eQSCaMZIQE9orChOn6G5ZCezdgyFKfr81cOblYM xes6qOjmV4geIxg3HvkJA26kfopNube9Jsj9RtoSjZp+N+c+S4+ZKDryrazQ V9UK/KEAB2IuUd+5Sd6yjEeVE0vktylkiZnVVCLK7dNy+3UYAKWuuegrqPLs P+t+neYfRBflCYxj9h8x3grRNn+nat+q7orWW/PMfHrSMROrw+LAxkknB0WR Iy0hnTKXMJLoyfsEWsdYL1JT30ted7MtLbt1F1cqrwTrujIJN4DJM9oPikbT nKEjESyXfHQ5YjAl3w1VD37eRuoGinwGcWMsS7qAX9WPtld4Dp3ysAE9OE1L FWlxM5EcuDTQPurniStZxtcZokxAAxpG89CBHhgPHjeAHYFtVe6FxKOWcOOc B+JVo4M2sKbEYKEcMiJ6nHEHYBnL0jMAOi4TZJWTlQE7v4rZYvw1XiaPBw8d vwFOgivPuOEJwI0FpnFQy7yjuD5Bh7lwiXp0feSbralYozewR2U7oB1I0g/u +9XNaP+TNOvZwo1f4mzh9Uj4SBg9XhD7gSDhA/RL3E4y9GaZ6kK0/etlHRsU h6dJcpYrTvtrrh+mfMtME5dmHNyjvumDzsnkaZKzm1R9oDhp2CkXSTvLkIzQ AmhwYTr2tsOawUqPmyzj+ogRfYMn3QaPmTsidK0+6qub1Hf36wdBR0rcMKfx qBEL1Q9T991M6njD+lzFUa3Hacp4rPLkfQJXxgycIRu/3qsrz9IWpmvaoG4P 1vVlYqUY6RHDDdA1wo3z1BOj2A3TNlLNWD5fRQkS18fgAsp+1vM+btSR7gN0 VI/mLnghaJR64geW2Nnijfs5qMNEUOZ3He7I0UA/bKR8rVpKYT3tAT/Er1rH cA3eXNVodG7U0m7LsQyfz9xo8kbgAjQDQyzJhBYTi9040sIpl94TDQ24LWAH XUH4YkYKj35X7y+4/hR5RcAUilBz+zVYlAfWykE8TyQbSXp0fRwx2I6bhg7r hwBDwMzMNVvTDAM0TQy8IZcXjPzZE36qZj1DuPFTT/W5557DUvE3XfeNFyR/ 8i/yLmADeDGKZkpPfiXNny4pmCYumiZuXSNvj8AOeJd2aU4vkZXOlhYukpds UFWFAvM3sykFSYWROdSslpesUdTs1ZK+m1HTk8lPCLoPI2MYvXhUMAIfrA1e tyk2gdgCfOOM+9AJy90YQ9tm9RVfdcc+fd9x0pECM8vfxkEckCQXwYQ/aCqV ZpylChHQfRh5W3GE7S9xt55DbtBX5NYepb/qr70ZrBvMIEPjuiPEUE8aWk3+ hBpqFZ5twfyHYncc39vH8AuoLZgPeUQYKpBsID2AlXX0cwCokx5oZdQ5VBUA IVZ3O4zwMFKPSe/xxKkaCTQuOaADkAHMn3KH7jcDsfFGg4XhRhnFg1hxCvIi D8S0GAP6ReFGwQlXks/2rBubmo1PHck1471tAdJFJ9NG/OcKeVYZerCMDrD7 4LfwJ4AGUI54nBMBTZUQNU82KFALtpW90MLmfsJgTZHFmmXsoBZht9fLMaF0 5MpDgMAzgRsP59AAWEicJMr8Rpq/WHZ2tfyyj/zOBjlbzySeasxPz5ZemCer XyyvXyS74aO4sVEBb5Q92dAaqC6Zj5aINVhzPkDbFGvsPYG5B2MdLlCQS1uV jWBoHKLOnNmUdZlipOIIDE3i69pMRB2GxSyTvXX0nWPkLUwgh0C5h+20e2eS 8doObct69dUQ/Y1kE0YkgYHnUQ9MQIxT5I4oI2UpJ65+ioIjBVT0ehn5ub3F uzffrR8G6GqvwVPuHfFg++g6dupsDDeuOQAB9PfiaD4eWkcuBcoZ4x0RV715 twAM36DIJ4Zxw5ucrsO4QVX2ZeTPpJQMW6N3z3Ee1oYi9Iic6dR1hyFG02je L4rdAt2RcsB+4BJYxz/Y+TBuDBsjlWjRYIg5wYhx2DMejhlVKO+rjPAng/AZ 7yHdBBY6AQht9CIvjQM6rjiKVgB24AIBzPeoEDeYZwNoUoQGcSOVKnfSDDyp yzchCaH0sF7qo97pr7y+SQEvzC/waj8VMiJx46HPEB502hfiqnWKy7s17VHa /mjtnc2K+nmS41+I0iYJUz5B0KicKz0/V1a7UN68TF4xV1axQFa3Uj4QqLLu UV/3x6Bnzy71EJWHtKeabWc9eNxIMmK+dIy2+4CuM8147wQ554FRp2DpFhZz kb2PcAEvczNqENOseyzvOpZKRS5g6kL3UfP1EP25BYrKzZqLkfruXDccwc+6 sy6+bAgm48KdL9yAX4GyFJJrFFTm6hhrw+ieLEtXsmmo1N1W5tGdZuqKNnTu 1HEMN2D8vf4bNECAMzRQNiZ8AI3GeCvtsNCdtziuOhbAhBL6CnmFN5abNTLc wIkJkJ+AIQO8pfG+G/NOMN832JpClgWLj7AQyWVS5yoK76J1hjX+qPVku/G4 cdaTDxOXUSZYGeEG9hFy532/jaOpFaEnGllnKc8N7CNAD8zo8OJvEVxCA218 Zcz9hXEYABzy8+CNTdBhGlgOZYCAXRntMKwAOliDwSwjRmwBlIrRPGzZRrNb 7teOVNxwgsYPZOs/XLOmSzoCVAOxOlu6oS9W17FNCbYqWC4pE4VnZokvL5Y2 LJJdXCBrWiq/tkpRMkua+aW4YpHs3lYlqHZ/oKo/QDW0X2sn/kAjvicrmsAY Ry71qLxATSFqKfnhBLWyTMNaTnJKkL+RVBt+Ymc2OPwJ9Hi/Fi3rMnQG9ua5 3YwynFqsLFimPL1DezPFjEoB7/lZSt1kv2JD7YXvZV+PZXkR18YM1Xh1pZvv ROr7qH/4UI5lMNHUHw7cm04VNJfhRrM3H+hspVG4Hh2S93EDdnWV4imM7Z/2 dODGaObNIDOHdLaYksQqaWULZo/3HbXcDUDtG6RuGED40TRoQvMBdRmWJtJ6 IBsn3PHWRZIPmSpVkXJccDhsSylGXIrGCCJGOUWZL3vzJk8jTcZE8VzcVanb /fvQSmSpmQwiuFetY9hlsoXHDZYkRrVseG9PUjLYcTN/GsNzrxwbrvM1oDHo KKftSTFcWy4dedDxcPr1lOPGzzw9Vjdq26XuD9d0x2j74nUdjtcjdryg4EtR wwLplWXyy0vlbSsV+8cLcqdJ4j8Wln4rafdVcOEaa4xuYK/GCgqe7ZhbkEUE DmGzGky8hMGxwp2r8cDedPA+F5OLI92E42kWFV+UEcdmXv22MUOODC5+b8Ao Gkb3l7rfjDcVLlcenik7sV7dGm1A8wFsE3i9WfCxlYbRC9Q5s4oCHJR4wOPJ 9TED5z07D5twNoE4w2AONvXC04iF959wo4nhxm9QiZi3kLH3y3RWYCCccOer SBhowKDM0idKPLhzXui9LKFE7nov3oIA3ABLoYIgpdHbXuHVn2q+50e4EW20 HaODniffSzO5X66QRsMlwN3ItnBwgVF6RA8wBJhhAvuB0zhFLOKkO48b5ZRS wirdLhFoXCZHK9CPC+QAYfyEpbJcom8pgwXvG8WY7i8ZRuZfIu/NaLxp5ygS TQ0BcH2inmPdDmm+e7RcwE45jM+d9SW7ulY+mGPq2KkaYbjx0Pr11OLGQ2do sCdbuxRsDTXOex5BJRV+yls7VbfDNbcp37KcakkyJgsrZotvrcaYSNkCWeEK eX2kvrOY/AlgaOxVg50+GA1EBV2RiD+p39N63nY4T3yjnhIVTpGn8agZ1RY+ FNP7f9GT99qBQZFLnflL3NADwF7UJm/Q+qtJptzVqvCPJFmLlXW7dINHLZhI WefF/xDjBdR3guFGGbW/KMGQCn57Y0z/aY+7ccb2jeqOndqeBAPVXFi4NDMP C6B37YQb8P+13zDcAH3nKcdpT67AnfdmMCbfQgetGc3jBlAO2KDGMYHaWTp/ UHAY9C9iQMR+ynMgkQred+mGDhhtcOHMD9NMZOMKjfKtRDnA/gLjDnAjhoLL wEkyjIxQ4fZniEUwxABrgkVmmyjGyjwkjLewutpzniwZFey1scwlUk0LgAYg OfxkGDSAEV2gRFMGwuxmwmZlbvgsLtJKwPkoLRsdEC4SyPURzodrB/3VPUFq W6GlO9nQulA8kqBjhOHGz3FoHJoozJ8laV6vwDLwYA0XquUoXarVV97sR+Vj s6XX1ijt/hp7jMGWRS4LmtD8vK+yHZTuPL2uoHeHMCPImmyw51LOVb5bT7yR i6GowWHqYkFTCCFuVBJuwCsNGp1LY32WpWkP1qSgCrCybsbYWZISTv9h5kIp PeCi11Dd6OZU87G16jDAjYXKxl06e6blftyhlVSvmUbJSgpWXiDoOOvOgiyA JAOFbvf262+sV3VFG2wnSB2qHX6Yck+eZjDK0c7zDRzH4c/a0TjKAyzk0Mat o3lqhJM7e2Mq+DkKoORQB7BahhsEWSfJiKj2sp/1tOe7D8RR8nmIfuig0Z6D Ja78Jbd68zkhbXQJ56iN2EEjcqEM4kVgFJzHqZF+CMiw5Xk64iUyjpq8edxo JefMRcw45Qkb80hUUHEfj6iU1NHq8G8AblTRlG1w8m2OpLJLlGTOHg2gUJ6F D7LkEwod0KIhSUyD26nhwnVYF5ygt5a5d0dqRgxu/Bzdfwpx46FPKXaSKOkz 0bGZ4tKF0ut+KkQMeOh7tdw+xI1LNEdh1kxp5TJFx1b1wFYwXnT9R0wYIiEF vATDCgyCrOyiitKEADpO8DHQgRzL7f363jAtdc3VY17WSTc+zFFBsxOCmsCb eQL7SwykmWsDNOgXpXIP3KbBi48vMNzIt/Btcs+421q869MtBf7aQzNleUuU zSF6jI2WevCGQ6s37yIAvauhKAbNRsSnNFDKxNBxc9debTfN7Y5aAAelTlZY HV/hxVd8AGLcINy4Rn82UeZVDeFGvjsekSk7Ixu1lA1S6om4cZKKy3LceOAq I9woIROs0ste6G7LtIB5Ar+yhhmscSZ7nht/8nWUcnaNIOsaGQjnPfGUkkxc ggkB5LQ7q5u7b6qcJfVnSSaVVLJaR9bNZW++cg1Ar8X7vmemlO/Sg0wD9laE k1AjpKcbeNxoI9wAsoRzqXgg9brqqFupxOkS6NGMxstJNXA7lbzVE6nB7meh hBvhWmx5hG1UjYNARUocUfhnXH6m4j9tuPHQ5xP4rjB/ibxstaJkkaxitfze bjU+ccCNEMSNrhBNzSpscJG3QF7rq+rcpe3broH/Ow8Z+apw8jzguAOv6AVP 1tUf3yWwwckE7s0yt+3VdQRr+v1VXIBqKEzTF6fnw3ZgLINGN9FLDgNxlqV6 u6Zmh+b+6FlFsw3WO3DjJBWtg6kSTIXwN39ztcTj7D5D9hJl4QrV1TADKzAf y3yVzd58KLPVYenXE0BdoAUUJxHxh7X05AtAmhwO2JPkvWwZ46AcY+7jRvMY ZmVQC2J3PCJzcTDLCCdLothouRdmhaVZuBSavLXKgRsAiWfR/2DPdbMlm4ci af61SIPtkBnZS4k77whiRgrgBqhwA1074E867e24G1/lytySFZ48bpx14Aah H57JKXc+ntLszZ88pZviNmjOuPPlPOXYqRjtoBQjkocWRzQWrhRoVRG5jBoc WWEMOqocuAFgm2XCZLCjBp5y7FbB02la4KhQzqZJKkvd7uyjhJyYZz62MpJw 46FPZumLrrHTpdV+GmuSsW6z8tI25SDO0KFF/wZYK5HaNqo8TZsqKV6lbNyh 6d2v796hue2vuRVtuJ5o7C5Ggx3fB9AIeN+oMvS+1tNr2XnUdHmX9qqf+u5G 5VCgutdPeWOltCcJnQk8MjR69VZ4VMcYmsP1KTOl1f40WrEshXNkrdd48bjB xxBNHIV3AQo6L3rVpppPb1CXrlbdjDTw/swz9JNLjlTtptH8GEq1pciIqslZ 6vC1orbW8ekZY5l7AUCj5oHidJYOes0xCtdSkchJqksF3Chw4419llpZ4cmn VcC3yWbuAFkWDDdOUqcv7C7uZS9ytx00WUOp1dh+o+0w4QY5Tu/jRvtv8Ii1 xDcAo7Kp2Q7LR62n+aPTKfulkg6HOfCefPFsI2V9FNPEB5ccuAHLZW8+6wy+ rfK4b26ceeCpURiLx416b3yyKQbEGUZCrjkMljovPq+VFeglYSIHrg9UcjuU d1ZJO1ZIH6wL7s0ztwWp0PuRbHi0L//jlBEDGj+zTm3lX13jp0tr/TSdMYZr gZrL6xRUvqTldmuwS16EtnaN4uxX4qxvZWc2qprDdINJxntB2mub1FfDdK37 9e1HTPj+ZPGvB76lbCjMNWF6VQXiRscRU0Og9tIGVft3iu5gDRDXrr2aq+vl qEQMOmo9rRUeDTGGrKU0Y1qkoyzluInVsCNJaKQq8lM0ZGeZMRTL+glfH9NW 6F4brLuwVn1nv5F3aRaRN7KJyk5rKG+ziQyWy978mosUl8Q5GbHwjdiIN+/w bCNy0kjZmNhEiyjHtQdwg3XfqsA8DfTJAAeg3C2+8cU5mu2xjFLKQc2BHhwy oaf3LLWtYJNEM9w44wFYMRRIXQEPmOypFkSGQgqLsBoWVipyldLXgb0UkTsl 1+GJbaCWoWypZgyHwqwXHHVqoOkF5GG+NPp+7QmlqfNYUUtJ7I7CPYwNZaH7 hT90G0WfG7wRq9MwBfRB0OCBi7U7hv2nGTAFHdCDOUi3KrjNij4f2T1fOWIy ptzjFXUe1tfMEdG0TcZHqAKPTX6+1j8luPHzT8P3FUHidGmDn+ZGmK52k6pi qew01bkj2dit6d+lyfhUWPa1uG6u5Hygpi0OG+V17NI2r1U2B2sbdmsbI3V9 5ylfscqTr6sq+16mhK3c/eZhY62/pnq18vJSORasARnONPXE6q5vlN93zZV5 NMcY8hlusFmK8s0Y1Ms18S1x6ohvnKbMSdB0sJoZ773q3XXBs/2A8bKPujvW yKUSbuQTbgBQ8JnhXryl0zqGD0fW0ZpavhyMWARfE0p8g2CkwZtv9jtMOYZd o/AV8I1iD7Qd0ugSysmxU+/JA90pDyxZZVYM6+l33pOf8bnAgRsVXjbGjgDu Es1chhuX485TjgoyNxx2AX+4UkpTL/LgbZMGmnqeLWUePGicp0hrLV/GizcK zIQGwo0rY4YzzcYyrwimpHrx8ZpqsqoA5SjyxSPkZboJcLbHKPJ72Zs3Utj/ DLgwOW00pvhGadDGOWrkieIWhXWLottXbk0jRkQFQbD+CpAQ2AZMG0D+cM0j 0YLHI49E5Z8G3Pj557DsBdftbwhTpksv+2lad2pPrVGemCMtmS0Zfrv2v+d6 9FPRudmSmytkNWG662kmay5OEVi/XFG/XVPtp67wU9/MtbC6MHyvzt937x/9 UnJmnXLgjPu1Q4aqbeqyJXIuWE2Nwem1ybd0x+pwFGOUo8TtWowhd67s+mY1 zoJKYRrMQoRRDLs9kN1R4cm39cPkUiN6WY/xXfj60s23N2r6403w5hPbwbxx yvpmQzBBRw3VqbFqEWb1l3vyWjbc7Yp19m4hxKinVE8GHVfG8DnnjlAsaigQ gONu3BHUfXuGBacpYT5VFmwFAlBElkWWhcrfvPhpW+soslntCce1MaICtgwM 9GxvjHKUezrIj8MpUUFlcaeQxhBukI3QxFfy4p7PUTooGCzYzIdxKtoymeJc l71Z6hrxIm8+Ab7ZEW+CD1WYHo+VeumOJupXHLgBTAnwB2AcYJYhxlWiIo1e fCEt3K5jOE8TBmSBcjDcAMqxXTGwTTEANm8BlQWRAXtnmwKfPqw5YkCvyLMj IwM3HskJ+L4s2D1OmDZd2uqnrt+myV4kT5tKXXQSDFd2ao99I416T5D2mfj8 N5JbK2UXvxV35LsNFri1h+pqligqfVTl65Wn1iouHzIUfCXJ/1ZCaQb0rl4a fWu/PnuWtHqb+nq8werITuT2qLG3BnDU43yZ6l0/pe2EpScTX9TbVIN/eZO6 9xA2nMHtYWhm1RCnqIqTyslxKGfJpbEY4EPj+vw/5YLmkZ5idxpKcyojfKjw 5Htp8qWm5PwsJUQa7nBFqd33lYtRDmatXLmf+sXjRqEHs0Rg+4FDpt5jFpwJ upr4QCnpPgvUFtCU0ywwWkemQQ0tl73tzOIA0gIbMG8JoxxnPHkvBIuHNpFe n6VmX6cfwA2WHsZ8vxWEGBeBOYzm0aPakw83M1OFz54l46uRwLCVEuNZghnc HwBboEZAkNjNZ7hRT+bhCQsrIv6eCcN3L6TbdRyzvJBvHNJhgDiBLM1tCnuQ sm+HElGl0A13koUPugpMlWILUQ4d909z7T2d8qj0/QnixqNqvPPcc8/teFMY +YEoY7r0qp+60leV+LXswEQRU73rwdpTKxSR7wvTPxefd/QN7jrt3lfo1hah r1ymSPxEdPQzBJlTs6U1PspLgerG3Wren988uny1suBb2eVdmq40anlBPfOR msbQtKc55GM/4z4Yh1OW3DtkuBvH5yQ3bFF3JtFcq8w5n2rAFzKV2nOxwAHO 3UxlGgk0a0kRjWVHzVykAcOUSQ5XZyXZKTXUSIeKSSlM6UHDN+kO0Ixi6tVZ 6RhGL/ME4z5uMMrR5LBWhgs3YOU5wo1jFGgON3RFGrqSTdZySn8tIuvjHDkc SgkQznryoWRWYlZNuMF7IeiiqhxZZIAbedQDsNqLV8lW0t+L5OLAuIkDNxpZ IvpovgsQu6IGihEz3Kjx5MMlgNIAkgyIarz4y2Fp823efDkenG0WJrxh50M2 JdOwnQJnAgzqhJkPi7fdxw2uksr9GCKxNo/ADzOMCAhs8vqdNAtnCnZdw+dO fdpbwFQpdWOJ6FygcrhS8ue/0r+QPEJlf1K48QiPC08q7D1R3ERx1nTpdT/1 2VXKiC/QQmnxwQBKR7C2fIUi+QveZjm3SMrtUbVuUXaXuLfs059fqcyYIcmZ it+eXyBr2qa+tV/Xf8zRBbfWq3ihvGSR/MY+nS3XjM7A8+58uvIBwo08Mz/p YaVHf5DqbqS2LVhzxR/joRe3aTqSTazT71jmHQV7JESNLx72mnC4OLLMWFd1 kPaGkye6ofvxEOsBaGLqjO82mCQl5DE4TbmaMOS18owd1QGYeR4VwrAmG6xw lawY/BNAo85RztY8hocOtgzjRiYeqCdE3xGkuxdvHDxJOa5wsSwHm51wObkd WOpaLanzA8lavClUSzkYhQQaAB3FfGSEH9NbxvAdAuGg5WQKnSfcaPXmvRON DhbRSAgzjBtM04HgkeWCn9mMCewqGAI0Ef7ADU+nfqSAG9kWTK5j/mHkZt7o vypygAmVyjpwgw7Eskn3UulQlAYr6w/p7Aw3AnFSe3s0zSUB/DDXxKgIfgVv RZrh1FdiHETg0ZS7P53Q8Wg1/YngxqMFjY2vCA58JEr9TJI7Q3prm7pokSL4 I+QPlSsVdyil4cIKRdoXEt+XXMMmCIFP2ill4k6q8dIOzel50hPzZUUzkYfU Lldc26ntSsDwvZ0l/xy3HP9KemalvDueplUtpmoURuDTqVS8AAP6LHnDGq3t DlRd2Yw7z/tKdmG79jpY2dUURjznfl+/4vSUSu0oDcshFweb06SMGnABx05g hfYOLwer6ir14J2NcNAcE2rTlTG8CVNEzgTmhLzizWcj1HgNx2QJQxxkg0EH /k+Gw3lyJFL5W2ew7vomzd39hoECN55LlDl2CzusJtuB4cZFUueqB3CDtfAa drSe4CMmeNrllArCzqSRevWwVM+zlBzSSI2F27z52hO+GsWbbwJW7Wg9Snn+ eOtYulcluaFahpsY060ALnTSDXHjKDUVOW7hp3xqdpTFnfNg/d4p+52CMgw3 zhMFYpHfcA26OJL0lC2sG+RTRlVIQlKpzK2cOhgcQty4AKZKufuF2eKaxVKs cEkzAJ9x4sYvIY8WNIBmBL4lTJoszp4qOTlbdmuLOucbTApNmiQuWyi/vlXd s0uz9TXXzOmSK+sVXLDaHqSywdixB7W7dpmsfp2ibJXiDM16dnmtsiNMN3SE nF1FFlui4Va4Pu1zUcU6Bc1iZqaMBWo3V+WAjkKqh62gQpI6zz5fuY0mKSte qKjaoW1PMw/Vkv8BW+RR92yWiplJ9ksO9ee5MQaZxkGqqc+l8vNMB24A8aCO Ojx0nKFoaR42BUUKDWfCfBQXKHEr351PvWh2dMmoJE9pHU/s+Z2wYo1mQowm b95RSaGNwQPGuzt119arO0L1fVmUkl1FxV+VnmzPvNazsbvGi+cAFylMzDsY aakkk6rIneWu34eOSr5ZBxIJ1vKLrBX8yVUyNFhG6CVHmX8dmQ/V5M8Z7sRe 4MZc1niBLCTd5ogpY9aNBz6RoyYkG8foDhc4cGPYvCphhX6sesWbx41ySmLB chvaeSi5OI4Z7Yd0vXtUHRtovolkPRbXl9ITL6IYmWPCi5ZFktZ18v7tCmQp mcanEDeeadD4mQ6NHzwO+LN2kfzELGniJHHGFEnhLOn5ebK2dcr0aQgC8RPF ACOt65WL/zRq19uCwq+lNzcC1dTYdqhs/kqADtimbZ386nZV7WbVhXkINdc2 qXujDZjaVIguC1ua0RqmHdqssu7SIEHNokQO1ky7nl77PN65wTK+uObRVkpL rtutLVuruhiovZlhsTEHJqvJogY7XCtBB5gnx6mNP+AGWAQJeoQmYBFF1KWH BWEBNwrQcUHOAWrAlUXTnIFeHCaQuUQ17DXU06/Ig9dK1o2cRSUuEm7U4vI9 3GgZw/tAGsmRWIy40R9vurNbf32DpmOXvhc4TwWFb1iaay3VqrD9D+NGlYOH 1A932HDYF1j4RqmbQDmOO6ADUII5OuqQcuCHcoqt1I++Hy2tH31/J/XETKqp 7+hJNz6zC6CgzNHnsHH093FjDIIY0MIMwtssN4TZfEpOa+aNIB792BVdoLJ6 hhtnPBF4scKXjrJbhXVt7HGccbvpQ3MiwJpCM9puRRSUOUJT3qfyHafvbsc3 qnWNrHOzHL59qqDjoYtD/91VPE7c+PnH+sGFwOeyb2VFs6TZU3nfRe1ieeNy RdJk/PPAh6LMKZLGFQqfl1xjJojK5spubFYi/wxSWbcprH4KVot6L0RzZaem bjEOKB07NDbWXaoI2+bYs83WaL3VT23dobbtVqN3Ar0Z5OIYzoxilgtmmN/v Ft500Fjlp2kI1nZgL/HRvMMfEwyouwWjHEfIxoE3/wZ5846beNwo42dIR+cG mDlAy5HY05oKT5aXdXMzMedMI775VyiZquKBrjV8yaon71hguEFqOJYFF1of cG7UEz2g1j39iea7e/U3Nmk6dup6ksz20zSdChyihup8GdMY7tpB5gPZCxQa bnSwF+ZaOUd+VOatzaZ52QAAT3ny8NXoSBE/58VW8llhw16I2tF8s+IaOlAZ sYhq7FHAX2ahOz9hSuv3caOWJlUBOgd3PptwI49w2NFF8D5uXMDeHfyckth8 zBNx5gTmxg8BRoFVAkbHCTPzhPMerVgtPv1qD0TsNJrpHnvAUrOR3PtV0gM7 kdD+4EX9mW/+z5SH65I3/8+uwePF/xI9HhtuPBLQAK0f2KMeXjP2AcmfKs79 kq8jSJmEkZSoD4SxH4nm/2FU4JuCI5+Kzy2QtW/lpyuyblUMbZLbd+Kf1pj/ n7r3jI7yTLNF71pzbRQq56ySsO/9f1lz5pwz09PTObqT3W23UzviNhgHDJic c04SGYQEEkoooCyUIyjnDCKLKFAuVdB9wvuV1A44tN09p5aWViGqvvqq6nv3 +4T97G0YoJG3/jXq0UMGHO4uYgexEF+Z3ZtkgmDDu1/rO6xD5XzunsDS7pLm 4i/QdTWNrIhxS4a194jh8iH9o/M24WxyncCBdbSuSgOnbP8BuHFrJl6f6TQI w1NykJIAbsCVTy0S9jvjZAESsfu7aQ4lk1KVW5RxtEmlwksk4dUgdV5Y8pcX YMe0fihPl3Mu0Cb0eVyp1sETpns79A/2G0YSLZ5yittZhrRbsl+8Ko3eI7/d KdCMqSN+3OiWNMGqQkRjJZegAyKQ9jCh9skA0kjxRtvf4kYPQVkNOdBxaRQQ rIRyuioJN8iIAU+eyxR+3ICXhs8wlybmzlNOV2gT4wPMH0PpEmwxo0QYwEKt A1Gd5QKykC4Ln5uPg8lknF/jchZ+AmQEiU9pRHlDxJBcs6CjF1m8bMt7Uot/ j9S6tisnzxh5xeHfy23/ROj4xsHGgu/P2PpMUMa7yn8WbnxbzVZU0TkuRpjh 9+VlqtMvBB3+Q2D0HwPz3wwqeyd44rAOQCOdfNMinws88LuA9T+ZEf9SUO0H 8us00QZ5CoAP3JnYpIRsBSvnMYaJJNwyHmzQeCMll5MqZFn4qh3edIs30uAL p8m4JEolSmxCUf+qFPQ2h7DRAN6/NdPT6nxQYr8Ra7p6xDBcSFUCHg/pJ6Im 4wavPtTbeRpxox+9UHHzKpXslmDBJlOSAstTIkVzmvBgl27goGHoKFFMK22C O8olR9guu0LFOHkl6fjxiu7gYZZQgRs3pCYsdyfbxXMn0m1DUab7u/UP9hhG 4i3eUsencePKU1O0kFYJN7jPwt2Ny375wVAhAcqpSh75wJbThB0TWTn4Yesl bjTfknADXquBKqsMHU2SA1SNgzU98InFkgfcp3FjJiYmgKjnCQSKqcRRFTI5 3XaKLe1Q5ovMJjqpkwLnlm7Dk6zCwbdhCDZSUMMQv1zAmd7QqadXENHrmNZP 1YPkxc1CcEc0k9E673Ht+BblJCsKniD6R57ln4Ub3xg0lvwgYOH3Z6z4cUDs a5+jb/Zd48a3yNDAlXscN/2BnaJR3rBAeeKPgbt/FXDi2YDs1wVb48pGTDOT Xwk6+oeADT9Bx/aL8+RXlhNoHNThuEqiYXyPenqswpTOke1a+O2OoK0cpbND fU1O73mb74xpMoJsULLMeLUUSSUOGmkXGxOnLTxnemvmaF3IvXOWG8cNY3AN N9Li7abKxh0/boiQA591h+T7+sLwMuZS/zWqD7A3QTuRvrqEM8hwsuVRhP7R CeNItNF1xshBCL4ur2VaIDR0RuPk1SFiy+ahVwgMLk2jbvJc2yVpOqw8xJ1p Gz5lHthnGNilHz1j9hY7fDV/ixviJ0zgBvdZaqmh3CilKpepmNNBBZYaJJOL KbZMGsPnNu51EXIITVG2dr1Na59SGEQMwMxyCToqHaLFOb3tWxEioiw/EnK8 AcAO30i+jYhn6BvFH6NAeL9Sa7HwaMOQo5lUidKskylW/Ny6wsa5C3ORNohe STppWjIipphR8By78y6e5z2smTyOV1Hbh1Pe35O7tbDd/FNw4+9RsAHQ4J/P PfPvFDe+3b7J4B4tRgsndYN7BW6UzJPv+23A2h+ixwEu+SSTi+yNqubLE14M jHhmRuyfgyrmyrsXKx8RkQNNTOLJI+OU/uF65ehGpVcSDPSR2XrTIuX9nRqh iUFNTB9ccimWSchfzpL3YiSlKhU2oYDHuJFggOsH79Dch6su5NZ69f1w3Z3T RnepTYx28myaP964MqVmQ9AxbdqCJf2rSe+inPR4OQHvm+ludY4mWYaOoa3z WILZnUwvCoH3HbIk6wpjXV+82pHTaBcNAspQhBua37bAPxpGMsW8DD059pFY 86MIw8AO/WiM2XPe7iknLlmHNE/XK3UzmfDAfY1qKoFC1tA9BSwU9jhFdbSY UpUMG/5UTRtW7Z7m5dopCWtcpjptFc3LFBL9A86/nFguvJbbJBGhDJs0b+tn YhA5pIycXODxhdTQAcjiwnKHU/hlo9QhPbGUypvwHTVRUTTZisM1KGsW5m5x PthP14xUzebHeyWhUfwnUm5MgBveMut4uGaUmGAAHf1LZH2LZB0fyxrel114 l0jLMQZXwT8h5PjGwcbanwYwaCz6h+PGt3tkOPmeVao7OzTjR7QjEZqba5W3 N6oL/jo1fnLzsH4szvTwMEbv1YsUJ/6AmqIPdiD4X1uhmvqu43HO0Zdtdu9T P1itGNuhwsp5Gl4Ml5aqyt+X921UuyGqqZCad7BjAm7EmDBNZkm6aB1eafUO XB28i8UYxOzkHcxEBmJN93ZrHxzWjyabvFhYw1Ib5vvdYWx+xDU6oVt1Uxrl hhijySHULa6ECcuhCgdG0bwML4Z4m53jCebRaNNoosWVZkGLed7meCCFO6qF 5J4MUT0/nQmc7VRw4Cl+Lq3c8ktw0D+pNOo9bx+NtwweNA5s041Gm91ZtokC u6/eKXBD8E4JNJhXyVT8KqJq1FB5k6nsfTS90iqxTJnIcc6GdJRCSTWdqxxM Cm2SBFS5VtMieGg4H1dKNHvIU4jAT8ppTnxfAKrJVmHf4Odv9M0UIhvxBmTv F1FVNo+Ic+U020uqYlib4mZrJQqFYcjRSI6WyNEl3MB6y9MjcYQDftCAd12M LLLLq+WsT4vxYTUWSVzhmnurFGPbVRM7VdhzOaK5s1xxdamia6G8a5nizmHd BIQl/3Dc+MagsfM3gat+HMCg8bm48X8KaEzS2ymfJ29epri9RQV5yu2Nyv61 iAZnXpNVrlZ37NH5MqxDp423w3V9GyVJ6ljT+EH9/S2iFuo7rPfu04kAtdru PqMfWa+4/Ins/mbljQ3Kmvnyc68FZbwZ3LBccS9cIAle3nDFJpmnYCddmm+t c4hw/bwVBYpZzP/OU+6u0OEU86Oj+oEThrF0s6+KXAx4xKNDyuIZN67MFCFH v+T60UnWBmy20iz5BXSHCtYBmcW74syueLMrzepmUlO6mc9T4EZrmJiegLMC 6ICQg8zRBAUCFl2LU2Q0/ZJ6D4+/dWBDwVfgGE+0DB8xPtyqGztpmki1jpN/ tPAg6Bb9XPZTEx9IrZN7uFje7JBw43IYU8IwR8MSRwjLd/hOSSLJEBX0T1vp ku/bLKrhiME0lgkqoiQCoqZcKkteJDJJFU3TQE5R7BAMTz9udBCrNsGIrM5i 4qwy4TadhOVZzxnjJcKNi3ZhEwmpCuDtWQvO5UFyBAfpf9pXYB1ap+B4RkRE gEgV9qFT+tu7pnYi3HEWBt9brxzfq3bv13gPYAP34VrF3dXK68uU9yB8TbNM 5lluHpuSFoTw+NtdHZ+9/T0ZyrZfBy77YcAXgcbfc/DH3L5dr2f/Dc4/7dWg yjmy3k8UwxtU9R/ITv0JfU8SX5PVrFbfPWl0p1kGThqv79H1rlVXfKC4ulnj i0PF7LH9uoHNCB3eQ3r3bp1HGh6BgNO1X3NnmbxhXnDrIvn5t4LSXg5s3qwu +VDWuEB2f7tKpB5cis+WRDmyzL5DWkyfATd4z0V/JQtu5TH6ybtPuZucrjzr 6BnjUIxxPMeCFdRKMm28GMKsJ4xJeBDDL9jrdwvqpnodoMclmo6vJxZ6T6gQ yruIIyTuWLM7xerJsXkx+IfIn07yktTcbCNaRaEVqSY4+EmQxbOljVT3aAjh 3iU+noVGeVFwjlPscCVbR46bBnfox06YxhMso8nWiWKHl0fPuCnTLmje4gOp lsoFOIcyDTdaSJGAFf9gJRZgFuCLJNRlKKBJdhJpD0O465EikMv0LuApEJ8k WLC22SC9RCqZWLXRRwF5yjkqmLRNww2WPYQzSTSinXeebQo34sWhRJ7V7hRs kCbUCcSEBXDjnAWLMCzbDh9Om9PLqcoViatWg0Jk47mWa6vlQhgBAIdKLnc3 K10Hte7DWt8xre8gPmtoo+r+WpUv1jgRR7r33Hmh2+Hfzih6K+hbXyP+2zcw NPTfDj4btPmXgYv/C0Hj4+/9g3DjuwtgZn3BLfV1WcMaNSCGL91677ixb4e2 c6WqZK68Z6PGDd9XgnnyhGGUupaeQ/rxXTpXlNFdaGX3E89x7fhG5dgm1egm 9cgureuM0VOM7Y+xHMvV9UokG7PoJVtCXxJJMWQx+M8yG5OI0PE5jzQGhZh/ qK/C5k43jyWZXQVk4VpEIhVVDsGLhqV6LWzKVeS6SFXwTneoaOk2OATbqtoh xk47SOcn1+Y7a/Fl2XxFNJdaiI0DsaZ4ATLboZMkaM7TWuBUpYHyerjIa4lq AiuFbR/vPC1Qq5cYFyUOd5oVIo2h3fqxo8ax0+aReMtYjs3N9modYcLLlfsy El8F1ykrabSEij4sUzjKyLkVEoRKCg+SrL7jhBtZWJfAo92YkvsTlNFrkg5P BXU3YnE8R4y/QbQAcR3s+J3kFldEAUmhXaLWSzLLbaSVehYlTTCXqQgRVpV8 qBqnREOVpn1bqRdWRDCbbcXzhKezXHPPNHiEg0vDud76kNsRWl+akZvm+NUQ AdV1XOeJ1PkgjT2u5Tqq75jOfVI/GmUgs07zZAp2ZpP+Enj6jwG178vr535X 0PG1liFXM/b9Lujkn4PPvCIL/0PQhp8/Ltj4usf/0tt3BxpLvv/kqecD6z+Q P1qnGtmgGlijbP8YK5/w1eTOlresUQ8BbkC8EWns3aJtXqJqX6Hu2KAZjzfh DnKGrtUTRvch/dgu3dhhvSvR5E0wQZzgi9VPbFFO7lWPb1WPRuhcZ83eSnJJ awoZjTfcXqvAybVc6+QR6njywDhNtmIDlxOWMgeVPkhmE3AActsWUffzZFjc TErPoWk1uBpb/ZusJDfh16fyq8c0OdAMqMSK3IBm0i3vcPJUF+MGNlmYnlTj FBrCbBnJOr3cN+mQ1KvyKTi/QMVVFu6AyPwCUujxJaiaKjbry4Jt7smwuU6Z R/Yaxg8bR06YhuB+mtVVStqDbURcb5bar210v4HGOliCuClUjLaR4BjiRi45 yMDnA3t9osV3lD60s5Rf8Nbf/5So+l4i3OiTcAOgBmDhtJklQYSsYjI1wTtp wq6EdIQKSRhZ0ikSky/wycAjY6k0WkOnCohxhmKJCxRLdFCrupPfBRF9Aajz CTpKEKbw0+inUvN5i+ib3CRSLk/p9oY9SDBdX6PAz7CecJ50V8aj9B4yqkae T6swkHId0Q0e1uEQdJYZwtT6xfKoPwU0fiTvWKW6u0rxXSyWxy/DzzKuATS2 /DLw+PPBya/LY1+W7f990JqfBjwGNL70Jb7ubbZ0+xaPybdl//Vk3ItBbQsU A2tVAB2QOXYvwsSzeoWq/ANF5xr14DGD56x5MNrUt11Xt1BV8r6idaNmFBW9 bJMptKyijROH9KO7dMN7dWMH9e5jBjT9OaZH+Z09atcuzfhx/US6Bd0Q2JSk 1jHCziawc53U49pn2WEapeRKu6/I5ks0I25kWDj8EBTlcyZOH8SqzDCJiL01 VOhxXZ8pcMNvjMIhB/+zRjoIXGloy0JM75YQgRvczWRvAuZsUMghVh/3TToo tWmnOkkxsSXZR4DFSKvJ0uiCEAQQi4LlbqpCvDn2iVjzaLgBfoYPGQePm4Yg 5Dhv97YQaDRJPZQG4qNemSn+WCNVOXol0ID1Ba+biviM+VQR5SkniFoZY8bh kSr6QPyz/JdnsiyAwA34X3insNjPsv8LNYYyaXinnXKucszaBG70SXw2JozB iZVhIQIjLq64wicGKc85m+jOMHEdvXEdIpKk1hh+iezs4McNAN59asHE66Rw qwtP1dvoHAJcKpVwgx4wFqP3JpJqR4x+Yo+KqSa+ROPAXg1mWJk4eg//1bNQ 3rVceWWnlj/8/iVY2+frvGelsuoD+fm3g+vf/3Lj+29A44THX/hI5X8iljJ+ FbjyRzN2/ybw9EuyjLflp16S7f1d0KqfBHz470/+g3Fj8jsAkBU/nHHmxaDm jxVdCxX9a1X9K5V9SxA32jdqGhareteoHx4yTMSbR2JM13bpGherUt+QNW3U DMWbYbfFLyXJ7Isyug7qh3dqB7dqIeTwAqScMqI5QgTihvuA1hVjnMiz+lqc PNguFlSsnm13cBVfIAuAKju3MC6tVHhOGXwHdJNHDZMJJjFpArsYbOXxBoyo 8ymIZalz+CNTvq9MWamynykeszdUpPZct+feYimRl4qI58yBB9s5ARIW06wH z4Sy3Dp3f3okV3fWMW6kvRXWbBtVApslrTBWDWr5jEAQDpU4fQV2d6Jl/JBx ZJd+aJ/h0UHjo2jzSIbNU088ChLiYHDDDIgJ4e1E0+KQo2cabsCDYZ9NIipF qZi48R0z+SJNWNIsogSqN4zDDEHF75FwA94gYEs8hIsWkQq1U+ZVQDy65lCR +zBucIGatVLb+BMIE6ELU9ogODlL3IxShxj3AxhvCGF3e4q4Zopgr44YL37c ACQ5rEUAb5ekQtolGnyZzQVxBeMGfDtkr+NLI5e3eAMqdZBbJf5xlwpTFdg+ 4KM4Y7ixWnl1s/ruMQpi92EN37VDBa8ytE9zeb2qeqHi3Buy4ndkLR/K7m5S ftGKgEUNoeDn4gYc8HMhhfhOqpqPVQVzFClv4AAXhBabfhGw7qcBB54NintF dvY1WeTzwTt+HTj7X594Y9YT/0jc+NQxvxUAmftvT6z7yYzYF4Py35a1fiwf 3qV5tEfTuxhx4+oubfca9ZW1mgfh+vEY03ic6eZeXf1SVcF78vqNmocJZjFB mW55tE93Z736/lbt0AG9i23CThuRSAa4sVvt3qZynzW5i20+2INgq0qhHbzS hmFqitF3TIsJCGwujBtZZjeBiWebyrtbMxmuxYAE1nh9iMCNk6hXjDsj8qJt olXaQrhxVZrvkPhLoi7nr442s+dpiNjsKsjvo550/i/SiFaRHZMjDr9bqEuS YhQjn5fCxBhsW6iwf2qTJs1ZQb1Rop0ziwNet0BS4OTCQqPTV+pwp1rHj5tG 9ugf7dAP7DUMHDEOJ1snLtBO7Rfb4Yl+LmgIh3qn0NPoFYQQvJ9HkkSw3itD uJPiizJNQrwRR/OqlSECS3nI7gpN1nCET0Vg7NtG03dRTt3YUho2aXIK4wbW BaoP8fOypjCwU/KA6BCUNhJVJkZHPX0OrGHSRpxzf6Gmk2aW26WhXcihIFCM 0mOcAN/79GowvEfYX9JNAjfgOGS46csmO/uzRs8JLSJ/ld2XIDGQ4cHwUSSg cMf9CK34fg9pIU3G6eyj2tGDuqtbNHVLlRmzZedeD66YI+vbrv7scmBMuL5H Px5rgSRu+uqGhca09v2/DTz9fCDcb9mlHYkz+p94aYW6foGqaK7i3JuIG3t/ GwigsfWXgYefDYp/JTjmpeAjzwXN+bcnADf+TtAYGxuLjIz87N8vXry4YsWK 5cuXl5SUfJUD/j0AsvA/ntj884ATfwrKfjO4QVLr4tv9A/pbW3CU9d4e3ViU 0ZNovh2ur1mmqlmq6tqhvZ/Ay9/hybDe3qHt36odOKAfOWV0nyO751jCjXDE jZENCk+m2VNJxu6wNknlD3Lz8UyzL9noPar1ReoQQ5ppKjPH7D2ln34aI+sV mFCz5nAZuRZCDFBKbuyw8NMkZ5B2SZ0bdkaeCKuxIxpU2zGtQLPjMHFJM27A AWsoTwHMIUt0jL3LqTnLxAn0Z6Srt1ASvuuS9Gd6qfjfIJFGKIcS5AfegrvJ +q3KJrwU+em0Hj2ZNle0eeyQEXDjwXb9/f2GwXiLq4yiC7+4H5wG7PXVzqnC JhU6plYWj7uW2ARuIA4QbpwxY8oAuz/3WJEpSiO6V+g4HRIHtYYU1M9KQ8HF JIZ8gfif9RR78PgqH6GLRd1JiGw6n/zKtMptBkUvedSYrqdDAQp1OoW1BPFq ZnGZtCtUNFBu4deE5K4Yg5TCkN9luzTnUkW6K13U7YKLh9yvMKVNM3pj9KNb lYwb2ICDg0AoArvPWezCjJ2WBH/gwbuJQXRc5zquv7FL27BKnTVHHvNicO67 aKLxKMfyqeUAK7pthfr2PoM3Dsce/QucQePQs8iaXvqDGbueCUh8T1G7UTMQ ZfDSpEzzAuWVleqmhcrS9xQZb+E62vfbwC0/D9j+y4CjzwXGvxwMS+zD//3k 348bdXV1e/fuXbdu3af+PjQ0tGjRoocPHw4PDy9duvT+/ftf8YCT3whAln3/ yR2/Cjj8bOC514Kr5+H7RSulM0Zfkmn4sP7OZk3uG0FV8+Ujxw2Tyeb7B/Wt q1XdmzUDh/SDTKesDRlKNt9cq+5ZpbofaRhLtXgLbVjtPGOaPKyf3K+d3KV+ sFI+uVPlgRUE6yufKp+njEPJprtHdQ8jNO7DWs92FZp/1VBZIAe1MiDk8JzW +2D7oGmX64tlCDhC/IEcfypofhP+mUoodNExFTzD3tpC/1XCfEWrGOhGFYgQ vLCrQ8SoeJO0KABACizEBaUSK4tXwDaNhCgzYlq9Q/R3GDe6qa1QTTUEliEl oXUOOWZxA6WbDsseDbhrs4eR05Nnn4i3jJ80DYUb7m/R3d2uf3TKPFZo93WS ACBjGgtrlIeI0kS7pF/BtHa2XGmhA8JKgagDziSfcIM5Euk2/MknRms7FUWv kjx7a6hwla0lRmgKrcQ4M2Y6XOIoI9xgSbFSCTfaQ4U4Epk24v+2TRt9vURw B+EN11XIDQp/w/fF3NHLYVMlpnYxn4idphuEY6nUmqkgF4bKEDHy0yUFVDF6 /IIAr+okGTH4MDNNviTD2B712GblJOBGtNhl8KpIMU6dWAO15yBJOaCZjNR7 og39+3VN6zQ57ysi/xyc8oGy7oB+AOKrabcbazVX12p610CAbUAYBOzNxZCD QSNzPs50Q6Kx4kcz1v8i4PSbsooVqtuQlccZXYf011aqrq9Sty5S8quf/nNQ 1B8DTzwbeOzZwOPPBUY/H7jhZwEf/8e3gBvFxcVJSUmfxY2qqirAE74fFxdX WFj4DTDhqz949Y+ezHxfEf67wLOvBFfNk9/aq/Ud0/mO6X0xhpEI3d316sw3 g29GaDvXKL2JpvuH9dd3au+EC5c0uEK8jc6BU8ary5QNHyuu7NMNpVtosViR OCrhxtRXCdcAKdlG/zkwd4GiY5ni0gLZ7aXy4TUKb7SOvLpsYqKhBr3gEUzg YjiEZdJH0XrcfUpJUSeRhPH3qfGfkEcwA5kmRsWVzLgBj8wz45VWQyFHJ+Xd XEQtc4j4gR2XmgiReIHXhgieKuz1ECpkUY+vmpom/PcOKnRUkXJOvZM0uOgI NRRaNEvZBItfFVnxCBclw+XGUG8RdmNdcZbhY6YHewy3N2gfRprGztt97WEs 5DWLK43nSbGcxYHbSVD9ohNXViMFA1V4ZxaVbbGrctHBFku+dCsWPJELasOs gR6GZ9vH+Y6TORL4xCKH0Do7jdrOZEBAgyqNTjH4xpMvLAfE3LAaItzSP/GJ /rpHPUUvZyzE/qKxnXJK+qocU7hB2qRTVwLgBltgZ5O8eSU9GM62mgTKWqVc L9no4/pzK706hAdcEEs3TZzUubgXk4Tf/ug52sUkmjp+7FT9GD+o8UGeEo1b 4d1D+pZNmrz5yugXg3MWq7tOGidgX4DUiXgID7dr+rdo72/T3dmmGzpoxFwv 9W9wI+t9TN73/iZw1Y9mbP5FwIkXg4sWKK/t0/nijBOH9SNbtRWwjn6PPOqo 54OSXglO+0tw+mv4O/kvmKEAbiz6zyfn/a/HVUQnv1p40N/f/1ncyM7OTkhI 4Pt5eXnJyclf65ifPY3HP2vjT2ecX6CM+ENg3EtBiW/LenbiBKt3v9Z7RDe6 V9v7iaLoIzkkcRD7ec6Yho7rxaBoPGxzVt9Fh6vSfv+grnex4gLFKjfPmB7B lQD7V4Jp8pB+cp92cifixuBqYgZChEDK+WdeDy5dp24N140e1HZ8GHztE5l7 s9KXI2k9FZOwD4SpeZSSUNpya6OSwMQmcAMutn0a7241ksSihHm0cAToocJa NYUQGdQ3KbEKmYtqB0990iD/VEI9i0ugeeTeXi+NmdwimRq4AuHlIFVhs2nu ILSTUnERbZHsldBIlVUKOSREmolXeylmUvh2aB4HY62KEE+ufSLVOnra/PCQ 8e42/aNI0/h5aYCdqRpl1NwpdgjRLan0QXPoTiESSPNuFI1bBH0uzzYli0Fj I7gMuVPDIiGNTg6oZv3tDUWGK+2iG9tMSMgzLNzPbXSKdvBFKgQ14D9ncaGY W07wYECYJCqNFtpFkuLHjT5SOehHwTHxcv3kSgmbCNNvjulomJEivTp6rWaC DnpTEzkWH8uiwolBXgYpSQL5T6UZ3WSnhfWuEpQdAxRq3aft2q7u20DqYYV4 FcEdHLo/poWN7MEJQ9s2bcFCVeZcRfk67Y14KprVO26swkt3YJvm7i7dwE79 6H7skqMrdwpm3AwaLTu12e/iw8J/G7juJzMAPSKfD859T9G7DbIkxI3+jZos esDB3wfGvxKc+ZY8d7Y8/1158VxFyusyxo0l/zXj8Z2Ur7jGPxc3srKyEhMT +T7gBsQkX+uYX3QynwIQrv98+L+e6D9iKFmiOvp80KkXgk6+Lmvaqpk8a/Ie 03n2aMZ3aopmB19cKUi/7tMG3ymD5xR+aw8itK4T+vFk01ie9c52TedCURiZ PG3oPaB7FGfElgfEG3sFbvQvpQyoBXGjeHbw2XdltXu0l6MND6nL2TQv6Npi mfeoFpctLnayP4Coo4hCjmTcUPqXy8cBARA3LHjwSAhmBMVdeJqjgD/hBk+a tyJfCKOXVCNCRw2xoC9QTaORmKKFtMOS77N4erF1ytH4OjuuziR7dws2cfKJ ttokEnB8TK5N2K+wgB4XTLgh0k5UBIAd2HlTTQJ2iHvpq3F6SxzubNtYkvXR SdP9PYbPwY0SMqEuo54Is614QRVS7sC/LzhFbwjeIyszF5MgRjHN6rK7Sq1T 8EBaQ4VGGbPr2a82RWpspVpwpddR5tVGxdhWEvwppnijziks3irJfZIFpVuF k90sjvQAyrLtwsmakxQUhiWQuURCBP1Pk+iiVBGFz7YF2+6YxwFucMhUEzIF Gm1h7KU7ckTrgSzmOouGOUQ5qyGEK6WobAwRaawej3CBKrHXZg7SrE3aizPw iyNuoe+gBq6ZwVOmzl26kg+VF5arO/cbHp6zcrWHbw8P6B6E6x/t1Y8fNPqO m9BzM9mCS6bAmvQWTs81L1BM7tZF/DZgxy8DjjwbCGhQPk/Rvl7jija4j+g7 16pPv4oPO/F8UOJfZJlvy/PekRfMURTOUaS8JjvybNCGn85Y/gOcD/2OcKOy snLfvn18HwKPgoKCr3XMx9/8ALLzlzPW/fjJ+k2aByeNVavUUa8Ev/s/noA3 VblRM37W5IPoYr/WtUUNORr88TLZsN47oB08qH0Yob29QnFtiQCKwShD/2qC 9xQTR4kDezRNSxRj5MB46oXAhBcDs18LKnsnqG2JvH+jamK/xrNLnf6RvP2E oT/NPMFViGxzzbtBgxuUmHSkYcEcw2+4DMpp4cNPLO4sDw5rKfuQcCMcz2rk IIEGs7OuSDp7l6QYoJTk5pKMospRhdQR6rqGiH5rDS0KjvlZGBPCkpuS7dpN GsCvIdtTZKlZMItpoTVVIHmINNGgfSNZrF6UvJ79W3wFmbDnUvrWLIR5fRdD PEUOV6ZtKN7y8IBx8KTJdZ4N3+k0LtIUWC41RJhd2RYmpM5LiMaZTeFEOev2 0Dmz+wnrsVc6hC5HBZUoGTcaQ4VkBwcDFQ4xAcfU9EQzdlKqaZl3UD2hU1L2 o1Itvsd6wkCAVhZZZRMWPmE4w2qifMDnmWXFhxXYBCOukUb4rxBuTAs5KEpx 4r4Ae8QpPQE7xYHNJM7MmSCAGM0zTsDX1xQiPPW4hdcYIkKsXIpIU02iVN6A 3R93u/M2pzCn9bDvDCcYXLtVkNTc3qqG8KB2oap3h+7eabMbgrdWEXOO79cM RhsfHTEMhRsmjhjHjxgfHDTCMnmUaC5Zrtr3a1zvXUtVrh1a7y6EDthkWxap +lao763XDB3RA25ULlbu+R0ulpMvBKe9Kc+aLT//V0XhXAX8ZtzY/POALwWN r7jGp+OGz+e7c+eO1+sdHBxctGjRyMjI+Pj48uXL792799lV//dAB9y2/myG /1DD0ca69ZozbyA95vDLU7IGdWtU7cT+KlqsrFyualmG4HB9i/r6atXDtcq7 KxU3lilq54mB2Y7tGtTkhNVBUN+1HJ9Y+IE8420ZpHgQtDSsUl05qBs6bfBG IYk0d4nycoJpsEgiimdS6nHa4IqnSkUsieEXkhAH7EfnzbzL3Fgpd8Flxrhx 0jB5nMLUVNPVzdMGcnlH6wsTlme1dgxgAI6yKeTw40YthfrselZKShTcgsmj Eig7NbOG/zUiqMM1ecaA1yG8emOot9jhSZcikzoctCcdb8kylUUtKJLB/R3O OYNGPxpC/NDhrQqZKLAPp1kHj6GjyoTADUolmOKeR3TxqhDB0mwIZcYpFjzT yOqxhBjmRbap987jKjUEF5UhorjBJimN0tz9RWqalDiEU+0piTJ63spiSpTu UZIFBykLEbKlXJhF3WYr1xtFv7VJEuhopJcAJDlHotPMpKVRQbKSJNxgOYKb M/Hj4mHDfAuTLhDbyaZNNLK7Sfu0wcnRwvh+NX6JrU7uJtOrEwA2kOz5ebrw sqmQdZFCjkthQzxYtFcNl8d4prk/HI3vB7aqL69Qda5R3zxgGEm2iPH/Guy4 TUTqhhNNwyeNIwcNnhOmgXBD92YdrI72fbrjzwdu+RniRucS1eBmjXeX1r1D VzdfObBRO7JNO7xd27tMDUEFwAU8Jvz3QVF/RtzInq3If1dR9J4ie7Y86S+I G/C/W38Z8K3jhtvthqcMDAxMUh92Ld3Kysq+7jG/9AZnvuy/nkyfK5+MNfli TH4Amf/vTx55Mbhho+ZWhO7qXlH5PPZ8UNxbspR3BD4UvSPr26ge2q0ZXKe6 v0rZuUBe+HZw6SeKhwkmZBEXWZkozrfGNeryjxXnZ8uqV6h6DuvvZ1p8ZTZf gtG7Vz0arrlxzuypI2plIW06CTQqlS7VteJo6ABtC6w435SPcHRvtWIo1uBO MU8mmdlR2n1C70mHTMTUvVY5tXxYPrSPbA3biOORa3ZDFlxKQMS4wSUO2LUL KLAvdfj5A3jtkS+hpP5Noy6tIRj2HNGibGm9cyLfPhZnGT1m9CRJ5k3NFHXz vl/tnConwu7PKsfF3JOVQo6GUHdFyFiufTjaPHzS5GbcaKFpO3hKPlmTVDvF GGxrqLBzZbW9BKQWIL+iPIRHgcQWzJQz/mEniBYJN5qIPV5LmUiZgwsgBNHI 9MA72RbRTGmXfJpaaIzlgqRp1sBzK/TgVqrN1oq3Octfz7nKVo+EG2XUk21y iqpsv8THuzVTBHLMaYEUI0qPn0+90HUXCqi9oriN8cZOlTdGj9DdIxlCEW64 YXPB7rmNUd2TTnUkUqP1NIfc2UlaUolGb4n1XqSue6Xi7ibVxB5N/04txNhe SANLCDdg5yq2eBKNY2nmsVjT2FGjL8p0Y6ceVsTFtZpzHyh2/BJBI/MtWeMC 5d11ah/ihta1Qze+Uze2Wze6R9fyiSrzLflBQoYDfwiKfnFKfQL33/nKy8tV HUtUu58JjH0p+O9PUr7B7dvCjfn//sTNPTpftNEbZXSfNHZt0cIb9ANIy1p1 z2ZNwXvyqOeDtvwiAKKvg89iAHb6haC8ufKebZqRE/rRXZrh9aobyxVNC+R3 owy4KOA6qbT7BSofHtVf2alrWSmaKTfPWsapIO87Z/Ye1g6sVkzAzt7kwEUN 28Q582SccZKDjRziQKJumJHac1I7lSDl7l7NyEm9L940GYUPvhuudbGnW5qp e50S1bDrqObPjPROsm+GVymzelONLrj2LpCFExk+kus0K3JLvu3sO1CJvQ8B Gu1hglV+mebITpOraW2Iu9wxGmce3KsfO2XylDrEJliOesuEPGSzyI4hfsO4 81IK3yYVSOucrmI4jmXkpMnDqxieAtgCcT6KsdtwYXJfspUWPudHOXap1G+H eACfxXo7peTK2kE/bRJKtIVKWmRU3KhzCiYqACbPsSZYBIAAHqIyOUENS8R3 UV+Yg40u6vVwCpZLTZOqEPE2uaN96ymMImiODx9QIOFGc6jfJwLh4rZknkv2 3IImCnkK7BpcnegKlWZ+qTpE+gmeLUokBwIs+Cd36vDr82ZacAuAGBIS22gU tX6wX0OVbZyGG6KymOck9ukeJhjvHtK6ow1D2zXXlitwRKLYn9nZIZfxZpsn si0TSWbXSaMnGjfT3HnK7PnKvc8ErP0x4kba67LKeSiGOblL69mpnditm9in d4XrH+3W1SxUQUSx65lAP1akvaXIekeRP0dRNk9Z95Hi2jp1z2p161LVtxJs fLPb35+n/PVfnzjxKkKi94TRc8wwccxwmXBj2Q9mHH0uCD4BP4BEPh+06ecB W3+Bedmh3weG/y4w60NFx27d+FmT67jetVNTv1DRvErVf8LgIXFaIbxDmtje eDFCUvMh1pzFXtPi9OVZfNH6R1uUA0d1PlahzCOl8VgjN9SwA3KGnF7hSjhP yi3lVgQEKZJp+CB4/ChsUsb7W9QQGo1kUXRaaHEnG69uU9W8G4RhT5lNSHZg GyUEsaLIOnpE60oxCtxopoi92MG4QavewSXQWVziuELOj81SUREiEHgiPD3Z CE/01DjHUqyP9huGjhvHz9s9QgnQJqyLLoQIQxN2fc2wYOaVRalKjUP4GhDn 010ZMp5sHY00eXnx1kmMqVwatq2TGhkt0mnUUsczkQRwsmxiFrXcLuKci3bJ xIS6D6xJwrjRLEjspGZMzRryj0OGWCG1XVKoFl0plTh4nkVod5AbXVOo4LKm Et+jkt5jtURwRTFG6YfrG/C7JkSQ0lsk4aDbfsdtCk7ghbiiC+Elj9T1hgmP PJZCrXUIE88IDdY/uabRyrgR4su3jUVopm/uw3Acdv1rcHhJI/3Sx8Hw1Q9n mj0Z5sGj+oFNuJF1rRfRKaZsRTakr8POUmD1nrMkvxgwdAwrG6nvyE+/IYPr f/H3n4RHxr8cXPRXWe9S5cQ2jXen1rNf5zlocB823N6pK5+vPPWiSPBjXpal vCGHn8y3FXl/VZS9p+hbqb65Rdu3WdO5VvPPxY3JvwM94MzfmoX1T9cxivMP GVwH9TcIN1b/eAakZvGvBOfOll/4QJH11hSAzKL209HngzIWqVrC9aOZFnei 6epBfcPHivZlyutH9K48GmbnUfdqBwfPEBDWL1Q2LVBc26oZgsyCdytKVYb3 qG8slw/nWXioM/3VwHwWfEO5WpxOQtBAs1cTFigqSWKLhkRurVU2LlN0UY+m bZHi+gHdIOzmbeTbnm/xZJlvRmhalshxkcLBS6V+QRPSyF0JBsAr1IYiGUy8 qkun4UYlBdg82t/qFFW4etrxG2kfhBAll3zfqnAMbTzbBqAxcsKEml1+VRze +mEvrqA1VUEVTpwaNmJMVUq1x9ZQHjNBdK11ujNs4yck3Kgh3Cim2m+RDV+d S5rcS22jIkMhDYPATwaHGQ6SLQrhkB7fGruq8Xga12ZFaZTeCNttn7ezfxyW SkrRQIECCUpVap0i5OAhwW5SS+6eKTgbgBhJNM/ox40ap18USHwIF0mlp4Jw g2lyHJP0kKy6HzpY1pXhPZbWe5fk9MSulFeoS8UjSLtVOAbb4ZyarSOBRNcx /egO1eA6peuYjiU4bm5VCYnaRoeXBEsHjmi9lfZHCaarWzUP1mPy0vZh8GTm lJZp5HMBfKforaBzrwTCBV+1TB37mmz7rwJXU7ABW2f080E51FUpnitvW6KE lMe3TwM779Vt2vwPBApFvhCc/pY87U158utyuJP7jqJ0rvzhNt2dXbrru3S9 W7T/dNz4xjcm2A9s144f1nOoP75ff2cr4saGnwbEvRoMuJrztrxyniL9DSoC /yIAIJfR49SrweXrNB3HjYN5Nl+e9VqEroXclK4d1I1kW4TPaQetr3LH0Gnj tS2a6g/k7Z8o+zdrXIkmvJAoLvWdM40d1t5cpbgdhYXNjDeCct8OKpoT3LRV jbgB28opUkjOJpM1tti4KLZUeMVLEbr7Bba+dfhljcUYcDF2kaQGXC35Fm+l 7VaM4fYB7eA2lWBu8IVXZ3fnWQbDNY/2qCeKaBamLkTQuf24AbsPvBHWJLxG 8UY1VSnrpIE1uLZjkNzo6w5zFdpHEy3j0SYPHMHv10bjV8IRqTKEy4/Y5Uyk gn+xhBuSAzVCR559QgyJSFriXCgu5mG9MAEarEbYRC2VVPSbE/VM7tW2OKe2 5q5QkWU0O8UsHk/os58CpyrYDKKnZ2Kaz6qkYh72AhUzO0JFvYJFPGi1zuIk BXKuHCtCIqcqFyVqPeoUPT016FrhEL0nrp0y7/QGCaSwwvw1apdDAAZ4BZ8q PIUnmq9Oe10WM8mcJjraLYktY03Y4Suwuc8iB8wboZ5A/1/8ru/sUw8d0EA6 PLlNyU38O3HGK4f0jYulMGMr3nHFGz3plnPvytL+Kkt5BasTcc/jpd6xTP5w p+r4c4E7fxWw6oeIG1EvBMX/Jfjc2zLI0wvflTfDJb1B5do9Fersp+JG8muy gnfl6W9iITTtDXnObHnXUvXwHv2DcH1/hP7Kbt3/0bgR/efge1u1owck3JBK oEf+FJTypoxwQ1YyRw4J3aE/BALSbvgZovGuXwf6w4+JcvtorvXGfl3XJwp+ 7mCGWSQpPcgTcBXb70caLq9T13wgh9DuwSY1ViQKpFL8ectEtP72ZtUlqZhZ NFdW/r6sbbv6FuS5gBWws0CwkUKkUKSPws6F18PNPbruTZo7KWZXZ+h4pX0o XOJvNKHrNOYyeeh44mt3jhZZfelmz3YV5sXFVuHN0RzirbEPndT3r5Q/hAu1 kSqQhXZRH6ui2ACdT3lwnpyda0mJgrN+WH0QSyeRnszlsIlKhyvH5k61+ood oh3pH6ZjrWAGjRw7WjCnmoXzKeOG37ae+oDeOKm4Wi4+HywUl9hEM6KdEo02 Sf2jjFoqNLdOK5TGWDpJbrTcJibpLoeJkINzFqHs4ZyqexC5FBme2TSDX05Z Wxq5G5Q7RMjRJRHUbwjlDYEbZ03UbA0RIccFSkYIMSZv4c8srpZUsvhqqCC0 XKCy7ZWZIuRgMyzs2oTw6AENKDkFaGDIQcEJj/DzUG2EGs1TWpxCWKCMeHcX 8My9RdRtD1fTQBClyXC0QgsyigHlDmsuL5Q1bBZXy8B6DFZ75wc3vhd04RNF yTp12TJV5Xxl/mwMsGvny25tV09G62L/LAT8I/8YmDxblj5Hfv5DRdki5fm/ yhsXKW6uUw1v14xu13Rs0uTNw1WQ+aas/D150bvyzLfkia/KUl+XdSxVX1uj HTtoHDxqvHvMcP2A4Z9e3/jGx4c3eP4d+d1NmuH9Ol+kwXfE4MfM7LnyrL/K 414Ozn5bBo9J/ktwxO8Ct/0SQQN+73kmMG2u4voxw1i21X8OfUuVN5crbmxS CZZvq5CJG8q33Tqq71qhbJovv7ZSObRFjTYHsCSpDYpfa4LhHnklZJOXU8VH 8osL5J071HeTjJ4aOzIAD9OwEiwEGkWBx4ycNfUsVV7dpxvItnp7QydvzvTm W7Aaz+FBewjmMrlmMY9/JcyTY5nYo/YdpXoajzZ0kGRuT+hYgfXuEd3lJTLy DZFwg8kP6RTkcPDcRbszb6y8hMuJjJFhQpJAQ4i3EvY7rKxSfPIUrtNsOpkK qrgWEGgUEhMjg6AAcAM9K4nKdYXUzgE9yqQwo4DYpxfYF54H95zThvclIUEa feXpCREwlBGttBOriOyciH+/Su1jnuFtp2SBlUMaKNDit5xIYjsFBHE8ypdt FbQWDnVYQf36NNxAxRVWRHEI3IAPp56EPiQVd3xYmkkSbZaqIiVEIesNY5F5 rIewgFgjsThSieIC968+JZKU6XL08HUTgQdpnxCWcKsavzg7HpOUoPCNH9Qg VnQ6/dO7bJogqOlEzhlcrxokgdyJveq+jcqOPdrmg/q2XbrODdrGT1TY0Iw2 +nIs7Eu7/xm8+AvnK/IXKgsWKiuWqSqWqCCKqIPUe63q4RbNxC7t1U2aMmJK 136oKHxXAagCy+fsX2QVHygbFqm6l2vGIk2jUaaBU1/JqeG/bbwBb7Btser2 Bs3QHp3nGOKGb7+u/RPVx//xZNsadf48RdxLaAWb9aYs8ZXgfb8N3P4r/Ogg Vdn/28Dc+cqheLMv1+rNtU5kWG7v1k4vgNDkAk47lixRZr4eXPqurOFDee9i xd11KtcODWpxnDX5pwZgXQwc0la8Jy+YK7u6QVW9WNGwTNG7S/MgmQoa1Xac gIaoI38qCYXb9Q3qmwf0Q3DlkFcsXi04CGkURQnIZQA3YMdpd3q7Qt0FVleE xgf4kybhRk+oX3fURQ2XO7s1U8FGCeXjmVTDZMGNbhL3q6GfeqcgY+ShyDm8 Ux9P15ZIDU20dw9FyjeNWeFkaK4df5cRhuSQp2qxlQUz8cHXnhJrDRZXuhQ5 1FLYzz7X5SSFwQb0zIaixgRWJ6ilgo+BhCXZisevIbp7jUMY3nHOyFEHC3AR R0skL3VOMZ5DyQ7x0h1CzijdImSLaiRuBoccTOCHwCbfhrFTOpIfBKJWhgh5 QL9rDEuqwtfEoiJMas2n9kqnmHHDkINxo4Wo+Bk0BASxB+PG9ZmicMoodDlM pGBHqTpaQT4UeWTFwnFgOw7aI6pAZkrWfv62rwAQSDBr7eObVEPrVcOb1cNb 2JzFcivedCPBfOuk6fIWvJjrV6kvheu9yVOqUFmvB3Xu1l5cp65co27YpKla rsp6S1YzX9G3WnV3o3p0u/bOOkShxvmKkrmKnHcUmW/Lz72JqUrBHMWFj5Tt KzRjsWbXGfNQopnnXB6zfr870Pg7j8/FjealqnvbtY92at2H9cf+EBD5QuCG n8/Y84fAS4CcHykgT4FPJvW14NgXg/b9JnAH4QZkKxB7FC9WTaSYvakWT4oF 7twhSaXCt4P9HwjcvE0hxR/JM98ILntX1viRvOVj+ZWVygdbVO5wDY5Lw7VR ZvWXK6NfCCr/SH5zGxU51yj79mgGU6kjX4P9EQw5IM1vcnjKbC4aSbi/W3Pn qB69lrA+Rj0OWMUQu5KFKOS27Kw02RribgpxldjGDmvhdX2pRlqDdPVK1yTe p7+Mp9ECrCaqFU6XW/E8Ca9IX5c1uKSyJMBIKSqEYFB9mSVDuZERIozp4elx JJcK8X+2KB3QcKsNr/MSZhdQnnKNQAMCe3wWHYRFbwg3RF+mlQJ7nhaBc+ie KWbtz6O+Fj4gyYoJSxZVKTtIZatQcuKul6DDjxvtVO30Jw6AOWLkU/KI5Cgr d6riQWALKdVTwgIGzg3lhc34U2gXqUoFRR3dM4W22HUJNzLM7DSH94sp7mIJ MklkXhI6phn5bBLsgtPm8Aa+oxuSe9SVmULQ9YR2Gg5Q6bjSIUSTeNQFNhrI bbsEbgivrjiC8Ro7+04Ob1CNbdW46NIdi9KPltnvLJffi8LGa8VHyoKPlE2b KUSBPS4CveHa1qtuHde379U2btd27tVVr1Knvym78JGie4Xq5jr1I2ooXFun bfhEnTcXQSP9LcSNxL/Ist6WF7+nbFmlGY43u1MsY2lTNg1flDL8A3DjGzdT Yl4Kql+uehiue0QfXeRzgXlzZJULFcnvyG9s11QvUkJelknBxsnngyDG2PVr xA1Aj0O/D6xapR5JMHmTzBOxJleM6R75r/kl0XAJX7D7P5OyOYgb9R/KOxcr bq5Xju1SYxhJ8gicg8Mt/tXg6k8U9/do7u7Tdm9WXd+nGYXYoMrGbVNMTrHp aZ/sdnpKra54XI8Pow3ucpsYUuugYiDAQpJh8jwlSsVWhoiJC/axCvvICd3Y DpUv2chGTviAW3RB+nexBscIiwhdpGYKm6pARnxKL3Cmlz0cw4TvfBtZqRYS w62dIuSSaUu+h73MCMRYb7AqhCX+BHSUM7VAwo0bxKK8TQWBHErVW4kyQbgh gijelFm3p12icRZI0hlxFiRupbCZEVU+S+lVqqWe+GXi23eGCjnlXmH0RqEF 6QSmUD83lyRVUa+Y3k4Bc7nFPPuUdRScG2QHkMqlmTF+KA+Z+mkPE5a41yTr h0SDOFo1dX55Rr5daLLReCzhBk8gAg6fJQpHjySnfFMSYGdNJIzlzJOndHhJ cGaaRzO8nWSwBajSGoI7CLxoFzqEstwHPgzikxIrVsCqha6sa5vGs1s7tFE1 ulU9sFZ5Z6UCLtebW7XlHynPvilvXYW7mO+sGbctKrINJxlvRBq6D+ivHTPU rlWfexNyEEU7pMyr1fc2aChq1beu1xZ+rMog3Eh7Q37m5eDk12S57ygaqffq yba5cz7HwXb2tNvk18SNz5Xo4Rv8fa506+rqmv5yX/dV+IZb/MvBNStUw8f1 Iwcw6Yv6U2DhXHnnGtWDfdp7e7RNy1TZszHYiPlz0JFnA3n27eiziB5H/hDY sEHzMMboTTO7ThjGjhkeULDnx42BCM14lvnaAW39KlXe7KkebuPH8t6VUh37 pI6rjtc2qwHBMmfLetaoJg6hKe2jner+cI2LahG4uAABztFICHzX5DvsKbG6 juvG8erC2hdNp5KWVx7RyNOI+1Em1DbGi60juZahU/qhDUrfWcKNBsdU2ssk 50t4sYm/lJNfYTVVSiEOP6kXOHNdGDUKBmMHxfmwP5aTVAjE1ayUWEApRs9M wSpPJegol8SveIK1mHhx9ZLTk8ANaUsto65Nmx837AI3bkm4cYFG6nqIR8EN IFj1MWYkiseRBwEsrgbp3C7S2K+oVEu4waIBTDWpIt4pPP2sVdi2knQ5E0rF A5ok3CBDKLxTS3kZpHKAG3k2PGf+KaW68VUygux7yt8q4mq2KMbSEJBo716b hhtdJIpSZKWSCFE4bkzVSSjoChXSavA5RKgxqMiSivDNTqFEzYYySTTgxn58 HFLywFEZ4cYFGq7JNnt2aHx7dW6Ajs3qe6uVd9co4Sq9sVVbNn+KcixeOlyw FgfPmm5EG/tPGes3aIreCiqbp2hapOxdjv/rOWl8cMzYtVtfukSdQcFGyuvy Uy8Gx74cDABSt0Hrd0B4/Nr8WsHAF0n0TNK4ysKFC7/oJb7i8fnmP+fVP3zy xKvBVatUjyIN7Nh4+oWgkvfkvWvVj/bp+rdrmpep8ufI414KAjxJeCkInvjz p/+F3/XxZwNb16vvRRl8WZaJ08bR/bqBTVO4wa/iyTLfOa5r26AumYdWub/+ f//v6SnMCHVOOYy/tEaV8mpQ/XzF4HaN65AO8GE4Qnt7o/LyQpkwMYffGYQb OZiqMER4CyXL8irynq7HaFyUQ6ndhvdLrL5q+1iOeTDJOHjGMLBa4U0gOalG 0rvrl0pt/dLFxhzRIptQzaohRYgkI+LVlWnqNH0zxUVOcT6NzEusVOJe4rru IPHAPMnljWdLW3kCndDgIo1gsBAN4wafzPWnBBu8jabJygk3+M1emykc1i7Q fs3DI7y0AS4ANCJNk9EkmMOsb3iJMhyT+RvoYG2injAOP0R8BfkIHCFR0vnJ JdH4FgK6Solezrjht6iuJ/p6lgWhFXCjlBCjlMqqgAl9T01pn16SoOOyNGjf FipkFS8LHz2BG90UTpRRiQNWfZtT1Ff5k2EBAeaBwHMBKMLViDAX7FNfDcRs 2Hd24kYDqAIXBjPY0QrTIa4KMpkVWijJRs8J/fhO7cON6tsUbIzs01wnauLp V5AP2bpG8+AIqlTN4sIIgU/Lh8FN82UNC+TFc2QAHbUfK9skiZ6hePOlY8bK 1RombyT9RXbyheDI54MSiF351XHjq6/oL5LogdvAwMBnR2W/wUvACY+Sczeq K/8yADKRti2a+ycN1yneOPNiUMU8RccKVdcqFfwGDEl4GSONmBeC+C3/5Kl/ Aej42VOIHg2rVbeO6X25Fne8aeyAfmjT3/Df4P7YSd2jU4be7fj3X/w///KL p/EHJdQg5Fgg81dQ4daxRFH7gfzuGtWjHZqxwzpvrHHshP7eTiSDsd0bXkiZ RLJKMQpyOKmAwnNHk2lRV9oEr4MfnIPXAz4eQppDmtEU08OT+oFYw4MNSle0 HqGmkYw8+p+aGpToCxMadO1U1sgjCYgmUkCliroQuEOmgRQV9Eh8qjqavGCa dIHkBY89CyfyLnioyu+m1MTQESIWJgvu+a0YO6gEcY2sV9sl3Cix++UjiI9N eUolTXDwSmQJ8VjzZJQJoeOcFSOEWpr2QsI/kcEAOnh6tMU5RcXkp9eGCN5p PFFPU62Si8E0oMNWrFj+szht4TpPDrc/bAIx+KcqRPRfuM7TIwix+NbapAGW Xip1XqJxFb+RUw9lf5X0mVMVawo0egk0Khyi1dtHOdpuFcYVrPZ28ykxK3ed UpUCC5ZGAR/6JH1XiEs5EIWdpRJNJOGi8iYaxk/oRrZrHqzDBsr9TapR0iMt +Vh54o942V/bq/MkUq+5kCy9yIXh0kpFz2pl91pV2UfyU88HFr0d1PABwkLK y4GN7wdfizNXb9See0ue+oY8/hXZ8T8FHfwD0s43Phf0XeDGYyR6enp6lixZ smvXLvgdExPj9Xqnv8RXj2rghG8f0LVtUWe8Jzvxp6DxXTrvccPYKUPPLvys 4l8OBtwof09eOkcOv9NfDz71QlDEbwM5SfEfBKDjp0/9i/8T8CSbbtHTP/Vp MEZd261lwOGfH8/EJ3Yvlt/fqBzbpvKf/P3VyoGt6sF92tGjes8Z40SsYTBC e3edsuPDYGFBAltDPI2gFlsFPtQ5xtjlLd8iShkV9MiLNHGfi2OzTBsbPmN4 EKG5f1h7b6tq5AhROCCv6SHcYEek21KqwmOzOMxLA6Fc/IRQH7a/HppuY7vG m5LZWSeBA8uZdtOKQEYotS8bqYZQSYVTXvLXZoopeIaOBvJq6SSJdQk3fM2h vsZQNrZG3KiVcKMA1cVFNNJJfy+kvglLXsADzlpQ4u+0GeMNuM9CW5UUq5RP gw7urXSGMliJ+w10NECMMxRysB5pmUOMtzSGCsGfLhxlncINjojyqRWbQ0RT zlPKQ4RGUHuY4Kd1+kVWwzhQETHbFeJ69YSJCiorpXRRiSPfisjPvjl+3MDR YKrZdpCeCbqBU/O9hL5QJK4/LaAGQB4um0Marrq72bMJsCKDaDPcjslHHSe4 0gb2aWDDgm0L8+gPZJ3LFJOSJGnnOvVgtBFzsULSHWLZaurH3dqpubFbW/nJ VDpz6PcBsS8E1syT3Uqx1O/QZc1RAG7EvBR8mGhg2/6EoPEMRd2PX6RfN4N4 jETPjRs38vPzAS7cbve+ffumhyJf/VXghO9GGnq2aS4uVW77RUDam7LR7bpb mzVXdmqbiQaT9Gpw0bvyMsKNwr/Kk14JPvpc4O5fB+x55nEDv18EofAXQPKb 2z6Hh8+Pd4drRrerHq1T3qf4kG+u00bvWZMvyTR+TPdoq+rGYhmiAUvuMHc0 2yz+Um33FVtvh2t6Vymwkkbjt6JKieNgJAJDPhr8td7dqb6zE1IwDT6gmXDD v0PdfkoIXV4jm+ZeaqF2hgpz+QaSDQTUuhrGTxE0yCsUV7c6WTlTrMESh2iG 1pHCXi31armTe/spoWvK0MFGCV3UHbgi4Uad01cZ4mtwCn+WKdywsaYiolYP /Z2UfDj4R1hIoSUPIUeMGe8UUK5UTvFGmV0IcVRJIUe7k/X6xDk3kXwoYAWL n7OUMQBgCzHqMeQIldjmknmrXxkDX5pwgykclZit+FgPpE6awvMLKrYK3yhB N+2jTwNOgNO0PnK66Z1W4uCOeb+EG3DwPLKB4+JSBQ37QDJSQHIHl8K4pUtf TRh+xUe1GGY0hLiSjMO71WIukn+KaeI+3eQhwZa+pXgFts2XN0la3FjUQv1z FCPF4NM/qgOHpZBj8Kj+zkHszkS9hpHGup8ilTr6+aCq92T3Vyua9+vzPlIm vy6GYXc/H3xktvw74mw8RqLHRze+X1ZWFh0d/XVfC875YYL58n59/Up0Llj8 n09WfKC8t1HbvkRVvVhVvRqrOrEvIau8bK68ZI48+y1ZzJ+Dwn8XyINsX+Ut f+6LPh5wJiI0w9tUD1YpBvdoRo7oxk4b/QDiOa4f26N5uEpeNyeIht+pzgBZ xmnaX7isUWYbJ07Onf0aXJ55KLzgyzQLzZYKrJnjNQBZxj51/xpF/ybVvW0q dw7NpCBbTNo90chMWkcQVFwh6OgOFc7OPI3CblCdFBvcflqEHKwkxto1V8jQ EJZPArkcVpM5bDO6zgmaym0pSuki6GgVvE1xDiRi47sQ4su3+yqY3R3G5ArE DdjWs61CRhiOUEe4wR3bXlI8hiAHwox4Wviw6nPIa6mUQKPEDx1suk0HgVV2 g3MHCplgXWQSbvih4zwZvIpcTOAGvRxLkYeKlArOM41wo9wheObFDmGOeYGK n0z8aJWcpKqdourbGSa8GNokvscV4s2yaxUpTvu3ciKphjGZHM/qChWHS6hq HanD2LKaLCmZgCpwhpGcqOmV9tE9ai8LvFTb/XLocPPGQhBrgOutZ6G8/WN5 80cSbuBIlA6hI9GIhd8qEne9RLr0koUW3IqXqQ88j2TFNT8JWPGjgIjfB56f Lbu6TNF5wFD4iSqRahpRLwadeEeesOjzB2A/lSxMv3/16tWNGzcuXLgwNjb2 MavssxI9fvUewIrw8HCPxzM6OhoREVFRUfGYl/6iRdp/ytS2XVe+UBn3UtB7 //OJ/DmKq6s1DQtV2bPlqaSFGPG7wHNvyErnKphYfvyPQTt/HbDhp98VbkxO i1UGNinHTuknzpq8WTRHHzsFIN3zg4Viz1nUDsWQw5+YVNq8Z413yMd8nPVe UiFWIY5fBRklsPkXRLwkHnhjmbx/nXIsFZla4rpiLiLJ5E7VSK9T1NEjiXR1 UfJSZSehMGr73pKS7sthwtSAdTkgNy+2Y5Ugi5YtDoNQU+OinXTDpJ4vN2W4 7irJewrcKHN4z1lhv/ZdIEoY40Yx4UaWVZCmrhBu8OT7hRAxBASogiGHWdQ2 s2yiEYOqXHYBICQlJHCjO1TgZG+Y8MbNtaEJArkvCc45nN4liaHaItUoLk1Z LInYI4fSugoHq3AAYvjSbL48u68shCeI8WGNlJexZkgxFUBapAitxSlSlauU ufDHCJ82s1a4oMrTK6Q8L+ZW6kleNcmEqxuyD/iQmU97dSZ/g1OY0471YW+q aSLHIsxxLhBPrM7hjjf6ssxcZ+v9RNG5QN65UMxKIG/nhA4FHLBCS3N2Qqye mrzFmI32HTBkzsfJuPU/CyDcmLHhZwExLwZd/FB+fZfGRy34nNeDMufKkher 8jY9bpDts9UGWPVLly69du0aoMGaNWva2toes44+JdHjV+8BxIAIBMBk8eLF KSkp/tjD/6KTXxZ1wDlfPmyo26DJn4dy5at/EpDxtrx9qfriR8pUUvfa9Uwg /CS+Ggy4AdlKwivBB34fuPnnAat+9Djzyi+9fcXnwsOGD2o9zKFKNk2i5Zbg dUx9pCmEGxxyQGhK5VBfKjrd31tOgqVnjb54gy/GAF/Z5Hlp+rWaeESn9WzX hRFmnGEKN9qc063qRUgAC/wqhxwMGoQhPAAL0ARL7JpwkOQjSLhB5Y5iKjCe o/2XaRJsMN3plCjT7E47EwGhzJ81kHpPZ5iv0O6NNyN0FHH5V8KN84Qb5VM7 3dS6YE/JfHJ4T6bC5jmr0CNl3CiZBh2VDrasEs+9SakBj/XBEdJJTPisGJTD 1U1qw1im8OMGdT048BCLupiiwQpyPGkI9RU4vElWX6bNV+jAZ7ETRC2R1Vn8 J98ueOb8dFYVY2roVQr2uiiCqguZCm+uCNFjcdqMITl29Nc4oMWlXUreDTyD gw0aqX7bTd9OHTrSjhOzF2GqmqSQqh0eQJJSG+PG5cWKLlK08x3WuU8Z8Ls+ SUogBVQbyTALKVqAtU4Kz9KsrTv08X9VMG4s/+EMNET4WQAsoqR35VWbNXeS kBHd8kFw9XJlyWbtxS8bSPnU+m1ubj548CDfhxCCJby+3dtXCTZuhxvad+nL V6jTZ8vX/mTG0h/MSHpNVvuxqmyegjtE8JctvwC0DEaK7GxsOu9+JnDtT75c yuzbOn9MW+KMWJNMMAnRP7gYIDYI1zTNC5ostEwByCkUikRb8zKrD1LUI9qh Nfj1DdNvZJsjg902Hm94tEM1epQKoRCrHNd6dggJQS/zJ5tIsUdynUYO2K2p MimtbgaNMLEpF1owdIEQujtUXOR+9zHGDXgkwEUS7fhlDi6W4kuw0dglehbz HuGwhZL4cAtNylyb6esI9ebavCdNAB2+LAqoWJ0PVn0emdUCmHTTC5FHCT43 V6KSlthQhzyNOJ8ZRBcvIS3ickIMHt9gKVHke0u4cZXeeBeZJ5YSEx4CFXh6 KhmulTpEBbJ9Gm4wZ7WHWqisUHSBLAkqHUymhWDJe8biTcWoCf/CDRS2gm2j XCOHKKlUppjCvTaWUiQia2/olIw8tVynPiiuA3dIXtinyHc4j1yqq4hzQoKo YkfAiNEpvuhi8sjolPwvqM7pJWoiXnKnpiazIMZwHydPwDwKfStQvEX4CfLo 9CU8wkCi5eI6LWvXwC68+L9mrPgh4sbO3wRmLFa1HzNMlFAhJcN0ebum7dDX nmLLz8+PjIw8fPjwpk2bMjMzPxUqfFvr7kuDjb6tuvr12vyFkHMFf/C/n5z/ H0+eeklWMk8J2QrLjPxfX3D71s/2i84c66iHyEw8xihM3OrJuJyooQ/IcenS guCBlfIpACmxQpzpPY7/NbHxb4g68FxPvmUkUje8XeWBOJZ1w07qhtcqmuYF u7hQX05ifb0UWkjNUIxy7z49VcPvDuPpPLwgAceSSMm8OYSNqvkSncUJC5f1 YI9OoT5mVYh4LuqXUngMmx2i09SsxOQxepuNZGaNRZUwb47Nc9ToPWn0nDW7 cki+uJyGthg38mglEm7gE+GFsmlktZWyIUhVMugnm+ippYQbFRRyFErQUe4Q 8hfNwiNenEkrzcCyyCq8yjkblljz6eUuUTuV0wqmW/QJSgY3RPDv2ZQYNqNe MWQo3hizN9EKd4TCMzrU2IVW2AXylMymPi92Y+np1SSeXE2EkAZK6BhtWAOw h4QZa6nvzNFdBxU34O2fME5Gk75cDoUctTRmy9qwZ2kYsEOCGrbo6qEqdD1B cbkDLyG4j/4+xusrVT2LlRP7dSNbNBMHdEj/IJFScZ2UWbEsn0zKtH1hviZn b6w5b5l6/3PYK4FgY+F/zoDf638acPjlYIgubqUSfxUTIryA78Z/ySDbZ9dv enr6/Pnzu7u7b9++vXHjxk9phH5bq2/ysegB59yxSlOxVJ3+vvLYH4P++j+e ePffnjz6p+DsdxRZs+XH/yRw41s/scffPnu2cA44Yn9Sotl001AneaZgL/6A 5sZi2cNV8v5lcsxW0qbUUGnYnKAggujrZVQObXC4zpmGd6knThNnIx+VxEYP aAB8KLq24i5ZRR5M3aFizM0/LtFP3OZLtNv6cQMeDHsWV+F6CGp6Q4V+6ZUw YQ6L8TPzpijd7mN7IyKGQeABm+B1egnYfCEwOCb5mQKqXMb02Vdg9xw2uCIM I5HG8TSyiCqn5iMcMJNs18oJjhg3MkivuMwull6uFaEjm16dJ/cZNyoINAop W+HMqN4peiV9AsfwxBpJw6eUdM/ghSJN+Io1NEzXLQ3AMiX+qgg2mMQicKMc ccNX6/Tl2L2nzN5Yi481xAB5qqi0W0v904s4UONJtQq3esaNGocYWim0i4FZ Xvv1hGYdNG9SQ/YrTSFCfqGA8sEjhsk4E4Y68JGyQBmjYqZlFPYgLmRx1Zqb YrCKL/EkEYFGI/XQAXZSRA12bLd2ZLvWtUfrg10mQ3T58XcRKrFgmhyF9i4j dSGNUcakRRi+rv5xwOLvz1j4vScJN2acnqOoha+v1CFcvSjO+dIt+LNrobi4 +Pjx43z//PnzUVFR3+LS++zrfi50wDnXL1QVfKBMnC3f8suAt//1idf/vyf2 /z4o6TV50muy/yag4T/VSRIfw+XGhgLZRLs6QcXt/epHqxUQM2AV3e/GVWUT LRjIUA5rcFNgN422EE+lbey03gVgkkOzscVWV6LhwXaSqGXLctySKHbtpLC2 TxoVuTFTtBt6JRsF1O1xCOemStrIukP9oscigL86U1giFvs1/2nG86JDOMNy 8IzWb05Y8visc1ZY77O48n9jpq/U7o42De3QDezVjyaafZV2oSYEezfAETw4 jzZuxo1cGs/HFiFTVa0II3lk6cgsrGICjUpCDEmtnUCG0vxumiO++ZQgcrSE CBp8Fc3mnzBhqaQ8RAzQtU/DDa5hXhNazbSsSEG0yQm44c2yeaLN8OPLklSL q0i1rIZwA6do7WOxZhQ4YqfsNomCkkXAOM0HSoBeMxUkW4ihgZKABEdsCXdA jyWdWrxUPIlGfJvsjHlE37dJ/WiPBr/0NqdoBFMfBM8ZKamEG8zahQSNlB8m DumHtmlHdmknjuh9sWQyC9lKimmSHZ2ysbrlOqXDqepC69UoY8FCDHGX/XDG x997csH3nlwBmf6vAlI/UV2PMonAqQFbOd+MsHHv3r0lS5YMDAyMjY3t3Lnz s4Mn38rtMXkKJimrNDXzlRlvyaNfla35ScAbsxA3tv06MPpFGest/4Nx4/Fn C5vIVJYEXzqkrsj81E8e0UHIMbRGMbpBIbQUWLyrwcHCgFPhRzEyNHgbnciz jLOPWwFcYHZPkfXRSd1NNoyDwxZI3m08Gccsyqu0IkTBc6bgMbYTbzyXPNDL rf5hlincYIUZNl6sdgq/aRYYrJGM4dqJHXqdIn/e+nOpwcqKglfDfFWOsWTL wCHD/e26kRiTlzXBihzC6vEcxRI87F9CjkvFFOEzbkDOXkAZSiFlNyUEOBVk 91Aq4UaZZM3QKvHNbkla4hftNOZGFIssmy/S5IuzkB1VmOCWT5fu4dl27jqx PnApKQs1h3ozbJ6TJs9xk4+lC9vJdLuUWGrMZCtwDEWZR9Ntbp6458+ZdaFZ RQQ+HBb8OU82CqzU0U1tFFQdZNaWDXn1BwwYdLWHstigN93CGkStK1UNS5RX 1il9BzREsAkVzFiekWlywkUC5+nL4YSO5I5xXEL/cKNmZK9u4rjBG6nHa+Yc sZSP6bzhGnSTjDPcj9Dc3aGaPKgdOmmI/TOyQHf8KgASf4g3+GJoXaumFyJk bsZZy68bafhvVVVVy5YtW7x4cVxc3HdR35h8LGsUTrtzqbrqQ2XaG/Ijfwxa +aMZABqvz3pi3c8CDj4XdOi5oH8wbnyVKu7f3IcLMp7S2GMk4LNPPb5R2f5R MIoHwnVFY248++Y+axyBmCTJMPVpdDu9DQ53jN4L4Qqq31hh0xlPMz3cre6E I0D6A3FIPXU8mb7FAto8XQWXaK80Q9EjCW2RWLqghcATcymUvSS1dK9SCZHn UDrCBG5wIa6abB87nGR0OFMs1XJJRJ26P3AcT5NzNNv66LjxwV79UKTRnYcn TAEMPSyDzF79SoZl5MVWJ+EGgEwxhRb+gf186qFcYBYHpS1VkpF0G8/FzBQz ZbwjNzuF2X2O3Rdlhh90ZqlDJsnf4MZNCTr6wpj+QThGnpgdYd48u+eEyXPE 6GMhkQ5yiSonQgs5zXnz7Q8jTY/iLaMlDm8XFZxrJTRL5UCR2rLF9FHDB45K HaF4nr1kXJUlGdJBJnXMxGrM02+XVqvPvh5c/J7s3g4NbjcXKLDh+XraTfDC KHdMpFjG482uZIubOndjUabB3bqBLdqRcP3ESYPnsA6ZG7F04UXp4cIb2iH6 cZdXK66vkJ99GRusme/L8j+Sd69XjUdox/ZoJ2jOiwV1adwJQfUb48Y/4Pb4 HbxxoarsfeXZ12QHnw1a+oMZEG/Az7IfYu0Xfv5bgcZnb3h6yebJ08bJE3qE joMa1ybl1SVynMQ/ZxKVAUh7y63edNPQIe0YbDH5Fm5hTLHI9qiR8JljZsn0 iUjd5YUYaCGYwD7bguO0vnpiRrHEN2xncMVKFAKiNUq1QdiGikUehNd2ooEr JAI6rlBUz4Qxxo0eClTIu40ajjPZbIgiJWqzVjhEjaIr1NseOp5vG4o2PTxk HD5pnMig0miFQ3RjM0nHo1haZRck8bEGTIXwj2UkDcQGSSVEySgh3Ki0Cz9H rh7U0SU9ZfFM1rdMJe2lGds8uw8SjaNGLMJUhoiwgYdK/KncdaoDC9oYnX8t 1l58xQ5IUtyHjJ5k/JS8LALPfq84Bhg6cd5+/4TpbqTpYbbNhUpiJIBQPy1+ Y9yAKAISyVzq1LRSF7uTtBnPmsTnn4Q8EwF3HE7UOwe2qwvmytPelnWuA9Aw oqF5vlV4vqCPjMNXhAp1kA+OJ5mHjhiGI7HEdPqFoEcH9fe3aB/u1o0eNbjP mJAZEmfCq+4kEsMgTR7Zq+nfoKr/BDv+uW8Fx74QeH6B4tJRfe0W9Z2juolI /fg+nTvK6Eu1IC+9QIi7/ncGjcefAJz5hY+UxXOx37r/d0GffF/gxvzvzYCQ Y/3P/hGd1i89ycfc8PTQO4C+wUgqkO5VP1ijyH0tEKGg0jbRjYZKt5fL2z7E gueDLSosf9XYsb3Iy7l9CkAw0YBENUbvYSOeZJLxaUJKg6fK7oFrDGLdLCt6 OaWZhbgotw96p1hPFOs6sB8HSxLSljgD9yY45Z/FjZgeCTe4EHeBcKNTGnK5 S7jRQ/9VS0jFGNUTNlFiHz5jHooyjZ4xu1KpclvtEJMmrP9TJOEGFTpw1TQ6 xaovIj9WluwrdgjLWjZcqJFAg81T2kVRVOBGZ6gYXWFiZ77dF2P2RRh8CZKR mV9EvZPQg7kojBuwqDkAqEEFDF9FiCfOMrYbd96xTJubJYjZPI6s4sZz7XeP GW9EGO4mWYYriB9eS1ETnNj5aZOtAGU8GFtC3nbMPwcwj2XFJ6mLjfpmIuQA aBo/rKtYoroTrp+MMSGH7RzVMy/i4KGv3O5NFywvT5FtNN40sE8/sAebcYkv B5e+J+9eqXx0QO8CqIGFDxdArAn7vHDVxeCAw+hB7Z2tGHKUz5Wfey048o+B JctV108bx/OsrgyTJ8E4cdTgOWXypROLJkMMFzyGI/pPB43JL2umlLyHNnOx L8t2/SZwwfcEbsz5n08u/sGMJWRu+485w2/8XPzw4+hLjNbjiOsBjWuLcnK7 anKHenKn2r1FNbJe+WiNAoKQunkIHcOQlVy0s3youKJqKL6N0k19ZbvVHYQz WNODy7LBMVFsc2VYPAnU0OGrJcFIxDDmI80UqTf8s5IUPGDVNGK6jeADsccl 6bW6pJblJfFE3OmqaGkwbtx5WuAGbNzdNDIPyCCNu7orHaNJlpF4yxiE0NlU b2R3+zLSJuViYzl1LRucwriNHQ14j2NDWMYNyN/zybuk3jHlw8i+Sx30Rm5K uNFFi5fPAd5jscMXb/EdMIoNHY2kSZa5XnpuHxG0LocJoniVXXjNdISiU3ay dWwv4sbQWevERZq1Qe6u0DMfybb1HzH2bdPdhLAqz+bmflMNCZAyJDYLLyrE jVST0FBqpCJJLkovYq0SEL7I5t2j9iWZhCIQt2bOmLxnzJOJBPj/P3vfARXV ubX9r/XJ9N4LTZPbvnKbt+SmF02iRk2iiSXGaGLsvXfsSlOKdEEE6aAiioiC BcSOFREUC4oVROkw7d97v2fA3NxLbknUm/ius1jDzJmZMzNnP2fX59lJOndY hnbFAncqgoYN3JVcY1ueuSFJ/yAAQSNvrGT7CMmRKbJrSxWtQcQZuMvk2GJE 5InT45aIs9Ut0ZpqIi3fN1aSPkyU+Ln4yErV3VTDfVQnNNl3Gq1JBhtADXho KUZHrJ4JMXTeI/ovW8TfW50Q+Py9hzrJb+SOkcEWP1Ts20c47RXeV39wYdsT 6NBoP7Z/5+l4kGmE/4T8OK8UoHSs4zarj6JppfzhEtmDZfLy2Rh93PWSoWkT btjPeNgvdu24iiVpGTV6O4BcAvA5hS1ALbnmxgxjS7zeGqFF4aEYKuIwc7jp 7AQrdbZkEOEtvsURQiSUD/Pg2hEvcq1KHODcJD33w9T4VN7Rv4E2yybjSulK yk7+Gy/YTni0Zru2ZJlbd7namPLIaSrHwKWZujjIoJxSrefIDQBMOOVUXdxH 5BvtuJFLms5YVujK1UTYfBkDwNsvctwXlyiYYuEGuBNFHvYtZnsU+Pn08Y96 4sZEZtlsbAU5G1ewsYrDDablfaGr/WxXW7ZrayT6/7WJxpYi1oBBxQVyWuqy Xasi9OVLVZURuupMU2sx1SuP08Qua2Mr9mQjw3h7u4GbTQbzx55AorVnwlV7 XO1xWnuKk0mM9WlsQ5NnN/Av8iF72CPU1mCkDG0L1FgTdMyimxO5InjWl5Kc ryUnp8tvLVe2EDIgKAFubDag+cdTliNd3xavfUDa5TmjJAlDROmjJcVrNXdi dVcjtbatesANiFDsKdTnH29wROg6N64fAjQ6IfDp5KFO/I3tXyFlWewg8epe gkl/4T2Znq7vPLB/av11N1qoyhGoZJvdX9m8Cv2NhtXyW15YKLk5T1oHpxbx jtqPuduL3Oz7zPYsA8fnk6i1x2ls61XWNVhHaweQpixTXYK+MUrXEqKx5hI3 KSBMLCcMwXWVl1IAcr0b56hfIwzZj4xzVK+hPo3znty1r+pFLvF4sSvHCn7Z 2S9x6zFmvIsUeh9149iAz3ha9rm37XWz5LvZi8iaTlAN9wjlOVmRgmU+T3py go8MNyD2J8Vtjh94P+EGKp/i7DCm6S4/Ns/O1Bvv/Iw7kgoa+2X1KTY7k2W2 bzJwzKVHncXlA5RpOUVTaZepfaWM6lCEG1za4WI3e56bhVRgauKMTfAUxtJ8 FpmLrGe71u50vRGuuzBfeW29tna3mWjHKOJjbGm7XDk9hSL3drlbvD8LJfww 1bCFkOQwxX3bDRyD62E3lp7ldkaFGjpyFpFd6WoLVMFPbInWWjdqkSsyhWsQ LZknTxkmZifV/VWqeh9lvTcxSkG4AbixkXAjGXHDmoxPKVmm3D5SsvET0fYp suI1qspg9TlvVeFihTVFZ4c3zTD9I8b1A0UonRD4dPJQJ7iROlyS8YVkwyei 5e8+uWxG50f1by78FMFKx3oVTjoHKltWy+uWyRpWyeu8FVcWInTUrlVaT2E+ zX7Q1ZZphM2eouco+6LV9liNNUxl8VFcmIKhSk2yrnUPJ+hQt17TuIEuZ8eo 5SxajU4+9aJz5yQbnrpO6HGNWMKOIY8fbjTdjwaIs+GEM0z/lMkDUe8lgyCu +FLB6i/kAJx0TmRc6GY74mE95GGj3k7KSxDF2VH3DoEkxh9+nHCjxIkbhcj2 SY9S/8Zeqr+g/qNT5vI6l6JhypIYJd114saVF7j+tJPOxrDd1DKaznCDWDUY K3s+zb2WUCMc2PslohA5jaUl7KNjtRVSfrm1Qn0/2tCYhwJ2XPr0Yte6g+43 4g0XVqpLlqggTmk8goSN+E0eceMIRsDPP0iNavnkYOxGolru+MGpS6Pp1Hxi cWTpmu16fO4pioMKSCoLgCWFSDNY8Qh/r26UG1fZNuvsu8AxoNYdmmU4Pl22 dYSEWXrNKtWDlYoHjIkO4rtUI+AG96Nn6O0Z+rOL5NtHi9Oo/LpzquzkYkXJ ckXRXPmuSVJLtNpKxZSniBudEPh08tDfS7b8PxJXSvhMHDFA9OMADbbws4So CDqUrWsU9ctk9SvkLf7Ke9RwfneZvCXbaC92t+8x21IMNlTN1tlT4dpBPTxR amuoqs1PYY9Cz7NssaxxmwGcjZowbcfXWESdybEaTM0RFRh3Cl15gTP8a07c KCa6DxSENeOF7yTl/68+pp5c+QJX3r3mnNK69gJXpuGKtkQ/foqbEuXe6IQn 12gNFlFCldz9Tn+DU0ei/MYFItBgtU6yGopWKInKmLuYPeZzARc3YHKFCIHb ceMqE7L04LALUG4fNWRmmDkH5ogH10Cym1pYTzsPm2ZA0OVgREmAPDe4QOy2 r/ZuhL4+x9V6kZyTC57Nx91vphrPeqsPT5WXBWnv7zBbWIGJ+XIH6TgzTAhZ u6hhfqsRXYtTHqzPnFDCiIDApFKYXFS2gSNUOYEpoNI1qiOTpC0QY+YQ0yNV kPHXLPW0h+NEakRfHrbf7OEaRA9MlP0/IvaHvzeXqprWqu8upt4e8GfYBBDq 6+HO9Ym6K76qI0TQAV7KqanSE7NkR6dLc8dI0j4XRRGjF7xIv192efIRClud EPh08lAn/gas6E/FPybQYKsdOix+iobl8rrlsmY/RdM6THpXLpA2RmvgOmXb abLG6a2hmKmwo9Y5ubXBSlugEnDDEqg8Nwk7WB7EaR9Eae9ToswRrHKkdjSB 4D0lzrGIC84A5NaLbD6FhkndO9jGSMMaQeBSVy4kufsiRy5x2dlWesU581Lm ZOFgwpFnOHl6Jv3cnauKki9xwRNNg5VrWbfSIWoLZzQd54ntE071vWawrO6s yrCDJuvB+vYymVoCNMasdf0FjvKiPb9xjWSdqYub+7CF7lwXFmNiR9UDd8SN naTpRooqFAJ046CjwMxUsRBRH0O/RwAO52i3Us+He8xXonTH5yuKFyiuResf AQw6q7r4RgwZko2Uo3BWNPZQ1vqaUzo2xzmzz0jDAM9zjUztAtzCazHas8uV 55crL8yV4W4nsC6MP+EfXMb/CbN5I35HdFvEEdq0zzz7Nd6CNzFsn/Iy/j0/ V3F7pdIWoqmaw/HtwFdtz3YydWQZG0Lw9ChZrLjspTg0XlIwVnxkvLj9k4Z9 iC0NjIP3qRhFJwQ+nTzU+SH9+ECDLfhc1dQ3ft9LdmaSuNlHYQ1W3SeF8Yfr lGDIdghSonUk5UNK96koHAmP2v0U1jXy1lXyksmIG3fWq277q67Nk9V7U32W tRbnYYt7hwdy0TndecvpRVyma24xSRWAp1GEGvT49wT1krVTpjvJM/H2VSez B5NOa9e4LyWzLWWC75zgAoUtNFFbSu2dxU7RogIqmhzz4OJ3Fqoco3Zu8O0z yOXYRgXBHU4+AXgR+DhsvPdyN26At13t/fqLHHcZYVd3qmlyF9x9zlwKBEfZ jO2cSr2nnM1jjOPohBsO/cGln+V29rg9CNPdDtRy704URvV7zNejdKfmK8qX qe5v0NnApbnuLHDDNxavxY+AeUgD1jI209891IZa9aKdcaYRXyKjLiFwo0lV zPp6PMoz34jXl6xRVQRr7sTqb65QYAKk4gX44cYRaHz+2y5f/8Flwp/x9uK3 eCt78r3fF6ztg5H7ZMKNwimooNQcpL63ks6BM+jCWVLwy7Sncf5JtbfqfqAG opu9o8S7vxQVjRNXzJaemSrN/Uoc/ynXCvW0cKMTAp9vP/T4IT0LReEnfAzM ybTHaWu9FSVzpAXjRBYIWwLQ5bi7RmFN19vTDbZwjaN9TClZx2XSAFUIcGwJ 2tJp4otzpOWL5FULZB1hwg4DJ2YdrWb3fMMDufcznGG5QjR3gBsHXfGCfphc joOEIYzC9Fq39jFwfBabtS8jtGH2fpa2c/QvYwxmou3lzu7uMqdiyFUn9/hB 6uA65ZweLf1mqLIH9Wdxz/QOeTtO9K2csig0MYqwVuYc6LvclasaX3RiF2ME 3UfPymcoQVq0LMVxkLi8YDGdo6vOBOkZTkycnut2L0pf5aN5uNXcxvrlTnk0 7zHfjNKdX6Ss8tc0Resxh0CZYfpc7qj+GajEjHekGosmm3QIIHkkcFnRzco4 Aw9RJ1uxJ8tdWDON+OUfdwN/o7HA9XayoWyd+nacviHbtSndcH8lihqM+aPL xJcQK4b/tgt4HYAe7JwB92ADEed+/UeXyVQs2DdBemWx4uE6Tq0ADtiaY26J RuizAJptM1sSDNVh2ksrVLmjJduHi7YOE6YPESYPEf6DhYYnYBd/j8Dn2w89 4QPrfD2VA4DfyxqrrQ9WlS2VX5wnvT5b4iCN6cqlsuYotR2AItWJFdkd1HOc QREjR5W/8nYwJ/bXsJLSYuFqhBqAjnQdln03k/vBlEcuv9AB0YzpDozxINFl MKKGAopWTrpztOGsfsFatSupw6qUetrPO9Xf2FZCDVTIVf5YjbWdoYL1hFQS FSHjsjhLKdPTdNG/2JWbhjiG1VjMAKQ9Vovc58Y0EDkPiojNqc+K8gal1F1f 4VSBZHVkfEFnPocp1Z4myh2clKHUyglP7ttns3uMz5mpU7Em/EL3+7GGGyvU D1JMLSyBecy9bY/5TpTu2hr1o3CunME5J2xmNk6HlQs2TZamx47NbBPRnOI3 01bo2kq1LQxSkGceMepRgt6yl9j/znq0HHG7t8V4I0a3qgfPdsjDTpNrzJyn voy48eXvXYb9psuHv+rSk1i1k4aItgzH4H3UH1wm/YU3+3WuznjPj8MN6xG3 lnR0NprDNM1RWluyEbb7obpjcxWpn4mSBwuThom2jJLsmCh9irnQ72U93WN7 iu8OP1nzBu3Ntar2X5Cdlg+DVFjrj9OyuMMO7gcTR2DCxOuxjIv37zY2sgrm 5a5Nqfo6Bh2J1OmxRe+IUjti1AgLp+laXE6WQiSWHQBCLNlYWDnixrkcxyhU YQTd7ax6XKMX8eSc8eRaxNl2nrKLp4lMmDFiHXbnqHJKnH3sTPTkDO18nki6 znhyrGJMkYTxCua6YpCSSaBxkho5DrmzqVK854ArF1URJzyWQthsL7P9Uk+O POevcONUV66qUkBhSzGBHluVlCJmQzon3ZCq4s6LgGDViUbAjeo4QxM8hdi6 bHvM96N094Pxy29m3COMOuw0CRxsN1GhhGZUs0k+ko3GU0WptdC1mUlC4xeL 71UTqbsVoa3dZrBkGRyn3C0nPWqyTNVbTP7v89d/wIejbccNWIAYQ3/dBVU8 iI2f8eofGIcm/1V3cEh4s1/jzX6VN+tVRJhFbyGGYMS3H93IhkB1Q5C6daPe kmJc+jYverBo+xjp4VnyXdNku+fI93spOwGN0Y+tJ2cP/+R6iof3dL8W+NUs iXoGF+yUqKE0xV0vWWsI+r14vm3G4Wh7ktYOOECD+XgnPLqWIwHjVJBuvFDD MurgKqejo4K4Ea2m2Raq9zGBxaoXOdb966jg3HFuHKO+bmaY59txg+sgZVdY vJ9VSYo9mWoqdTp5chP34JmDBWWThguctxwpXzfO4WHWXU4ocdopwVDejWOy OksdX+BgZJu52IQxDTKR+nbBlD0mbHMtoMLxUVLSLHfOnF6kEOYChxsci2kR hUUnnVP22KpK8RRb1zuozzi5gTsvNp/0fJBmuumtubdBX7/b1XqGXI7d5too XXMMIkZjgqEDN8h/AIiwFri1wkcGvwv+IomfGzcSiGwAro1E0ISfmkKbWyHa cn91VZzuUYyG1cU2fMgP+YAHoBHWX8BAY+D/dPn0f7uwjGjvn3fp9XMUAPro V10G/DdX9Rj6my5fdneZ8JLLjFcROqa/4rLgTd5CSpaCt9MOO498lU1hWv9e /PCPhXnT5Fd81TeDtMe91Yd81MeDNc9ChPLvrNHfReDzg77v013st2vHDdaY Ub1EdmysqHiiqGQqzc/GaW2whavQ5UjUMrJiFtTgDYgyzmEdpOWg64MlMkeY CptLE2giBkKVBOKjKySWb9Y0dfvFDsDZb2ZDc9yXf4jam894cGOYpZyYe3eW 4mDV1eMkcXLcg02OcIoq1DOJzbGpBqxC7jA6WT3JvkopgrhGXgdDCSamUNaV ozS8QJMgLGvKuhfOenKTs2cJNzDOcuoQQZBCnCTkSrlz/EVc4sWTww3An6yO PAl5FJ5cP2dJN+6rZyRgTEjiJEdy1XLWszbTfGud9naI7tFWUyvpCMAOdVEY oeydKKvL4F4WEfh8V9sB96Y0U32ysTHLhM7YcWrgR+krwlXA4X2mumjCDapc w41rAZpTS5Xl/vjznZmO0l1bhgk3DhCE9+PDT7C8J/LiDvifLoP/rws4Gx/8 okufXyBu9Ptll/6/xGjl4//uMpAeHfl7l0kvuTDQmPGKy5zXefPf5GKWWa+4 dKfqanhfXuSHAnjNzFGSC8tV4Hs0pxivxOrPxOj/00HD8c0jfGJH+wx+LQw6 Do8WHh8nOjVRdHqquHSm5OocCSCALUptC1NxLscmOg8jVNi1nmPktOHOoddR G0QsCvEaRJiNai5U2UZlwSLMFXB1zConecU+UqI8SNItxzoEtal04uSbYs0b bLKeZsEwqD/izs2KMnrzdtzAjmUDa8bg7Ouqc6SunPh22EAZS0ec8+QSm+UU xVCkg3syzfejhCRMMO4MQQ1KBrBiDTGK7DWhk3CWasdlXVmitTsr3CBnKcFX gRuLp+izsNqxEzdYKwj7Ho67M8m8tpKuD7Ndb6/XVflrHyQYmsGJOsv1c55b pMyaJGeY1o4bljy3RxsN9/w19alGG/hsJZTjPUXHT3OsgEUPN2iaEkhAZxt+ LWU+6sJZ8qgBwh0jxYcmSI9OksLf1CFC+NpjBmKuErACdoOopPfP/6vvLxE3 PvrvLnCj7y+69CPogH8H/R/5G392mfkqbDwAjVmv8ea9weHG5791gQ1uQEAE oLHiXUHcIFHBOEm7H3I50/Qjw40f6zv+gwt+zZPjRWfA05givjBDUjZXen2h 9PYCqS1UZQ1RwV87AEICBx128EAYAWCBK0uyte411a1XIVZEI2jAPpdniBFq ttNE1XHSOKh8kYX2lDQg5et8E8YpJ9y5BOk34hd3ItJnpMR0ZWc+ySGnPMEx D24AZLcrdi/AxsgSM/XtVN4YL+xyqj1WUC6ClWCK3Tn1kCs0C1OI3Ju42yEi 2TtBXeJnunICkawKcxW7KLtTGhPTv+zIy76JG+Rs4KTGDiLpZa7RCafYdJkT NyqoknvTWU4txs12xqM+y3R3vbbKR/MgztCci9mhW1mmw2s1KeNkmROIOfww ZVcAN0q6tuS6PtiA8cujTXrLAVeO0ryEy7Qg3B10dWQb/N7j4U+w1cBI0ha+ xV/fX5jxuTjnK/G+MZL80ZK9JGLOQAO2z3/T5fPfopvB/gWUAB8DEOMDgo7+ v8J7vuqOoDGbiHcAOiBgmfs6hirDfttl2G9dYBv+O4SOtX0Fa95H3DhIuMEk C+8X/eu0PM/UepJByjP+nWAnzxRx+XTxlVmSSwulN5bI7i6RPfSSWQOUDxZL axdLEQeStY5Ebcc1fQ8S46MFnfWAS1vrZq11s9a2QW2hsgtWalJ0aEQHXDm+ XKYvxtgCcQKLepBYZfAoAUgpx4v7jRpuhRMHDrpy22GKWQ5RUpTxAWaR4WcZ O+gQwV1n4rOMswv5KKguU0qzLcfcOfo+MGdGBphkRLi43I2jLqR5WISmg4RR RC6Ku0G0wipHh4hS76IzqoKIbCcJsgB05JqwdRa+maPkHXFV3RfwW66kTO8V p3ZzMY3SgOuyRd+0xVgdoHkQoWvYYrThdJ5Hda7ryRDd1mny7DGIG9bdZjt8 1bcQNxp34edto5Rpa44Jw6gLTh2KUqLvOIyUBYvedJn3usvsVzF8+PoPLuAb +PcRbB4sSh8myhohXvo2D75hn/cwQun9c3Q2RvwOcQPAgW2Df43pDohQGGh8 8r9dhvwacWM6xSOAGFNfhmgFEx3zX8fiC21IjgcvuLIn36+PYNMgEcumMpVk wMyn1a3x/a7noNG+4ActHi+6OltyY56kYqns5gr5/ZXyuhVy8DrAebg5V2Lf oMbMZwYVamk8n4MOrIa4te0y2nai2TrSdDZq4YDXgediiZDRd+eb0a7Rt/fk HIOdBluuyZJrYtEKR8HN5jRR/dwEiNHhgeSwbkwSLGZ0WEU0OMZINtjcK1gu HAPNbxITOM2pHXaKFlXQDPtZJ+NuGSlX0hQ8PppgxEEVgLUzVEI9Q4lNJPMh NQTWesGilb0o4oyh1jlnsygKzZu5vk0mqQzHv4fIhwFP9jvJkGFde4Gbeb9O 8dcZAg2w+l3G1lRDXYimOcWArGXHkJmn7qDb+Wj9rvkYA94P1VnSjHaa3GdZ U2s8soS1xhu4PAmTb6vgaAbhzpC+/OXv8Lze4i18gzfpJZeJf3aZ9gpv1XuC sA+FDFoZLMPvDpgANz77TZcvCDfAx4ANUOJTQo8B/4OgAV4HYAg8OvElBI0p L7tMfRk7Paa9zAOvA3aDp9PmAsACr7n6XX5AX2HsICzd9vk51mVYHr6TM/DZ t5H29WQO9T/lC4FftnKO5O5C6c3l8lveihofRYO3vG2NvGSyuGKGuHGFDBMX cKndrkfoYGlSAIpcEnU6StL2eSQyi9CBEQ28VC3EL1sMCAKbtCj6E69lSvRs WVJ1zUk6Kzz9hBs3j8ZwA4wuWYc1FEZ2cfixEGYvas1zvF4HaB5ttxM3wGbh Qr9Vj746uCLUNI7eQmnX9jEQLH3uo1ZYQKq7P8NeEUZAGmfAwsol6lo/QrHJ EdI8wsExcj8udWNUgRSSGNFZKnbnyEJZmzrsmWnipBaOUjPqAZJxJz1NzmSu vsC1plzsxnXLMxfogNmaqLMk6PCLYo5KsUfLMY/yBONRX/om12jaEg02eLUz GPXY8t2sCQZbvKEtiXADojyaH1zzHn99P0HsJ4gMmz8Vgi+xsidv2TuIG+AY zHmd5/UO/+xM+YW5CgYaJ2fI2qvwABqwwY2P/htTGQOc0AF/2T2D/6/LKOog hX3G/xlBA25P/ovLrFdcAFKG/rrL0N9gqDL6j4gb+8eLQz4UbhzEzWsw3Phx OBuOJ9I1+h/0hcDPemmG5IGXrHql/I6/onadsmmtwuqvsK7FSdj65TKrnwIN fzf5FeByMBKw7QQdBUzE3A1zF2C86VgIuOclexisasow4LPA60glOghAidPU +rXDSaefrLMfpe6IdtwAtyFGg0Z340W81h90Q21TsKbUDkVLjFYOuDHcIDeA ZNp2o/wxVkngKg9PySeFhfJuHH1HpTNZCo4TmPNlcuxZILPRgChRRlQbx1lV wp3TU8ijF7nYlZvtZamJnQY2WYO30eExI3RkkbBCkTvXx15AvR/Z9HXBjXZF JEY+doFStUz4/hzVRLYYuGpyIeqp2c96XsswXYrCPEZToK4tVm+DT0danLYD brYUoy3NaMsw2Wl8fl0vfmg/fs4I4ZnJOC1ycYa0HZwXvslb+S5/w0BR1peS Y9PkF+crri5RwhfYsE7DnI1P/gcDENgTbkNIAjewgAJex/8iaMBfwBD4d9hv u4zqjqAx4vcuACBj/+gy7k/oxnzoDGFg++J3LmP+6DKCQpWIj4XxQ/6hOa+n biOdEPjA/ROcq7y8nN35Qx/wU/9C/tkFv3LtEln9Gvm9QOWj9aqWYKUdtjBV 3Sr5nYVSi48cWzgyiHo0UetgZZRU4sAHzxx8AFYTPEjQkaarXiZ7FKRqSTPY D1FKYS8pweVTPF6ENk6JBV3dWkUrcX3Y883WBJ0lUG0NVNmZtguj9ct3xRik mIjvAHkOoHvTASAMN/JJKWkPVXhRAdOMZrif6hoVRPHHuNavcTP+mNo97cGV WTNMjg16jGtKu3IpjmPUAMakWPaSWv0FJ3tPldP8C51U4Tk0hwLQkW3mIiM2 f1dCzWaADBDawFEhPXtHF337wljmHHGUHSSK9TxqijuOZH23drpWE6dHa4iu NVJnzTKRGE03e4GbLdNkzzJPf9ll0Zu8VT15a3vxw/vxw/sLymdIquZLr86R HpkgSRgkDO4rANxY+4EgZbh4/0RZ6XxFxRLk1qjx0zQHaxluQJQBnsb7P/uv Xj/vwhId/X/V4XJAzDKAIpdhv8GHwOsAv2L4b/Hf0X9w6fPzjtQHbCN/7wIv BS/4/x5b33nWPV0z6YSlx263z5o169tPee5p/NWCX/n2SjngQ12wqj5C3Rah skeo7THq5vWq24ulyDcYpERPI8eIcEEpDngIQ4M8E0uQorGcJBPIMjxYKa8P VLaCm8G0VovIGwHn5KInaTGYOZ+fOs0QN/aZbWl6a4TGGqqBSAdVew6QrFgu yqYghpz1xGv3OgWVZQko9nIAghCBKswUKwGy4Vwe1UPPOXVeLnXIUHK4cciV UzncSrgBtl9CO5+lUKXIvYNBnXWClXZlbIH4lEpntnYX5TR2E3owxrAjHty8 /ylyJw5RYxt4QeBQseLyQTfrDrN1q9Gawqb4zfi9sTk7+N4A8fKJYeCMZw0V iK2pptZwXVu4zppBmeSr3exF7mC5cMUH3Fj4Bm9lD57f+/ywftjBBRs85dQk SeFY8a4vxXOpvyL0Y9GusdLi2YqqFQgaVd7qh4EIGh+SgwFRRjuI9SLc6PdY zwY6G//N7QOA8NGvsOAC93z2awAZbAyDnVlrx2eEJ7Anm47vPJvheGZmxDph 6amtrV2+fPnffNYPdORP/dv4lxfOGoBTEaVGs03WYVfGZq01XlPtp7g8S4LN G/BQOtFJbVBb2TxsOjFpH6XeLTaGdhwvsq1x2oYAJerY5tOA1UHqmwKgKEMt hu6sEAlgQtxQ8JD9kKttm8G6SWeL0to3afHdwWcA0wNnYx85AxBugJWFqxA6 jjqFTsjf6DgJ95MiANhplhFt9kJXTqultBsnGoW8QJSXADeAdaRvNzliDBho nCUm8NKuHAXQUabHRLQ/bLblmlMVF4XgPZ3QYebEJfeQuORRkjA4TU4LAOYB ijuyDZyW2QkPe55rW4axLcnQuklnTXVqdLKUSJEbJ3cIPhuEKjSrYkk3tUXq 20JhZ4P9AMaD9qPucFmHiGDayy4L3uAt78Fb15vDDdjft5eAHdi8NzCnAX83 DhYfmi6/vERV7YuUj3fWaupDdKxpnAUm8LfHC9hSDrf7/OIbLgdAxCcEGuwv 7NbnF9hECrd7voC40feXuBtLjf4L59tTt5ROWHouX748b968devWwd/ExESb zdb+0Pd+2M8ChP47C06nhlSkesMre7azrJmobQxV3SZeQVSCi9fiDhAyUMm1 LY76i+BSeIpqqRAXIP0FWIe+aZ3Smqx37KaB7nwzZzslHpzS03lKDMIlO4xa 04+52bJNtlSDLVZnT6Rj2K5Ha8pERm50Fap/hoi0WYvtqd/EDfQNUMXJowNA dhrxql1GQcq1F7jJWTbXBvjGGCoYfAFibDIgbw94CLeJKoTN6Z/04FQV2Gj8 BWpgu+MUw2VStoyc/ACJU+fTdpTIxo9R32m+KycSkeds+DzsZt1lbkkyNMfq miO1liQ9lqqJpAszGyzXcciVG6k7jbBm3WKyROstwVprssG+F0OVOa+5jPwd hglTX3aZ/wZmPoM/wPxGaD8OMeZT+/eMV7Eva2lPftJwycm5irs+CBq1Qdqa YG1TJDdowKU0f90FQKPni4gD346kYAEyMP8BcOOvHIn3fobuB+DGv3CyPQuW 0glLT1VVVV5eHsCFxWIJDg7+RwgD/7X1LHwP//7CmDTfzPi6LRs1lghV+/lz j7WUx9E0CuAGpTgegBOyk1J/jLyrlCa/Trhbc4z14Wpbkg75J8GBzzWznAae eBfpin+JnAHwCmKor+y0u32v2b7daE8xONIMWPWAl91vwtbTI+4ctzm8OPwb i9IwiBv5rhxuQJByjroli9xYWacDQO4QocfZrkwiDdHj9GP6I2Ce4DDEGzBa OeHBTe6X0+wJE4E97MFlSlHIjAKNKudgL1WRHrEpvxwzDsAySbgTnpziJAnM cW+0h5ps4VsK0ziiNI3h2qYwTdtmnX0bozmlglQxAe9Zd/zUxe6sRdy6zWSN 1VsCtbYEQGAT+Bhj/uAy7zVMUd6M1M57nbeiBy+0L+JG1MeIGyvf5c9+nTfl Zd60V7BI6t1HuG2U9MJijFBawnSN4br6CH1rDGo3D8WMRJcvfosmD4gBuPEe +Q8YkvwvZjz6/5JzNr4z6PgX1pM3luPHj898bPn5+Tk6Zemx02K3CwsL4+Pj 2x/6Hg/+xwEabCF0kDgjQERDkLIpTGVL09UFK++vlD9aqwCztSZoLTEaa6Cy brm8cpHUkqHv6DyHC/H1FwBAbAddG+K11Svk2LKIaUM2c+qOoQTr/mKi9syF oNKtvdDVvseMcjzbjKwZAz12uHHaA3HjLgkY7aUqLYMORuuXR1f5EuLyQg1E M/o/mVQyvvJYEwibajnrpPTZ4zwecIcSiVv7KHZu2E9SguKipzOx6cE98byT 8pTFMkxtYb+5OoViDQimmK79cRpy2U8F4p0oMdOdpUFyiI05nvSwYlGeoHG9 unWT1pah53DjCCaInGjmxgg67IXutu1mW5zBGqS1xeOec1/HXs3w/oLja1R1 SfqGNMOad3khfTEpyp67tAcf4GLqK7hNf5UX9JEoZ4IMP36U3g5+S4yhZSOC xpBfY1LicUAAX6LXz/8LwhO4k9Kk/9X/V1xm44c4x54Re+mEwAewIiQkxGq1 NjU1hYaGFhUVtT/r+0rOPCNfwve1uLwW2GyCtsZXUQseRbK2KVpd46OoD1a1 bFC3bdQ0btA0BShb1mCo8jBKzXVfnyHvnUUrJ92bthhqiIoQ26IYKd9J0mBi 7ZdVZIDwFIiMIPxhPWBM+gRih92UIWRzZKWeHNv5vRfxKg8uR7Kuw2fYR51g pSR1BObM5kO3GxB2IOgAf+My6id2/NYnOGlp/HucCrjJNORShG0hTeAXnSev qYwRd7QP7zspPggVEaD2u1pyTLdiiWcgy0R69+6c+tse+ggIgIQbmQSDW1Bb BCl3EpAZCQnWiqn8lImlau6z5JpKZ0g5do5SHJm37zTbEgy2ENyB9Wp6vc3L mCA776NqTdTXJejLAzWAG3D/inewI9TrHRR8n07QMfM1XuQgcebXUvjUdSFa FGWLN9gTjJ3nLeGhni9+I2D53k+wZ8pe/h6BDyAGeCAAJnPnzt22bdvjsrPf y/E/U1/C97XQ5ShydaTowPDveMsbo9RtyboH65QN4eq2TRpHqq4uTP1orbKO aAZveitsOaRif8KdI+cER+KCZzMrtkJEA3FHBuEGWEplNwxzADROE0HueQo9 QlUcydhZ4pcocNYX4DXBh6lgcvDkcoDN7ubGtRzhavx7wI3Thbz8AsYa8MRc 6kAj6kJEm3LSaGbSbCceAxDqS8cURJoRXY48N8tu1wbkxSKSUjYmf4qim9M0 43bZKTR/lkbJ9pqbthquh2luRWi4UOUAsYtnUcM50X7i/UkGBEb4jFnEDZ6u xym8XGQgsR114zRlUvQQvNjWYkhYPNnJ2HmChOd2me3U3zWJejXnv8lb10+Y PUlW4atqiNHWbNCW+av3z8FfAQIWn96CRW/z2cQZQMe8N7B5Az7p6nf5XFUU DibF+J3lUXi1Pj/H/OcPcWr9COzluafRycKzK0NfF6S8vlR2d63Svt1QF6lu jNZYwBgz9LWBymp/Zc0SWe1SzJc+SiSi3cNEVA6h+iUk62tlomZw9Y9UO1jZ EcdRiW3vNI5tkiCCG9p4kBKHSc94PnaV604T9G7c8CnTmAbnAQDkgJnrJ99A Blvgxk2r3XiRBkyokYM1soKpVhCH2AkmL4vQQUEKNkt0AMgWEgDabq5LNtSn kFjABU+O3escZlNvLJBx861MOBvA5KAbAMWjRP3ltaoTRJlIoQp+XluEmoML 1s+5SX/Xh9rytxN0ZNHs2z5MI1tZTiPPjKHcJvQobi+WHxqHtAYBvXn7R4la tpv2L+Q4T+a8xlv6Dt+nlyBmoGj/ZNltP3VtiObOes3FNap9M+TrevP9evF3 jxIvfBPhArZFb/FWv4eg4fs+f56TocuRavhHeip+0PXjMJl/J1T5cXwDnSw4 x1pCVOULpVeWyqxpuubN2uZ4rQ28hUxDc7Tmjrfitpfs3iLsTry1XG4voJ6l PJrtAmO//WLbKaYU4IGWmPD4nHtXBI2t5K7DDTCcEOpIB7fhKkmltM9/oeoi yl7jWBwLVe68yFVDwADjdI4wdcfL0tgXjcZTj3cRVX4hhuLU58mNKWJBiita 7h4KVXJM7efA3XDto006234zx29cxk2u3Vwsr4vSMo1IW47Zlk1zKDtM1dHa 0pXKgkmku40iuaaW1XIsZG/UMsSAv9YIvL3jC9GukaKWNGpVBVg7hPPvbflm Sx7BLCAJaaKdny49NVmy7G2X5EGC7C+EGz/mb/hIsPQd3uK3eGve4wf2FaCM 0Qjx0Smyh2vV9/xVN3xVpSuU+ZNlq3rygvsJDoyTPFipAHghJmEEjYA+fEat 0+vnNFy25Snjxo/GZNo/yD/7iX4030AnC84xW7jqipfswlzJwxiNZYu+JVmH Wjw7DK0J2ipKit6cJ701H6Gjbp0Sk5Y5pOQIQME6M1lSAqISplB2yJUrppR4 YJIwVUdT+Sa0bnDmj6GkCCdAQEMliDmsvHulKwY4TKSVlXF3m2xxpE6boMXK C2P6BcCBeCSfFBuPkR+STHqX4EWwFlAmqwrAsh+1UCFqwH9TDZGDRKmfCRl6 WOEjHHfjQhUazK9aIq9erYDXtG81WmN0lnXqW0uUt4I0Zd6qg1Ok+ydIqgJU tkStNUINuGEJULI0L0VSCBr7x0hShwozhokqfRRc//kxd/s5j9bdpuZ0+tS5 Zhsxq2/5THhiouT0ZEnSIEH6EOG2YcKYgcgJHP4RbnGDRFkjxYcnSsvnyGtW KW+tUF5ZrizxUkR8KFj0Ji/yY+GRyfhD1KxUAFyEE5GX19uYR318TuQpnk4/ JpN57ml85+roGc4xtkGEno3s5YAhtQHKigXSK7MkjctlFbMkRWNFaP6kEYkp TeqMQjNn6oQQmOzgdH+4pF8alUXA6rfokdc0CdVLcdj8BocbXG/nSXfkzGEp jpuk78wQaZ9rQ5DGlmqwbtQ2+ynwlVn/50kqZ6DILD0RgqBAJYoeMqzIJ18l 342U2txYniTuS0nCl5LDXsqz82UVsyUdLiiVfTF8WK6oW6cC67anGWwbtK3+ 6msLFccmo9h65hfio9Nl11cpW7HHVWtZp7T4KewRnBcU1Z9/YZZ88yDhpk+E mz8V7hwh3j9anPeVCEIwGw2bFI4WHRgl+py6uL3f4+8YLjo6Xlw2U1o4Rhw/ UBA3UACgAXCRPBSZgXd+KTk4VnJ0gqRkhuz6QjlsZfPlaZ+JAj4QzHzVJW6Q 8NwMjJhafZVnZ2INZeW7mC8dT3IG7T/lkzxz/sqZ/7bVZGVlJSUlPclD+r7W vxCn/KRAg60eL3D8tHji7cbgwpptfBSuvjpLcpVwo2ap7MJMyeGxIu46u5NC e0bYdZp8hvMe6IrsMbHUKOVI3RCC0mgwH3tTtZgIRWF6Ao129aUTbvjcS5y6 QRtEIrcwhHm4QfcoTNu2BYUpW2O0jd5yDqnOOeXJSjzRqwGvg0iHsEBz0CnG tI/a1CGi2YEyc5GDRZmTZDdi9bUxujtBTi7E4o453DsACxEaS4renmqwRWnr fVXl8xSFE6TgQuR+LTk2RVaxSNGwXmVP0NrC1ba1WEKyhaotAeqIfnzYYX0/ QdTHgozPROB4XJgpuzpPdnKi+MAoHFw9Mla0vi+WUBe+wQvrx986TFg0Tnx5 tvTkJAnENev7CyMHCGM/FSUOFaV/Drghzh0nLZ4lOzlDdniC5PQ0RIn4QaLV 72EwgjnVWfLKhXKLL3ZrZI7APMnK9560XOnfXH/TxCoqKiZNmvSfixs/6P4/ msWgg6GHY5/Jvs9cv0lze7msfLr40RJZq6+iaons3EyK9MMpDbiXIOI4TYYe olIL3JNNM+wVXbncxVFXLOBm6uuDleh7QLDPyLiY2uOlrqylAbMl5V2ZO2Et 61qX43o3TFe1XPUgStecZbYXuLVtNbSEqVrBb7nhnDvb4WQbBnQCoNtIGpRM jjnbjLWPAhrGzzEVrFIF9hPsnad4kGay5Lo+yjBUs5G9QjxsuHFxlqwdQOwp eluk5oG3qmS2PH+sdOtwccEE2YFx0ktz5Q99lTbqzcDnBirtIZzLkTxYCLiR MEgIOHBikrRygfz8dOmF6dJDoxFjV/Xg+b/PC+6Dg2nRHwkCPxCs7cX3fQ9B YPW7/KD+wvCPhRs/ESUMEaUNE+8eI8ubpjizSFm2FFwj+XHyLiA88Xqbv7wn f+tI8ZklipJZskcrceIVHto0SLSur/AZwY2/uqe5uXnlypX/0f7GD7Tzj3J1 QEeha2OK7q4vTtlXL5K2eisa/BRXvGSlM51lxERiJ86n8dhcYgWHUCKTBsrK PDkCn1MUTRSaW9L19yDWQPYqT04WjWRSuaCGpUYJbWyXuzXsdb0XpataqXoQ rW/KdrUXe9ryXNsSdS2hKoxlTlMpNtNkZ2w/9PpIVgbRE6vv7KC+sjxXpvaY u1AZ8pHwyApVYwbKK7cdcW/cbnhIyrlMzY2tFkp1tgPIqZnynFGSnK+le8dI d4zEK/v9ZXJLKAEmBSkxH/GzhwsPjRGdn8Z9IQfGiEtnyk5Mlu7+Evef86rL 4rd4AA4AFKwBY817/DXvY0pz6du8RW/yfPoIA/oJwz4SRX8iih8s2jxUvH+C LHey/Nwq9c0ATcUa1YWliG9BfQWMuC/ja8mpFcpr5GzcW6rIHyPZ9ZXkWQAN x98ynJiYmOLi4sLCwmcHNwDKYmNjv33/3xu0/wfjlOegwVY7dDRlGu4Hq257 K27Pl2I+MFBZ7au4sUR2eabE5tRTQNLREJqZ3W7A6kY66RtC3FHu6bjAplSQ 88p6yLU2QVu5RIa1VyYkzQKcEie8lLIyKOpTN+5zq96ov+Otfhitb8kmTeSj 7tYdxtYotf0MysQ78l2tGcaGFAOnv1xobjd/bN3MNGI/STZqB9xMNW6fLt80 THxunaY+zYgNHmVdrWc7GtHR31ggv71W1Uh1UkeizhqmvrFC2Q4gO7+UzH+D 5/U2L6APP3agIO4TQdIg4fZhwm2fCbcMESR/Krg0Q3LfS2b1UTRRj1z+1wga C153mUOkvkve4Xm/xw/+gL+sB3/lu7jBDcATvz6CtX2F4C2EfCSKGigCzwFw o2iKfNd42dnV6ruRujtheDzZ46S+fQST/uLi00eQPk56cg2Cxh0fVd0q5fmZ 8jVPXB79b65vG87x48fj4uIc1L/9jOAGgFhQUNC3B2A7GbQf7dRE6ORln4PG 44vhRkuuqWaDpiFDby90a1kpt6xTgk3V+inuLJFZI1Bvut307CEklMA03cAJ ARxgCstlHVvDLuOddUosLlx9gVNAYAycx1iygkCmArMczQVuNXGG6gBNXYy+ DXCjkPqjClytaTorzcc59phbkw33InVte82M6wZCldZE7b1A5aWFsrOTxZhO 2WpozDReitWnjpVmjJWW+qofphqJTRSjIXuhqyVSXbtEVjZLVrFI/jBQZd+k bdmsuxuourSYE7jMHCnZ+oW4HUACPhBEfSwM/1AQ0k8Q/bFgXW9+QG9+8iCu /Xt1D57Pu+gV7B8r8XqLN+c1lxmv8Nq/n8Vv873eQcRY+g4fIGjBG7zQj4TB /YUAHes/FEYOEMV8Kjo4Ed83a4zs1HL1/VhDPdW1d02U+fXHPMn6zyWpkzGe qkk11MXqan1UGXMUa4c9fX/jbxpOaGjonDlz4Ao+Y8aMKVOmgO/x5A/sr9aB AwcyMjK+jRudDNp/J2I8B41vL87lyDHZj7jZkPjC3OavsIWp2wA6/BU3lsmQ l3iLHuGCEaEDkjBZN5biOOOBpdUKp9LZ5a5tRa4PYjS3weW4QmKIJUTpD9sJ N+aWdGejcBXdWg671yYZasN1DTF6K+BGvhsGHXlmR64Re1kPu4FT0bhZf81P /TDDyIZe8bmxmlpf5aVZ0mtzpGUzJW1x2sr1mqOrVJuGi7Mny8oh6kkxYnsY S8Ze7mrbY4K4wxaqtoeqbYGq5mB1Xbjmlq+ydK7s8DjxzuHCLcPFYf240XW/ 3oJ2AIHAwb+3YEVPDD2mv+Iy61VkyVj2Ng6uLu+BfwEWJv8Fmz/Z6NmCt/jz 3uQteosP6LHoLRxlDeonSBgqDvtY5P8BokfEANGGTzAZcn4OeixnvFT3iM+8 YrU6Y5TUqwc2iG6cJDscoYN3f7jDVLfTdC5St2OJ8qmDhuO7jOvZ8Tdg3blz 59u40cmgfSfI8BwxOlnY3XHUrTXLaM03Yylku8EarHLEaRsi1HfXKe8tlWFs kqZjLOiWIKV9oxrzDJl6TJBCzHK9G2lJOyl/z3mA63LfV8HpIp0l7vEiUltg 0HHGnek7tx33qN9qqo/VN8Xo7dnEzrcL5+Yc2UbsSaM2KrjmXlujuhWDPk/r VoPFT2Vd2zHYC+sW+BJL5NnjJBEDhLvHScuXK6uTDPYTFA2xwnGZp22HwQbo l6JvDtU8XK2876OsXKk4P116cLR46zBh4qd4oQ/tL1jfT7DpY/6u4cLQD7HL gp1OABGIGy8jATiEJIAVS97G2VVABnYAE/6MWqtTX8GBdzD8BW8ixw5ELpgb +QRp/QAr/PsIKTUqSh4mfhSoKZ+v3DKSWmXCdY9/Fq/ewrRFGDq1nMVZvJZ8 c9lm/R5v9VPHje80n2cfNzoZtP97ccpz0Oh8MZejIUZjQTUimrNI1lnD1W2J ugdR6hoIOnbhIEkHdDBZN9iw4xSzlNiPcYO6MmjSrW2v6UGo6sEKOUtudKei DBfp5FOSswR7vy2nPJp3mZuSDC0xNKS/HcfHMNW5jbhMD5jtmYbaKO3VlQgU 91L195YrrAEq6zqVbb26Yq60Bl5/PT5UtVhWMEZ8Zqr0/AxZ6TLl3USDhcmd AG5cxJSs44KnfY/JutNYF6W9vUxZtVh+1Ut+arIE9i8cJ9k6DH2A2a/x/Hrx 4wYKdn0hjB4o2viJMHqAMPCDDvdjBkqbYcPnih786a/wvvy9C/tEY//kMuEl HHiHO2e9xmNMGv690EvJGC7eO1aaOULk10cQiKlRBKja9dpLi5U7v5aenatk r7BzlHR1LwG8gs9QDJeu57lhiIdq2m7XMowHiAnwKZ4ez6b5/M1perb+Jm50 Mmj/Nz/gs/mpn7UFZ2Z9lKZtt4lxfDnYVPh2Q0OyrnaDun6tAqufBB1wf3OA 0oozbjqEjs0a9D3Oe+C0WtULXEfHMbeGzVrsOz3lYacmcPtWg30HirvZtugt TPP0oqftrGdbvmvbVmPbRj1KHaUbHamk9pios4fjPpYMfXWY5jKVG87Nldsj NbZgtS1AbQ9ROyI12JwGAUgAPnpznvTqXFnpLC5l0XqMcONqN+z4KvZgnSfN uebqWF3lauzZOD9TXjxVCqBxaqo0d5R40kuokQpRSdynwuwRouMTxIlDRLGf CNf1QfMnxHBpBxAIQMb/GZl74aGvuiP19zh0OVymkpoAxDJnlmAYkjREtGe0 9MB42a4JkiOLFQF9hSEkXlATpi1boto7VnZyJu52bJo8foh41uu88S/hWxwM 09UedOdctWKP27vMRzZ8t67iD7r+4yzocdxon6b/9qD940/5q8/4H/eRn9aC M/NRhLp1F1FksE7yJK01WdcK1+gUXRMjFUzRkWwT9nu3hKtsydQgmkYkhAA1 OHVCXsdVzHW0ZRmaItVNa6h1aqPWDg4MvEKRqy3TYInWNPkory5RVvqo7UVu EKHYaHbMkWhwbIZN79iAXs3dVcpaP9WdYHXZIrSvO/4qe4zWFqpB3AhFzhw8 EvB8gpT1axSPe/uOcHXzEae/gUSpRBV41K0lx/QgRndjherENFnRROn+sZKs EeKoDwUAGmDvS3vw1/bFls7skeJjEyXpn4tjBgrXktsw8xWXma/xZlMM4kU6 R2yBpzGSWMFD+gm2fik+MU9+Z53aGsOFHjtH4vhJ8mBh/izZ6UB1WYAavaYQ bXWk7uJy1cGJ8sPTsEacNlyyppcAUGh2T/RtTm3QWw+74+QvuRwP9rs+B41/ dj2OG+3T9I5vDdo/vtp/U8d/5kd+igvOz+YdRmzNKqKiZ4a+BazygLkx29gK Vh9JirGxJE4dp2HS9jaGG/DvVj22dFahvgCX5dhvbkvQtQWjsdjAN4Dbm7UQ 0dh3Gq2btDXBmutLlDd81DXx+uY8J5VWrN4BAUu0zhGIz6oJ1bSm6q0pejum JnQ49rJJa4/Q2AI1iBsxWg7KgpXNvoq7S+TX58vrvKnRa4Pmka8SQQOu2uc9 rduJF32f2bLD+DBSW7VEeWC8dPcoBI14ymwgTd+b/DXvC4L6CTEjMUJ8ZILk 6ETs1oBwYx5yAvMZWR+bTmWKzN0fawIBhMkcKTk3T1EboGlZj9/MrTWqgvHS i3MU20ZJCpcoSqO1lXGIJ41JhnvRugur1AenyA+QYqxvH+HEl3gAPvA622Yp KjYZsI2tFOtN4HI0HP0OUcUfaD1uRz+F1f5Jfzof+ftaWFXZbrCdRsVGtL4d htZNGmuOsbXA1ZptRAtNQp0mRIlYCjRIQxYn2uJoOOWIGw6sYY606+NXf9ta FZi5LUbbvEFjTdHZd5usCbr7YZqby5VVPuraeH1rntlx0q011jlBtl7T/ZsL U69sdH2LAVwRe4gGOfo26SBusuWaHJs0lrWKmuXyuysINBL1jlgdItU1msbd a26L1rZt0Dp2GG3bDPWhmuuLFHljJOnDxJsHCYM+4ANoMFrgVT14wX0QDbYM FxeMQ9CI+li46j3kz5n7Bq9dRHXO63ibHdjEl1zg0e7fVLSEddtLYQ3WXJyL sJA9WXbMV12RpL+/01SfZbJlm+5u1Jd4qw9Mx0cD+gnhZTHYGT06YKAob77y HjhdBW6Y3LiCLoflnOdT9Dd+Okb03NP4dxayoJ9E4WM0wD1GS5quLkhpP+2O k/X7kbYL749WO2I43GgJUjZGEpIAnuwxtRdk7dTXjfekY9BhD9ZYQjWN69UN EWp7nqklTQ++xJ1Vyts+6kfx+jaaQLdm6BtXyu96yS+TuZ1dpapKNbae8uBa 2ZmCPFIL6h3hWkeY1pGgrwrStAKg7aMR+83UzbUN8I0inY26q15yR5GbJVwT 1Ie34UO+LVYLHktjkDr+EwHr6mSeBrgQYP6zX3VZ0YNDg+2fC7d8jj1d6/sL V7yLRVXAihXv8AJ788HNmPoyb8YrLhP+hPmNmeR1JAwVJw/D/YtnydsBBKAj 5ENh0lDxvgWK06HaG9tN9YfdrEVujdtNlZG64hWq3EmYiln4Nv+L33VhuBE9 XHJsibI5zYhTe2cYboDL0fVp4cZPyohGP7Yev+fpHtV/0OKo546hSIptp6E+ Sn1vmQwrp4fJCaG+TbwBcBGpbg3GS3xrhArpATMNmB2ltnP7LiPX35WNfBSO UG3rWlW9v7LGVwEv25xheBiivu+juuOjrovXW/PMtnyTPdfU6q+sXoGZisOT ZedXqW6lG7EciWx+9FKHiE0o2+SI0zcEaC7MlV9fq27aTizBgGkskZtJadUk gyNef99ffd5LmTZC7P8+L7I/P22wwLFRu/UzYeoQISMMRx+jJ29ZDz7rwWAr dqBw8yeCTQNwh6iPBCvf5S98C5VNwvvxEz4RpA3BuGbin1HjbPQf8FmhH4tS PpekDZekDxcfmy6/SaUfcEjaT8LjvurLCYb7+1ytZZ6NRW63kw2l/uoC6t/w 7S0YRxkS2G1BT0HKGGmpt9qRYUT2AABMhhtXOxNx/kHXT81qHs9v/NQ++7+/ ONwAoDji6thnakzQVvspsPuC0f8eJLXlrXrCDZUlRFW7Rv5gjdwepsIs5WFE FTsATrLOXuREmC00UbsRo/v7y2WWjZrWdH3devUDfxWYdkO83g64kWN05Jkt kZqHPghEZ2bLL3kpqxMM1qPuaDvl5HIUu+EIf6EbOBWV4dry+Ypr/uq6DPDq nemRvch9yuHGZv2DEO2hWfINnwh93+P5vs9LH4JQsGekEKAj8kO8vf4DfnBf waK30PeY8GcX1nER3BdnTAKxR5S3b5To/BTx6h68jQMEiYMEADgpg4WAIeP/ xBVTlr0riBsiSf9CsmWEZNtIyaEp8nPzFJjhfI23+n1BxMfC7ZO4SbqWU0gf VJ3venGj7tgy5a7x2Lwx6zXeiN8haIC/saafMHuqvHo1k/l2RZrECpSyfQ4a T3j91BI73+PCc/UiaioBXDRv1deGqG4tlDq26blUQwGNvoKlR6isoapH3vK/ SkfYsgxtEepWHwW2lxdQwJKkR1tOQwCpX6e0pukbg1WPAtS1AerGeL1jr9mK EktGW5K+YR0azuVFispFivoYnSXPFQupl7tyY3EXUYm+NsdcGaypXIIIU5ui Z7OugB63o7XHJ0owfQpvF6+/6qveOUHq30fgTW3hN2j/vJHCrM9Jr3mgIHYA ajczuBj3Z5Rshhs+7/HBCVnegw+OR94YcfkSed5XosRPETEyhuIT57/BG/tH l6/J2fDuLUwcJtkyUpr5pTTrK+mBiTKf3gKAoLlv8Hx6CaIGiHLmKEpj9I2H Ogb5y6N0++ejs7HqPQHLhX75e5cxf8JXyxohPj9H5ojSor8BgEmDw08rKfrk 3/RZW8/R459dcK5atuptu432AnNbjrEuWnNvOU2VgpvRztqXZ4INNWd9FLcW Se96yRr9FI+CVY17zI826R6sUUJUgj0ehRRZbDUihW+miXGP21N1zetVjcHq umBNM+BGtglLtLDtNLWEYObk9gplzQplU4imLZP04in8YQ3qtrKutVmmSn81 w6iH4F0wJ6fAXO6jLJmBfBcMN84sVSaOkLCuzqOTZZUrVPeIs2vvCGHWMMG2 YcKMz0Txg7Dja8arvHGkz47dF9SbsawnP+YT0Z5J0tLVyhMTxAAa6UORswsR 5k/YsNGdessD+os2fwbOhnT7V9Lsrylf8RZEPdhw7tdbsHGIOH+JqiLZaD/u gZJPBW6WXHM7gPj0EY74XReGG/DEDQOEmV+Ij0yR3l2t5CR3S59aRvS5vbSv 5+7HP7Vw2C1c1Zqhh6CjKVH7wFdROVeCJN75KAaNqYaDZiQuLjA3+CruLEav +8EK+d3l8lsBqqoA9c1F8poAFfZ1AMjkmJDpFyKIbDPOxZ/ApGtbmKolTN0Y pmmFOGWbwZqoc8Tr2LT7fT91nZ/65DTZg3UoEGA/SDpQZzy4LEdZ10eZpso1 6sc9HICOR5mGy0u5Lo49X4keRWoL5ijCPhUxGpyrC5U3V6uqo7SN2wy2QjME IHu/Eu3+SryRpkUgXhhF/gMgxqjuLgAI3r0EaZ+L98+Wl/irHiXpdn4h2jpM lDVcFNCHzyKUkb93mfsmP/hDUfwQccYICfgb2V9L2SuA3+L1Dn9tH0HCV5JC H82dNNJlOOyOLEM7zGz6NX04x0UGr/MlBCnvC0I/xDGZY1NklxfJUfZuPwLs c2fj2VnP0eMfXNRBqm7ZaWzdqn+0XnWLqUOCm3HSDVMfsDFZw2Nu4GxcmiG+ uUB6c7GsYp6s3EtxdamiNVJt36ixxGjQRdltQpKuvSScSgjgOO1uidS0RFJ/ 10KpJVaLfVwJGAo1BWuC+gt2TJKW+aqsKTpbNgqUwLtY4L2IHrlhJ9pUTTA+ ty2bSjxH3e7HY/7kmpeigVyR1MGCnZNl/u9zdZPrS5W3fNUPYnTNWUaWeDky XlI0AYutYOOzX8dKKNyGSz/gxpw3+L69BTtHIQ40bNRZMg2FY8Xbh4syPxct fIvHIhQwdq+eAsCNTYM53GD7j/2TC7za8p78gL7CjPGyMz7qRlYfQXlcsyPN WLseD3vzUPHEv/BY3Ra8nWU9kKk4fbj4yGTZlUWKWl/FPygB/72v56bR+Xru fnzngvO2Zo38QYzGlmNshFBltbx8OlYbETdOuOFfxtVzGgddm7IMl5fLT08Q XZwlLZ0tq/VT2jeobVFqS5Sa8iFmFFE6SLJKF4j0D55IY/V2GtK/tkRmD1ax 9Ommz8Tr+wt3T5ZW+KlaE3TWND2mUw6am/PMTTkm6yF81vXFykcR1EaVYbwH pk0pjjMzZZXLlfVBmvp1Hd4Ia+2+uVJ1J0DzcJO+JdvUmm++vllXMl1aOB5x Y2kP/sSXXAAxRv6+C/yFGGTxO/wV72Li9GG8U1eXAoed46Ss8DqCMhJePXDk ZOMgccYXgBsSwI2V7+JLzXuTHz9YlDZcvGe87IqvGjvnWZ6TZCibgrQnpsvX fyhiZZQvftdl0l94EN2s+0CQ+rm4aJLs2qKnOf363CL+wfVX6PH8e3t8wQl8 x1dh3WVsgVBlnbJygXTfl2iGqHx6jtwG2C54UJnDtTZOe2qCqGSyqGoJeib2 cLU1XGUJU1m20ODbYbrmnibN2fMemLUgEQQ7iTTdW4ZPaVmrOjRTljVbkTJS kjdZVumnbozV1W3UOrKNcAz1mYaHaYaGNGNDuvHWClVTLDonNbG622HacipD nJ8jr1qlalqvqQvWnJynSBkhYSPw171Ut7zV99dr6zbr23ab6rON5ZGaw2vw KWCty3ryAS6mv8obQSEDuAFz38BnbZ0mr0ylrvvjGFhVRmi3UiQCZv7F73A3 rx78dX2F0Z8AREgyRyIEQYSytCc/YYho19eS4hnyi/MV1YAbm0kc8whSnTMJ ib1jZSveE3xJuAFvylwU/w+EycPEBRNlz0Hjia2/R//1j6/n7sffW3Aa127Q WLfq60JVt5bLjo8TnZgoojyDJ9L1XMIpdcQQCCL2mm76KM5PFl31kj0KQ6u0 rFe1BSsbgpT46Emi7ikhredzHbgBjkQbdZE9jNTc9VOVrtMcWaPOnyE/CLjh o360QWdJ1l9YKm9N0z1M0N0jir/7S2T3fdCjuOKvvhmsuRGgubBEeWyqrHSe /O4qVWOAutpPfXKOInm4mM2fXl+qurNWUxOua0gyWPeaa7YYzgao9i3GZMja PoK5b/CmvYw+xsSXeAw3plM7aPo8xdVMEwLdUfd278XvA+G8t/iAG4AeADhg 7FEDRSnDxIAb897kjfuTi18fdFR2fiUBp6JyqbJtnea2lyJvlBhbQFGGEnEj fYQE/JZJf0HcGPUHl6//iBkV3z7CxM/ETx40Hm9aeMJv/XRXJ/Rf/8J6jh7f Xngy7zI2xWju+Soq5kgcGbprXtzYKXaVX+6KoQfJTAO8nJskujxPUhNCuBGg bA1QNq5TtuUYbcdp5uISEWKcw/3x6QdccdItibg1YrXNWaY7qcbLkbqzK9VH psmvrFTXhGltKYarvqrGjZrqcPXxieKGCM2D1YoLRPVZskRxebXqqrfq3FzF mRmyS3Pl1SuV1atVOLk2S856OM/PVpTMVtwP0tZG6xtTjfZ9rrcT9SfWKHNm yBJGSsDfgH18egm8ewvnvskHKx5LJdHF7wsyl6rupxsdJzGjYs81V0bqwN+I HSxe9b4AQow5r+McHARBEQMQRX17C9gMC9zeNkLyeM72zHT8rk4vVTj2UTC1 QhU5HHfw7YVTbGP+iC1kgEJregniBj8F3GDrJ3jad0L/9S+v5+7H4wsTpDGa NghVwHNI1zl2GOxJ2psr5A05JNF4rRs6Hmc9MHuZYyydKSmbLr4bpLTQxH2L n6LRV9EQq2ndY7IWe3B0o6jy3IEbjixDWyCNze5ztRxwe5huqgrTlS1TVSxT 3QvWtiYY7qzXFEyW7B+PONAcq3u0TnVlHoYMJ2fKzs+Xly9RXpwtKxgvLp0h rVmuuOGlKF+gODFTvuULNM9DE2XHp8hu+GnqNumbM4zWPNfrMbrrC+WOAFXM INFSmi6JGyIO+Ui07F0By3mC47HiI9EuH82DOL2dBBfsmaaaSN2esdKMLyRL ewomUBJjeU9+6IfCVEIncDPmv8lb/DZ/yxfirC8l2aOkJ6bJby1VVnkp94zC HU54c1xD+5YpmZ/DpBvH/9kF3g7cD4hcYj59aiSiP8FTvRP6r39/PQcQtuB8 tm/R10Wqsd1rlxHQ4+I0cS0bCbnxApKFXvBkoYpjq/7iVPEtP0VzKrJzYOpy jfzBKnlDKqYj7u4yO8qIAex4O24gFZg1Ug2+CiVdPWx5bnXJxtsB2tur1Q9D dK3xBke6yb7FxOzXkqRvDFVXLZUXjRMfGi85MVn6yEd13091YYn84Neiyvmy y3Pl4HuseY+fOFh0ZILkrpf8wDjpuUXKhgRD6zZTaH+OJtQWpHIEc+nTrK+k sYPEEKqwGis4AN5DxMWz5A+pZmrfY7alGluidOdmKwA3IJCZ9RpZ+ruC8I+E CUPQ3/BDf4O35n0BOBsQpOSOlh6fJr+5RHlqumwztYgcCdTcP+J+Mx4/Y8Sn opShIoAdOK8m/4U3+WXs9wB/4zloPMnVCf3X97ieowdTecMMZ64RwKEtXFUd qLQwPYJrFH0Uu2M/WJbhwhTxjZXy+gStYzuaSeOKjobSqmXyk/NlOLR1jHDj IOVLC1wd8Vrk8WMjbIfxoYZofZ2fxhKpsycZWzfq2ygLao3X27cYW6K11T7K 4mlSxijeFKhpitTeDdWULFccGy++OBNdkaC+gtRhouLpssYA9aPlisLxko0D udbQwxOltSu4Tg/rek3uaEn+ONmGT0TzqeF8JJVUwGfIH4uvY0s1OHYjPYg1 VFs2Xxk+QAQewtSXMQey6j3EjdhPO3Aj+TN0NnK+luaNlR6dKr/hpdz9tcS/ t2DTV5LCSN2dE54PS7oeW6hI+0yUMEgEp9OUl3nTXuHNep23rKdg7QdPTR7l p3lid0L/9b2vb7sfP6nvHE/sI27YwrHdYIlW31osbaFZtu6Mn9wZqoA3cs1L 9nAjkflkGRwpaPK2QFWbD1prc5S6JU3fgRsHcMy2NkVv36zFJAlTeCQNR3xW jN6RZqwL0jYGET9hCI7BWjbr64NUJfNku0ZyonK2zfrWFMOdWO35RbLzK5Xd v7ma1igLx0sjKEcKV//iqdKaFQrbenQ2HBu0N1aqdo+Whn2ELwWY8FV3lw0D RRDj7PgSwxxrjM6xywSvbw3SFk6SgY8x8SWILHASFnAjlIq8MZ8IATdCPxLG DcYEae4Y6b7xsiNT5Ceny+MG48tGT5AdjDXcLnKvPuFxYZG8aLxk0ydIXjrj VR4EKXPf5K98D0u6zxs2nuTqnP7rB1o/2fgFz+39ZsdOgzVOe3ScqDFGw9q8 MUHaHqps0zs2a2vC1ahlAEENdYE6NmgcTuEzBJM9NPW5H8flHDmmhhR9hZ8S EekKZT8OuNkSDVZqkfr2sqcZWiI1l5chCrUEapqJX8uRZbLsMt2O4rg7koaK AQ2urVI9DP3Gi2SNEJ+aJqsmbHFs4h7KIoiA6GP6Kxh9AAKkUNbi4Dhp7To1 HL89Tn9+mTL6c/G0l10YQyDDjcC+iBtRA4TwrIC+wphPRVtGSHJGSw9MkBVN lu/6WurbG3fYMFNxIFJ/fa/brQL3ysXyg2Ml0QMQN2a/jqykC95+akHKT/AE fnx1Qv/1g66fJnqwgMWWpGtaq6j3VaCCG2Mpv0ShCqDKDoMjWXc3WNWC+ECj FukGjEditThu71RjQc8EgCXb6MgytqUaKv2V2McOr1Di6Shws6UabVE6e4Kh KdFwiYbTL81XlM1FrHDEaC2bdDd8VFZ/tSUcE6eOHdysbgthVOIQZBE/NFl2 a4260lt9aZny4HhpYF8BGHg6EWvUU5YScMMRp0v+TBT+odCvF/LzgAOw+B0+ XPrjh+Bu8Z8Kzy9UNG7U3g7T7J4q8+3NX/I2UgXOe5O/+n0EjYVvYZ8nxBrw LJ/eWFtJHS7J/przN6I/Fc94DWOfqMnyfcG6i1tMFTvNx2IN+aPFEUSWPuEl jHcW9xD49nnubPwU108KPfAM32OyZ+ibg1WlsyX2NJ1jn9lO4ibtoUp3Ujlp pHkWvL0HRe1xUjVeizQdjL90pwEVWODfDKQjvu2vOj1V/HC1smaZwl7gZt9u ssUZ7MnG2o36E4vRPTg6RbbwLd7mYeITc+UNwWp7mNoWqLZF66zpRluuq6PQ rd2pyBguBss9M0txfamqZJHyyDzF7q+RwxPsmrkW1T7qxiBN+WJl/nhp/CAh WDEEGkve4c98FTHBt48AQhXYLay/YPdX4stzZLcXybcPF4X3F4T0FwT3E4Q5 06GL3uJT2MLFGiEfiRI/k+wYJc0bJ4sfKgFAGPtn3qy3BRFjZPn+2lOxhvNJ xkNhutxR4pD+iBtj/+Qy63X+0p4o6PZUOjee8Ds+X39z/XTcDyyvbDe0hKuP jRVZwlUOuL3LWJ/HjYowyQNHnKa7k+cHtduudXPceRF5jCFyOezaxGh2wCHZ akCGrgRDzVp1Y4Dm/gpl1WLF3cVye67Znmp0pBlvh+sOEcvN6ndRCi1msKho hqw6QOWI0thC1LYorX2bybafOtjzXB2J6G/s/hrLGRWLlBfnKw9Ple+ZKNs2 QhLcX5j0mTiPsp3NgZqHazXn5yt2j8F8KeCGf2/BUsIN2Fa9LwjqL5xP7eJF E6V3vfDdby+Wb/tclPG5KHWYeOeXXIfG4rf5U1/GHMWM13hLegoC+4s2DRFv /0qaMlwS0F8EAQiGP2/ww0dK965SFwVpj0fo96/VJs9UgJfC/A0AnBVPQ2j+ p3CW/setHz164HmebWS2c2K8yBqrqYvV3GG6q5u1bJYTb7BCbb4Z2TIruznu vYgDbvkma4G5LpmSElv1GJsk6R2b9E2h2mpvdeUiRcU8+fUFWIK5NEPi2GK6 GqjJn4r/gnV79xKEDxTtx34MlSNRbw/X2CK19q1GeyHhRibi1cV5ikOTZBfm Km4tU52brdg/QZYxQhI/VBw3WMRSnTeXqywRuvs+6lOz5Tu+ksQMFEZ+JFzb R7C0B3/Wa7zJf8GGrvlv4MxI0lDxWVKKr6TjuTpPfmiCtHCC9MA4Kfvs7CkQ p0x6mbfwbYHfB8LYIZKs0ehs+PcVznkTcWPeW/zQoZKcRaq8FeqDvpo9q9Tx E2T+fRA3JlNyY3Wv587G89Wx/qb78aP5vZD8PE5b4xQgqPZWVHrJ6iPU9gQt l7tIICnq3STkVEK4cfdFJOE55Nq23/wwQfcgVI1dZBC8JOgdG/U16zQ3livL 58hLZsnL5qCdnp8haUs1XvRWs5AhdZgoqJ8w6ENh7gRpubeqNdng2KCxhWvs W4jIF6Aj1djkrymeLj81Q351kfLuCtWpmYrcMbLkYZLQj0TghBwYjyBQ46O2 x+qrVquOzZBv+UIcM0AY9THixrIeSB867k8uC97i/1UmtnKhongqYsXludyx JQ0Rgc+w8l0+uCWzX+dPf42/rLcwdJA4FYKUqYqNg8XefYQsubGoh2D9QPHW KYods5U5i1W7FiljvkSVJTgTpmE6BftJnjBu/GhOwh/3Gv3YetrH8r0tONVb N2sfrVXeXy6rmCc9P01c5atoStDaErW2cDX2eCRpUb8eIhGIXC54YsEF4pRL XR0n3Fr2mh5s0lYR5iC7YLyuNVJb5a0uX6g4O0NePA2t++Rk6YXF8upoTfE8 tNOUoeAtiDcMFME1ffsY6ZlVqocJEN3o7JEae7oB+8dy0Mm5560qna8Al+PO MtWtpSqIVnaOksYPEYd8KCyaJCsmCvGHgRrrJv21larCKbKUz0TRA9DfWNdH sLwnDtSPJwIfAKi1HwgBVS7Nk7f6qK4uUBSOl56eznXX7xuDfktIf+Ga9zGb irKwb/P9B4o3jZTunCzfO00R9al45fvCqUQgtvRdQegAceKX0tRxsq1T/397 5x0V1bn3+7tWjjBt971naLaTvO96/7jr/nHPfZN4zpum0dg1xkQTe0EEFUSk VwEp0ntHmkEEpaiANGkqKmLBDihFRVRAep99n2cPMUaNx6gU9fmsvVjDMLP3 Zmb2d37t+f2IjJ1k+M9Sm+mw6Av81eob9VETjffvQ/iB8J69a9DkCKZb7fEH vlS1I9EUwvSnawwlygcCaZhdTRKGIqXIa80x2N+v9u984yewWeipiV3HtB5G c/VOgm78yvExXEcge9uJvmhKnDXCTwmNvosMsOvudMt+OII2cbk4V1daoCf7 9Rep9wJx0kaszIlujNXgD2spo1g+WcEfESKxUVxfANvsTsNV9m5MvT1VZkSk rpVF/SjJ08MqTYkqoUFfR6i8e6+iyok6vgVLWCaJXALjG77zoW6Yfznc0hw8 JWKp5OgGGfCbOt3omxaw6DRHVwaclPPGeIGgG2FLxB5zRM6z1IG34jxPHLoG S9lKFFpSuTvI0B+kjrNEW6fBvbnMEUf8KAX+S+wKGVCPZH08SKgVAZ8E8ADz r0ZPN1S8T5/AD4r3SfbBZ77LjWgPZZrCmOZ4TpmvBUe8+dHN7iScxxRKX9ku u2uNwTWzQDfufQyL0s9OGsjSbI1kG3YRFYay/A2SlF/EZVukJZth15qSrfhx IXpQYkrc9h0uxsjZAIu1Tm3D0tbKwpZK9m/AzjjRD+M04Bzq7N+aEsfL+UiO D2GVgWyPF9Pnyd6yoUq34gdWSUOXiM8ZE7VCUuaeO9MTo2iLHM4F+8xRj1wM vQm/+XDuvEo3YpfB6c9gy9uMNTlSrbvpq2ZEwWaoGHftyWpLIm8T1A1gqADv xh1Ix3cin6WSeAM8y5w668zk7CQDv5fYfQsdENMv1ffME4ctlSb8Iov7WRqz XBq3QrZnrlj/swmquCgSDcRf5f1QDzityY/qTtdoS1UoC7UHkuS9/vSAH93o SZ7Wl9w2g61HG6wwaGkA3QAmx/nJfKZmezRX7UqdNMIyVktObpHV2eCN1tg/ ngMOmxbSNLXWcNVJjh6WvE6WrotdcqY74zWUR7R5Vb+vJAWfIAf2hko3hnzZ R840sC4KDXBgohzTxcqM8HphyGxzANefCHMu1l+puc0ajmOcNfzDoTPWwSY8 YAMi9tiFfuBEXTQhCvWxa2bEXbvfB0rG/Cj2XyjymS9ynS0KXyU7uJMscmSu +HDHTMmAJRKr6cNBUa8F4tAfJPtWyMAGw7NCZcjmT6FubJs2qrrxHnzYEE94 FfNjPL/j4JPfv4fsP6joytVSFmn3H4B1HX3eVN46caWRtMkGb3YmHjgTsBD0 7sf8w//gKycPZmvV+TPlNkSWnqxky3BOkw+m+SBaNXTplg1ZAzt6cbChcQ5U hnYXstqaOGNKHDfEj23CqnbTfXGKoTQh4XtIc2Cf4kEAA3UjmFUGQN0AopGz CUtZJY39CTopwPAAj1SGcJ1RctXaeeuv1XbPgnMQMjfIbliSLS70FTN46NTV sHlOsbCdMSZ6PJi7DtR5E+K0IV5rQ1YJwZaK7XjGGmn8Mkno9+KAhWK/xeJ9 eni2LV3uxd4OlWebkf5LpeZC8x/bGSJgXYQskSTA2UyyxBXA+JFYfK1uINgb Rv9EuoF4U/5MPcb/2w3LOX7llGU6Q8Xa/cmK7iCmx4Ma9KaqTbHHu4g2N7Ld i7xjg8HRsUA3rk1pTtc870zlbMP2LZdcs8T5aGHcG/gZxcKCUiAg/nSrB9Mf LofDUI5q8TlaQsqGuulMVVqT50yIBle6N1o+mCyENQ5qdu6V17jRQ5Fw/qMy gBnwZs5sx8OXiN2/Uwf2RpYuVihkUuq82AGhwGPn/8CyT8eZ6uE/SPL1ceDC 9HtDn+i+I33dkgQqcX4n2MiLpmS/F1trC+2NSzuJRgeqcidRsgUv0seyNkgT f5ZELRUHLxZH/ixN3U6UuDDXQuQ1YQrgrfj9OFwpav8tdGSCv4fti5NXyw6s giJp/C9Y8gHeViQaiLfFM+bHu/J2w/TKfvlAvlZfiqI7mOlyI/s9qHvWeOdu osuT7PGnHrkQt0xl/INPBq5PvZWsWWhH7l8jdCtN04RjZ+M5mLcFWywHBSQC CAjLA93Yp4APyBWckViuxY+570bXOVCP3OiecPmA4HHwKZrNYdxVR+q2M8WH MEA3HgBR2iQDxsDB1bDzZ8Z66IYAk+PqLlhebjcd1ndZfwMrPPcukwK74s4u ulNoIHbHAepG9S66PUJebUOBrWsPA3QDiMZNS/KWNXRSgBmTtFJ6XE92YIUE GDNhS8SJG2Q5llSFL1cfp1Edrsi0oHx/khoJyRQnoU9p0GK45C1V6OcDnJot n08wnIZ0AzEivHPRDxgjPSDviuW6QpiO3WSvG1mkK8lYISo1kAyE0B0+1F07 rPf61EcXp1QkaKSbk6rFpHy2Np+mAYdTpwg1YEkK/lc5rBnby/J75fyvGtBV ydJSZmg+CSx0ecLLvydYNRBWS5ms0RjAXrAhi7di7V50xlrp4bXS9DWwqvOY 0BEUeAf/gF09sVw9+KvZF7CBhs036rHLpcB9OGlE3Hemm12gbgDD45IpWevK dMXAVbdNzsxjN6bOjqo0JRrsqCum0ElJWyuLWCoJXCwGW8AiuBVZkycc6Rth 8uaDWlWRiqOWlM8y6ZN+g44zh6MoqWtgZsf+W/Vtwp9GUzferQ8S4s15t5Iv sBmpN9W6e7iNPyB/vbh0o7jekRgIpZtdiXob7EHpxLOhXLIQcFC12oADVtIU /GFN/ogmXK5ySANqSJJgbCRrwPtztZvCOfClf8OeqLWET2x3HY5P8smaPfs0 ar3Ys+a/RyyfJkv3DzFPz3kio2kTgG4AxyFzI5yXdMaYqHeAQnTfib5pRVWY EHe82MZgrjta3h0ub3NjGuypK2ZknS1Vvh1XqRBQDJ8FwjZfHPqj5KQj1XlI Q3lMuzdb52aU4ogV5b1cqjqc1dcwS+sxVwQcosilEiBWQDHAZv6V+qjpxrvy 4UGMBO+KgDwz+EP16+UdsqEwusuHum+HtUazpz2ZpLVSuAjuSdevbE24rjZX mLSSqckfFTQEqAcwNrK1BrK16n3ZG5ZkkwczEPvbctowZsAHpki6hJY+gHPG eJUNbBJ42QyGMc9uxy/sJFS6EbNMsn8FbFPsPEtkOG2C30LxeRPirDFxyoio 2AmeAvdTb09fMScvWVL13uwNT6YlhGsP5trdGeC83LIhr5uTJcJQV2AzAN3w mCveM1cEtqiV0nJ3ejADRmB60rWqIxVZlpTfT7DSDBzL8mt1hxnqLt+p+y8U qyrEgGKAO5GxgRhl3gn1eAZwjbR7kEOh9GMXoiOSGTguxCuuT4UdzlUNfFQz 5Ut0oIYUaPP5wgaHxsLRkJ2HNGs9mFp7qtkTehPAl1Hulw+FMwNeZLcvNBUa XGmgEkBYHrrSrXuYO7socPuaBVllTWULugG+7sHmPFPd4is4TK14C37Hnqq1 papsqMuWVKVgqwD1OL+TvGpPX3amLzrT93zYVn/2kRd7dxcNHnx+B5GjCwMU QHyACLjMFrl8J9r9nSh+A7yzL1ljMB16UnVh8lyzYcsH6AM83HT13bPgunun mXBdnt0MdeCqIGMDMSa8K+aHCtWM+6EIpteH7A4Xrv2qqbBF2JUpfIXQLuw0 7DIKl82engTXs5yc2Jsm9PwBLkyRzqMExV1P+p4z3abSjf2K1gh2MALqRpsr 2e7L1DnRlTuJu45Utw+rDOI6PBngdAD/4pbtsG4ELhI7TFcLWCjOWCe7uJNo daFb9jD33Jhbu5mrtlB5KoTsyWlj4oINddKKPG1L3XKlH3kxTe5MoyMsBTm5 FU9fK435CeZefReIHGfCdXAO36rv34I1B3Jwym0a1I0bLnShCQyD+MwXbf+n mvmXarbToasCRMZttghYIEBqgOaMkG68o0F1xOjzriydg+Vh3iQfQveHMbnr xMc2SuBKtyphJsJFQTrKJ0Lz4+Jk/vzk3lztjn1yJbA3CrSVJTqtCfIHXnSz 0GwHLpxPhNUaA5FsvzfV7kI27iJrHajbNuQjV/qWHTngxygD2F5vtsWVuS3U iEYulcCp9LPV45ZJgKUBzIxWL6YtkGvy4+p8uOuOcLcnDImy7USZMVG8g8g2 IopNiWsOVJM7FKs7DhSQmjwhphq2RBy+RAw0ASiGzXR1ByHm+cCT7YyQK5M1 H/9WhgoAEmH0TzWzL9SAyQGkA+gM0A3g17jPEbkJi9pG9NV+/muloKDA1tbW 1NQ0NjZ2cHBwRI+OGB3e/D0d/0vnVCYH4NRmONO5zJ7IXy+GxefXYS90cL/y wiS4/O3G1L6Tk5rjFa1R3MABBZ+q0Q/8lAR5WwDTKUxvHIqU9+6V3/Wgq+3J Ph+qYzdx34EEonEFloLLLpnira5Uvzcz5McO+rKq2vKopRLf+SLgXKSthcbG 3d10SwDXESV/GCFvCJPfFDIpuZvx4wZ4vgF+WA8/oIvlbMPPW5B3nKgGB+q6 BVlmiB8WJrJFLIGLZ73miuymq5t/pVa0BQeeTuNupj2QG4zX6IqS17lAFQLa YvmVuuG0Cdv/BTufA4cFeCjO34mcZol2zYSaMwpv09OHePDggZWVVUdHR3d3 t6en51uZFYIYW97uezpupQPoRo2J9LKR9LSBtEBXesGDrnAkYAVpjdAL/cYU lap05Ou0HNKs30M/CmJ64zi4Zi1Z0btP3hPKDgTC0ixllLwjhKt1pMqNsF5f qtOZaLInrpjgR9dKMtfBkvUGW6LbnerzpHs8oCCkr5UFLRIBOyH6R8lxfQwO pvdkWsLl3YkaLfs07sXBCpCMDTCxclQXO7QO27dKFrVCmrEJO2VMVFuTwEPZ +wOswTggJHOFxbMijznqnnNFv66QFm3Fb1hRtQ50ixfbFyHvi4bL8wv1sZDv xYbT1LZ8DnUDbGZfwogoUAzbGXDdPXgpRsHeePrXq1evZmZmqm7n5uY+6f+P eHcZifd0fNoe4Hq5aiw7u1VWug27FszeipNfciD4+o/5W3/na6Y+yNVuSIJX cZ0/W+NANnnRneEsrOVIlA8Bn2UvNyQMH+H3Klp82JvW5Nnt2D0f5oI5fs8a L9SVlOhLb1ribW7UNROsfTfZ5UrdEdaSJK2QxPwojl8mObhaem4HcWEn0Rgh b4lV9KRptR3SakqBeRBgYyStku1fJYtZLg35QRIktAkFIlO5k0heIXk6jRv9 gzh0kcj6azXPeaLEldLircRlc+qGDXXfjekO5Ib2wjMEdguwK/Q/m2AojEtQ /bT4ejiZAsyP0deNJzx+/NjBweHmzZsjenTEaDIS7+m4Ug9wvYCLutwQK7ck bsfKW4t16mO4K3b4NUtssGZqXbrmBX/2vCPV4TQ8b2UwlBlOue7jgMMCjY0E jcEI+X1X+pIpcc6UaApgO/bKq12p0u3YdXui2ZuGS1Tifw8ynDQnEn+WHFgh SVklzdXDqq2ps6bEnSh5837NniztjmydlgyY2Tm6FY9ZJg1fKvFbJHafK/aa L45dBhfRZ20YXjsTuFDkIwx+tf1GHXgoDjPUveaJ9q+UlWyDadxKc6rOiWn1 hXVoFSakzwLxpv+esOVzaGmYfAF1w+ifaqZfqoPNWJCRkdaNP9t5SUmJhYVF eXn5yB0aMcqM6Hs6TswPcL3cMMUrtuOXnenGg5owOVuo3bCXq/GkmsKYrn2c 8pCify/b5Uv1elFDHhQsGT2swR/7vVKUT1CAr3XgpJw2wi9YDac7lelajeHc nUC2N0GoE0sXis8Ltfli7YZILncLdngdnKF2Zjtx2Yw8ZU7WxiiUJyb25Ot0 F0/syILtT7O2E0HfS7wXiF3nwPiD00zYeVg1wDFyCSxq9VswnEV1+HY4OQLE AZgoJYbEaWOy3IS8aU/f94BuVPIa2eZP4ZBZVVHoji9gC8Gt09SAYhgJy1JU aZSRey9euGelUhkRERESEtLW1jZCx0WMMqP5no65gICr5sIOvNqXBTe+/fgj KB1F2g0xXGuKYiBbk09XDCbLeyLZ3nBmKISB61ZULY5zoXQMRrLdwWyLN3vN hiwywCrtqLaQ4QEofLZ2e4omn6mlWjwL60DOwDFwPakaFx2oPD0MOB3XLcmT 2/BSK7I6brhOrK98cm8e1I30HWTIUon7HJhdtZuh7jgThi+ilkLFiBF+es+D fb2A96FKpHrOEwOdSVotK9pKlBoSp7YTlVZUnRBf9Zgn3vj/Jhh8Dm2MnV/A 6lCgG5s/UwMyov8Z3MZENyoqKvz8/EboiIgxYUze02fUY9SUBFw1F3cST0oX VNLRVqTdBcyDUzpwYnW2Zn+SvC+BG0zg+ENCQAOWlU5UWR1NnnS9C33ejDi2 EXoQD4O5wcNAK4SW6QXCz9NCFdm5SfzlyUA3+tM07wWyQC7KjGBVWNZGrNBG mLgkjIZXURWlyLEgo1fKgCzYTFdXlVs4CwnWkMWi+GVQN/bMgUkQ19kwhQrk BbgzwKk5sFqWp48f30IUbyPKzcibjnTqOsz8K3Xd/56gMjDMvgK6oa7SDb1P J6i2EdWNP9vtgQMHDAwMtv0G+HUkjo4YTcbwPR0T8+OZeqfvPoHSMQguc2Ah ZGnyRdqDmZoDhxSDaRr8UWGZ/LUpcN69oCrg16u25KnteJ4+ds2Ouh/M9Wdo wfEHx4XBT6mqx0+FT7kyhS/VGczQfBwlv2xBXjEngZ+StFKaby/oRp72E924 FqMotqMSNmIu84ZHTgPR2DNbHdgYEYKTErRIDBwT4L8A0QDmBHBnQn6QxCyX Jq/BsjbhOZth9vaEMXSafBZKTL6Aw6kN/6kGbpj/phvAzABiAuyQJ//7SLzm Y+6HIj40xtZ5mfufUDr4cxNhN+NCbWWx9mD2cEwDjm+rnspXTuavTAaS8jiG ExIWsASr0pK8G8z1AN04PpEvnsiXCpaGyk9RDZ08MZE/rNkRLb/nztTYULl6 WIwwLKlKtZC2aqrqEHX7NE670MlbcY/vxQ4zgGKIgFAELRKFLBZHL1UFN8TA AnGcJXKfK/ZZKA78XhK1TPrrSlnqeix9A3ZEF8/Sw49vhbFcl9li4J5s/nSC EZwWPawbRjA6qq73qdr6fyDdQLyHjGH0A15QFybB+bD5cGrkUIlw+Z/QgYpx dTIsJQUGyflJ3UL/4aMbZdV7mCtmZEMQ15WuBUXjxCS+RDA5ouQqH0QYuDCR P6LZFSNv8mAqTIiDq6VRQqjzulA/Bs0Sod7s4QHNC97DjUyBXeE+W/3ASmna GmnKKmniL8Ks+Xki4Lw4fweNDf9FkvAfpQkrZIfWYUd1cSAdYMvYiGVvxkN+ kO6aJTL4XM3gM5hJMf9aHfgpYLP8Rt16ughYHWv/7wjqBhINxJgzJuoxPLEa mByqAffA0gDb9SlQT07q8Kd1gMkxVDaxIUretE9x25W5YUnWBnIdQDeAaJRN AuoBY6eejDIepkuGzZWjWr2x8jp3ptAQj/4RikD2DvymapFL5RS+5u/gRpew riRZH3OaKfISpiGkrpGe30Gc3Y6r5rK5zobB0t2zRcDYiP9FFveLLGUtlrkJ mhlQN9bBajGYq10isZ0hUmVgd/yPGpALmxki+5kiJ+DjzBKZfAnjHiOkG0g0 EOOHUTY/4DVVoq0aAwe9ErDBMIUQFAV6AuwQOIdlcnehzqN4Rd1uuLa9zod9 nKbFl02Gw9qKoFZ0udNDQdzQAYWySEd5TOsfz3F0C1ajGip9fjJ/5+MhYVXd RXcmfp3MXYh5us0WHdkgq7OlqoU8b+RSidMskf23IuCeHNmIpa/HDqyRAd+k YAuRsxkHovFEN3wXSYBWAN3YNg06JuBZLnPE7vPEXgvErnPFln+ck/JWXtXx v7gA8SHzwk/mSHxWVWtYoFdSJcRCq6fCjGqiAhohGQq+QIs/M7GvQLs1VnHH ia63Jxtc6RagG0A0KqDHwe+Vt7jSPf5sX6h8KE0Dqkec/KYdsf8XcdgiUdhi Udj3ogxdWa2LEBotn6xs/ORB8cTaBI0yByp8udRXmC/vNV+cswm760AJgRQ8 djmchBK2VHJMD6/YSR7fgh/egOXp4yeNiHx9PO0p3fCcLzb9Ul2VMfGco+49 XwyUJOB7ScgPEq8FkmeiwW/x1UOigRjPPPPVNkK6wR/RgKmT2r/zt+Eqe2W2 1lCsvDOUhY0EMzT4fO3BPO22aPl9F/reLuquPdmcojlUPpm/AHWj3Yu570w9 9mW7ArnbzvRgOPvQicxZL4lfJj67E2/2ojM3SFNXQ28FtjsGz6r/uC5f51yo vNCC9F8M+/AYTlMLWCQu3orXCOlacAPohstsUcYGrMaWrrahyk3IfAO81JA4 ZwI1JOMpP8Vtrtj4X7A8Y9n//hv4GboEjk2JWiaN+VkK1GOEdAOJBuJdYURt Y3h9FWnD9fV3PlaemTR4SHMwWt4XxbUF0XCyW7qGMke7M1Le7E4/dKbu25Ot CYoBYG+ch7pRY0XUO1Jd/iyQjpu7qFJj4pyhLP4ncb4B1uBC8xEcHwkzKfW7 SFhWegJYNVPvl048EcilGRFALmymq2/9XC18qaRkG0yO1NlRRVvwmOVSYGyc MCSAbtx3Zm5aU2d3wALR86Zk8VYCeC6pwjrZ4CXQnQEn/8v/+duTfyThF1ni SrjsBRkbCMQTRkI94CWWpwUtjaqpA4U6fUAWIjngbtx3px4H0HC4UqpmTzjX 5sm0ulLNjmRbJNcvxDdgZnYnfsuBGgziHnoyV22pwm1wWNuhtdKL1mRHEMuH CenXaDkfr1AC36dAh788pfXMpPJw+X4D3GMuTKHu+EItfT2WrQf7iN6wJIGf sneZNGWN7JolXLz20JVpdGJuWFGXLahLZiSwOrJ0MVWXct+FYtsZf4hggNuH 1srS1kNrBBkbCMQzvF3zA15iWZpDpToDFyf3ZWp3h8OR08pYebMPfcsO7wTS ES/vC+W6vJkOd6rRjujbQz0UOo42eTPlxvgdJ2ooiG10oy9akrn62L6fJQVG eN0eBrZGDxV0I4IbipEPxMqVYQx/blL3xcmXYhWpxoT3TxLDb9R9Fogzhf5g +fo48EQKDPDon6TgZ44eftWKat7DNrkw9xyZalsaSMcpI+KY3rBueMwVPd+/ C9yTsxl//v63FRR9850gEGPO21IPOADuoEZvjnZ3imanH9sbyg3tlbcHMlXW +G1bvCeAGQxme32ZOlui3go6FMpIrsaRrLQmynfgD1xo8Kd6Z7rcjMjcBHWj 3JJsD5VDM0NYzDIUyvVFyfsiuIFAWhlID12bciNRI9OaCt6EmXypdmgNnPAI Hpa1CQduCFCPfStkwElJXiO7ZEm1erKP3Nn7u5k7jjSwQE4bE3mbMVV96Z81 /Xvh/Ug3EIhn+Lfmx6t84OEolgRFR5yiw4ftCeYGo+Q9Yez/eooqa+LMVvhF 3+VDA90YCmOPb5ZVmuJt7nSHJ3PLnirbQWSsl2VslN1wprvC5bAeTCgT7Qti u8K47iDmnAnW40/xlyfXHtQs8GQiN2PAZsjTw1T2BnBVgHTkbcazN8EQR+Iq WYUF1e7DtXiyD9zYGjsa/AlYGnHLpc/0b3/Fl+gvPX4k9oBAjE/eMHsLLsbH ofJ2r9/l4uk/lW6WXtgOL/ChYHYojBsIYrt9mBsWeI8n3epG37AmS4zwg2uk hYZ4rTvTHsjyEdCX6fNkuvzYtiC2w4cuMZI1e1Gte8jGI1onAtiYjbIDK6XZ uhiwUsAjjwm6AbyM5NUy1dHPmpHtftxjb67Zg71iTYH7AxeLX6+3MNINBOLl PG1+/NVP+0u+yqHJYQ6dlKEQbiCY7fFjBv2ZVhdK6UM/cKYumxMFBtj+FdJz luQ5C6LZm1EVfXXtYdq8GNVujxnIGtzI7gC6pUD7tA+zb620yAA7vAGKRu5m qBhAN47qDoc0wc9TpmSrD9fhx7V6c+fMqfgVUsuv1F77NXm9J76VpyMQ7xBv N/kCLuRGe1KwN7j+ALbbm+n1oge96QEv+q4DecEEz9kkO7IRmgpnjGFyZGAv 1+fLtrvR4J6F//U31R5uOJODkUydA1Gxh05aIcnXG06qqnQDuCpp639PhYAb D725rkD5Yx/uhAn5JlMM3uR1QKKB+AB5W8kXVWXpoB87FAQFocuD7hQ04Rme PLLbn+4I5Vpc4GPm/edHT3bSF8U0ulOXXKiTW7BjurJDa4d1I1cfB67KM85R oxfbEyK/78m+4egTpBsIxOvx5gICu3b4sgP+XM9vrsdLHgklwg+Kxuz/+OiZ P7X405dM8RID7OgGWepvupGnjz+fQoWJnnBFrduY6QYSDQRCxWurB7h4B3zY ft+/cBXP/PijWZ989MydKlUpNMDS18rSBD9F1YrnhfUYg5GKNxQN/q9f/mjx GgLxQl7v0niNHOjLd6Wq3AC6UWBAvHDPb+Vwr6cASDcQiD9j1Nbe/hnPp33f Oq/x7yDRQHwgHD58ODEx8fWe+ybZ2/HPa/gpI3QmCMS4oqamZtu2ba+tG094 L/16pBsIxPP09PTs3r37TeyNZ3jPAoN/6R95b/5rBOLlREdHV1RUlJaWvi3d eML7oR6v/i+8B/8sAvEqnD17Ni4uDtwYCd1Q8U6bH8jYQCCeJzg42Nzc3MbG xsTExMjICNgeI3esd1FAkLGBQLyEkbM3nmfMs7evziue1fg8eQRipBlN3VDx TmRvkW4gEOOT8ey8vMqJjduTRyDee8Zn9OPfns94O2EE4sNkXKnHn53JpqcY 5VNCIBB/xji5Kl9+AmN+eggE4oWMrXq85NBINBCIcc5YmR9INxCI94Bn1GOk L96XxDdG9LgIBOKtM2phyRfuH4kGAvFOM9LqgXQDgXiPGSH1eFfq4REIxGvz 1s0PpBsIxIfD21KPZ3aCRAOBeO95ufnxV9eeINFAID4oXqgef3XtCdINBOID 5Gnz41UKyJGxgUAgnvAq0Y+nH4NEA4FAqPi3yZcXVpedOXPG1tbWxsamuLh4 VE4TgUCMR/5MQJ73Vjo6OszMzB4/ftzZ2WllZdXc3DyqJ4pAIMYfzy9+eUZM ysrK/P39VbeTkpKOHz8+mqeHQCDGLZv+yNN/ys7OTk5OVt3Ozc1NTU0dixNE IBDjl+c9l6ysrJSUFNVtoBsHDx4c9ZNCIBCjQX19vYuLi6mp6Zs3bD916lRA QIDqNjA8CgoK3vjsEAjEuGNoaMjKyqqhoaG3t3fXrl1Xr159k721t7ebmZl1 dXWBvdnY2Dx69OhtnScCgRg/VFZWhoaGqm6Dy7y1tfUNd3jmzBlHgdLS0jc+ OwQCMR7Jz8+PiYkJDw93dXXNzMxUKpVjfUYIBGK8c+TIkR07dlRVVTU1Nbm4 uCAjAYFA/FuKioqeDMvOy8uLi4sb2/NBIBDjn0ePHllaWra2tvb09Hh7e6Pi cAQC8SqUlZVZW1tbWFgkJSWh+AYCgUAgEAgEAoFAIBAIBAKBQCAQCARiXPH/ Aa9GOoA= "], {{0, 292}, {360, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{360, 292}, PlotRange->{{0, 360}, {0, 292}}]], "Output", TaggingRules->{}, CellLabel->"Out[2]=", CellID->249584098] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Loess", "[", RowBox[{"data", ",", "30", ",", RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[3]:=", CellID->663942630], Cell[BoxData["0.05374965131108489`"], "Output", TaggingRules->{}, CellLabel->"Out[3]=", CellID->612362556] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot3D", "[", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", RowBox[{"Loess", "[", RowBox[{"data", ",", "20", ",", RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "6", ",", "0.2"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", "0", ",", "6", ",", "0.2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[4]:=", CellID->747797642], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsvfdfVEn+/7v33seSOncDxnGM9x/gh7vfz352dnZnw8zO7s5Ojjs5R7Oi YlYQA+YsKuacw5idMTsGDKCAZMw5AJL61vv9rqpTJ3SLigpM16PkcTwdaLpP Pfv1jtXm4x9e+fz//s1vftMlgv145aMef+rc+aP4V93sP69/3+WrL77/7NMX vu/62Refdf7dx/8PO/n//l+/+c2X7B8c+0OjUYzP9eNJv5zQCI3QqO+DQKHi IsSQ0AiN0AgyJBkCISLEkNAIjdCQw4CC2mAhxJDQCI1f8zAv/PtFQYghoREa v6phudIfZvmHABIaodG4RxA/Rp08eYghoREajWwEWc51vtJDDAmN0Gjo457r 95Gu7hBDQiM0GtyoZazkMbwSf4ghoREaDWHUcnk+kVUcAkhohEY9HLVfkk92 8YZESGiERn0Y97sG68+CDTEkNELjiYwHWHH1c5GGGBIaofF4xoMtsfq/MEMM CY3QeETjgddUw1qMIYaERmjUyXj4RdRA12AIIKERGg826mTVNPSlFxIhoREa tR91tUwa03ILMSQ0QiPIqMN1Ua+W2G/uNWr/VCGGhEZoyFHnC+HJLiuVCXFx cVs/t+/80r7nG8eRjs5T3Z35fVwXBrpvJnkqU7z+CT7/1Gh2nxBDQiM07ms8 isv+iSwlufYXvmtb8p5txfs2BoQNn9g3f2bf/oV977eOo52AGwWCG9XIDXYf /8wY/5wY//xY/+LY+6UHjRBAQuNXNR7Rpf44V5DERerrUbPfiJr7VtSCd6IW v2tb9l/gxrqPbT9+CtzYh9w4jdy4ONB9J8njT/ECNKZF+2fF+OfG+hcAN/xL mviXNnngBvshERIajX48umv78awawsX4lyIn/idyyiuR01+LnPl6VNqbUfPe jlr4ThRjApMcqz+0Mcmx40v7/u8c6Z2dp3u4Cnu7Lg90lw3zADSYncK4MTvG Py/WvzDWv4jQEetf+oDCQx0hhoRG4xuP9GJ+DCuFfBej/xU5Drkx+eXIaa9G Sskx/23gBpMcKz+wbfwU/BucG91dBb1dF/u7ARrk35DcmG9ER53Qg0aIIaHR 0MdjuHof6fPTWk5+IQK5ETHu35ETXoqc9DJIjhlCcrCbmORY8h5wg+mN7V8q /o3eLnbrraEe/0ivf5zPPyWa+zfM6FDoUYevP8SQ0Ghw4/Fcq4/ut7AlPPhv 4UP/DtAY8WLE6H9GjP135HhVcrwWyW6a8yZIjsXvRjFurP/Yvu0L+55vHYc7 OjO7OfN7ATduDHZXJXv8Y7z+SSg5GDqY6piL3tEFAh1iUsDlUfw5IYaERv0f j+3ifBS/iGTGwL+Ga9z4R0TKPyPGkORAbkx9JXL6q8CNtDei5r0luPGJfevn 9t3fOA51dGZ0c7Jbz/cDO4WbKkxyTIJorD8VHaRpRI8YEB4wY+Bu8+FMXdks gUYIIKFRD8fjvCDr/HexBZvw5/D+fwk3cGPUPyOYqaJKDnaeWSuzXgcvB3Ej zmpcG+guS/TI//onMnT4/DOY8Ij2z44Gs2VuDL+JYWROtD+Nz8ewl3FIhIRG fRiP/wqs21/HlmrvP4X3RW4MQm6w5Zz0fMTwf0SMfFGRHOjlYDeR5JCD2Slb PueuUfbfrB7OQnSNMlOlPNFTMdxTOcqrAWQapwcczxa4YAezfP6ZOFN9j3Mb 9BBDQuOJjCdyvdXhL2WLNP7Z8D6MG8+FD0BuDEFuDHs+IvmFCJAc3MsRwSSH XP6pr0UyvbHo3ajl79vWfgQpHNu+sLPzv/zgONnFeaanq7iP61J/901Ex11A h6d6jLdmggKQ6QwgQAk+2fF0nNO8bD5OdMgRYkhoPJ7xpC6wOvm95E/o8UxY L+RGP8ENtqgT/x5B3FAlB633SZTL8Wrk7DfANbr0PdsqcI2CtbIDoypHOjoy uzlz450lfVyX+7sYOsoS3YQO/zhwkwI0JmkAgf8yE2aq1z9FN58IOuQIMSQ0 HtF4glfUw/9qSs/o9oewnn8EbiT8Wc+N54Ebw17gkkMucENgRUqO1R/aqFDl p6/sB75zHOvkONXNmRfvPIvouD3YfXeYW08Jn38KzsleYggc0Jzk4XOi58mi Q44QQ0KjTsYTv4Qe8rez9djlf8PYau3+DHCjt8INdnLI38OTno9IQm7QSqfA CjsY9++ICS8hN14BbjDJseDtqCXvQToHs1Y2fWrb/oV999f2Q98za8VxpgeX HKVD3TUjIO3cP9brn+BFBymZJGJO9XGkTPIyXPgnePzjcY7zPOogy/2OEEBC 48FGfbhmHuY1sGXY+fcAja5/CGPciGfc+BNwo/9z4QORG0P/Hs7sFMYNdgym Clor7Bi8HP8CLwczVaZiDtis1yPnvslzzpm1suFj25bPbIwbh7mXA7hxdQCk c9SQkTKRCQwlsKLO6aA9MPKC3Bjn8Y91w0xx+0e66hU6aIRESGjUftSTi+SB XwZbgB1/Hya50YNx49lwHkx5DqCBQdhw+vaXLg7ixqgXKbASMVG4OJjkSHsD nKWL34la/t+oNR9q3Mjo6lQ9GFWjvTUT0TCZTokc0VowRc5U8HJw4cG4Mcbt H+32j3L7R7j8w1x1+wbW7QgxJDSCjPpzVTzYK2HQ+OF/wjoiNJid0s2KGzQS 0VRRxcYIdJAyyUGmCnhHX+Y5YHPf1IVl5ciLd17sB2KjfIRHPQ+pXzTniBww mux4liY8zKMeqg7zCDEkNOSob5fBA7wYDo3/Cetk5EZYH4UbQ1BvJD0fYRAb jBvg5WCSg6MjYtJ/Iqa9wokx/63IZe9Frf/Itv1z+75v7Ec7Ok53cxZgwvnt RE/ZSO/dcb7KKdE1WKjC6TEXQTEvxr8gxr8whmeeM3rMjtZBJgX0RvUwV9VQ Z4PghjpCDPk1j3r4od/vSyJoBOEGLVJK3rAUG3LydA4Rlp3xamTa65GL3o5c /UHU5k9tu74STtGeYKdcHuAuTfLcHeWtHO+rnkrJohwXcSK9XIPG0ljOCmbC TMfAyjgPoaNqmKtiqPPu4IaHDjlCAPlVjfr5Qd/Xq2Jr7fv/E8YmcYOtRIYO yY1ez8IZpjdUbkixMUIaKcSNF2BKMTD5PxGpr0bOfYOLjR1f2Pd/a0/v5Mjq TlUqrquDoIFP5ShvNTYM5O7QNJIZghKiPBaOl+Axu3UWJoBN9PjHIjpGuioS nWWDnHf6OxouOmiEREijH/X2k63lC6MgJkHDkhu0cklvyGRR4obOsyG4Qfcf /kI4M1jYwdSXI2a+Frnw7chV70dt/oSLjYwukG1e3Md1cYD7+hB36TDeMFAX SSF0YE29ZpJQZf1iKHbzz42GnPOphA7I/ahOdpUNcd4e0OC5oY4QQxrZqOcf ZW1eG2V2SWgQN9gZho7Ovw/rivkbmPQVFogbBIqRghtEjOHPh494Ae4/8d8R 016OmPNG5NJ3o9Z9aNv+uW3fN3bK+MqPd57r67oy0H0r0VM+3FMz2qsFYak+ ZRaWts1HC2WJgg6qrF+EN83hERaJjsok552BjusJjQodcoQY0tBH/f/g7vkK CRoMFAwX3+E0cCNOJH2RndIPkzcG/zV86N/Ck54PJ+eGhAYt6hEIDTbZ8fh/ RUwBIyViwVuRK9+P2vSJ7ecvKW0DxEZBL+eFfq4bg8C5UTUCuTHW6x9vjQ4N F4ul5YLO0rlacBYyOsYAOu4Odd7q77gQb2+U6JAjxJAGNxrEJxX8RcrMLuLG 94IbbBI34ijp6w+ULAr/7S+4gWIjHHTFC1pYduQ/wgkayZjaMe6f4Qwas1+L nP8WiY2ouKAD7JRxaKpMEtbKdJ8/lcdNeCh2QYxs5sPPz0PJMQuTS6cgOkYD OsoHO2/0dRR2sz22d/vJjhBD6v9oQB9NoJcqc8g7/j6MYihScpDZwn52/t8w ShZl3CCnKOPGoL+AkZL09/Dk53XEkNAY9vfwkS+Ej/9XeJxpUK4XO8jq7szv 5Tyb4Lo8wH17iLssyVNhSN6YwvUGHKeinJiFuoJisjy8EsP7+czF9LCZiI7J TLF4akYBOkoHOq70buSSw3KEAFIPR8P6OCxfLVtK3f4QRtzo9HvwgjJufKdw g84DN/6XJ5kTNwY8x40Uug+JjRGoOkhmDPtb2CihQOa9Gbn0ncjV70dt/Bjc GgwaB7+DIvqMro4cbL5xvq/r6gD3raEQTCkdDnHYqrHeGnSNagCh7j0MGlRN T/RgAoOxguixANGRhpKD3WE6Vr2N81SPhLSQO/0d5xu7tRJkhERIfRgN8f03 vGBZFG/gxvd6aPyA+RvkF2XciINgShhw4y8yt5zrjWQ8YBoj6W9hbNKt01+O mPtG5OK3I1f+N2rDR1FbPwO3xoFvIYzCbs0kbvRyAjfQKcqgUT7KWzHaWzkO Q7GTsdco5plrAEkT9SkMDjNJe0SD2bKAp3nAfUhyTIOkjpox7srh2MK0r6O4 u+1Xiw45Qgx5IqOBvtvqy2Zrh1kcbBI3yBIxc+O7//NbCsUSN3oIbvTD5I0h fwUjJQk9GHDwt/DEv4UlCmKwMY1BA1O8VrwXte4DCLz+9AXEUH5BsXG8kyOz i8aNK4Ngy7aykTpoIAEw9Yu6jKJPg7s4Zkfz7j0kPOah5JjPvaNwH+LGFAiv VI92VwwDdFzubc/rEkKHNkIMeTyj4b698pUTNOKtuCGNFFr43yvcoLv1+mNY wp/gAJwbwk4Zyg7+GsYmVyCIjqn/iZjzesSityKXvxe59oOoTR9H7fjctucr GxMb7Nb0jo4TnR2nukLtPOPGuX6uy4PdN4d5ykYxaPiqJwpozBIbPi7ApsRi IxUuKhg9yCqZjQbLfI0b7GQctggzu1bYyO4YFUKHeYQY8ohGg34/6cVLaMQ/ G84OuktuKGKDFtd3v/stcaOTwg0a/Z8Lg2AKTDjJfsoDgsaUlyJmvxaxkEHj 3ci170f9+HHU9s9su7+0HSRo/GA/gWIju5sjF/wbznP9XZeHuG8ke0pTIMNc gwZoDL7Vo39ZE/+KJv6VTfyr8OeyJpwexIrZwlqZhwwRRSsgOaaCo6NmvKdq lLsiUau6fdIfSL0eIYDUyWgE7yF7/So0JDfisPZEig0yTyQ3qD6FHCBs9H4W 9Ea/P4cNeA4mOzPwOX6TPJiGSoNBw/K73jxuDHbfGea5O9JTMxYTNqZRC2IF GgwXq5r61zT1r23qXycm++8quCmO0jnISJkXrbk4ZkPXYo6OKVi9wtAx0n0X 0VHYzRZCR21GSIQ88Ggc7xhxIx4Tt3oBN8LM3JDQ+PZ3v2UHxA2ZLAqP/WNY n2fD+iI6QHiIn4l/DTMDYR2ZJ5+BecL+yzQGExgF8c7zCdDU68pg99VE97Xh HvMD+eawi1FmrEBErG/m34jzx2b+TTjZwYZmBBD+KGm/zIvm1grGZPlJdHRQ eKVsCKAjv2sIHfc3Qgyp/Wg0bxGDBhIDoNFbcCMOW4YyblCTDcYKJjMkN35A btC66/FMWM9nODcSnuVeDjb6/kkjBtgmb0YueydyzftRGz+K2vZp1M9fcNsk s6vjTLyzOMF1aYDrxhD39STPzRGe26O9peN95ZN9d2mDtjno81wkDJBVCjE2 N/dvae7f2ty/Ded2/MnObCaACHSA/YJp5/PQeEGDBWOyKDwmc3RUjXTdGQzo yO0c8pE+4AgxJMhoTO8JbHqCLXdg6rlBiw6cG7/77beCG+jcgGMSG5AsSk0C ER3sDP2kMf0/EWmvgRd01XuRGz6M2vpJ1E+f2/Z9bTvyPUDjTE9nQYLr/ADX 1SHuO8me2yM9t0Z7b433lU6OLp8WXTEzpnpOLJW7ohOjqX81s0SacRQwOGxv 4d8p5k8t/D+LyY53AEDgbkyBbAR6+FejXUOtObivg6dzcHRMgOqViuGuWwMh FpzdKeQjfdgRAogcjex9oJ2S+ojJjpnqABXxR26noFOUi41v/r/fknMjDv2l hI7u1HzjGc4KJjyS/xY2+h/hCI1wCQ0mM5hhsvcr2y/f2k90AmgUCLfnzWRI 6Cof4y2bAMS4My26bGZMxZzYqgWxNUvQTbGSCYxmKDCag8DYBqDg9Njd0r8H 516c+3Cyg90t4VbGk22oRjYBbcB4WdUEdqBeYIUOdHQwdJQnu24MAHSc/iGE jjoYjWm9PNhofO8AWxcMFwk4VW6Q3uj8e0ovV4wUPOj4P7/t9HsuObr9b1gP JaQy6gWR2aWHBp083tGe1RWWZElf16VB7htJntKRkAJaPdFXNSW6YnrM3Vkx 5XNi7y5oUrm4Sc1yJjBwveuJ4d+FZNj/FJucHgefgvkLzkPwE07uQ54w+bET 7ZetQqisRpsF/KUB0DHaXZ7kvN4PXmfG91FP+iNq2KORfc8+wGh8fz7t5Sqn Tm88Az7PTr+nKjYuNshUQecGSo7/+W0XpAeNpL+GjXvRouSEjcPf2jI723O7 Owzny8Z5q3nmJ+wyXzM3tnphk8olTSqXN61eDQIDDY3m/i0tkBgtkRhP+Q8w MrTS5uFWcLejrfzpYh7DM4fwnoweu9F4YcABeqDxspbZLLH+xUJ1UMmbio5R 7rKhzqt9QBcd+ybySX9QDXj8yrnRKP92xo2+fw6XM0F0+YvHeIowUjRuxFHG F/63E5Mc3MvxWxUFM18On/9GxKp3I7d+ErX/a1tGZ3teT0dRPCfG1SHu68me shTP3fHeqik++SjI4FrELIimGCVpVr2+uf9HXOAMFzta+H9isoGJBxAYAIoj OI8q89jTcOcTT/tPwuTH6Xg3pkD2oz5h2mMXuj62N+c2y8omgA6KsMzUo2Os u2aEqxR9pCFHxwMPWjWNcu3cczRWYKrQ6Ic/40TDrp5/hGyuzsK5oUHjdwAN 4gZJDjk2fhi547Oovd/YDne0Z3Rz5PZ2Xhzouj3MfW2Y+zrusHYn2X1jlOf2 GG/pBG/5VF/VzGiehsFwsUQEStY2829oDgIDcIEOil2Ii71IjIMgLRgi/Mef hp90cOJpjouMpzUKZbb2Z8IZuAOjymG0Xw605JbLLvCaovmD6FgUo1krEh0T wVqpSXaVDuDWSggd9zvkqmmUyyf4aMR/MlsI/Z4Lp0nLLQHR0fvZcDBSFOeG pekRfFSNh/1b5e5p1QwUU3y3Z0SXzYqpmBtTJVM9lzcBnyczSdaBB0Nb+LsQ GoALtEQOMeXA9ANDRGt/Bs6TrZEVrQERp3Cebu3Pas0fflqcPIV3O9ZKoYew XFR0LIzRqmVlcJZZKynu6iTX9b6AjvSQtXI/Q104jXgRWY5G/PdKaNCeBeyg L7o42HGvZ8PIuaFyYNV7kTs+jfr5cxv998A3tmMd7VmYrJXb15U90J0/1H1+ uOfaWN+dqdFVs2M0AiwERNQsaVK9uMndpU0qVjStptSLNTyoCjkY5MHYjvbI brau0at5oBUIDEaMoygtTiIuTrfBqWABceHPbuPPaQOPymnjzwZ6wMksvPU0 ao8TCj0OIjr2gL8U7rmhKcRnF8TwBh0KOgwjJDlqP3613Gjcfyxxg5aD3CZp +kvhi96MWP5OxMp3I9d/GLn106hdX9oOfGtLZ6ZHZ0dON4yD9IEtkK4McF3H 3n23Rnqvj/FdmRh9cWr01dSYO/NiK8lHsbypho51PEGrZnPz6m3NwV+xFYMj lLUlQyR7WpL7Ah6Crk44YBrjuCAGwgHJgDNLOXMGoZELBzCJIdmttcnokYHm TLpAx378jTuF6liOeR2zfDKPNI6slTFu/3BX6UBwdBz/NmSt1Gr8OqHRWB0a NAJZFlld7Sc72492tB/83r7nW9vBH+zHujhO9XDk9QZFca4/FJtfGOq+NMxz c6T3LvQH9kG/vumQzOlf1KRqedO7q5tVbmBAaMH0Ayy6jc1BV2zi1gckWuxH MwGTKzA1C+fPuH7Z+UPoxkxHryZ3X0i7A+GQ29afhzMXJyGCsYKdyW8Ld8tr A1PQA86cEWBBHQL65IQJHT+1QLgpoJvpI+EhrZWaJNc1tFYOfxWyVu4xDGun ES8ldTTiP5Nd9gveiFj938iNH0Zt/xQSKo53ceT3dl4c4Do30EVL5sog14WB ruL+rvy+rrMDXVeGui8P81zEBn13U7w3xvluTIoun4ph0xk458b6Fzf1r0J/ JlMOPz8FbszdaGjsbIn5nEiJAyLR4oiIcRxAb6fQGHDyGFgTcJ+TwonB5ikQ Ffyx+cAHf4GY+W3lGbhVngG2ID1y9SLkDKIjU0GHDLUQOtY0gWJ8cnSg8PDP QHSM9fhHuu8Odp6Pt4esleDDvHwa8YKSo1H+jbTo1n8QuedL2+HvwOKgM0UD XFeHeW6N8lwf5bmS4r2W4r2Zou2mWjXGWznGe3e8r2wSrJ2qadFVqTHls2PK 5sbWLGziZ3MBziXo1WTSYjt3TfgPUu4Eeif245lDoCLQmSkipMfRyXmEZ1/A 8UlY0XEUCmGqIKsNn9koMyQcCtv5i0yzuB3cVKSHCWmPvDZch+QKHZKloENE aeE+hI5V6COdraCDwiuj3dXDXDf787fuSX+k9Xf8CrnRCP5AuqRTMYNi5buR P34ExSAHv7Wld7Kf6OzI7Qnts9h9bg33lI/x1kyGDRMrpkWXTYu+PT36xvTo OzOiy2ZEV8xgiNDvrIrR0pqlTWuWN61m0mK1mOx4TTP/jxAzBfGAWVhw/6Po lDjRGiTEUQyCEArQkwl3IJdmRmseRc1sTYjgJkkWuSyEPcIgwOBQCBPuUNzO X4LzLM4SPFkC9PAXKmpEYYgVOp6W6IBbyWChepZlsZAMNpumT25tXzPKXTHU ebm3PYSOQMNyBTWCZRVkNKC/TlvOOEb8LWz8izz2sfLdiA0foD/zK9sv39tP dnXkxjsLEpxn+rkKsT6d3efmGC+TEFWYn+nHqrHqhU0qFjUpY3Nxk4rFTaqW QEIFpFWwubiJwQ3i39oCYh80N+Nklsg+JhuehlDpUfJOYJyUmRg5bblmyEN3 hHBmcs8DnTndGt0UbXXuiDNobrC1X8gVBUwpLRguzrWHeb49/JcdIEAQL221 qQBEQ8cZHTq46fQLRlh+Zn8OZqguitHK7Wf55L72VcmuOwMdJT1C6LAYgVZQ A1pZ9zUahBeULtQZ/wlf8U7E2v9G/vhh5KaP7tH95sIA182h0GHvynDPhZHe G2iDlE/0lc6IqZwbK7HgX9YUytLXNqtZ37xyQ/OqDc25P3MtzjX4cyN6O5kl shMl/W50YqAfA+Z+TK5gogLdmHAAWRaICKYWCrhUgK9+9l/CAnke8oUqKGzL /0s+TxUaUl2UCHqcbc+X7XnBjfPtOTqILUVtdfQotEJHDjdY4CT5Og6gs4WS OpZj9cocRIfYsCkOdm+B3j7XEsBaOfp1yEGqG78qbtT/P2raS+HL34nY8jGz OKL2fWU79K3t+A/8+y6vu6OgJ8ycno6Mno7MXs68fs5zg1xXk9ylI3VNb+5M p01GYirnxDJFAalWK9GZuVrBwjZKn8CMbnRpwkNIV2zHk3s5LviyPfI0n8wS yWxDE84zYrBJYiMPTYyS9lwMFAgySH9FMScDHNMd8vXQONtemWSeaEoDHnWh PUwjOpAeNAOjA/5LBsvRVlDMQpJjC0oOqpmdI6pXpsOGTex8xXBX6SDnhZCD VD9C0HhSg1bBnNfC578esehN9E58GMlY8QtmWB3rbM9kRkdPR3FvSCS4PMh1 O9FdPsxdNtx9I9l9Odl9LtldmOw5P8pzbZy3bDK7znHH9lRs9z1fdLta1rRm RVOmKwAUG6EABOZmJeFqv0jnJjfFPgTFLgx8HEQ/54FWoC4wF4s/JyViMURk 46rMagv/PYVi4wyKjWLkBi38YhQeZDsoRgc3PUrEqpe2CSGCHntOHCM0YF5o r3GDo0ORJcUm+VEgYJUnBE9OG57XcQx9pAefAmzugMQSuHVJrG6PSNg6ATVb kutmP9g3IYQOGkHWUb1aYnUynvhfJMXAuvcjN30SteUL289f28zmRkmCs6Sf q2QgVJ3TmespnvKx3orx3rsTfXcn+yqm+iqnR5dNj745Pfr6jOjyNNHlm0o/ lmL/Ckzk5it9O+qHHSgq2JTEoNDGYTA64si3mY5y4tDTPMf7KB4cfpq7PTOA GLgM28HkDgoACNCD/cxDAoDYwEkLv0ToAXJsSgeFxIJij3AVYcDFOQUaFxV0 0K1nFbuGg0iojgIdOuLInZLdRkvqkJJja3NK5wB0UHNj2tRpCmz0xs6XDnZe wVLZUPJ58HX0xFdZHY4n69CY8u/w2a/w/Mz9X9sO/2A/0sWR3sNxrI8zo5/r zABX8SDXpaHum0nuG4nu28lulSH+CYwSEOyomhVTNTumMg08FZXzY6sWxlYv blKztEkNlXuswrkaCkvjKP+KKsV+akl1H1xL7EPXBBWAEArSMdvqBFr9FBA5 2ZrbHSdbkwcDfJ4ygRMsEVQLBfgzHwHC0JGDPgr23+L2Gjfk2ic4CA7w1yOB IAXGeQUU53QyA+ZFzg0jOshaOatyw4QOMlhURwdVwKmSg/r8LKda+xheMCsk R0WS61Z/x7meIWvl18KNx/+HpL0avuztiLXvR275OGrXF1xRnOnuONPTkZfg ZJQoSXSfG+45n+K9MM57baKvdDL01Syd5Ls9wVfKFMUUXxVtgTpHK/pgiKhe BimaVSubVq1uWg1eTdGb90dM3saum3FqHTqzOJiVsY8bHXy1pj+tJXJTsVgG QkMcg9eCLJGsNtwAyWxDSoOgIcOjcZRcwQwThovcdkaxoXLjgt7QkO7NCwoW 4KCDhoJzymMvaGID5oX7RIfwwWroyBblb1Jy/ISSYz1KDupKSvspKJKjbJDz eoKDmp//atFxz9XUOLjxSP8Kuagn/jNs2kvgplClwomO9mys77jUz3VzMDTH OzfUfXaY52KK99oE362p0eVMQsyPrVkUW70QJMTdubFlc2LupsFJFMzUXbMZ CIn13OKAco8tLaq3taghMrC5g5wVLXiXvL1IiX1IDLJBfkE3xWFeW8rXe5aI kCIf4AzxgdwU2eiyyG7LhUQ2hlYlNIraswkPET/9he05PVSxYeCGWSdcUPyc FzvwaUCHldjQnbmgSpR2ms9Ej444Si7NE5HfbJEMRkX3B56CatntIDm4tbJM hFdm4k7WKDkqE113Bjgu9sIN5r79NfYEq81qagTceER/Al3tS9+OWAP525Hb Pon6+fOo/Rj4ONEJOlyd7e280t8Vpx9l47w3xvsuT/DdmBZ9Z3ZMxYJYJiG4 icHEw9pmTEVUrAI5AdftWmzsvwndmBtQS2yHsg5OD9n8ijK3sYEePOqwbGtD fSowCyv9aa0gPZN7L+HOFObIkT6KNpwVOTjJX0GmB7oyNDmBcIBHFcMxPyB6 lJjmWcmNDv5LHfjaV+SHAEIHHTrOKzaL7j7tVcmhuUnPK6qjxIgO1EWKtSJN FVlxf+gpyjwHyfGjQMdSdHSQ5JgKe1Kzk3cHOW/24+kcvzbJUcvV1KC58Sgc GuxSmfBPcFMsewfSMnd/aUv/3p7RCURFXg9HTrzjdC9nboLz3EDXjSTwUdSM 8/qniIZ4M7nFUTonpmxBbNWyJuCL2NCMz03YR3cHCIk4yrParsgJ+u+ulqAi flHiGjJzG3EBZ47x5G2Rq9kGjk+25o4LAQ1AQUE7CTQkQ1vNR5ErNIbkRqEI eRAHCBoEEBUdxQG4wWVDB40PiuQASlzsoEPHBT06kDnKHRTJYeaGRIcSXlG5 wb2jOSL9jPLPjyCBsbcPbKZAsZWV2Ah9LkqO6T6ok02Bj7V0oONKH3teV9vJ 735dpbKNnht1/sqH/z1s4r80Yuz50nbsB9AVFxOc1we6rg52XRriPj/UXZLk PjcMOlwBNBgxZsbwTZDn47ZBy6HYnC/VH9FpKSeViO5FQ+MAWRnUMoKioi05 NA6Jsg7NuOA+ijhyUGRi8TiVkVLCVbbio5DQKNTinnofRVseKJHmibx/cXs1 QgqPQoBIVnCS1JYbHQzcCIiOC/oHqnpDRcd5veRQ0BFHWSIaN9rygGy26OlB MdlfUHL8jL3QN/NNWKBHB7X3SUUvx1j4ZCsGO2/1d1C924lfjbUSgsZ9jZQX wqa+xEMh6z+I2vkZM0bsp7s4Sno5bw50lSa574zwlI72Mhvk9njvjYm+m1gR BpuZzsddxhbywCgYI+tIV7Sg9Cq42+6WfO5RDI30p3VVYIeUDAqqFJM9KDAM yp8qW3SoyG2j1XnJbEzK/SYIiLowaWuIldWOdAh3clpy43wHtjDjeJq3ERHW 6FBStjguLijGiMINa3TgFI/tID0bKjd06Dins1biKM1MZnQIbvCK+yylZIYk B3Tn0KNjGe/REWca5CD9NTg6ar+mGig36vBlj30RiDH71QjzBUOjYoTn7hhv +QQIf1TOgDhpNYY/gBhLubrg7os1aIxswfY11JICe/jDnXkzf7Qy0hEXGWq/ u9Y8VHoEo6UEjVxhTUC2tohr5Is+FYVtta9XLd8bLRGChhQJZ3U+Ci48SHuA 5EB0nGmn1xu4hJEePHJqQocFPRAdCjfaa0w4317lg15amKHRwYALNQEsTgZ2 FcmhcEO8J4IbPHeUTJWT+PYyMu/nnUhp+xUeXlmMbmpFclQOcd4ewOtkfw1t SBsxNx7SofEbHBNetNjYdPtnUfu/sR8XtaW3BrtrRniqR/Pyc8isSIuphtbc eHWtpP2OccMg8l1QluZW9FfsRUocEoXk6Upb3ROCGGo5eU4b7qYgr0U271ej QkP7YuX5lkoGpkzClJlXcrGrtoYqGIraa5LjjOSGQI3GjQ46ySFtFunu0HOD SxTN22nFjfMd6DwHhQU3AkBD+DcM6OBvjnSQqqbKGd5DDO6TiaYKZZ5La2WH tnMT3Ieslek+2N9tFHg5yEFKt2Y2anTc17JqWNx44FfLPm4VEbNegWr0Ze9E rn2fV5Dt+sp2pKP9dHdHUYLr6iB3ebLHn+L1j/fVTPHVpEbXpMWoDwdcQDYF hj+2ouNiu+hwJR0Uso3/ca3FLv/i47XkIjfpjGhDwR2VbYgVuK5RSxSJpXHW VO1VopSUliiuCSUVk69ls61BQVWSHAZucAJ04OhQC0mIG0VWnlLJDZnlRegQ oNCOxZSsMIoNNQ3MxA1dJqoFN9qpLg6KxsZpPiKRBnbgKdGaDJNhfhSlK8xa mQlFstBFMBmCZaUDHVcTNNVRt5d0PRn3u7IaEDce7KWSwGCgSHs1Yu7rEQvf jFjxbuT6DyK3fMJ3GTv0vf1IJ3t6V0dWL2dxf9fVoe67Iz3+sV5olDc1GjwY uCOhf6XSa26b2OlY7Z+5V/g5qb2VnOxCPdWaX7o5Snsr2RYvT7S6ks4HdQkU iRKPsyIPU+YzyOTtEgUaamTznAoZ49qHmwraC8khuFEkbtIqRzroHi65YUKH 9igJLs4QhRX0bPS0Cjo0bpzXB2fPW0BDRQd/c3RpYO0MLg7K4uCS4yT1MX6a p4FRMsx23K56A7dWIJ1DSA5Cx50BDqp3i2uMYdkHWFkNhRsP8DqJGHNgt/SI xW9FrsS9j7d9CnFVLju7OJjAyI535vZx5vdzlQxyX0v2QHdNRgwqHyO351KI pcIVRZsdU/Oon1rwKXcZEy00eb8aufdHJu/hz0tBgQ+6TANdJwpVKhRzN4W2 Hs2JVefb65Yqz9jUK//z+rudFYYGZXNJySG5UaQYIPyZO1hzo0jhTLHpUTqA dNBZPSqUzgubSJtGRBinIBKHsCU3ZH3uGWEGnhbRqBNi7xVyPe1uybd72ywy Opi1MiuavBz+EWCtVAxx3uzP690aHzoaJTcewKFBxEh7LWL+m7CH6TIQGLBb +q4vbAe/gY8+qyuUqBf3cZ4b4Lo4xH05yX11OLTUqxjv5cSYiXHVebgVCEGD WcE7W8jICJyhLY/3oStDxkcyWxsnXa4U/mDXc7E+bkiioridNEOUOKMwKM7p sXDRhA6tvsMqPEEr0XLhF+KTkOSAIIs4U6w5MYSS6aBzblD2l0IPvoQN2R1m +XHWNNGXokeH/o+6NzfaG3PAVFNFuDgoGgv3Pyl2d6JNJPeij5TCK9JamRcD aWAkOUYCOsqHOK/3deR1sWV34kr1EV3wj3k0Vmjc70MYMWa+GpH2esS8NyIJ GnGmUdzLeamv6/og161Ed+lwT3mKt3I89NbTEWNhLMVVudIAewS5sc+067EK jVNiX4/T2vYfKDbakNJQm9Vohrm0QQy2/Dm9D1CBhpaWaUiQsIhpduCRkXN6 bhRS3jj+ijzBjQLh+pBkKFYIYHhsYXtVosSRu9WcGGYAhdmVqvlhUJOodSvm eV6DhpZkEoQbuYIbWQo30FSB40NYL7xHoEO1VtKE5Ejh6CgdxHsJMnQwgDQC 1fFgBKjn3HgwaMwyRVS3fWbb+7X9CLbEOdPTWdBHlxleM8ZbMxFdGTPQMJkb Q9sJwXZjpDQ2Y1z1ZzRJiBva9ugiriqjJKdb6/b+yBFtt1WxIftnkk/vXDvO BF3Gglz7ugJzJScKuKFldBvyty9acqODJTf8+UJ15FMBbHsSHvxnkZ4D8rEF OnoQNDg6ivRyxTyVW1XrJi4uLiAuzhrPaOZbiUBHsWqqtFOajMkiHdEH7ITY kYG3L36K725PpStr8XOfHwMxWdwUUqLj1gBeKpvT8DeWfeDlX5+58WCvjVAw 943IBW9FLnknci0zTz6z7QFogD88N95ZCFsAuC8mum+M8FSN9taM17p8Y09O 3NWUyknWiQ3Td6Af4+cWPHGLuCErRNJF/elpPTTOKL36VbFRLAVGO+36v6Co iIv6/ChdJnYHwx00dOCBMbHKEPo0c4MQgZUppDoEQMR5AzqKTY+Vpo0eIEZ6 FJuIIR0peoNIyo+gpo1ivgXhhpWLg6Iq/CM7RpsmtOK7vO0WpSsbm/lXY2+T OdFUsQKxFUw+vzvUeb2fowAzwXIbuORofNx44NDJnDci570J0Fj0duSq96M2 fWL76Uv7we/wC6KHsyjBdW6Q+1KS59pI762x0BunZmo0zxIXley8OnWt4gjd Sf5PEzfSW/G9jzOEE0PZYkxrs5nP22zymk0pOc6105WcX2ofbO3LRAgrbpjR YRQbQbiRz7lB0OA2i5wGdBRpjhGNGwUiNGNgiCU9io1eEd3dZIw4kGkjzqhi A6dI/TJwI1/hhkw4F5KDc+OoHh07oIMxzwRbgDHZiWitCHSUDnZeTeDWSkHX hoqOh1n79ZAbD5zWxT4+JjPmvxm5kEHjnail70at+SBq86e2XV9hfQFmc53r 67o0GIImt0Z7yyZCKy2uMeZRB61YuXk6N0+2NefQ+FkGW/XckD4N4ceQAoND o0CLoRi5gR2xdKXilzqok3NDn4ltRMclEzp0QqWDMQYquaGKDV4JK7iR206b BnSong3OHD03VA+JgR6GWWgUKio9uPFiylPV5Z+o3JCuZq0HqUiA4aV8wlQR 3IA7H1fQcagV32/uZ+4g9a9BdMyNhvr68R6uOkYDOm4P5FX2Zzrbiro1PHQ8 5MKvb9x4mLQugMZbkQvfjlyM0Fjx36i1H0Zt+dS2G7mR2dVR0Mt5qb/r2lD3 bdxhpGqSDxwaczDSisTwL0OlsUrJ09iBYuNnRWxAJbuJG2LvYykzdNCQnbcN 6DgrJAczT5jYuIyL/bIFBGrJDYkaTagE4obJSJHc8J/hP/lU0VGgEEMKFXKJ 5Gv/1SmQQv3UO1R1tFHvY85ELQ7gEtFuNUWpArs44igaSxtF6dDxlFa6Ag7S Zv5VaK3MivZP8kp0sDMVic4bIiyb3wAlR2PixsNAQ9omS96JWobQWP1B1LoP bds+g0/2yA+O092cRb1dVwa4byd6ykd6q6jyPTVa5wWFAhP8imHfNVub0049 8F8JDTJSAnGD72cquFGg4MKSG9JUudCeGykKOnTcuBiYG1bosOaGzJ3QGSma 2JDc8OfgQQ4caOhQ6SGVRp7kRjvzxDcBv/QNZFBlSb4mWnR3M7g+pIFjSFIt VqAhcMHRUWjt4oBbZeLoCT06xBZv8ImrvX1Ickz0qOigsGxuZxuTHIUNSnKE oOFHaDBc0FzybtSy96JWCmhs/Bigsfcbe3onR3YP59kE2Ga9fJinahQkkPvJ szEPxcZSLR0UoLEFaxYodZyyvEhpkJFy4Ck9N57mJe1n0P+Zz1tO8Wcrams9 DabKRc4NQocmPCy5cS/JoTk3zNAwOjeMYoPjIhv/my3QoQoPiZo8zSuic4nk KdzIF7W3KkBg6mmjPrOkh0RHUVCXSHF7nW1SJDoGFFq7ODg3MlvrJAdHhwiv 7FUcpFxyYOa5Hh13BjmvYgfjvC62ou4NAx0Pv+rrCTcepk6NfVIMFExgLMW5 HKGxRoHGji9sB77VtkG8OdhdlezxU0boNHRuzOdiA66NtU15a50t6NnQPKLU l0+IDc6Npzg3MnTc0JRGkcgLDc4NJjkuaKaKRIc0WO4tOVRuXNSnbXNiBEje kNzIteCGho5sk/DI0z9K9YfkmpBiJUU4VQy0UZiDFb766Az8tx3nhuVOsoXa 1NChd3HAeeHiEG1XDehAHymVrpCDdF1T/1KsZMQugpAJhuhgZyqTXLdFWLZB OEjrZMnXB248ZGXrqvej2Fz5PhgmbLIDBo31HwE0Nn1i2/Kp7ecv7Ye+d0jn xp2h7uoRWHsyCVO80njUFa6K1VjculHhhurc2CNahR8QyRvEjeM6bmhuDSBD LdBxNqCpEmcKrQYzVQRANAvlglIIr0YzddzQeUQN0PBnsUnbpujRoZ8W3NDT Q8cHRWBo5y0fqNAjjvtO9UAwzCLjGX5PyQ2UHJwbIqpijQ51nyZykK7EK2Qm 1tfr0XF3KPT2KUJHR/23VhoHNx4SGms+sDF7BLiB0GBig/TG6vd5GnCg4acs r1R0ii7ErxL0bPjXB+DGbsWzcUB06GKX1lHBjVOt+XcZ2ilaqkZRUHRokqO9 JjkuCbFhRkcQU8WQ7yEsFPivIQVC5YalkaJAw38aphEd+hmnOlFVb6oCAbO0 MNLG/HDNo6L6SXTHfKq40J/kdxbcQPmkZHFo1opAB9WtyE0TpIN0rZAc03Xo UC+qom42sFbqMTrqar0/WW485G9nnw6xgtkpzEIxw2HDR1E7PkcjpZMjt4fz XILr2mBIKb871mu4J/eIrq0dN/a35KqD6l6Pt6JyV1w+1IOrDbdTijXJERAd JXrJIaOxqsFikByWSsMy38OQVHlWiT5YGilW0PCfkuhoy9GhTGtoGOhhpoRU KYb7y2dWHqu6SuIMVk9B0KnnBr7UtiL7i3oq6tDBuXFCqI5Drbjk2I5ejpVN /AuwWdM0vg81HCM6qpJdpYOddKbeOjrqcLE/KW48fCdhMyUWvhVJc9HbUI3C JMfmT2y7vrQd+t6e2cWRH+881991NRF2Vq0Y76tGz4bGjZXYOljjRjMLbuxV /KL7EB2MIYfQVKGvquzWMp6i+jfUaYEOvXcUF77I/iJ0mAMrteHGeaXEw9C3 x8q5oRMbBmjghDucbquhI1txgOQYYaKt/TNWoFB9KQZcyGfOMQkPc06a2WcS CB3YA03jRrZolxQcHUcVybG5OcjRJbHaNTMZVcdErjruJrlKB/LSFYaO4nqG jrpd6U+EGw//SynqOv+tyAVvQ+yVHbD/0pz/JkBj6buR6z+M2v65DZp3dXKc wTTR84PcV4d57oyGtA3+0S+IhZ3+lqHpuioAN2R6uYzDCoCg6gDJAQeZT0Mo NkdwI1+f6BUcHYrk4NyQ6DAngFlOte2ebK6lmCdwk2V1icoNTWwYoWGBjmzh +si2WvXZVuhQLBoNU5aPzWpndMYa4BPIlRqAIYgOPTcM6MjUfB1wN9mg43Ar qFuhmOwGLDqYj5KDtkuQ6CBHR6KzdICD0MEvsHozGjo36uQ3QoH865Fz3oic i3OOMtmHteSdyHUEjW8BGpBb3td1YbD7arLnVor37gSABu+qsYhzw7+C54j6 1ze15sYuyvvCuaelnPxRKDkModhAkkOHjkKd5IDzF9rrClVqgw5z9auuba/V dgaWTtGcANDIFFNFB844GW2xnCo6VGdIjl6lqA/JaqubsMOL0ZFiNnkCMsSA DrkBhERHtgU6NG4cx9iKiMnCeSY5qAHpTL6FvUQHWCsjXHeHOm/3d0jVUU/Q EYKGH6GR+mrkTDZfi5z1WuTs1/lkJCFrZc0HGjSye0AV2wVMLL89GqpR4KOc LTqQM24spsbCTfyrmvCMrw0mbhA6fjYBZLfoVU5eDiY5amGqaOhQk0hLRFWs knYeKBc0oNhQO+wZAigyMduKG/zbXxUbBmKY0XFa7/TgU7/kzegQLhE9cNrq HnhamVlibxfpS8lRuGEV3DFqjwLetp1zg/o8k+pQhYcMrxjQkc7bCcKZbbA1 JFwqJDloc7epOnRUJrvKh0B4hVLQ8+tB1VudL/PHyY063BqJfRDTXo6Y9krE 9FciUl+NIHqwyT4mZqesej9qy2e2fd/Yj3VyZPV0FvR1nWfQGO65M8ZbQdCg wKuExhLBDXJxrBOpX6p/Y2cLrbWXYAi/G2MI+TrSuXfUn9M6mKlSqE14VIEW eUEXhFbmZo2Oi1boMCsNS26YN1zLN3HDEhoZYoozcH8VIFkBZraFH5UvfDMu DMRQ0SHogQ9sG8wZGwAdBA0EjuBGLdGBMVk4pl1lN0GRLO7QhOhIFegg4TEB t1wZ5ro72Hmjn+NS73qBjobLjTr8RewjmPRSxOT/RExl6Hg5Ygah41WABtMb y9+D6tfdX9uPdnSc7uHM7+s6N8Rzdbj3zhhf5STau1kSownkei3B7U6WKdwA F0dT3vFpK6V+NYd+1ztbyMmJQfLjJxQeBxAdx1ppiRx5SlTFQIwC/lPjBjFE Daxo6DBywwIdhmaAaq8wS25QDlVBOyM3chRumKFhQgfRQ7e6A6x3g0nCH2uJ i1OmKZ5NaBvaaU6+ZrFVpaRBroXBwsWGdI1qs43eTWpCB5oqceTI2t0SLol1 TWGbFQqszMZNmqbjRvYUnB3Pk8HKB0MKOjs+28P2BPPBHsUafzzcqFtojP9X xMR/RzB0TBHoYKqDfTpMdSx5N2rdR7btn9v3f+c40cV5pqezuL/7ciL4NCoI GnNxXyQ2F+uJsRz8G8ANNFW4i+NH0RWf0EH0oK7XgBGFJIwee1vyNpXHER1Z rbmXo0AnMDRuiBkn/XWF+lwOZdNDMzcM6LB2a1iJDS1Ju1DjRhxFKCy5IXFx EqdCD40bpwLoBCM92uk0Q7bO3rEmhp4emmtFSo4chRsaPdoZ0BEn4im0sR1H R67eZjGjI0Pp7XNEpIGxj/tHSDsHyWFGx1Qv7UldNcLF0FE2CFQH+++5nvYn Epl9RAv8MXCjbn8Fe+fH/StiAnJjskAH+1yY6pj7JoiNuMADe5IjNIgYEhqS GKuagt5YA6YKoGMDbnOwSSc84Hh7c+NkGEFrxf/LU3SlcUdHruIdVaGRLxoR 54u9j/P1DtJzSsNAU2DFHHI1ig1zlpeeG6IKVc+NXIUbltDQo4O/q5l6VWAQ CWbhkS1kg3SrGvhg9qiofpVTitMjR0OQNnNMkkMmuue101K/cttq04AOfWSW /5myO8cuzAEjybEoljs6CB0zhKcUHR3VI1xVSa47g5y3cM+m8/H2kh6PFR2P bnU/am7UOTRS/hE+5p/h4xEdE9Famfayrh/g1s/se791HOvszO7pKklwXRnk vjNcl+LlX4hiQxJjhdgjnoixBg/IWmHXxgad8OAAkZM2QaBjJj+YtYLpHHFk F8OuB62NkkNsdowOEAGNPGGw0OZrJfpGo4G5YapDCSw2DGGUQi2rgUNDciNb cMNAjBNtYCr0gAfSz8yACsGIjizF3DBwIxAuMjVM8V+k95dydGjBF6Pk0P7A PL3kUNGRqzdYFGuFf+6y2G0fVqyQ5Fgqtt+aE62hY5rm6KhBdJQNdt4ZCOi4 GG8/39P+2NDRELlR5xvEs3c7+fnwkS+Ej34xnEkOBg25lme9Fjn/LcgXXf+x beeX9oPfO052deb1cp3v574xBD4+/4Ro/4wYf1oss1P4ZUB9NiQxVGisUgwW FB467Gxu5t+in5txMoD8hPHZAy39hwU6yNGRbwUN2QosD8/IUjhVcgR1cdzD SAkmNrRkbP5HmblxygoaHB1AD4KGbkVnKsvf0ngxQUOLyATypWTo5A33rqiS w/CEivdDl+9h4oaGDrl/zRlrdNBHySXHIbGRPUmOFYSOGA0dMzV0wMnRbj9D R6KzYoiT2SzszKVe9ou9Hgc6Gig06vw52Vs97O/hI14Il0uYLJTUVyHXa+l7 Uas/sG361L77G8eRjs7T3Z1FfVyXB7rvJCI3JiE3mJ0yJ5aaevH1sqIpr0lR ibGCWvcgOqgjMTdbQHvAf9F40eaP3JwBdAhHB88Ek46OArnNcRvddqW5beS8 D8lh4gY89rx1zsb9ceOMwo1MgoZCjOPaMa4m04rWmxWW9Iiz8mmoFLKYQCr6 jW2M6JAsOq2zXzTJYc4TU7mR11abuW2NKWGntU2aUHKgqWKQHMsDoEM4OqCV 8XBXdZKrYqizHNFxubedzUeKjkdqRzQgnwl7k4f8lRNj9ItgpEyBOCzEUOa8 Aa29Vn5g2/CJbdsX4BE93sWZ09N1tq/7+mDUimN8/snR/ukx/lTqIBqL6V5N ZDNAQMcqhMYKvAyW4ZWwVLCFhMda4fSghpMbm/EJe8I25ZOpju2IDnR08OBd ZmvN0ZGPnlK1BYRoDqbJDyk5ascNKTYQHXojxdwmSw+NANxAF8cp8e2vQuO4 hg7ODb3Nwh9i4IaeHhbcyBQPP8kRYZ4cGjRVdBie1iQ5ODTU3LDctkHRoUkO tKFEEqnqHYX0URFYIXRg8jl0PpfomG6FjiHOu4iOK33s1xLstL9PnS+WhuV8 eHTPKTd1TUK9MeafwI2pLwM0Zr8eufDtqOX/ta37yLblc/tPXzl++cGR0c2Z 39t1sT92chvh9Y/zgd6YipJjJrdWIH9jMbpGZZrocg0awpaJBd8Xj88Keqzl CR7EELhy5NxIe9ALHynWrfBrL1uEV9SNSrPwfLaySyxZK4Wm4vr75UZAsWGs GI1TXRwqN1RTRYWGQIdYyJoto9MMlug4ZYLGaQ1QOjIYJv26E5IbbbTnD84N GasNhI48gY78trpeghLs0tGBmzTBGfKO7hWSY60JHXP1qgN9pLRTZFWSs3II cON2f8fNvg72s3SAo87R0eC48YheMHufBzwXxvQG48ZI8Ity58bM1yLnvRW1 5L2oVR/Y1n8M3Nj5pf2AcG5cHADcqByF3JgQDZJjmt5aWRirRWOXao2I4VNe CCE2kUqq0GOVBhC4G2FkjZjrmvLWgjtbcB/p4af8x4TqyBIp6DnKBXla6UpK hS3kKS0yFder6LCul1c3WTZ5Norb69raKNAwcsMQipXcOCbmcbGK5UKW3FAD LlboiDNHT6SwoWdQHSkn9GaR+hsJHYFqZ4w5Hm2N6LgHN0SPjmzdpgmYyIHo IFOFJMf6ptboSNPQASfHwMYrNcmu6kReM0vQ0C65Ohr1IUJaVlY2a9Ys8/kD Bw4kJCT06dPnp59+Up9Njjp8kYzG/f4cNuC58MGcGxFjhVN05uvIjXfBSGHc 2PyZfceXPJhyJh72VLo+xFM6wgt2CkPHxGj/FMVamYvWiswaXaQUORI05sXA BbAwRskpNdCD+vzg8Spxkl1Fm1QfKW/sE0e+jlNii9gs8S12SrehG0oOkdQR xMVh5IZpf/ZaQEPrYiHzvszcOCVMFZUbx3BNHdcvbc2auE9uSHeofAYDNI6L X3e8jR4dJk/sacVHKqO0lOAh88H4bGtER76ht4+pTUdma2Vzt1Z8hyaSHOvx WwPQwc1bvH4QHbMQHVP0Eb1Ep6TH3cGgQGqGuepEddSHdKzDhw+PHTt20KBB hvO3bt3q3r379evXb9++3atXrytXrqjPJn/WFUBUbgx7nnODveHTXolk3Jj7 VtRi5Ma6j22bPrNv/8K+62vHkU7woZQkuC8N9twc5mWSg6GjZryvZlJ0jWat 4MYHc1F4zKevCYjFUzge/jsHbdW5AiALkCGLUXto+R6IjpUinrsCpYjq6KDw yiHh60D3GhcbYDVjt59MRXgoqWJwN0tTxZi8YdwvFR+o2xfA2EPP0PpG2TZF C6kYJAdxIx3nMdNCPmHtL7XOvjCHXDNM3NCbRda/TqLD8CuUwApyQ59NmtvW iA6ZRFqgoQNVij62IkwV/i1wUOyVsLW5Dh1o9sJ1shCvHHR3wBklvOIf5qpJ ctUgOhg0Koc62X/Z+YdHR33gxs6dO5ctW2bmxr59+xhP6HjRokXbt28P8oQP CRD2TvZ5Nuye3FjxPnDjx0/t276w//SV/RfclC2/j+vcAPe1oZ7y4d7qFG/1 WF/1BIEOkhw002IEJcRMU3Zfmo3fGgCQaA4Qqp9dHitZAXdbjjxhkzFkLTo6 CB0/iZ1kfxERluO4Nz0R46Q8FujIbiP3gtRJDqUPGEKjfRBuaCXzpla9D8gN khyCG3A3YbBYoMNSdSglLdbcMLgyzPLmmPXv0nlU9JIDBYMwWHRZ6G0NekPX T0xyw7xPUwaXHPyj3PcU38J+s0DHWgUdSwAd/CpiqmO61z8JHR0pgA5msDCN wf7LhEd1EhwDT0a7H8ZTWh+gQeP8+fNmbmzcuHHJkiV0vHnz5hUrVtTmOR8M IJIbA/8SPgS5MepFgMak/0QSN+a8GbUIubH2I9vGT+xb0cXB7nCiqzO7l6u4 n/vyIM/tJE/VSG/VaIEOsFZwB1jkBsIBnR6zorU5G+cs/KZI9flnipNpSI8F QniICXdbKmwZQscGgQ7ah5o6dVBeR3oruPZkZ5gTSA+5bZMwVXhHbqOpouxB f7G9JTS0kvnA0DByw1BKn9NWhw5a17SWj+IqTm+jQ4fJiIiTPlIVGplta8MN jg4DNCwxRY6ODMXdoZToatwIjg7iRr7WiTQuLs4YW6EM0gwhOY6KcpU9WOnG zFJCxwZEx+om1IkU7rMohrs7Zio+UgyvwEwGdLCfMIcDN6Bh6WTvA9DjEcUj zK/kgbmxYcOGpUuX0jHjBtMk9/WctQcIe8G9/hjW50+MG+HAjb8F5Mby922r P7Rt+MS++TOAxp5vHUc7O0/1cDHJcaE/pH7dTRboQGsFHKQzFWhwbiA6ZmLH 0ZlipvrgPtPRSgWA+IAe7DIA4REDoBCTf8Wo6Ngo8sGopIVsFkpEP4L7+xzD yfeIRHRIyaFWyKqmigEaF9oHyhE1cqMwgNjQc0PpwmEwVdpIycG5kW7ixvFg jg7OjUy9T4NPHTQ0n0a68uskOsyS46SRG4QOLjzuiQ7BDdnEGH6a92niUZXW srIe7rYX91jZgejYItCxrin3faG7A66TBWiwpHJHh3+sG8IrIxR0DEe9wXgy DrgBF9ucaMtlG2hN3fM+9zXo96b8K9L82x+YG3v37h03bhwdM+Gxbds29Tlr LyrueWfiRsKfwvo/Fz7oL+FDgRsADfCLKtxY+E7Usv/aVn0IrtFNyI1dX0M0 9mRX8I6W9HVfHeguTfRUDvdWMWtlnI9vOp+qh4awWTCChlvSzxDlBtN9/CKc ihXT7OQsvfAQkxu2enTwx3KbpQVtvAJnDok9qY89LYwXRXLIbeupk4+urF7s QC25YV3FpuxZZmrYG4Qboq+OIjkyNe8o3HRUc3QYVYel5MjQc0Pn1mijQSM4 N9IDcMPsJj2td5BmBeCGRIesmS1Udl0x7LciXRzSVMFu53Bn2oR6J3YD24Kb NFFyIEXcIIeQXRt4qaRFSx8phFcM6GDHI12w/+wkL1xm7DpkD1kGV9E90VG3 daNQAvZS5Nh/R47+dx1wo6am5uLFi9XV1Tdv3uzevfudO3fKy8v79Olz+fLl h3z9lvRgL7jHM2G9nhXc+KvCjX8DN6YCN6IYNxa8E7X0PdvKD8BUYbcyUyUu wKgeBaZKzQT22aEBMkvIjNnCTTpHRQdSAlor4KSPezLWSk9H7SGFhxU65C+F L6AfMR19m7BZ9ojGpNQOXZotJ4XkyJGSQ2kCprYsvmAlNoyxV/PeQwGagZu4 wdFhZarwVWxGxzGj5FDRwQ/uhxtkoXBMHdXLG0t0mLhRW3Souy0UiUQ4w5ay Kje4dxT6B2qSg7qybIdKJTi5kbs74shtvgy/TeYjOlKt0DEC0TEKtp2FloPT vKBs2f3pC2hN0yDCo66iDzQmvRw14eXI8f+JHPuSBTRq+etUblRWVrKHXLt2 zY9x2IE4du3aVVd/gkF+sNfc85mw3s+G9f0zcGPwX8MT/w75osxOkdxIfd26 +nX7F/Y9kG3uyOzmzMcqlVtDPFUj9LEwMlVUaMwVc44eHVNESxZyiU/EYyk8 5gibxRDMlapDVuVvwtSOHc1pU3u4D236dlhvraiSQ+k7KtGhccPs2TBsk1qk 30AkyCYCylYIFpJDMVXiyNtgiQ4TNyQ6AnAjADRk2DddyJujbSw8KvfiRq1U h54bUqFp6Mhta+HiEN5RbnXuaclbwFEjQfYpb24mbRaOjuWIDjJYZlqhYySi IwVdHOx6Y3hh30qL8CpawbcDe7Bv/0DjN8qY/lrUtNeiprwaNemVqIkMHf+J HPcQ3HiA8fBPKwHS84/EjfABf9Fz419KRdsbUWlvRs1/G6Iq7L9r0MvBJMfP X9t/+Z5acLjO9QVuVIzw1oyGHDD4CFBv8AWuD8jCVNGRGq3vIYkf9wQ8norC g10DaLPwZ1sYQ150rkAIHaub8NJaVXhguzD4tqKdFAgdZK3Itj8Fug3d+K9Q iWEWG2JjZWmhGChhAQ0rbhglh0zpVBa1hg6z/0GPDik8aiU2lHQRTXIE8aic MLo4CBrBuJETlBsStvmBXRzcVBH9A7FnNRywL4UdWCW9pZlms4gQLVwPC4Wb dLIeHWyOgkxFMFXIxUG28MIY7j3DplK0zB8mTClZMevNqJlvwEx9I2rG61EM HVNfjZr8CqBjwstRj1TeWD7twydvkJEinwe48TetnI2N8S9FTn45cvqrkamv RUlrhZ1fiQFZSgDb950jvZMzu4dTcsM/BqEhc85TIZGDX5kyDWwBHswTNksa 0kPss6PRhn0pTPSq+Tz8IxZThw4qkVsrhIdwlvKvJ6qDO6pYKzIvXUoOYa1w 1WHtC8W76aGhBQhqyQ0VHTkCHcJUseCGAR0BuGHuFVYbbsShTRRMcgTIBJPc MFbLmtFB3MgzckOTHGSqqNwgF8dxk+Qg83M3JnWQp1QIDziPzlJusyzCrLBU BR0jER3sZwqig5kqU73SFoYzi2TaYdMHo4fExYJ3wZxPe8vG5uw3bYweBBCG DpIck1FyPH5uPOQzkIXCxEa8CKbI92fY8xEj/hGR8s+Icf+OnISmCkPHjNci Z6HBsggdpExy/PgJJHLs/sZxuKMju4emN1Aq+HjC+XR0fqZyU0Vb/oswg5QD BM2WNEWc0NZ+Y3nT+zjyeEzFbwdydywQGWIqOijfQxMewmbZLtAhilm4tZKp SI5CfatzSutSoXHuHtBQcWENDdXFoRa4yUagwlSB45NtAqLD4Le01BsZem6c vDc3NHQE4oap3k3jRnB0yAzSPCUOK7ihBVZyA7g45Day2OeNfwXsbcnRsZO7 O0h4wK3g8WjC00oXo+pI9fHCt9GIjpEYUhnt5s+G1xUcSOEhG2gvb8KWQ9W8 2N/Ueqz92L7qQ/uy9+2L3wNuzHvHNudtmECPtxg9bEx1TH89aqqwVh6nkVIn z8xecDxCo9ezjBvh/Z7TlIYEyNh/RzATjEmOKa9ETsPOorPfAGtFq1X5DBLA GDeyBDfYfWrG+mBvxymoNwzoSENEzFcq2hZj/jk1gqNaA9pQmLgxBn6qwkNz dxA6Fgh0LIq1Fh6yXzp2K4W85cOKtXJKyQFTWxYLeghioAlT0k7jhhU0HpAb fA8mxVcgcy0s0XHMSgPoXBxtNHQYxEZQbgQL/qqhWBm4UUtlDU0/DG3Bzpi4 IZoaaa2N8oSpYnBxSMlxSHBjH9+Qi3s8pM2CwgPuQFFa9vWxQqCDXTaUD0YG C7lGx7rp6oLz06QTngof4HsNVtmC2Oq02MrpMXcnRpel+G4P817Hi7wwwZ3d 03Wiq+tQR+fubx07v3Zs/dKx6XPHhk/taz62r/wQogaL/2tb+K5t/ju2uWwi PRg6Zr5pmyHQ8ZjFhv+h2/UQNHohNHo/G0ZvHbNT2M8hfwtPej4i+YWIkS9G SIBMYujAwljKHZU5YJs+1XGD3aF8BARTwEiZHG1Ex0yqr9eKVuKUwWtVqJvT VB9QgnGDfbhjgB5wh3ECHdMxQ4w8pQZ0LJKJpk00Z+mP3GbhQpc7OoTkoDq4 PJE7qnd0QFKHGRrFVlFX1XgPtBlivh4duarkUNKoDJVuBkeHlYuDSxSNG20s uJFhwY046YA1c+OYJTfa6rhh6JZsRoeeG9qbo+cGf9/IVDmtuDi03VV4YIXD nzYOJnTsbsGFB6cHomMjfvRksyxGN+kMYbDQdSX1xjhqHeOFq24GXlpp0WQ+ wxLD/IHqKdEV43zlI72lSXDniwPcRQnunHjXyW6uw52c+75z7vrGseMrx9Yv HD9+5liP6GB3Y6pjCUPHe7b579rmIToU1QH0eCLceJjnh5wNJAZBg+mNvn8O 7/8c50bi3yOkqcIkB7NWJECYwcIkx4K3ISa7GntxSG6wx94Y4ikd7q0kvWFG R6pIH51D1Sg6dFD7WaD9bB5/B2uFQQMlpX+0h3/iEzwcHbNEfFZFx0KlwoWE x2pReo82S5zq6JC7VIscMLhV3Q7yrJAfKjEsxYZ+I4D7Q4decmjcyNAXyaYH M1UkNxgcdOiQ3JAJn+b8DYUbFug4pnKj7X1wI0s1VRRu5EtutDdyQ5oq6ibU QnLAHaSD9OBTfO5Hm0UKD0EPuI/MLCV0zNWCs/x9HuMmW1gzh6eIEF5qNCyu 6XjpTo2umeSrGuO9m+wpE9woTnCfiXdldHMd6eQ8+INz73fOn79xbP/KsQXR we6z+iP7CmawfGBf8r59kYEeb3N6PCluPNggaPQSMgMBEp7wZ4DGQHSNDv17 BJMcw1+IGPVixOh/Roz5F6CD3TrxPxpAqFxlw8c6blwd4rk13Fs+2lszntDh s0aHCMjiStfqZDk65qCPlKyVscgNmvgFwVXHVFSVaUJVquhYIM5I4bFKcXdQ x2OqZGFWs5QcZ0RHDuoDZkBHSbtgyeT5ojw8/152Si0kRxw5DTR06K2Ve3PD gI7acUPO4NwwdCy04oZRcgTkhklyyN0hs4WLQ0EHvirRepR8pHgAk4THXhQe u0h7iNbWEGrBLw6BDjRJyAWHPjSEhjzg7/8kL6yvyXgFTmAms4/N6lHeymS4 w43BbuJGbi9XZnfXsS5OJjkO/ODc853zJ0TH5i+AG2s/AdWx6iP7SgGQRf+1 M3osYPR4FyyXIGlmj44bD/PkvxH9eeKf5f4N4MafgBvMVBn0V0g1T0RThUkO Qge7iaFjwkvgJmWSI+2NKKKH5Aa7w9m+UBh7PdlTOspbPQbeavCOMnpMVnwd M5AJs0SZm2nVw8l5QnJMRi8HkxyjhE1KbnAsLtCsFTM6yNE6nwfXODrI3cEM FkpHJ0cHSQ7qU0cB2QI9OpAYqEPa6S5yC2iI7sdB4in3khz8HTAUu6noOGbh 4uDQCMINwzwZABpqrUoQbmRaccOMDp2LQ2lAKnd2M5kqvNJNlRzCQYov9Wne 7fyQkgmM/+XCQ5otMseDArVYDcff27m86B6OJ+OGswQQOcd62IXN7zzO6x/j ZVrXP8pTM8IjuXGpv7skwcW4caq762RXZ3pnjg5UHU6GDna3TZ+D8NgAZotj 3aeOVR9z7bEY6GFf8F6wBoaPmhsP8PwEDfKISr9or2fD+yA3+v8lfCBxA02V 4ejlSPknTx8dj+iYKipkmaki5UcWbCfthu2kEz13mKmSwqQCdfKRwgPpIdAB H8ps4SaVRfSivp5XGahejpE4ZeRd+khnm9CxQBCJzsviOHJ3bAA3qc5aUTe4 1201qzNMuBrRNmRpp+2zkKcUiee3leuitujQ5YBpDlILa0VfvhqYG3p0GKrS DNw4bsENHTqOG7nBoWFubZoVAB1mbuQH4Ea+aCqYbbG7CvdyHGlFuICTVH90 RPQjPSDosZc7Pfjy3yriLKuaqAmlcFLdsXoiHpDYgG8rjzBo4vwjPP6RuC8t miqAjgEMHe7CPq68Xq7seNepHq4T3VzpXVyHOoHwZvTY8bVj21fgLN3ypWPT F0CP1R87lgvLZfH7T5IbD/ArZBilp5jxyA32xyagi0M1VUhyjMQaN2atoK8j QkoOxo0Nn0Cw6VBHhwTIFWaqJHnujmCUJnR4NeHB6DHFxz+IVCp9peQNJY90 nrBfZmE6h5QcUBaNc6SQHFRfMNMKHfMEfNJkoqlSzPKj8JHKzRTUgKwBHdwq 0W8WWdDWDA0dN+7pIC2wkByo0tsFQEcbDR3Ha8UNC9Uh00cDl9IHK499GG7I rWaVLA5rbqiSQ9/qXEsDO9KKiIEvshXYm3Ty0FPB6LGpmYYOModniauRNnLC jGVYUFPwC2scKo2RHgYNDSCjvDXDPeVJnptDPFcHuS8NdF/o7z7bz12Y4M7r 7c6Oh4szvavrYEfX3u+du751/vwtM16c2792MuOFaY81nzhWfGRn9KC0kCDr +tGNB05jk8ToIfI3JDf6PReumSooORg64jB9lBwdY/8VMR4lh4EbFLwu6euS AGH2IKBjjI4eKA5RSJDwSOV19Lygnpa57MGSijXRE0hyeEBvDEd0kOqYoMRW VHTMV+BDTy7RQaoDrJXm2iaSR9DLIb2jeW01dBSKXSOVHd900wANOn5QyaFx I6ftvdGhNiA1BDuCc0Ogg0PDPM3tOFRuBDJSTNzQ9/NRGhfrJIfJ9MtTJAda KxzsMg0sHdFxtBUVHOFf8bRGj8OSHlqsln/Q25tr6JBZYbM5PWhPFvSF0pZw qJDBuUEhGLyYUzSAsFE+zHMn0XNzqOfaYM/lQZ4LAzwl/eAOWfHuE91dhzu7 DnZy7f/BtfcHF6PHjq+dTHhs/Nyx9hOwYkhsWGaU3e+6tuwKSIOd/0aMrKys B+YGJYiqk7gRB97RcBlVYaYKSY7E5yOGITeY5BiFBguhg0kO4ga9A1JxqQkw 2nsi6IE6wSuFB4a9RCMOqqZXOnIwIYFfBCKXQ0oOQgfP9xMOUgM65vHOk3Cf mdFavgcYLGitbOSxlTgyk9PFlpE5enQU6Pd9U+FgmrqblP3Z740OtZlPrjGd Q+NGhmmvhGDcMKEj04obZhDp6cHZohSn6MSG5UaT+iCsQIfSuFiVHAVW3FDR cVrpdi4lB5UoHhMdjLU0D0kPgY79mFyKwoOjYzOiY7VSyTIXLo84TFvSXY0z wDkPj5qCDJmEsnm8lxhSk6Krw7qvYVn/IgFyX+s6UFdAP1bIduvWzfyQ+0p/ leu6+zNhcgI6UHgQN3r/KdwgORg62E3SWiF0MOEh4VCb36i9Tk17eOFTYEt+ usCFsSMHL67HTw0DsiQ5RiE3kjFVmCKzVPumomNeDHdupCkdgWYpvg7ZWX1H c17scAQdpKdE61GJjnzFJAmyAZm5z/99ocPMjeDo0OdgaNzQcjaU9HJCR6bS mRwOxPkTVhrG3DyQc8NkpJwOsMO1kRvCdWPYxd7wVhTKN0S8pWpn6VOK5Dgu GjFhvQCy8WlOjxNID4EOuOlASwII7+lE6JDxWWrcsRC+buASlRWXVK+dJkxm XkKFDrop0fDdN85XM9ZXPcZXPdpXleKrHOWrGAGX642h3kuDvGf7e/ITPFm9 3Cd7uI91cx/uAtoDhMd3zh3fOIN7Nu5rRQfpCnjt2jVzdw75W2r/K/wmbnRX uBH/bLgmOf7CJccQrHFjkmM4oeMfEbXERaBXy9+Wcag6pqAalKYKfTTUjmOG 0IpUz6hKjpHIjeEYXqFUUllxT/06yEmSpnQSm6GlAnJiMKW6AVPQyetOMVna 9+2Mgg5z336c+NXZRm0uoYOJyVoJhg51n3pjWDYQOrS2XcqiVnJEM02SQ+WG msquUig4N07quXFK4Ya6071Vnjl/z3MEEnWmSnur90STHPBAtWXxSYUPSu9H fFVPa/QgdBzSZ3oc0KODEsNW8y7HcFmKOmseyicv2bwYPnkZJnbNnY70mBRd MzG6ekJ01bjoyrFwpZUne28leq8M9p4f4Cns6znT232qJ7NZ3Ee7ug51du3v 6Nr9veunb43cUFlhWNGFhYVDhw5lsmHBggWWaypIV8CcnJz4+PiUlBT2c/78 +dXV1epvrP2yZa+22x/C1NldmCrEjXiT5GDnyUE67PmHIoZhaAAxmCrEjeka NMjXHUeOUGmqJFOjSJAcPNlvmsj0k5JDiA3DgE+ffbksRwcppnPwWvvDKH0z lW1WchV6SGjkiO0VcuTdrBTIfUoOuNUyo0PuDW1Ah6AHX/5BuGFuHqhtwBQg idTAEGUPF6PYMPs0LDO+pMtX5UYgyaF3kMbFmXZJyBAp6Bm6TvVx3JzR0BFH RugvysQux1xqUiEtCg+4FFc04d1rlyq5iAtECdVCMRdgQXca0SOmZmp0zZTo 6snRVZOQGyN8d5K814Z4Lw4EX0deH092L3cGSA7XESE5guR6GcQGW+nM9Cgq KiovLx8wYEBGRob5UUG6ApaUlGzdupU9SWVl5bhx44I3KA4y2Avu+ocwOSU3 2N/b84/hNLnkeA4lh0g7r0NiGF4Pf6NmKtxI1UNjIiXeUGUB5wbujuHi1soY D+0srEoO7XPnGxD7tDvMRqosFg7SLVhrTyWWR9FBelq/Q5PcIFL2wMxW9oCD u1lbLho67ik5lA1WgtStWKDDsImSuRJW0Ri4rPQbJZgzOgJNtfjFYKSI3WMt nRukMQgaFugIxA2BDtJ1GjpOCYMlU0xtZxyx88Wp1qQ64DhdBFnUeRCSxDg6 MLsDrsB1omGp2EyQXz+LeVIilj7hPumLcC7APcVmxzJ61KTGVM8AZVIxPro8 xVea7L2R6L082HtugKcAJcdpcJO604XkqH349fjx45MnT6bjy5cvU08ewwjS FbAGBx3v2rVrzpw56i+qvUHEXnCX/w1jU+VGd86NMOKGQXI8ImIYhvZXSL0x 1SegwVNxzMoBPtbhmEeK6Rx6URGtbVw+nTcTE+hAWwZaw8VyB+k2vmUk3OGY cJDKHZrO6KGRpc04aYCbe+JZcSMQOvhJy2SwnADokCoiQ/F7mPdEkAtcRYe2 wbTRUxqEGyQ2dLpF2aqezwfghgEdMhdX6VrMEQ1vPiLitDKz9NtpZXODBX6C JwTdpIef0k1SIPRxY1opXHibaS9R6lkqWgBJPxjuF4Y7DOL2YUSPhYweTYAe abE1s0GiVE6KLh8bXTrCdyvJe3WI98JAT3E/Tz5KjkwhOe4rZ4OphVmzZk2d OjUxMXH9+vUSAuowdwWUDQMZKyZMmFBVVVVaWjpx4sQ9e/YE+V1BhoEbgA7B jR5/DKOpSY4/hz8GYsjB/hCdB3WK0VkNfMDwa/Vwd9UwV+VQmMb76NI5FG7I 9oNTfSLLFMOyKzD/HDJIcRsFKnygmCypDik89Jsg4xUr6tYlXiw6ahq5YYkO 7YxVMhhyw4SOU4r1kaGfBmhY7Rirkw3aVm5WBbN6j6jGjdNW3DBMbR83pUOR tiWTleQo0vdPUxwdqthDbrc24p13KG3NXycPsrTiQVueHobckC7T3S3gYkN6 6Jp4UP8f2v18pbbDoBEdgh5wWc6MrZwSUz4+ujTFdzvZe114Rwv7enJRcpxE yXFf3Fi7dm3nzp2zs7MvXLgwdOhQQ9M/OQxdAWXDQEYMpkAYTHr27Lly5UoV O7XnBnvBnX8f1tnAjT8gNGRYFtHBJMfjkRlyyL9CJsBrABnrqRnjqUlx14xy 14xwM2gA2Ie5Koa67g52ViW6aoSDlJkzXFFI76jsBUQ5gSo6ZqG1siRWdZBy y5ckBxfAAh0qNE5JeSwkdI68eg2d8SgiEwwdFgpERccZK3So4iHT4NCwEhuK 35KeIU61WXQWkL7iXpuaR1SKFsWPIfaCkbjIFucNMsOAjjwFlbxfsdLqWXYt VtGhToMniu8ILLih+kjTW3GbRXID61zgAtsry2nJbMGEQPCXikmboa9s6l8h MtUlOogeyI0axo2pUGtfOib69gjfTfSOXkAvR36CJwclx/0miO7cuTM1NZWO t2zZkpaW9igWXfARhBuGyOzjJIbf9Po5sqieaJxHAqQaoVGd7KrEbXTKh7rK BjnvDnFVk4OUOtuTBzVVSI400byUrJ5JonMpxV/YrQuxdGUNZpBub66THBo6 WltAI1P48IOgI9ciqmLNDVND4wCODqVgVl37mQGmOeSRZbVPvYylyq7IZmgY Iik6sSGMKctp1hgy2zxP8Y7KHLBi3rsV7lPEi91EBFyGsfQzV2T55rfVNgWm TyfDlNdxRHIDSgw+xzoUrY8HdWihfRbWic2IiR7IDZjLm2ryA+kBB7Nja2bE VE+JqZwQXT7aVzpccGMAmSqQR5rZI5hH1PI8Mzri4+OZcigrKxs1apQ5resh 111tXBzADYSGyo2uJm48WWior1b27QGxMdIt/8zKRNddtFBKBznLBjsrEl3V 0kGK9W7wOVILBQyp8KbH5C2ZpDRLT0VNslhYK1u45OAKVt1pJau1ERoZwgVH bnypnzk97mGq+NX2Ppa1cgUma0VBB6Vwq9rDGiBmF4RM/zbnaMmuyDp0tDVC Q+0sqooNPSvUMj3dTtNCZujQoTU5b0/cgFtlh5MCJS+Xh65kkAuJoSbp5RHG W1M5rWatqLnoQnLAtXdU6QVEanOn2N1pYzPuLF0ruLGcOoABOshg4Q+cF+uf FQuxlckQkK1I8ZUle5EbnvMDPEV9PXm93Vnx9y02aOzbt693797M0Fi0aJGl f+OBR6DIrzrYa+4kxEaXPxi50e0ZcHQ8Ztsk+Av2S+ExGiwUEBvJrqokV9VQ LY+dvfLbA53lQ5yVSWitCAcpt0dIcsxCFwdFZyg0M1GgYxpaK/MVawVjslAn S3v9qOigqUJDCwK2IeGhQ4dOcgSMoVhwo9BkrZjCK7rgrOrxUAFiUAXCdqAH aqteRYpVvMZYOE/PrKs9aaeaIZrb09Khodgm6L7QJ3IQN7TdM/XoUPN11VT/ Aq0ogFMFvRwUk+XoOG40VeDaOyKS1WXzUtqIdnsL3J+F0NFMx41l+rlUc33A wydGV4+FBLBy4sYgz/n+jBvuXMaNngG5cb8pWHU1avN7SWx0thIblMjxmInh vx/ziokN7gtNdFUOcd4d7GQWSulApwQIs1mY8VIj0jmo3g0+R0r9mumT7Y55 ofQEkUtG1gptu7MG0zlUyXFMvzWk7CRD3DjZ+t7oCOzisBYbxiKve7X3UROu zAA5bQhtiOxNCRC1dbCKDit66IwUeFq5VaWJGAaTxAANAzc050Z7cm7AednK NRA68pXqQllGVCSogl4OwXkqYFG8o6Q0yMVxVOOJtvx3KhtKrtdzY6luwp3n QzwFmm9PsUgWkqO+QaOWvzoIN56IzLjfMFBlsqsiCcyTcgGN2wOcN/s7b/SD EiF6wqpkdJBiOgfJCa46VBcHlchhnxauOmCnP4ytLMd0jm1CclCZtoqOTH1N N5xvrSHFjI5acCMYOgKpDtnEWKoOAzoMKd/ZWvKVUi2iVJxREz8VHSbhYTBS iBvG7PEzRj5YQ0PxhWroKMDeX8UGbrTXtVZTapDxfdNwQVEYbt0UtDVIDp7L Iatoj4BbQ/OOIjrgDodb0Ua0/HPZqkgOlRtL+OTQmBsLzWSmx0B3u3E+f4qv ari3bJj35lAP6g1oJ3iml1Fs1MZGeNTjnv4NSvfqYsWNeiszDIO9zvJEV9kQ V+kg5x0FGtf6Oq4mOK73c9xS5AfFVqixD3y4BlNlnNLrGCpqMSxLjg5mrbCv GEwDgxC/AR0Z+kYQfP8mDR2cG1m14oYkBj8wbBNpiQ5jmw5l4xVDsrfBQslR rIYzGiviZKSDE0mfg3FanyiiGCmaL/SMyYNhUBSSeEZvRnuacB86Vo2U8+2N koO/OZrMgLupPVJKBDcK2+okR6aSOyqhoUZVjoqbDrXClLCn/LtaarXSPzYH ybEGQyorkBuLhS+UQWNOLKSdp8ZAT6oJ0f4xvpqR3opk751Ez/XBnksD3Gf7 ugt6W1so9/vtWeejNh5RlRtd/gDz8csMf11senV7kPMWQMNB0LiS4LjcByQH O7450FnKDJZkzQFCcZM4irCopgq1SadexxMVR8eyWBClW0hy6NFxXHxtnVA6 bAdChxYfDMCNQp2REhcXp+tAWKRLfzKjgy9VRXhYZGxm6YKhugeeCWBHKCX8 Bo+H2UhRi034k+RZmSF5+plv5AZHh8FIkdvWGNBRJNBRKKwSFRrUnK1ILzky tXIVkqZa9hdx44gQG7zf4FO4EW1L8nJweqxFybEC3aFMbCzEnpZzsD8/g8Y0 7KMLYsNbOYKJDY8qNnJ7WYdRniw0avMaqCyF0EHz8RPDX3fba97o77yuQONi b5jsc7za13FjoPPOEIYO7iPVAELb3Kumymg+41RHx0JMPt+IDlJqey7RgVuu aGLjGHaBUDeqtkRHAG4YzJOA3Ciy8nWoy9+ADrnes9sanZZmSuQp1oTZhUKx Gxm3NRspKn/kk+ibM+sy2fJ1t6rcIHTgwg/MDa0dtOLQKNaLjbOid3ShiMlm 44dC3Dgioq5qzvlh0W9QQgMCssiNHS38W1ugqSLoQaYKWShzUWnMENCY6GNi o3qUt3y493YitOMQYuO+Y6+PcwQ3Uro/Eya58URkhr+uN/JmtgmDxiWExvle 9nPxdvaTfZpX+jquDwDVUTVcZHTgJrM6BSJNFexWylUH7RM6B2MrazCD9Ge+ o71EBxcexwQ0wC62QIdecqCpkq9HhwRFYTtpoVihoz2fenRoa9+IjnY6eugl gTH0aelkyGun0x705Oq+DMQN+cwGV4YOC/p8tiDQoK7mRQIdtFvN+Q58k00z OorbcZ9GsfBpSGjI7SpUyXEay1UENwwNjXXQ2P+U2MsJobENuQEB2ebg4ljT LE4M+H4ht8YMpaZ+tLdihPfOMM8NEBtuJjaKE+o1NPxBXRycG888maAJjTp/ l9gfwqBxQUCjpKf9bE84YJ/p5QQFHaMFOibxTFGdD4RK8tX+PzPRWgEHKRat 7Gkp0cFNYO5+f5onA5jRoWZ0BHJxBBAYupPFaOxr6Ggv0aGTB2q4M0DaVUBJ YC64M/hg1T0oT1sZKWZvhk5Q4cu2cAjriSG4wf5e5EYHgAZwo4PGjbPtTOjQ KQ1upEhuqF6OLC45uC/0oG7CAw8KpSGhsRNDsQSNH5v7N3Bu+Fdh3cpiJe2c qukn+PxjfTUpGjcuD3Sf6+cu6lN/LRQawfVGjyeRmyHHI3qX2J9DYuNsvL24 h72oB/xk9GCf5qUEMFjKEl3VMjIr0zaoxnaCokBGuDVrZRpaK+Agbao5SKkA 6qBAxxGl2OGIgg7V0XFaVMuaXRxBrRJ+E0FDTgUdOm0QBB1nrOwIEy7kS/Kr m2KrYMkTSkZtr0Hc0EODHJsSF/iH6MnAMWIFDYUb8ECCxkWT5Cgx7WKjeDY0 /4b0cuRrkgM+6GOYuUGtR/eLoAkei06kegtFQgNCsc38q5sxO4W4wT2iM7VN S6GBDzo3yod5bg2FvqMX+j2BhI0gDQMtbwqSdfkEieF/xGiVxSw0iroLesTb jegYq6RtTNaZKmoWGQ/LzsN0jnVNIRIn97LfL76eDmEHS2qgfUhBx3El00OW rhhcHMG9GTKSaOCGgg7j6jajw5xKkWcUAxYxX0ktU84qf05Ch1lsaCni/EUS MTg3igySyWoWKQ8sac+35eXcUNHRzgIdJTqPqA4dZKoIyQHX4XGx98o+8V1A CaJ7aOsEBRrMQtnCPRtGaCxtCgUp8zBnYyZ3btSM98VZjce8IoI0DAx0UyA7 5QkSw/9Y9Bj7Ay8IU0XSg/1k6Ljc13FzkLM8yVWDHQWBEjJtQ0ZVZMPSFLfm AJmlOUj5BbC7pQ4d7No71IpPYkh6K53kULkhXRwQBTAYIxYT0cFrNDCBQYcO vrQtUztkiDZQcqZGjPbGRa0seXWNc5VCXMoW08wNIRho8ucxmFrBZ7Hgxllw bsDxRb3kMGzRaw6jqOgoFtxAyQEf6yns85OOvTgOCFwAK0S8lW/0JiwUDo3m HBqreFEbBlOa8M4bFH6dFF093lc5xnc3xVuGdsrtoZ7rg56A2AjSMDDITfXH aKLx2F4P+4DAWukJSqOwO0y6ElR0kB+DhAd8+hN40Rz1SOdXDlorqvyAk5v5 XvYCHdxmgcl9a4iOo600L4eUHNmiDoskR+24oa2gEiM9dOI/EDqsqsYUaGjr 1HJyaqmYKhBPnmMJDWF0iNISioloz2M5LZFVzPM3wMVxoQN/kot6yaF6MCgO W9LOMPkDC7negOuQArIZYnNqgj/tZU+4oHK27aQ0mnNoaG6NZho0sPoVjJRZ MZQjWjMxumqcr2K0r3yUt3S49zYGYZ+IOzRIw8AgN9UrbjzmF8M+JpIczE4p 6G4v6KbRQxONI7Tt3ow3YYN0w0lNwkl07GqpuTtoX2MCCFkr6Uo6h1KDjwKA myr8eg4KDa0atETkTAp08MVl8JQa6JFncoGqXkoVGiXWk/9qmbrJHkVPfsYU RjFDQ5SWWKDPIJ+KdS9G40aJjKeA3vj/2zvP6KiuZN/fD4ZW7CyRjMOMZ70b 3r1z7+ov942zMbZxGuccx3FsYwySUEAEZQklECJnMGCSSSYbMMGAAWNsjAOY LAQiCRAoq/vtqtp7n31Ot0RSRKfWXlqt1lH36Vafn/4VdhWi4w5Fdfhxo8jI Ddm7g/6IPMSx73aekKUqr603c26AwMDt82tFshViGrQthbsnAhqdOTSkk4Ib 2epGumsKmNhwVeQ6L0FzUSM0pCPQ1BdFAw0DG/hR6+FGi5wJ+2NJycG4QYtU x9lB4RUpVgkE6OOBUzCEq+Lg45xgM77SrZQCpIs7aQDZgNMDN4vetltv5vSg aYO7bjHuZ7labvhfv8UaOrTLuWF0GLKrAaFxjF/j9S16av6M9EQSHbp+O0Zo 8OiE8iDqS2iAIRoSxeMAKBguUHhwbkh0yMmbVMhRpA+WKlto4a/Gm/lgQnaP mEz9XXeNG9hzQ0RBlWQrbZyf35kXbHwhoDFdOCnjcQPsSHf1cCY2XOikOOsT G81QHdpAw8AGftRAKrY5rQVPgP29SHIwdByKgaWiozyF77iHJh659rp8MaKa xjnliDmSsBlfNPGYISpI2T+g1V21d/hbPsqHowMLPDTJsUcvOagdxEEx6+2I Hhq6/5XKNWW47oqV/+D1ocOvTAKfUanGPKq/xotF3EAu5R5+7RSL5zp8Bw90 qNAwcOO4qNpSHkQkUv3WMT9oFGml5tqZID00dMgAKXHDMMxXF9YgaCgd0Wlb PWO72IeCvXoEN1Z0ESFQ2oqiNdmA35qBBRvTUWlM5U6Kd5y7brS7ptBVNdxV QU5KZst4KGQNNAz0/1FznthlrcXPgf3Vihg6UHIcjA4lekh0lCUDOmBf7VB7 DTomVG0O/ovkRr6YrUDF519E8NGQgA4s6tjQTQMIag+UHCKxEkhy8M66IjSq 1h4EgIaBFcd1GsD4zzogPQ5rF3UAaBTp/6efUP+VK1frCeXZVXTUBw0pNpiL 4Y8OA51UbhzTJ18Mckg9GTrPYhH/PKLso5foOKIoDdiYwxsuwfG0t+hHHuLA LfNYqrEWo6DaJhRRTC4aeTFicHpMxqryibiLjcTGKHf1CFflsHqdFLJmuy7q axjo/6PmP7f6rMVPgAzQISQHQwfRwyPCpAwdVemwtbY6CwrDPBgOBfckV5tb DfdQ2gUqSN1QQWpAx/pu5LNoANnR3Rgd/UWLjpLkEHpDQYcBGob/yMp1Z9Ae 9aAjwNIuySI9NIqVMAJVWOkXEYBf9fRcRwQ6VGjoPAvyKUTh1gl+1QuY6Jfq fxkipUWB6KGpFz03qIePOq73kIAGb9GG69fb/kVvvq3dtdsrMW8id7zOgR0o tNcVnog2oUxQmuRDYbnbV+iCbhv5rmoo24C9bK28OrQ+a6nTaw3+kWoqOg4g Og5KdAwML0uC7oJVGYCOOomOPIUbeVqDdL7fbZ5ulj1E0ggdVN2x+WYNILiN Rd8rTGRV/F0VgkZAGX/cz2VQ/1nXJzyO6ioitOLtIr+LkbsAf1GWDCmICooS ntfQ5MGRO4zQ0LjxF/W3tGrPE/488eOGyr3D9dOj+M/alXv0T1p5BqHjgDbd Bv4QfG4CLoTGa3+9iX6X3Xj1rzexe978H7jnjf+G2/DH/bKzkBk0IQWg4UVi QL6VNqHAnEeXJ5C1UWj4WijE0TrflgDoiIZRtsfiwk4nhl9IggaD0O0nU6Aj T4FGHgZICx28bxiTHHKW/VKsI12D6PimG5/1tgkLDreD5ND+BHuUOWJidqQm OSQ3iv24cdzoMui4EZAe9eQ3JTH4jWMGbogL/KRSZMXWST0BTijokBe4KmBU saE91F8090dFBy3BDU1sSG5QSuiwPnqs1Gxoyg38EaWNuWgAi9Uakhi30xXN vr7+15tew8VuMFawexg32I3X/xvuhKt+viYzaLxj7Th35Wh39ShX7UiXtxCK yWksbE2eszLHeSnbcSnLUZGBg+mT690s3/wf/qs1eZLNdrat+W1hf0eKkR6M NqLjFEPHEGt5CkcHfA5zDdzAAKmUHDNEY5/FOBlwFaJjLaJjPZccECD9vjuv Adt9K6cHxeJoXLWUHPVxw48YqmuvOfj+gYKAWU413qhWVfEn+ouRG2Lxy19W bMqrXqLDUP6hio2TfzGiQ3BDZEY4i+j8+Rmq5SjUBuSAnh6GUvzDItopBh/I Fo5I7NvkIjfkdYQDW2/geut/jNBg8uOV/0J0zNJaarBjqka5LhW4yoY5L+U7 K/Jg+0lttqNqqKMyy1Ge4ShLt5em2k+n2M8ktboegFdlptJQTaZXDgM6QiU6 mM9STKoD0cF8llqJjjxlQZTDqUmOWbhVdoGYZb8aHRZAR1eOji1ccqhRDk1+ yHHVh/zRUS8xdLhoAB2Bcp0eNf9iSOyqYkNe7Kf40mSDrLk6oSRYVfeBbkux cUJ5nJMGbtwhvR4R7hDcOKoEdQ/gll7aBfMHbQlUCuMP6yaqULQZ7vlVjH2k zWu4W1nKDGLFm7SQGIwb/tBg62VCh4AGkxnlBa4Luc6zWY7STMd5BMWFNHtp iv10kv3UEFvJYNvxQbZjrX7T62WtOZ2UNvGeaOiI0dDBPhLMeYFYR2J4GaKj Os1WF1B1FDioNQf8aAZOlZ2PPcHIW1kl0LFODKemnOyuW7RmHcJb0QByUPaq UiRHIGLoWCGCDypGAnsuxbr6qwC5XYPY0HMDDpAXvqHM+3g91VwyjUJwULlR orwWg+MjH+3oHVrz9v1IDJgih8FMSY8DSntA+lY6JuQJYkeU90WVb/w9HRLu 7QARDGQFW6QxGoYG5wbGP2tGuioLnBdzneeyHKfT7CeS7SeTbCcJFIm2IwOs h+KtB+Ksf8TWO1m+TVwgZM1TltY8T9FYxtEhAh20JDrODOSqg6EDPn7Z+ujo cNxISwMiP8cB5XOEt7IcxwISOjDcwSXHNpQc1K9ytz4ni5JDA4g/NwzQUOsW StSI5R36OqjAANHUhT5ZI67xK+BGyR0GbmgXe7E/NxQ4nLjDKFdEEZcx2Cud lENCbPx2uzYmm9Pjdq2Cbv+feM/nvaKUS5SAsrc09q4O8XczYnRMvK8jhT2J GG8JmUHQIG74Q4MtqVKYnRvqOJXhKEmxHx8CouJIArBif6x1X3/rb9Hhe/qF 7+4b3sD+rzZ0jTTPqbahN4SMijqOKOjYHwXoYCLkuD86ZCFHLk/I0iZZTXLM E2nZZZ116CBvZSt2F/xB6S4o0UE5WZE31ABSLNChu8QCcyMAOgLVYGhx1ABB V+FT+HFDgwZw444A3BDk0aCktgOl85T1YyV36M6TbihpFP44R4TY+AM9lF9u 9+2+zbfrNt9PjAm34QyX26h1PBz82+1advU3vH/XrQSNOEaMe4AYg+7n0HhL LzOk0pBig6Dxyn/dJE/mpf+8iS326+fSAuxHMFgDdaFt7hpp6hNuc28ImSG9 wrjxRz9ER39Ax1lCRzLEOnTokK4K1oDBj2ZigHQ+Tg5V0bG6i+qtwFe5SVam ZX+7jQdIMcrBh30U/Vn7pNXHB7+l+5HGDS3Ridz4ixEdx7WIqEfNbvhzg0HD nxvycYp00RKNUfIwSoIUK7iQSFH36Km9i6WHwpTGj7f5dt7q++FWoAe7/SOP V4g+J7rG8jF3dmDEYO9e4r0dB97fcfADAI23/GSG6p5QYoXEBhGAKQ0ixou0 /i+g42C89Y/+1l+jwn/8LHznp2HbPwnb+lHYt/8M3fBB6Dfvh94YSkNak7Ku Lb4h0kh/Yow0DLgRFbqvHyx2z4mE8LODAB2XkmEbi2+ovuwcXRUY7jYd0fGF GPG2uLOGjpWoOr4R/Tpo08ouBR2q5NgvSpWOiB2doDcUgFyOG+yi1v9ULcMQ coKXWhkKyHVs8ShJEJ3YKNGrBUPmV3Qk0zSDfAqCxhGRCjkmhMcJITaKRE4E HBM+EJM/yK/omzCZ8cNtvh23+rbf6vse1w6Exo5bfNtu8W3H3gW7ACDszv53 gcZg79jA+zoOvr/jkAc6Jvfg3FBlhn9M49W/1kuMF8SSVWGb/xm6EVmx5t3Q Vf8IWf5WSMM9bdriZdJ0IY62+G6oRpJDftSJG3CjX+gRQsfA8PPosHDJQUtx VXxTFclB3spiVB1LMdyxStkSReUcKjoMkoPmmR4WTbmRG/L/sgEgAbnB0XHS L/VZ4l9kpWZqlMormRs1cOOk3mM64Sc2jogcR5HRZ9G2lYm+AZrwOK4hxUOR CtmDfQ9oDO3d+x6hsfUW33e3wNet6PRtxvEEm7r7toCc6/e3DrF3dxhwL0BD EiPlwY4yOiGJAdBQfBP5LDpiKLh4nq3/4Ic9++83PfPvAJClb4Ysfj14wavB 814JbrinTWu4TBro+sWM/ehjYXv37qU7m+i0W8O7cf3G/uKqq8I+GHv7hhJD jsaGlSSEU6yjKlVBh6gd5dtVpimS48tOHB1LQHXA/at4FXoAdJC34hfloO2c +C/7z1qIgDPhjnrpcbIedPiVbOnQYfxWK6vQPU6JXqKo3CCxIXepiHYi/BGK lDHQslvREX1TUAkNWcz5y+3gkhAitsDij7b5Ft+33QEUG9Hv++Zm2EiyFt7b KPRNEu8DaEhieERIUw1rqL4J3QNR0P8MQAwDLp5m699uegrX3/9V0x6tHxoN dP1i5vV6Y2Ji/H/LVBoNG/u7Y05Wc1Xoo7Kf0DEA0HExSe+tkKtCDc+nwoQm +CmTHHM5OvjnfJmo69ACHUpFB6Fjj5Ac+3WSg2+4EJKDoCEjDIHlB0eH3r84 pVRt6dChD4BILBjKKmQGBBChlKUdV+QEtPHhuVEPZUXVBuYSGjS0br8QHgfE YGiqfNuHxNjDA5sAjY3dfetuhrWWL49i2ICLN+aKvrND/D0Q/GTEYO8JEYNZ xkMWQw7lzf+5SX0QyptIYryAoKCl4gJAgax48l+1X7/CT1druFIaaO3FrLS0 NCUlxf+3Gj2c2xreisY19umSkoNxg0mO3z4LJXQUITpKcdO9x8P7+WiuygQu OXwzEB1zxDbJRSg5yFtZKTawbPRDx0+3aJLjD6PkoM0XDB0eGbhQg5MBAcJ+ qk+e8hsnBSt09BC1XifE3hCBDilRPDIzcsxvp7+cL3CIyifEmMh9osQCJi+I QixRWUFtBOBbkU6Fn/4uoPETQmMbQmPNzb7l3aAvH62lXWsWdfHO1W1mlzKD OSZJPTrKag1GjKyHARpv/LeWLlE1xqsi/vkSCgwmLZ77D40JjA9P4LrOz1Ur uVIaaO3F7I8//oiPj8/Pz2dfZ86cWVdXJ39kQuOyxj5jMqvC0PF7X81nKYoL OzkAAh2VqQIdqqsy2S0lB/yUSY75GCNV0UFV6N90pd6VfO6bqD/nUY59ASSH 3LdlSKz4Lw0gqsw4rXLDb+eaTLwe1xd1yOoLrLvwULBCTnNWN4kcEWLjD44I 2gDCOfALpk2xvSr+SBm6zW7spqSq2MlO6weExiYBjUVdfPP5qpvbuWIGCLny cfytjsXCjIH3gczwYOI1vaeFiDH0EUtOLwvVk0PYU0mtSpfkBT9cXJWQuKy1 niulgdZezI4dO7ZmzRqGi5qamhEjRjR6o9G2mIO+KmMfM+mqSMlBbgvtfSuT 3orqqmDtqAdrOUhyQIBUBjrUzCxWdBjR8ZPeVTmA6OCS409ab0x9FYdxyfY1 JxSAnObo0HHDf9OrdFKKjOlU/QZVOcdZ0OOwKLiS0PgVNQPSALDAOMCTpzzZ Acewn+7Ge3aKcYqUFsFVu6V77Ybu4JUQNOZ29s3o5PscVtXkyItj4R3+9H87 sK9x93QccC/3R1IetKT1tLCXnInEyO7FoSEDF+wYJipeFFGLZzBS0biU8LcW uVi2b98erVhOTo6vwdZePoxvMKPbmzZtmj59uvzR9V/yNzYxyFTJsRclh/RW DL1Jqdu59i1FOaZD+SiXHBo6MDO7HKvQZaeOTUpm9kdyVW7lrsp+v8SKUB31 okPteYXoAG/l9F90CkTGKPzRcUItovizT90qe0RMNDgqxzCJrjiHMF7xC6+/ EsO1eWUFYAEyIJT+6K5lS38QEc7tcD/cgNGr3aFbzgZY5au7nV3S9eKiLlVf CmhMjvRNiKgdG3FxBPA56m8d+t/VgUGDHof5Jqk9LekPATSyHrGwRdzIRm7Q MUxR0Hr23yFG0dS4IGtV10vA1l6y8RdjxciRI2tra8vLy0eNGrV582b5i9eZ im1Vb0KTGpcc/TTJwRYDCOPJ0VisBxsUXp7MG5PyKMdo4a1glMM3S6DD31tZ qcVIfd9iU0GSHAZXBWrAbtdqOUTluYYOA0DgwlfGAbDbJRwdpDc0gBQHQsdx XQ0Glxa0DirBikOipoJCoAQN8ix+wGoKvAECg/QDjFVFIKzHJlrQwBkSpnB7 I752+srnGcGqXtb1/IIuJ2Z1Oj6t0+nJkRcmRlSMi6gbDdOZK3OdTGZE3QnQ oNMYDEkTSyo6JqQ0MgU3hiI0Hv8/EMZkoHjq35pJXcj/zgGvlyVLlsyaNavp TqBh82/tJRt/MWIwEcJ4EhcXt3DhQqk9fNd34bcfaJCxj5x0VRgxfkfJweTH wRjYDXciIfzcYJhY7cuy6byViSQ5sKXPF4iOeQo6DCXohmIwJjmoBkzWjh4U m2Tl2FMNHX/W0ePEn3UNvYtEgToViZ3mJVvEHO2zLdFxTKnBOKqf0UbQkPGK feiP7Be5D4LGjlt4KexWZAIu7yaUEDCu6GY+ruhrhMM6vEGTVeVcZjHGqG5x l4tzO5+eHnl0QsTeQvfB4a6iPNfJbGdpFuw+/uz/ATToVyAKyqDxIEAjDaGR 8bCFLYYOLjl6BbXsWDH/S2b//v29e/duQW5cm5lK46qMfer2CVdFooOJkEOI jpIB4ecHi0BHvgiQQvkoNjz/HCSHb3YkR4d/oMPgrWxXJId0VdR+PnzMui7D oi399BAOmWKRgqH8ywllCwl2IOSf7WNiPvXRP+vqrw6JUCeDxs9iVwiENHkS hD8Ug8YWqLzyUCnFOiCD9+tuNSu61q7oWreqK6gIGlTEQEGTRxZhM3Ccplo1 r1O16PTL7qyc2al0ckTxaPf+Ya49mc6fUhy/DrFTNKPv3zpEIzTiMaDBoJHU w5KC3EjXc4MkR2ubLFZRUZGWltayeuOa7Rqyse0TGj6SHP0UydGXp1eYC8PQ URQbdmoAFIN5qBKMps1Kb0VIDo6O+YiOgGnZDd14C3QZ5SBXhXc7v13rr0vo UDIsOlzIgexHDLUfMuhxh9oaS/6K9pE4+Cet2/lBnlTl0PgRIxU/YNSCAPIT frvjFi28s5LPJPIu61q7uAujQeXcztXzO9d+2bluQWc+O+DLznyIKnbNqpzg Zm7IxckRlVMjaqdHehT7LdXxw0Dblhhrn//tQNCg+wkagx7oOKSHJelBS0pP 4AbkUB6yEDcykBstCw1foKtm0qRJO3fuZA5CG+WG4cYVHt8+jUsOPTfYtwwd hxk6ML3Ct674eyskObCClKNDBjrU3AqmZfnglR+wloNJjr2CGweUAKlKD+Ps wj9xYhwR4UoZFZG1mjJ5KmdYq/nTvdpGfg/VbRI09ghoULKDqQsCyFb0Qdaj G7JGjEREONTN7Vwzq1Pl9MjyKREVyITqaZE10yNrZ0TWToug2ans4OpC6Jd1 Ot95Zrjz/AjX2QLn8XznoWzn3lT7z4Ns5JX0wUXQiL27I4PGgPtIbFgYN5KR G+yEmZ/CuJGucaMlPRRfoKtm+/bt06ZN82Gqok1zo9EPvlGNfQI1V0Wio1/o AURHcRzsmaXhTVo5h/RWZui9lfmROm8FJAcfoOD7thufFLmLSw64LbyVwOgA JogWYYf165BoAcQ7e2OT3v1/0iZZH1QinH/wtt5YUwGw0hTIHtx2StDYjPEK 5pJg7sO7phufkboEdt+AopjbSaqFqokRFWPdl0a6yka4LhW6yke6Lo1ylRYC HMryIVJRke24lGk/m2YvTrIdT7EdSbLtG2T7eYDt+zjr5hgrQYMWux19V8fY ezRo4OZWzg2ChoEbrQ0azEaNGhUbG5uYmBgVFdWnTx+mPZr/xK7HrtxJMaEh DdCBxNjbl2sPD1Z0HIgOpe32PEaarXgrVEH6OXorhkBHwEqwjTjujeaT/oT1 DHu5txIAHYcFOo78SeuoefB2dfF7DihlmTB84XZeqIm7TanLDf91KKigBlm3 8bVLaWYIOZHuIC0wT+pd1c27GIo2fTOBFWVMWkyNrJ4cUT0honqcu3yUS/U4 zmfYSzMdJRn2o6n2Q8m2YuiLZT2UaD0Qb/0jNnxvdPiuT8O+h63ooes/hDe2 r0KMfnd2iFGgkXh/x4H3WwY9YBnMnBQ9N9KQG7RaITektWm9cVkmmNBQzcAN Wh7c9XYwGoo6SgZAX8EA3soUN+8GpqJjQb0BUtjy9j2i42dRA7ZP4QahQ6WH bPK/X4xUUG/LIYa/UgnWrbzKAnUF1xh0vyzHohTqTlF0QRpjU3cNIExmLO/q XdDFO6uTdwq8oouj3adGus+OcJ0b5izJcR7JcBxOsx9JsR9NshUNsR0daPPo 7cc+YTt7h23rHbb149BvPwxd9XbIgleD6UeSGDpooHuSgNDAyAZAg4Ib7HxS e1pSBTdotWZo+No4N67/mPZm7NP4u0RHP46OfeitUHpFC3RIb0UNdHB0RPBA h/RWlnfmOVk1QLoT9QYlVvbqJYdEB7X6l3JiLxxJKoVrlb28jzfkdneL4u1d t/IWN8gKXpq1E6MW20Ut1nfojGzqDrGLtRC7gLTpqm6+lZAWkQCpmwivpSLf eTLLcTTDcSzNfmCI/ddE265Y63dR4d/1Dd/WJ2x777DtH4cyIbHhfb5JcO27 IZ5A1vdvHfoKXNC3UXd2YO5J/7s7xt1TLzRSelrkol9kGGnZ3GtLPXVTm6k0 rtkIHcQNCpZKycG8lWNxYaWDwvnWFUNa1h8dqrciJcc32ImU2gnSbHQ+SVZB h6SHnCW0T2v1z6MivOfVrQoxsEoT4QBfdyrfUmkWdq6AoqwN2m5THKYM+8h8 S3D8+qIu3i87V33RqXpKZM1YtwTIoUTbvnjrzzHW7z8L3/xJ2LoPQ1e8E7ro zZCFrwV/+Wrw3Je5lpj6bNDkZyyTnrZMfMqS16vj0Id4qWe/v3Xwh0Y/FRrM Q2HuyQNABgmN5J4aN+i36HYrFxtt2hoIcdzYL/z6TaKDGoLRppX9QnKcSAg7 PyS8hjoKMnRQoEOt6Jgp6khVb4WKz79GaKzHKMe2m307u3PJwSdC6tEhxwnt E24IUoIcHIxRkJzAzbYgJ7pDadlWEdWkGs5vqd0NZwXUXVDF5squFPDk9JjX GSq9cSJq5dTI8+MjzhW6LuRAbPPEYPv+OCt9nNZ/ELrqndAlb4TMeyV45gtB 054LYqCgRxj/d8uYJy3+GoMRg0PjbxwadJtBI+rOjjF3a2GNgfcLaDyI0BBi gx4nGe+k+02x0XRWX4jjhn/hjWIU65DcoGakFCAtioOKDt6jw1DRIdExQ9SR zhcDIlFywD0yQErzVjCxoqkOiY79im/yu9hV+vOtfLwCsoJf8t8rxNjMEcFL vr/pxkGBboiHV2xiURaTFjTW8ItOFPYkqxrnvlDoOpXrPJ4BE3IPxtv2RFm3 fRL2zQehK94OUXO4qo16wlL4uKXgUUveI6Ax0h/smPJAx9i7wQ2pDxr97uzI xQYPa0AglB0wRHBDPgtTHRIatJqZG/JfcHu4dgISoz288EYx4gZ9bokbf0Tx 6QlMchTHQRd0raOgbNABxWCK6lC8FeEUKAFSzMnKynMjOvbdpo4h00GD/JHt yAos/IY7GYW+VQasg6joCmPWsUaLLThmCbghOD25s5cJDEaMGZG+qZEwYB3n n1bibrIGjAmM8U8FMUpIgDBcjHjMUvAY90oYMZJxnzuDRrQCDQ+mXDk37uzI oBF1lyI27reoHooHc8ScGAo0huBqKbHRTi4fw8tsDy+5cU1KDrpkmJ/CFpcc sTwtW5GqpldEbx/a9aaUoMMxem+FGvtwyfEDbwXmUWMdKjFwEpkGDXJJvkN1 QazYyOMVuEOkKyfGcqErFmEPQ6Yu5vG5yZAlmRnpnR7pxeosmJhc6KrKd57L dBxPsh9IABfs+0/DN34YtvKd0EWvh8x+OXj688ETnwka/aRlxONACbbYMcMf 0wCS0bNjag8ezYi7u0PMXQ1Bg4uNe0hsWBIFN8iGoNig+IYBGi3LjRZ53mY2 VVm1k5fc6EZ1pPuE2CCDLW/9QXKUJED9eWWaPjOromNGhPwtvst+qV8FKQVI f1TQQb1uflPCngalIb0SBo0N6IlA403ABX+u5V1g+xhBYyFCYw75IzAx2Tst 0js1ghHDOzHCO87tHeXyFriqcp1nMxzFSfb9CI1tvcO+eT906Vsh814Nmfli 8JTngsY9FVT4hCX/UVy94BrP68U0hiXnEc4KCZD4ezg0+hExmIeCC7ghoKET G8gNehDSGwQNCmWY0Ghmk6+0/bzkRjcqIiU/BcRGFJ/1RnY8nrf34VNXKDPr 194HStDnRnJ0LNGXc2ygAGl3387usnexhyKlBI2fb5V1F1q6BN0T0CqbhFfC BAZ7TIELoXCgGpxDY1YnmLE+Fcq/vRPcgIuxbu9ot7fQ5R0O45JL0x1Fg+37 4q27+0Ftm4TGjBeDJz0bNObvQUxa5DwCi/2UvpKl9+yY0gN6cA2+v2PivR0Z NNQYCI9sEDT+1lF6KNF3c7ERfx9wgx6K0q/sF4fooxktGNmQ1q4uonbikTWp keTg3OATZqGrz9FYXW8ff+OlpLTxbTZMeYM7F+mLz1XJwec08cGyHqoKExkT D49/Smh05x4KdLQgrwT2pwMrFuFaKDafAjQiOTQmgVfiHYMaYwQQoy7fWZPt OJdqPzbItjfO+iNCYx1B45XgGS8ANEYjNLIfsWQ/zC/wrIc7Zj7UkREj9UHo Jc6gMQihEXdPx/7ooXiwF6gECMOFB+q7ODRIbBA36AFJbzBusINlPsWERkuZ Vv6n3NOC59NGjaND4cahGBj9diwOcrKnEqFHR3mKtTZDZGaN9WCEDuQGpWWX ikowTXJggBSb6an0AGjs0kNjq4DGJuGkfN0Vk6pdMOyJ21Hnd/LN6wShjDla ogSgMc7tG+32jQTHxJvv9OY6a4Y6zqXYiwfa9sVaf/wMoLHmvdCv3gqZ+0rw 53poCGJYsh6y+EODmvhRYy7Gjei7IHwBiEBWyM8hQSMauUEPGH+fZQBCY+AD Fo0bPVoRN9rnJaNyo32+A41itNd+P1R/hRE3PNiGlLkqJwfAwCb0Vqy+rPrQ gTHSOYq3slQZmkAB0m04y17SA0YnCOGhlW+p0LiZt8+ipMnSLvCwmCsBaCAx SGl4p0bUTlIiLcOd3jxnbY6zOgugcYxBo791l4TGmwANUhrMPaFfGfowtP9l NzIBGhaj0rivo3zw/ndDajUG4cDRcRf8lL5VXZhYERSV3GD3D+rBK0V5CUdP bZlio/nNX3iYdlUmuQF6Iwa4cRh7kBI3zgxEyZEsJEeundeDQSmpU9sz6x/o WKnbYs+HJgA9btEa+X4v6jT8PRQSG6qTsgBb5czVoFGH0KgZ564a7a4qdNUM c9KjVWYiNBJte/tbf0BofP0uQGPOK8Gqt5XziKVhaAwU0Ii/B/yUWOQGoEPQ AxTI3RDQiBYMYd/Sp5G4QX4K+xYkh54bKjpMsdGCZtLjmo06Cko/5TAWcrDP fElC+OlEGLlShqMTvJn+6HAFQMciZd8KoKMbVx1bbwY4CHp4qEWYrk6juyY2 KCKqOikoNuAwzJ4waFRNcFeOdVeOclUWuiqGOctznZVDHeVY01WfkdIoeNyS 2wsaeKrQyHjIkoaB0CQMhMpfiYeIKHAD0HGPgg6xooVjQhFREhvy35nGDQyN Dm4d3DCvFIOZ8uPajPoYq9wohhBH+KlEbSx1TbrNO1SgY5hdaQ7mMsZI1UCH RAfTEoIeXGOQzNjaXW4wgfvX38wLQTUnhRd0wU+hXBzKM6onRZSPcZeNcJUN d5blOctynGVZjrJ0TWmQe7L63dAlqDSmM/fkmaCxTwWNfCJo2GPADYpsZD4M xODQeBBmHtFpkIeScC/sLonHpaEDF6kLTgxMo1BENPZeSqZYyE8BdDxgMXCD o8MUG63PTIBcrdH0hIPop1BolF0R5KqcHxx+KYlLjsDooE4ds/hYak4AXYMO RMcm0f98y80qMWCzyWbupHh4iVc3Lja+wlKNBVqphndGZM3kiIpx7rJC17l8 Z2mO82yW42y642yq/UySDhrMlrwRMudliGlMeS5owtMQCx3xONRp5D0K0MhG yYEeiiVVDFWUYY0BkEiFJekRd6+GDjpY+ikxitiIu9cSj06KgRuDDNxAdJhi o3WaSY8rNM4NkVIpwtAo+/BTiONikrUixVqTZvNmqejQj4kUMVLauhIAHTSW etPNXHtQ53AqDd2kRUSljxBAbMyMrJkaUTkh4uIo97nhrjPZzpPpjpOp9pNJ 9hODbIfirb/F8JgGVxoMGi8GT8WK0HFMbDwJTgrTG8QN5qowvZEu9pfJsAZF Nhg9aAE67uPoCACNuxWxcQXckOho5lqvdvuftOER9g2b4U1rh+/elRj7GHNX RRSclwyAa5BCHOXJ1uo0qzfDDx0jHXwytRLokFtX1E6k8C3SA4KfhA4JjY1i w9o6KTZEjaha4jU9smYieCjnC1xncp0nMxzFyfZjg21FibY/YqGya3tvYN3X wj2Z+WLwtOchgTIOxUbhE5B7zRdigx4/raeFPJTByI1B9/NWfrQScTFukN6I VaARo4eGcFIsbIGPw1wVhRsUGqU1uAd/alNsNLU1PML+yq19IvfKjSZTS1fl RAJchjLEUZVqrUu3kbfiy4b2/tp2+/FKX0H0VqiiQ6IDbnzdFYTHOgUdEhob btYmlawWkQ3hoXgoHPp5pG9yRN04d+VIV1k+uCclqfaiQbaD8dZfo60/9Anf 8hGc7fK3YeMJg8asl6BUY8pzKDaeDhrFnJQngtQwKYY1ABrJPTg3Bj/AJxQM ggUiIfF+C+mN+Ht1OVkDN2KugBu0uDeEAGn+3a/N+XStwRoeYX+11m4122VN 5QZER+Nhrwr7nEOIIxlCHLWCG94cGC8LV/RwP8mheCuEDjhMTmtaiz7Lhm58 /JmEhl5s0BZX+EXsnqE5L6Pd1QWuSznOc+mOkiT7kQFQ2fUzUxqfcvfkq7dC vnwNxcZLEA5l3PDojZIp4KFwbuBuEUqS9uB7Vwc/AGug4Ab9YqwSETU4KYIb lliEBsVFOTfutzB0JApi0G22TGg0gzU8wv6azaSHv7HP8+EYzo0iUQDGPvAX k6yVKZhVUbhB42V1kkMOXkFvxUPbSb5CX2NlIHQQN9Z309IoYrurh7ruzO7k ndmpZmpk5cSIyjFulQDH/Jp/BrQJzwSN4cGNIOJGFqZRiBupPTk3knqILhm4 GD2kPCAnhaDBvkpuRN11eW4MEFvb2A11mdxoBmt4hP11mik/DMY+0pwbsXx7 7JmBgI6KFGt1mo2HOLI5N5jegAt8pLH+nMsDpaMgRwdzQ1R0bOimQYN7KCg2 FiI35nT2zepUOy2yalJE+VjIoVzId13KdpamOU4MBmTt7W/d3c+641MqCg1b +nbowjdC5r0WMvtl2LmGwY3g8U9zbrBj8h4FscGhIbhBkoP9lKc5hPCgi505 KXFKRDTmHg0a/txgB1BclNBBFaTwIPplQqN5rOER9o1lJj3IVG5IyUGzEqrT rHWCG17iBrYFQw9Cm0wN30pvRZkty2GyGgMda3mSRQxl7ipb/Gkeyhed6j6P rJ4cWTEu4uJI9/lhrrPZztMZjpPJdoiFxtn2RFt3YgLlmw+gpcaSt0IXvAHb Xb9AbkAm5dlgCm6wY/IfC8ruJTwUCQ2lM3CyAAh5K0xvsEueEUBGRA3Q0HPD IrkRJ3bCso8TgOI+ThK5TG40jwUcYd9E5i8/2uHbzj7YkhsYIOWSo0pwwyf1 BuMG7LJHdIzjxd6iEixSmS3bGetIYUCkR42RUnUobWGrx0OpmhBRPtp9ocBV mus8nekoSXEUD7IfTLD91t/6Uz9oErLpo7A174ct+4eOG5+/GELcYGJjBIqN HD9oyCW7fXpEw08DN2RkA6CB3OgnuBGt5wZZHPKBfXIIFHFy3WtCo1nNf4R9 U1s79184OpAbJDnOo+SoTbf5JDfygBtqMAF7++hzsvM7aQMil2rogIPXIj1k 3z9RsOERiVfmoVRPjKgY475Y6Dqf7zo71HmKeShD7EcTbQfibb/GWHf1BW5s +GfY6vfClnNuhDI/5YtXODcmPBs8+ikMazwalPUIh0aqHhp0MlJ7JPeE4gqV G7GCGyo0/LlBj0NRDlIdsFcFWRGHd9Jq5rKNZnsu0wzWPunBPt4qEE4kwERI 3rU40+YbqsUkQW8UYmh0LOgNMTrBrbkq/uPsV3XRunitxP1rS7v4eyg1kyMq x0VcGukuG+Y6l+08k+4oSbYfG2Q/PACclF+i4WS2fhK+/sNA3HgpZMrzweOf CSYnJbtXUMbD2nij1Ic0bUC3Ux/iwiMQNyya2BDQ0HODPxqjByzkA25w03DR XyyTG+3K2qH8YJ9w5qowvVEcF6CZDzQuzhN+SqHYXz/eBT/SGvsIV8UgOVaI tRxB8ZXSL5Q8lBmdaoWHcrHAdT7XeTbTcSoFwqEkNn7vD9D4vk/45o/D132A 3HjHyI3JzwePexrysPmPBw3tFZQuoCFxkSoAIm+zRdwYFIgbBA3o7qVwQxJD 4wYu9lHhuFDuNKHRbq1d0UNFB0iOQeG0xw0ucCWlwnfIjsFNshMRHdTBWHVV KMpB6FhKAgO/XdxZYxGDBnoodcJDuYQ5lNKhzjNpjpND7McG2g8l2PYxsYHj m3f0Cf/24/BvPgz7+r2wFe+EfQX5lNC5yI3pL4ZMwuKNEU8G5T8G3MgQfb3S 9KMV6+NGouAGAkETGyo3PBQsRWiwr3IRN/or99Bqam6YRdGt3NqP/JAxUkYP Sqzw+fWMG6rkGElzmnC7yiREBw1NUF0VkhzICt76byH21vgSenlxdGA9uXdy RM24iMpR7kvDYUxSaYbjVLL9+GD7kUTb/njbb/0BXDs/s277NHzTR8iN9wU3 3uR6Y9qLIRMFN/Ie45WiGTIuqkBD3A5iy8CNhHq40fcubft8zN0BuBGD3Ihp dm742tMns01be/gbATpw00oxtiy+MARqzrmrYpAcYzk3fFMxGws1YJF8xwq5 KrQW4rfsTtH6zyN6axi8ofI854UsZ2mq43SSvWSIvWggH2fwc7T1h77ADaY3 1v8zfM37YSvfDVv6j9BFjBuvh85CbqiPk90rKOuRoMxHdFEOzo2Hg9hKx6Xj hkihqtwAaFBb0bsgRhotWnBIMsg6UvapiL7boq5mc1Ju+A/kDWMq5G/IvxoV dRThOEgKkFanid1tmuRw8iFNE3ntKNKAJAdSQl3zeadQ3qFUzDKomxxROyGi bqy7dqS7apjLP66i2o4+1i2fhG/8KHzdh2Gr3gsQhBn9VHDBk0G5jwXlPBoE 6OgF6GB8AGg8DCIkXRAjA+mR8hBsbx/Sg29OobZdEKZAbvQTMoP7KQo3opXK c4Ubunuahxs35MfvhrcbVX7IrSvSWymXgQ4pOQrFSNmJxkkrEB3VFhEjEqKm XyA0ZkT6pkf4pkbUTYqoHe+uGeOuHuWuKXBV5jkvZTnOpzpKUxxnknG/PJaJ kquyO8pqoMTyd8IWv4V642UQG5iEDS54AvwUQsdQVB2SFei5BGU8whfnhkim qNyIETthZXBDzafUx40oytuKZXLDtIbthvQxCR1MdRyPh27nzFupSLXWZIoZ K8P0rspkpXExKYq5CAq5mP8yC+9nx0wDaHgnwXbXmtHu6kJXFYNGvrMi23kx 3XEhzXEu1XEmxXEqCaDBXJWDCba9sVAsuqufdXsf6+ZP0FX5IGzFu8iN10Jn IjfGPxs86qng4U8EDXs8KO/xoByMjmY+okADPRdaghtBatGXB+s/KZ/CLvy+ d8EycCMgNPy5YULDtCu3Gwwg1KODvJUz6K1UpllrZbfz4co8WarikNvc5og+ YIgLIgZ8izLDN4Wvugnu2jHuGsaNYc7KHGd5pkNy42wKFJiVDLEXD7YfTrT/ EW/7tb/tpyjr959Zt/YmVyV85Xthi98OnfsazJCa8kIIcaPgyeBhKDlIb2Qg N9hXdgzDRVYvvjg3ehq5QcaDG3poEBAa4oZyfPNERJv6KUxrZrth6EEbZslb KR0UfjHZWpluq6VOPv6SQ5knC3qDJiaQzJiOMmMKjFqTyzvRXTfWXTPSVT3c VZkLeqMiy3Epw3EhHdDBfou5KscH249idPT3WNvP0TaMjlq//ST8m38SN8KY nyK5MZK48Tj4KdmPIh/8oDG0Hm4QMdTghj806uNGFHKjn8kN0xrDGpYfbeXv TjFS8lagNUeKtSrDVkedfCg6KhOyk93AB8qqzImkmAZXGgwa7Ke0JtGCyWve ce7aUa6aAld1vrMqD2Y1VmY7L2VBJWppuuN0qqMk2XFskP3QADtWcdh+jLLu +My6pbcVuIF+CjtyxsshjBvjhN7IR26Qk0K+CTuGiDH0UViZvRQ/RdmrQkVf MfcAB/yh0YCTonKjrwkN0xrJ/OnRtv7u7EI4JrbYn0+yXkq1VmXa6nICoWOK IjmE3mD3cHrgaFeAxkS+vOPddaPdtYWumhGumuGummGumjyAxqVs5/ks59kM 56lUR/EQ+5FEGBX9W6xtd7RtZ1/rd58CN1a8CykV5qcYuAHBjUc5NzIFNwga 2Y8KHYLcoLOiPCxxA2q39HtSoi6XSYlqdm60rQ+Paddp7yvW0udy1cauBZIc 0EgwyVqeZq3OhH4+RnRQUw7Y5obQmB1J3KAl/7NzekyA5R3rrhvjrhvlrh3p qoV5ry52QEWe62KO81yW83Sa40SSo2iQ/eAA+944254Y265+nBvLkRtzkBuT 0U8Z/XTwCNQbBIdMVWwgMXLQf5GnkfpQUHLPoCEP8sbCxI1oP7EhEGG5LDf6 mtwwrcmsLaKDXQvFcXwcJPQuTrJWpFlrsvzRwctHeVCUcWOmfs2Ayg0NIMxb YfQYj8Plx8BweXant8BVNdxVnu+6kA2S42SK45gSHf0xykbcYEcufDOUc+N5 wY2/C24gNBgxQGw8qsOFrOtomBs6aNxD0KCarnq54Wn6/sNt7pNjWuNam9Me 7Io4kRBGY93ODQ4vS7ZWptnq/NCBcsItNtfrs7EiIUv08E2L0OgxMcI3Hr71 jXH7mPYodFcOd13MdZVmwW7640kOjI7af4+1/eTHDdgM+0LIhGeDxzwdXPh3 yKcwP0VCQxoUdYh4aWavy3DDAA2qLY++x6JHhyVK7LV/H5t9NbrYMHxI2tCn xbSmtjZED3ZRnBoArgrjxvkhkF6pSrfVCnRwCPDMLKJjJg90QOmXXDhTSaGH Ij+QHr6xEcxtqSpwXcpznR/qPJPuLEHJcSgRXBXiBjt4xbthi95SuPFcCHFj +BPBEBcVAiMH3RN2T+7jwTpuPBKU+nBQ8kNw2KAeFskNmTpRoSH3pCjosEQr SRbppzSR3gj4X2bt2rUDBw6MiYmZOnVqbW1tUzyvaa3c2or8YNfFGXRVqLGP tFpVdajjmUhyEDrmYcH5fD96TNfTY0KEb7S7ZoS7YpirLMd1NtN5EqKjjiMD ddxY+R7jRhj5KVNfCJn4XMjYZyAVq55VDmqMXKgEC9a4oaRUVG7ECW5E1wMN vidFUR30LP3u4n5Kkzophs/GyZMnExISysrKysvLc3JyrrPtv2lt3Vo/QGST nwtDrGVJMKSJOSzVmbbabK46xBxqN6RfZwp0SG58ybfEavSYSTUeQA/fFONm t/MiOnpUcIPduR7rNxg3ZmO9qLqvDUu/IMpBvgnDBYNG/hPEjeCA3BhI3LhX 3apmiVa2yXv0G2AJHR4sK1WTKU3HDf/Pwy+//LJs2TK6vXr1atnK27R2bgZ6 tCqSsAvkHEoOho6LSTCnqTLdVp0FyVk+LqEByfGluqG+M98eO4vRoxO5LeCt jI3wjXTXDHdV5Lo8V2aYUgmh0ChDB7sH6cGhwVZeIG6wwwY/CHVfCffz4g3q sBGjh4ahtwY9o38Stjm5Ie3cuXNDhgzZu3dvEz21ac1sjeJ+tlr5AehAbpQh NypSINYBGZZcrQ2pUXLMUbixkNPDIxv4zMbxjowbkyJ94yJ8o9x1Be6qPNel oc7zGc5TydxPYcfL+o2FuK/ti1eVEMczUMVRiN4Ko8dw1B7D9NyQpV+pghuJ GjcsBmj0x+0q1MhLEkNKDpUbLQKNjRs3xsXF7dixo4me2rRmtkZ3P1shPdiV cp5xAyVHeQqMeKvOsNUOxTYdBQ6eW5lCY90ieREp48YC7OGDCw4g7QHCAxqN grcyORKio6Pd3hHu6nxXebbzQobzJHLjd+TGVsGNxW+HfflG6OxXMcTxYsjE 5yHEwdAxGhsGMnqQ9hj2pMKNx4KHitIvdkxSz6DB2LSHikXVLn+yRyhxQxJD ab7RHNyo74/u9XrHjx8/evTo8+fPN8XzmtYi1kTuZ2uTH+xika5KRSpKjkyo Qoc9syMcvrEuD21OkcXnkhuLec9ArQ/YfOTG5518UyIhNDomwjfCXTvMVZnj Oi+4wY7/McrGufFe2Ff/CFvwZujc10NnvhI67cWQSc+HjH8uZNyzEOsA4fE0 hEkhwyK4kft4AG4MEtxQWdFfdBiWflB/pX1oa+DGzp07hw8f3hTPaFprsCZy P1sPPf4FjbsqaTaQHJk2aA42DHMr43iAgnNjvuDGEuxRvJh6FMNABOAGc1Vm dPJNFSGOQrdXcKMkGXwfpjd2CW6sej9s2TsQGp3/Brgq01+CqlGGDuatsCMZ PcY8A+EO2OwGRR3BIqXCQxzpCjcomRJ7r3HRmRtalEufJRqSLxbiRjNDg9mc OXM++uij3sLYt01xAqa1iDW1+9l65Ae7cMpxGnV1OnCjLssmvRUoPqexbgo3 PNTY/CucorIYufFlZxj1OFOEODA06hvuro8bX38ApeZLmKvCq0ZDmavC0MEO myiEB0PHKIyUUohD4waWhKU8FDTkwaCBgbjBiSE6+RgHHChZlZbihmk3pDWz +9ka6MGuHXBV0mw1GciNbOwMVog52clKN7AFnTg0lopBKpIbcztTp2Ie4hjl 9hW4q3NdZZkQKsE8rJ38lA0fha/BFhzMVVn4Vhi5KkxyTMWE7KQXQiQ6Rj8T UviU5qpQiMPAjYT7+bwkObSRBq7RjVhaenQ0Azda/A9qWvNbi7ifLV6WzC4f HuIYauP9zxXJQbOZOD0YLpbhUrkxTx/iGA0hjro8F+2sLxrk2Bdv3x1t2/6Z ddMn1nXgqoSTqzIPXRVCBztyCgoPQgeTHOSqqCGOTORGMnCDJ2FVUMilfqvS o/+9uhBHU7zPJjTap7Ws+9mC/gtDR00WhkapE2kBj3JIyQGh0YViDoI/N2Z3 1kIcYyDEUZcPEZKzac5jgx37E+w/x9i+72vd3FtzVSCr8iZIDoYOduT0l0Kn vRRC6JjwfMjYZzVXRXADoAFFXz2DZBKWzscwEtqAkTiBDpMbpt3Y1iL0YOio pRH2SudzDopZouH5IpjHxO9UuSFDHBN5iKMW+5yfS3ceH+I4MMD+SyyEOL7r Y93wMbgqK94LJ1dl/hthc16nNj6h019m6AidgplZg6sC3HhU44ZMl9DwFAM0 jHOi7+NhEOmnRDUqN+Qfy4SGaa3Bml9+MHR4lfbFAIfxXHLgjBWcqLIEp0Au E/SQ3IAQRydZ/cV+VJXjOp/uPJHkOJRo/z3O/hO6Kt9+Yl2LrsrSd0ByMHSw Ixk6Zr0aOuOV0M8RHZNeEK7K09xVYdxgh2X2kk17guSwNkCHsoAbCkzq4wZ7 pY37xprQMK21WXPSQ51VLXqQik2yc3A20+LO4KfQmOklXbSDKcSBoVH2bU2B uzLXVUYlHIMc+xLse/rbdvazbfnU+s1H4avBVeHoYAfPewN2rBA6mMMy+UXp qoSAq/Ik5wYz2A8LfQLBVRmooEMuzg25/LmBYsPkhmntxJpNfkCWQY5ZmeDS 9eWAKEdnCG6sENHRRV2o+ksDyIRI4kZFrutipvMU7KYHV+XXWDtzVbb1sW78 2ApZlfcBHezIRW+HLXgzTKKDSQ7pqnj0lvUorzPH/hsB0EGeS4IqQkR8wxDc aFxumNAwrfVbM9AD0GEYz/Q5lp3PjdRcFSE5fAu78CoODI3Ky7wqz3Uxy3k2 DUIciqti24SuCpMcK94DbiyhQMebPNChmsyqeGCTbDBtURGtiQEdgzAhSzHS hrjh56T4Gu9iN6FhWhuyps7ewsU1XnBDjmdSoqO+FV11kmMehEZBb0yKrBsb UVPo9ly9ffEauCrTmKuC+91kVgW4gaFR3rrnIdhKz9HRg6NjwAMaN6SfUl9w oxHfMZMbprVFazr5AdeX5AZtV5mN3ABXpTO4KiQ5FqPkwI0qwI3Jkd5xETUw OtZ9KdtVatQbEBpdjwVg7ODl74V/hVEOdFVCoS/HK5BY0bIquNlt+JPBeU9A 9Re5KmkPG9GR+EAgsXG/5qQYghu+RrreTWiY1qatiaIfcIkZuDFPZFWWCcmx BCXHl1iFjqFR7/iI2lERVcPdFxk30o3c2NzbuuFj6P1FrgpER2VOVoQ4por9 bsxVYUfKrMpQITnIW4FAR0/urVzWSSFumNAwzTR/a3R60A444AbPxmKIYzG6 Kiu7guSgGjBqyjEDqka9EyJqR0dUDHdfyHGdYdzQp2K3fGrd+Alw4+sPIDq6 7N0wCnHIMjB0VUKkq8KOHIHbY/Me59XmGUqjUcytMG4ENX9ww+SGaTeYNbr8 gMttBoY45mI2loc4dAlZ2KgyE0Kj3gmR1aMjLhW4z+e4TmfouPF9X6j+YgeT q7IKsyrMVVkkyke5qyIKwNiRVABWgAVgOY9pkiNVBEgZN9hhMjpqcFKaiBsm NEy7ge1KAHKFlwBccWpo9CuEBnNVsIIUQhzzOlPvr7qJkVVjIi4WuEtzXScz nMXJGjd29oNULDueuSqQVXlfuCpvhy14i4c4Zr2iuSqUVaHoKEkOv5mP4KoA N3oEDXggcHDD4KRc+Uu+znfMNNPautVHj6u6BLjPIkOjmI310H43yY3pnWon RlaMibgwwn0211WS6SxKdhyErl/23TG2H/rx3l+bPuF7VVa+p7kqVHYOBWBQ OMo319POernNTboqacJVIW4MNHBD76TwM7+mV32db5ppprV1a5TsLVyAC0Vo VHJjEeeGF/VG5eiIsgLgxolM59EUxwHkxh4c3MaOZ66KzKqgqxJGroqaVWGS w4ONiyfot6vkPo5ZFf0sFQpxJCrckE6KgRjX88Kv/3dNM61N23UGQOBKXML3 uGlVHIIbtRMiqka5Lw53l+a4SjJQb6CfsicGoPE9zpjm3PgACsBUySGjHOzI 6eStaLUcIUxy5D3BXJVgNcRB3IBsLEoOlRv1ddi42hdubl4zzTRp10MP/n98 aReVG95ZneqmRtaOj6ge5b40zHUu23Uy3XkM46J742E3PbvGd/S1cj/lo/C1 H4Krskof5Zj/BnQfZUfOUAKk458DyTHiKe6q8BDHI0Ep2N5cZGM1bgSUGeoL v+a36xp+0TTTbki7Hnrw9l/IjbqZnWqnRNYwbox0lw+DgY+n0pzFQxyHE+37 4qFB8a4o247PrDK+se6f4KpQQha8lX9wb8WjbJKdhjvdJuJOt5FPhQhXJZhC HB7q5COysYkPBDVMDPl6r+1duobfMs20G9uuTX5wdCzq4p3buXZGp5opkdXj IqoK3RX5rgtDnadTHccZNwYKbvQT3Pg4nPkpDB1McjB0UA3YsnfAW1mk3yQL uRXcXD/uOZ2rQiEO4kZST46LK2z9dw0EMKFhmmkN29XS418Uq54cWTU2opJx I89VluU8k+o4MYRPQ/ilP3TvgdKv3sCNDYiOdQIdVMvBvBV25EJezhH2hag8 n/xiqHBVQvKfJFclmLhx5bhQX+BVviUmN0wz7YrsmuWHtIuZzrOpMCWWXd37 E+y/Yj6FuPHtJ9aNDB0faegQ3grsW1msbJKlzW5McnBX5WnNVSFoXNtLa9Lj TTPNNH+AXHmp2NWa1A9XYtfzipr0eNNMu2FsyZIls2bNup5HuGHSkVd1/m39 xZpm2jXb/v37e/fufZ3cIGuivbfNaVd+8m36ZZpm2vVYRUVFWlra9esNg7Vd epjcMM20y9qkSZN27ty5adOmxuUGWVuUH1d4tm3rRZlmWiPa9u3bp02bxm40 ETektRV6mNAwzbTL2qhRo2JjYxMTE6Oiovr06cO0R5M+XeuXHyY3TDPtyq2p 9YbBGmXnflPYlZxAi5+kaaa1EmtmbpA1ys79xrX6zuF9xZr5lEwzzbSA1nou ycueQ2s4SdNMM021FqdHw89uQsM001qttaD8aOBJTWiYZlqbsOanh8kN00y7 Maw55UcDcdFmeHbTTDOt0a0Z6NE6s8OmmWbadVpA+dFYl7bJDdNMu7GtKXbu +z+UCQ3TTLvxrHGjH00kY0wzzbTWaY0CEJMbppnWPu166KH+ogkN00xrb3Zt 8qNVbZYxzTTTWsquhB7+IVaTG6aZZloD8kNlRaMnaEwzzbQbwAz08L/tD41t 27YNHDgwMTFxw4YNzXOSpplmWiu09xVT7/T5caOsrKx///7nzp27ePFiQkLC mTNnmvtcTTPNtFZmKjoCOjJbt24tKCig27Nnz163bl1znp5pppnWai2g/CBb sWLF3Llz6fbq1asXLFjQ7GdnmmmmtTFbvnz5vHnz6Dbjxvz581v2fEwzzbTW b1u2bBkxYgTdZsJj7dq1LXs+pplmWuu3Cxcu9O/f/9KlS5WVlYmJiadPn27p MzLNNNPagG3bti0ZbdOmTS19LqaZZlqz2pEjR9LT02NiYpp/4oNpppnWFq2u ri4hIeHo0aPM3UhKSvrll19a+oxMM8201m67d+8eM2YM3T59+nRpaWnLno9p ppnW+m3NmjVTpkwZN25cRkbGsmXLvF5vS5+RaaaZ1trtq6++6tev3759+0pK StLT080Ip2mmmXZZW79+/aRJk+j2119/PW3atJY9H9NMM6312+nTp+Pj40tL SysqKvLy8sydraaZZtqV2NatWwcMGBAXFzd79mwzvmGaaaaZZppppplmmmmm mWaaaaaZZppppplmWqPY/wfvXG3W "], {{0, 294}, {360, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{360, 294}, PlotRange->{{0, 360}, {0, 294}}]], "Output", TaggingRules->{}, CellLabel->"Out[4]=", CellID->772415991] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Options", "Subsection", TaggingRules->{}, CellID->890561554], Cell[TextData[{ "By default, ", Cell[BoxData["Loess"], "InlineFormula", FontFamily->"Source Sans Pro"], " fits straight lines to subsets of data, but you can increase the \ interpolation order to capture different detail:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.771003571302957*^9, 3.7710035721403303`*^9}, 3.8540293027285557`*^9}, CellID->597558521], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", RowBox[{ RowBox[{"Sin", "[", "i", "]"}], "+", RowBox[{"RandomReal", "[", "0.3", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.2"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{"ListPlot", "[", "data", "]"}]}], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->973818431], Cell[BoxData[ GraphicsBox[{{}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.012833333333333334`], AbsoluteThickness[1.6], PointBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQNdK8LnvPU8Zz9rJgictA+ycYhxWHcGyr9p7/vy n4coz217E2MQeGzPEn+NP6H+JVT+pf2L0IinvY/f2UNM+2Bv2GIR/P7RR6j6 z/bRe6vtBWze2aengcA3+3OLw540fPgM1f/TPuD80VWq3J/tz54BgT/2DQVa 07Sfvoeax+Cgu6vjVUncB6h6RoeGRYt7D797CzWf2YGtOMcpa807qH4Whw9b 7Rm3VzyC2sfmILH97cHjvY+g5nE42Hg8lLvOdAFqHqeDl6R9yfXJR6DmcTtw aJ0Vj3Zctx9iHo/D0uA/kxwYbu2HmMfnwHe7u+2M+aP9EPMEHBhMT2u4LH4C VS/gcDrr5575HK/2Q8wXdFgk8yjf5MRzqH4hhzUTGuae5Hi+H2KfsMOxtaJf xZ68gJon4vAgRiRyifNTqHkiDhsS3p8Rmf0Uap6ow3YWfdm1Ys+g5ok5zNS+ JjV562OoeeIOHzW+8kQaX4CaJ+Ew6WDW6hyrQ1DzJBzcnEQ2+LzYYg8AFrXm Mg== "]]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.2}, {-0.813552731600191, 1.246216670939464}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[2]=", CellID->621206479] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLinePlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", RowBox[{"Loess", "[", RowBox[{"data", ",", RowBox[{"Scaled", "[", "0.1", "]"}], ",", "x"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.2"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[3]:=", CellID->481152698], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQNHP7iITFx/0H7WTBA4aZ+Tc98u694VKP+mvbXB uZ+tRQ/sTYxB4LH9qTLnHcEXnkHlX9obKJ15Ls7+zh5i2gf7KP/jVYt630PV f7afJBy97f+Uj/bpaSDwzV6GrezKsryPUP0/7d/sa8yonv7R/uwZEPhj//dh m0KB0keoeQwOdXu/ZRf+fg9Vz+jw4Z1Cbw/fO6j5zA7vnuUI9+58BdXP4pB0 y9DMU/wZ1D42B4HAur54/vtQ8zgcIq52KD7ggPmP0+GB6cUHzj8PQM3jdmi4 bqQ3qXj7foh5PA4fol5JaEhd2w8xj88h4YvCzaqmB/sh5gk4KLXUPEjreQpV L+DQ/fT28c2uz/dDzBd0eLOyoCt33nOofiGHG0nt6yXbn++H2CfssPTD1XW6 Es+h5ok4+PCW6873fQY1T8Sh986Dm4r8z6DmiToIeOpPMvv6BGqemMOC68+N Plx6ADVP3CHAYdP++rdXoeZJODDMv3XT1Xc/1DwJh4bDwt7F0jvtAQkW7HQ= "]]}}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[1.6]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[ 1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[ 1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.2}, {-0.7380893424900115, 1.0994829256341587`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[3]=", CellID->790554681] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLinePlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", RowBox[{"Loess", "[", RowBox[{"data", ",", RowBox[{"Scaled", "[", "0.1", "]"}], ",", "x", ",", RowBox[{"InterpolationOrder", "\[Rule]", "2"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.2"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[4]:=", CellID->305549119], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQMS2xaev8h/zn7WTBA4aV8rnHRocsxZKP+m/am/ b6e+3nLL3sQYBB7bf2a5/Ehk2guo/Et72w3RQjfPvLeHmPbBnm/CpyMTVD5C 1X+2V5z/YLuM7Ef79DQQ+GavE9fxNyPzM1T/T/sAzikTbSd9tj97BgT+2Bef de1SPPcBah6DQ8S7n7ybld5D1TM6SCSfePrd+APUfGaHrXOKJ2x6/Aqqn8Xh wgSLzXmOz6D2sTm8WK7GvsX6HtQ8DocJ9gLRixuvQs3jdGC4dqDy2etdUPO4 HRqWGVwMENu9H2Iej0OCy8qD15mu74eYx+fQcG3CtPnrHu2HmCfgMD1+C9fv hqdQ9QIOCzw2Na8peLEfYr6gw4KtYirz1V9C9Qs5FLx5tzDa/sV+iH3CDhX/ Dj9XqXwONU/E4UV/atq0dc+g5ok4MEhclJPneAo1T9ShQHqvfuTip1DzxBwC /Cw582QfQs0Td2iY9etq3NbLUPMkHBic/xgdytkGNQ/I/2Cy5L3VBnsAihDq qw== "]]}}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[1.6]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[ 1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[ 1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.2}, {-0.7860866265161128, 1.2232032477046069`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[4]=", CellID->465971161] }, Open ]], Cell["\<\ Loess fitting involves weighting the local data. Typically, points further \ from the estimated point are given less weight:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.760291765557386*^9, 3.760291766389317*^9}, { 3.771003606474906*^9, 3.7710036174713507`*^9}}, CellID->157789760], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLinePlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", RowBox[{"Loess", "[", RowBox[{"data", ",", RowBox[{"Scaled", "[", "0.2", "]"}], ",", "x", ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{"1", "/", RowBox[{"(", RowBox[{"0.1", "+", RowBox[{"Norm", "[", "#", "]"}]}], ")"}]}], "&"}], ")"}]}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.2"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[5]:=", CellID->411884958], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQO5N+yX+L49aT9rJgictD9qE1yvPuESlH/TfsM2 j8z2uffsTYxB4LH9zVknbHxFnkPlX9pX5Wd5/Ux+Yw8x7YN93OVavTPuH6Dq P9u7H5Y6K1j2wT49DQS+2W81KV8op/AJqv+nfV1Av63PrY/2Z8+AwB/7vb+7 C33mfoCax+CQc+PE/6UcH6DqGR1+aT0x6sh7CzWf2WGXj2/PknWvoPpZHFQa ZulPj3oCtY/NQeZX3lel5AdQ8zgcBByFfJhqYf7jdGhwUt2xMXgP1Dxuhwe+ bzzavbfvh5jH47BhzqM5VZOv7oeYx+dQMc8uO4blwX6IeQIOq0TvMtqvfwxV L+Bg0bEsPVf7+X6I+YIO+/fvCLoQ8hyqX8hh1Y6w/T1uz/dD7BN2CDkQPH3P 4udQ80QcHlRVSHNIP4OaJ+JQNEthzhqmp1DzRB0mPL9rUd7+GGqemEOHiU5/ EvMDqHniDgJmAdLHky9BzZNwWMCfr2CvcxBqnoRDA49r9MzCNfYAhibikA== "]]}}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[1.6]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[ 1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[7, 360], 0.019444444444444445`]], AbsoluteThickness[ 1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.2}, {-0.7387373881920305, 1.1328417117359042`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[5]=", CellID->315621942] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Possible Issues", "Subsection", TaggingRules->{}, CellID->158766396], Cell[TextData[{ "If you intend to use ", Cell[BoxData["Loess"], "InlineFormula", FontFamily->"Source Sans Pro"], " to predict many values from the same data, then it is more efficient to \ find all values in a single request:" }], "Text", TaggingRules->{}, CellChangeTimes->{3.854029359466608*^9}, CellID->278021634], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", RowBox[{ RowBox[{"Sin", "[", "i", "]"}], "+", RowBox[{"RandomReal", "[", "0.3", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.05"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{"ListPlot", "[", "data", "]"}]}], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->64118045], Cell[BoxData[ GraphicsBox[{{}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], AbsoluteThickness[1.6], PointBox[CompressedData[" 1:eJw90w8wlGkYAPBNm7+LXeza5FSUjunmumwddfZ9dJXVxImOdFM54ly5NEeU GjpUTuU6dyilia4/6zoNi5NcSyROd2mx+Zdd1i7CWlaS0J3b57tn5ptv3vme 5/c87zvvtzwkyi9Mj0ajJfz7zL+puJAfKQ0tuElyLs2HkAR9UlN4UliF63vE 1eW7ZqekSsJzmY8asqQ+L7qmsxa/N5B6MVePm/uU6LQmYuOcftB8VzPmNxMP nj7duaadfBU+H1KywiDebTiuD+vbSc7HtU1+db3kryfz0UU08o7sKq0CPTkJ zxs8d7ahH/N7CK3uZ2IbrUBfQTiiQOfts4NY30du047b7/Ufxn4q8l7bsdCM w0r0BsgegRHb6RnlDZIyU5MUrq8avSGit4HndMtoFL1hEn01i2/jq0FPTa6m cfzzzEbR05DTxa4x+U/VmK8hCQeD+EcmNeiPkS9y7ryfpaXmGScGbidvqNy0 2E9LHNX9s0vKNOhNELPNK8OqT2nQmyAZN71fLnMbR+8VcUjxzA6VjaM3Sc7n 7+J02lLea3JG8P2pbO8J9KaIKGBu+3TMOHpT5HJwwtT6qAn03pDohghbVfIY etPkWdsmkwJ3DXpvybb8zYnr7oyjN0MmTpesWPXLGHozJDKXYbTmU2q+WXKF Y2j5jVaL3hype2LEGtlGee/IJvqq3QeU1H5poEluyPWopc6XBrT2mZSkohH0 aVDwx+7DidVq8l+5ywJgNBzt/S10BPstgMnVxVlvnqvR04OVScF79MMoTw82 TmZ/9MCTOk89qDr3tEvAH8F5FkL8gPCHyooh9BaClXrccWnSMHp0SM8MfPjw cj96dBgWVb12D3iJHh267YJc+qQD6C2COi1PJi2Xo7cI1l6U+mV496GnD/e8 6o86eMjR04epiD4JO1yBnj70eO1niQQt6BlArbrwoiCwCz0DiKX7Sxq7X6Bn CCGhNNEsX4qeIRTn3n+V6SpBzxC893on040pzwg8r5mvX5f5CD0jOJTn77jc tBA9Y6iKutXRtiNNrPOMYUfGkfUZldVinWcMi4OX8itoDWKdZwKGJlxBq+iW WOeZwLRtfnqPY41Y5zHgebXJyfOnJegxoKp21K5WWYceA4KSBlqH3JvRM4X4 XSHCYw7d6JmCp82+RlmUFD0z6EmcOlNp2omeGfiwHK56uvWgZwZSl1cbQ0/0 omcOovsVkg+VXeiZQ1tpR7iML0ePCbzYrNi3qT1i3f1iAtvug639J2ToM6GW f6zkgkEv1jOhq39GdF2mxH5M0B/yC2wSKtBjQfnYQl57RR96LJj+8utCb6UK PRYkHEy0n8sZQY8FG5xSU3PVKvRYYLzknWPCXRV6FqDK+hXIuSH0LEAWHPZ5 yz41ehbQwektYJxSoWcBy6IW/W0ZOoqeBVSmHmLs7KQ8S8gwb9J6GQ7h+VjC 2oEfi8WtlGcJy4quxZT920/nWcLKgJ8CmHZD6FnC/nZgj6ZRnhXI08V614Uv 0bMCOv3xsFDUj54VpAnkOfk+1H6toHTBOK/UdQA9K7BIsi6K8VGix4bhga2T OyNV6LEh/k+n44KJQfTYkMCM9PhsvxI9Nji/2JJ1wFqBHhuYplHKsv/n40Cj 2JXzTqRAjwOMlP4TdysV6HEg9ZJkZ5REgR4HVj9odPS6LUOPAxsirrsZO1H3 xRpainwvz1RI0bOGps0jSeVxHehZg03c7zcMH9ehZw2C7hD5mkeN6FnDVPXE E2e1ED0uMMNt5ujTJehxoXVqT0BEbD16XHDNlNjb+9xDjwstbWf3iq+UoMeF b3nH445sKcX/dzH42hWWu48lk38AWoqTdg== "]]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], AbsoluteThickness[1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.25}, {-0.9808444045879448, 1.2771520334991127`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[2]=", CellID->718526101] }, Open ]], Cell["This method:", "Text", TaggingRules->{}, CellID->392935807], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"xvals", "=", RowBox[{"Range", "[", RowBox[{"0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.2"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"ListPlot", "[", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{"xvals", ",", RowBox[{"Loess", "[", RowBox[{"data", ",", "40", ",", "xvals"}], "]"}]}], "}"}], "]"}], "]"}]}], "Input", TaggingRules->{}, CellLabel->"In[3]:=", CellID->364003637], Cell[BoxData[ GraphicsBox[{{}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.012833333333333334`], AbsoluteThickness[1.6], PointBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQPcdp8ZuBuv2M+aCQIn7e0ZmT4KZt+G8m/aWyZ1 FPRoPbQ3MQaBx/bXDve/6J//BCr/0j5XdXrCZJEX9hDTPtiztc+7Ma3zNVT9 Z3tVrq6epXrv7NPTQOCbff+qKeozLr2H6v9pn/33z5tstQ/2Z8+AwB97t8T3 tVvnvoeax+DwJrDsFue1t1D1jA4hCWE+i31h5jM7TFudyi7e8Byqn8VhSfbV DXufPILax+YQUF4tIWd3B2oeh4PGm7LaezMuQs3jdDige3IZ1+99UPO4HQ4I O+Z8u7tiP8Q8HocHIbOkXn47tR9iHp/DjNQJuV+zr+2HmCfgMCdUaGZV3z2o egEHru0slz2XPtoPMV/Qoedg8PJr055A9Qs55J9esyjp79P9EPuEHVgZNfU5 JZ9BzRNxaAlnUObnfwo1T8Th21tNl8lFj6HmiTpULC3ZtO7aA6h5Yg4Nh/Ve F9+/DTVP3IHDpqSwSxDmPgkHgy07vy9wvgA1D8iP+vc77/WR/QCDDegh "]]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.2}, {-0.6905561371895891, 1.0093802697518537`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[4]=", CellID->459017028] }, Open ]], Cell["Is faster than this method:", "Text", TaggingRules->{}, CellID->112046913], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", RowBox[{"Loess", "[", RowBox[{"data", ",", "40", ",", "x"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"2", "\[Pi]"}], ",", "0.2"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellLabel->"In[5]:=", CellID->528199400], Cell[BoxData[ GraphicsBox[{{}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.012833333333333334`], AbsoluteThickness[1.6], PointBox[CompressedData[" 1:eJxTTMoPSmViYGBQAGIQDQPcdp8ZuBuv2M+aCQIn7e0ZmT4KZt+G8m/aWyZ1 FPRoPbQ3MQaBx/bXDve/6J//BCr/0j5XdXrCZJEX9hDTPtiztc+7Ma3zNVT9 Z3tVrq6epXrv7NPTQOCbff+qKeozLr2H6v9pn/33z5tstQ/2Z8+AwB97t8T3 tVvnvoeax+DwJrDsFue1t1D1jA4hCWE+i31h5jM7TFudyi7e8Byqn8VhSfbV DXufPILax+YQUF4tIWd3B2oeh4PGm7LaezMuQs3jdDige3IZ1+99UPO4HQ4I O+Z8u7tiP8Q8HocHIbOkXn47tR9iHp/DjNQJuV+zr+2HmCfgMCdUaGZV3z2o egEHru0slz2XPtoPMV/Qoedg8PJr055A9Qs55J9esyjp79P9EPuEHVgZNfU5 JZ9BzRNxaAlnUObnfwo1T8Th21tNl8lFj6HmiTpULC3ZtO7aA6h5Yg4Nh/Ve F9+/DTVP3IHDpqSwSxDmPgkHgy07vy9wvgA1D8iP+vc77/WR/QCDDegh "]]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 6.2}, {-0.6905561371895891, 1.0093802697518537`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellLabel->"Out[5]=", CellID->72261701] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Source & Additional Information", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source & Additional Information"}, CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[TextData[{ "Contributed By", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Contributed By", Cell[ BoxData[ FrameBox[ Cell[ "Enter the name of the person, people or organization that should be \ publicly credited with contributing this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoContributedBy"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Contributed By"}, DefaultNewCellStyle->"Text", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell["Jon McLoone", "Text", CellID->180302432] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Keywords", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Keywords", Cell[ BoxData[ FrameBox[ Cell[ "List relevant terms (e.g. functional areas, algorithm names, related \ concepts) that should be used to include the function in search results.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoKeywords"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Keywords"}, DefaultNewCellStyle->"Item", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell["Loess", "Item", CellID->14005086], Cell["Lowess", "Item", CellID->402311560], Cell["Local regression", "Item", CellID->229095759], Cell["local polynomial regression", "Item", CellID->360746217], Cell["moving regression", "Item", CellID->77913871], Cell["locally estimated scatterplot smoothing", "Item", CellID->467147347], Cell["locally weighted scatterplot smoothing", "Item", CellID->506514609] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Categories"}, DefaultNewCellStyle->"Item", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Data Manipulation & Analysis", { False, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Interfaces & Connections"}], "\" \"", "\"External Interfaces & Connections\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data & Computation"}], "\" \"", "\"Geographic Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Knowledge Representation & Natural Language"}], "\" \"", "\"Knowledge Representation & Natural Language\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Documents & Presentation"}], "\" \"", "\"Notebook Documents & Presentation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Repository Tools"}], "\" \"", "\"Repository Tools\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Social, Cultural & Linguistic Data"}], "\" \"", "\"Social, Cultural & Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Strings & Text"}], "\" \"", "\"Strings & Text\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "System Operation & Setup"}], "\" \"", "\"System Operation & Setup\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "User Interface Construction"}], "\" \"", "\"User Interface Construction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram Physics Project"}], "\" \"", "\"Wolfram Physics Project\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Core Language & Structure"}], "\" \"", "\"Core Language & Structure\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Engineering Data & Computation", { False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometry"}], "\" \"", "\"Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Higher Mathematical Computation"}], "\" \"", "\"Higher Mathematical Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Just For Fun"}], "\" \"", "\"Just For Fun\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Machine Learning"}], "\" \"", "\"Machine Learning\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Programming Utilities"}], "\" \"", "\"Programming Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Scientific and Medical Data & Computation"}], "\" \"", "\"Scientific and Medical Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sound & Video"}], "\" \"", "\"Sound & Video\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Symbolic & Numeric Computation", { False, "Symbolic & Numeric Computation"}], "\" \"", "\"Symbolic & Numeric Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Time-Related Computation"}], "\" \"", "\"Time-Related Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Visualization & Graphics"}], "\" \"", "\"Visualization & Graphics\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, {"\<\"\"\>"} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxVUMtOAzEMlIDCLkJ8Aapy6m0/\ YrVtpUpAUc0PZFN3G5GXYvuQvydbEConWzNjz9h908ECuDiE+71wEu7gYTij+cLj6ZbuXi0xvKw1a/\ Wmg03iNNsY1Er1QbtClmC5CZMNiNmGSV2UKzVEX1ddpLCE4sforKn4u/iqM9d89d8xeqK2F46+\ YqaD5iPHhJkLPA6acYrZItVk+zSP0OnmJ9lcD+KQms3Rsh5rt9hqR/\ hHtGt0eM3M50UnPvw3fN4Fxpwy/oZu+1BARsL6j6cDUpRs8LMkhGYrwcyabwEOblc="}, CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->326074788] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Symbols", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Related Symbols", Cell[ BoxData[ FrameBox[ Cell[ "List up to twenty documented, system-level Wolfram Language symbols \ related to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedSymbols"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Related Symbols"}, DefaultNewCellStyle->"Item", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell["LinearModelFit", "Item", CellID->878381504], Cell["Interpolation", "Item", CellID->796505631] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Resource Objects", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Related Resource Objects", Cell[ BoxData[ FrameBox[ Cell[ "List the names of published resource objects from any Wolfram \ repository that are related to this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedResourceObjects"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Related Resource Objects"}, DefaultNewCellStyle->"Item", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell["Resource Name (resources from any Wolfram repository)", "Item", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->873143661] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Source/Reference Citation", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Source/Reference Citation", Cell[ BoxData[ FrameBox[ Cell[ "Give a bibliographic-style citation for the original source of the \ function and/or its components (e.g. a published paper, algorithm, or code \ repository).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSourceReferenceCitation"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source/Reference Citation"}, DefaultNewCellStyle->"Text", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell["Source, reference or citation information", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Links", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Links", Cell[ BoxData[ FrameBox[ Cell[ "List additional URLs or hyperlinks for external information related \ to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoLinks"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Links"}, DefaultNewCellStyle->"Item", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[TextData[ButtonBox["Wikipedia\[Dash]Local regression", BaseStyle->"Hyperlink", ButtonData->{ URL["https://en.wikipedia.org/wiki/Local_regression"], None}, ButtonNote->"https://en.wikipedia.org/wiki/Local_regression"]], "Item", CellID->752187411] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Tests", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"VerificationTests", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Specify an optional list of tests for verifying that the function \ is working properly in any environment. Tests can be specified as \ Input/Output cell pairs or as symbolic ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "VerificationTest", "SymbolsRefLink", ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"], BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, { "Link"}]], ButtonData -> "paclet:ref/VerificationTest", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " expressions for including additional options."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoVerificationTests"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "VerificationTests"}, DefaultNewCellStyle->"Input", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MyFunction", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellTags->"DefaultContent", CellLabel->"In[3]:=", CellID->946203791], Cell[BoxData[ RowBox[{"x", " ", "y"}]], "Output", CellTags->"DefaultContent", CellLabel->"Out[3]=", CellID->168370258] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Compatibility", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Compatibility", Cell[ BoxData[ FrameBox[ Cell[ "Specify any known compatibilities for your resource to ensure it is \ discoverable on the correct platforms.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibility"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Compatibility"}, CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[TextData[{ "Wolfram Language Version", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityWolframLanguageVersionRequired", Cell[ BoxData[ FrameBox[ Cell[ "Enter required Wolfram Language Version (e.g. 12.1+).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> { "SectionMoreInfoCompatibilityWolframLanguageVersionRequired"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{ "TemplateGroupName" -> "CompatibilityWolframLanguageVersionRequired"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{ "CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell["12.3+", "Text", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Operating System", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityOperatingSystem", Cell[ BoxData[ FrameBox[ Cell[ "Select all operating systems where your resource is expected to \ function properly.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityOperatingSystem"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityOperatingSystem"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Windows", {False, "Windows"}], "\" \"", "\"Windows\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["MacOSX", {False, "MacOSX"}], "\" \"", "\"Mac\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Unix", {False, "Unix"}], "\" \"", "\"Unix\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxNkNuKwkAMhsEerLDsE/gKfQipCoJLF7PL7m0PUQenM8Mkg87bmwot3iX5/\ 3w5bIoSMuCoEfI6sAtcwrK6YnfD/pxQelTEsPxTprd3gvyr6Wr4h/\ TXqIc0HhgHmmznBaWnIKDZPgWzkkj/\ BJmLL9iELL69deg5wrqyg2tYtUorjrUUJTEXiCRDZcnasbLmxX6fTsWuV9y0EmX7RhPOwmqLGt+\ V8VKrw2CoSkr4PBhG77xYRjCsNiZCaAnlIx8nJBt8hz/RIRT7YLrR8wRtF2wJ"}, CellTags->{ "CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Required Features", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityFeatures", Cell[ BoxData[ FrameBox[ Cell[ TextData[{"Choose any other features that are ", Cell[ BoxData[ StyleBox[ StyleBox["required", "TI"], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " in order to use your resource."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityFeatures"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityFeatures"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebooks"}], "\" \"", "\"Notebooks\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Kernels"}], "\" \"", "\"Parallel Kernels\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Access"}], "\" \"", "\"Cloud Access\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxlUM1qwzAMHmuzJlDKLrv3BfIQIVugrKyl2gs4jsJMFdtY8sFvP2eDkLHb96cPSU1ZQw\ GSCOHpEsVHqWHXfqG+4zA+8PZsOCvFSXDicfPLx0fe3mKeqD6cYO/cnVdwcZ+vKigipOM7BovE/\ 5Ulu2/JxeHYaI3Mf1kN5TU4j0ESvLRu8kpMb8hI6lBJDJgTu4sX4+\ xP33pDLt8GI6rPqOgUMS5G9YqEa2c+21GcLLebGg4nKxh8yJG5GKrGJog9Y37G/\ obsYtD4mTxC2UWr58w3NfBx2Q=="}, CellTags->{ "CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Environments", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityEvaluationEnvironment", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Select all evaluation environments where your resource is expected \ to be compatible. See ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "$EvaluationEnvironment", "SymbolsRefLink", ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"], BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, { "Link"}]], ButtonData -> "paclet:ref/$EvaluationEnvironment", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " for more details."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityEvaluationEnvironment"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityEvaluationEnvironment"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Session", {False, "Session"}], "\" \"", TemplateBox[{ "\"Session\"", "\"Local or cloud interactive session\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["WebEvaluation", {False, "WebEvaluation"}], "\" \"", TemplateBox[{ "\"WebEvaluation\"", "\"Cloud evaluation initiated by an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["BatchJob", {False, "BatchJob"}], "\" \"", TemplateBox[{"\"BatchJob\"", "\"Remote batch job\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Script", {False, "Script"}], "\" \"", TemplateBox[{"\"Script\"", "\"Script run in batch mode\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["WebAPI", {False, "WebAPI"}], "\" \"", TemplateBox[{ "\"WebAPI\"", "\"API called through an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, {"\<\"\"\>"} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Subkernel", {False, "Subkernel"}], "\" \"", TemplateBox[{"\"Subkernel\"", "\"Parallel or grid subkernel\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["Scheduled", {False, "Scheduled"}], "\" \"", TemplateBox[{"\"Scheduled\"", "\"Scheduled task\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, {"\<\"\"\>"} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxdUdFqwzAMhK1tEtj2EXvPR3RpChmDlmqw58RRialjG0su5O/\ nlMTJ9mRJd9yd5H2awxZ4UAi7k2frOYek6FDcsL0mtPmSxJAAEkmjYQfCScuQgW9u6DQqeP3BprzXy\ tf8YIR2f64CQ3TYeoUtpB81i+7TNMGpYuxp1r0+0eYSKIv+XERkNpzeOF8FWMqI/\ sv0t120p6jTu9KO0ZcyonGb9V7p2RmLjgd4L0xvg08jleRhcS31XTqje9TjgU92nNEouj4EpWUruW5\ CtT3WijAC2QEVrpHxl4zyvabiOYe3SjM66wLlsXG210M4C2Ewe7kgGe8Efg82xD96LUbOL+VQrkA=\ "}, CellTags->{ "CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Cloud Support", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityCloudSupport", Cell[ BoxData[ FrameBox[ Cell[ "Specify whether your resource is expected to work in the public \ cloud.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityCloudSupport"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityCloudSupport"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[True, {False, True}], "\" \"", "\"Supported in cloud\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, BaseStyle->{"ControlStyle"}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}}], "Grid"]], "Output", Editable->False, Deletable->False, TaggingRules->{ "CheckboxData" -> "OEM6eJxNjkEKwkAMRVGqVhAX7tx5gR5Cq0JBqBgvUNsUB6eTYZIsentnQMVdyH/vJ/\ u8gBnIaBHmtYpXKWBRPrF9YddPOLsYFs7uQTFyleDA320/\ 5eym0duAek9BsNsZt2stafc18msgj0FG2JY0+EbMw1gjY5mgjxbv1V4MOU6N/\ 82cnzojzSNOs3NjGX/B8ogW/5P0NFkdHJeTAtaVEww+RCQVw+\ JAZLFxBaxuyKShxfvoEfKzujYRb6FXWpA="}, CellTags->{ "CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Author Notes", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Author Notes", Cell[ BoxData[ FrameBox[ Cell[ "This section, when used, will appear near the bottom of the \ published resource. Content displayed in this section can include background, \ possible improvements, additional information and/or implementation details \ that are otherwise beyond the scope of the function documentation.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoAuthorNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Author Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell["Additional information about limitations, issues, etc.", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Submission Notes", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Submission Notes", Cell[ BoxData[ FrameBox[ Cell[ "Enter any additional information that you would like to communicate \ to the reviewer here. This section will not be included in the published \ resource.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSubmissionNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Submission Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell["Additional information for the reviewer.", "Text", CellEventActions->{Inherited, {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]], PassEventsDown -> False, PassEventsUp -> False}, CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"Loess | Definition Notebook", TaggingRules->{"CompatibilityTest" -> HoldComplete[ BinaryDeserialize[ BaseDecode[ "OEM6eJzVWVtT20YUrjEQBhxaMulMkyc98EAyadJpO9NL2iauDcQdIMCa9JW1dGQ0rHeV3RWg\ X9a/17MrydhGciTbTFNPJsja1XfOnut3LH9JPWqJQSgi7u3ehBKUCgT3a2rlJApA+/nLS2qp4+P/\ 9Sb38M/K7seIMrW5/QGkWT+KBj2Q0refnbdmB6EDOMGLRiuSErj+QFkE/\ hfq0e4VXlFtnhIaekJc4q7lg0Bp1ejSfj/g/dOIgSKNU1Aiki504xDIcptqimouv+\ cuFGq58icT7qXZlgButwTXcKOPqb7w60UnPwLwFNnJ5JFYaRi0WIBqn7fBD3gwqu757SOOUSp7LG+\ rWj6KGEPFXt5dTAWcQh9VBYma+kE/ktY0w+O+KavUKYRCBVrIOAFMcFQKVLf+\ q6m1PRqwSKJnaurhMXUZ6A5XmjJGvinS0F+\ dxdgzmbXRFWOeWSdaYjz8JQIjr35IQ3uGiLvmSX8lkUyeFBrXKkeVCeuNBIuELNDmNmFCt2qkdk6Wf\ v195MbS63WrPMavIs/KKv/\ cXy6wUp2AkbfeFtfcJoFSv5RFzS7eRxrdCJ5JqHX0NKMuNDGuFgi7YZKuDYzG4CHuxjvBPHQkBiZXf\ 5QFPpbBFQKeXyVlYV8CfpPqwRlXaTnIsUa7KjoNQ+DeGb+\ g3GPgtYAxNdUwi5IwxUb4tbKVXITFipcikK0uDPAAGoy4fSmicH5QzN1Gk5krLAdXGNBft3BTX8gA1\ LetC3Ave+IGb2/e3jbSSSNbs982UR6NmLb5zXWOpuTL7BaBJDdzXV26mg0doS674iz08Dqt+\ 8VeXgD4mIPreONBlgJr+0z0KDu/MC1t1KLqp7Ji90G/\ CzwPeFKIyqfrHuVu3LoQgQvtgDLRH1WskSomNXZJ7K9YlCm/\ zFOd4uqWXTU9icDHCPDU5FFqAeZlAk+\ wXQzPOy5gBCxrKStdGdnUnrNKVGl22UUWdCkNUd9XVYH3quRYSmUmpY5ZKLPnEVwP7Zlr4yRB1GFVl\ bcjBQfQp27c6XMhk+qU+VotG2/kJ9/rspJycCcSb1oazilmWo1dUqsH+\ KQtjHtV7dYHnZWxcYkLSyVMiQ3UHLAuUgXqPtQtzEak0JY1r5rdnbbJS6ufetDBmt3HSF3rcCss/\ oSR60OtCw6eApeue9mJ1LAz3IHt3Vp7KH5EZk3tVm6DlAseuJQdSxECWsvyuVl1HlE0f4hYSotho6m\ UcAPLvU9Us3Juh6m2JEb144GJobWmJSNdsRg4GyZkk1igQ9DUM/\ NBOoGRtVagkwHkSbLj1Sn4IE10O9nSbXVZjFdGhE6olUxPwxkqGUGXD9Dmd0bPL+zn+\ VucCeYZVqZMEhX4/fNClGqEvhrONAb/YyESDoGXtA/ERYdU4+1nhZhJt8uLg0TYzET+3kROZ/\ YlrVeGz88E9Zmx+OP5vVCB1t+HtFl4/k6hHpPEvjht/ydMfqZqgQDffbJeTVLn1tzOtQz+\ VSHMfVD2YqXHzDMzUX9RiD8fM6+KW5aK/1bOHv8tAZ9Lyc+Idv9ceA7iShpi/ZnMkHl49+\ uS7SqXbc+s6ox0uzPlN/bsx3HMtiicFDuddi8UdpH0ex7nlCTdtbHf2yfeAuUz8R/sZ+etcc9oqyP/\ 1LoXgXJ4qqpjqBiVytHC6YHj2i7iOb4UA4c6HK5BOmmHeeEogf8G4Pi4KcIocAY0NkjOtZCIpBy4CT\ F2wHvptIUTi8i5DtSFgdYydmikxQAPizZgseMKjrgaw8/RYwrhboqrgxC39hhk0t/cTg/\ 1dHpYy6aH8TlCbaLrk2YjJJVx4TBiHTj5bmz4CqLgfdhDgg6L1CGioG9x+\ xY6tG9AO9zDs2EcDuvRetMalxpasHaEJNB0BOvNVRIPeoKRp8nbn0PKEUyeJ9+Snkce5811pZ/+\ KouXDOV2vNqeXMp9D7QyIujZnSeKiMG4/\ WyabbVsUI30dbWyR5mC4Y6npzAQV7A7CHW8e0ORJGTUV01ufdzMGR2GbTwVmCj3d8A9cd0NNHoiRcl\ 98fkvn3IKDA=="]]], "CreationTimestamp" -> 3.869311129810306`16.340208641736478*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}, "DefaultContentMethod" -> "Legacy"}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.869311129860998`16.340208641742166*^9, "VersionInformation" -> {"ResourceVersion" -> "1.0.0"}, "TemplateVersion" -> "1.6.4", "StatusMessage" -> "", "SubmissionReviewData" -> {"Review" -> False}}, CreateCellID->True, FrontEndVersion->"13.1 for Linux x86 (64-bit) (June 16, 2022)", StyleDefinitions->Notebook[{ Cell[ StyleData[StyleDefinitions -> "Default.nb"]], Cell[ StyleData[All, "Working"], DockedCells -> { Cell[ BoxData[ TemplateBox[{}, "MainGridTemplate"]], "DockedCell", CellMargins -> {{-10, -10}, {-8, -8}}, CellFrame -> 0, Background -> RGBColor[0.921569, 0.341176, 0.105882], CellTags -> {"MainDockedCell"}, CacheGraphics -> False], Cell[ BoxData[ TemplateBox[{}, "ToolsGridTemplate"]], "DockedCell", TaggingRules -> {"Tools" -> True}, CellTags -> {"ToolbarDockedCell"}, CellFrameMargins -> {{0, 0}, {2, 2}}, CellFrame -> {{0, 0}, {1, 0}}, CacheGraphics -> False, CellOpen -> Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]]]}, PrivateNotebookOptions -> { "FileOutlineCache" -> False, "SafeFileOpen" -> "IgnoreCache"}, CellLabelAutoDelete -> False, CodeAssistOptions -> {"AutoDetectHyperlinks" -> False}, AutoQuoteCharacters -> {}], Cell["Hint Styles", "Section"], Cell[ StyleData["MoreInfoText", StyleDefinitions -> StyleData["Text"]], FontColor -> GrayLevel[0.25]], Cell[ StyleData["ErrorText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, Inherited}, {10, 10}}, CellElementSpacings -> {"CellMinHeight" -> 0, "ClosedCellHeight" -> 0}, FontWeight -> Bold, FontColor -> RGBColor[1, 0, 0]], Cell[ StyleData["WarningText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, 35}, {0, 0}}, FontSize -> 14, GridBoxOptions -> {BaseStyle -> {}}], Cell["Template Boxes", "Section"], Cell[ StyleData["MoreInfoOpenerIconTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> GraphicsBox[{ Thickness[0.09090909090909091], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], RGBColor[0.627441, 0.627441, 0.627441, 1.]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.627441, 0.627441, 0.627441, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic], True -> GraphicsBox[{ Thickness[0.09090909090909091], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], RGBColor[0.5, 0.5, 0.5, 1.]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "]]}, { FaceForm[ RGBColor[0.5, 0.5, 0.5, 1.]]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.999985, 0.999985, 0.999985, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["MoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], "\"Click for more information\""}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["InlineMoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], #4}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["ClickToCopyTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> TagBox[ GridBox[{{#, ButtonBox[ GraphicsBox[{ GrayLevel[0.85], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, { 9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {16.5, 4.5}, { 16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {15.75, 17.25}, { 15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, { 8.25, 18.}}, {{9.75, 17.25}, {12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, { 14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{8.25, 12.}, { 14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], ButtonFunction :> Null, Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Evaluator -> Automatic, Method -> "Preemptive"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], True -> DynamicModuleBox[{RSNB`clickTime$$ = 0., RSNB`timeout$$ = 3.}, TagBox[ GridBox[{{#, TagBox[ ButtonBox[ DynamicBox[ ToBoxes[ Refresh[ If[AbsoluteTime[] - RSNB`clickTime$$ > RSNB`timeout$$, RawBoxes[ TemplateBox[{ PaneSelectorBox[{False -> GraphicsBox[{ GrayLevel[0.65], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], True -> GraphicsBox[{ RGBColor[0.988235, 0.419608, 0.203922], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], "\"Click to copy to the clipboard\""}, "PrettyTooltipTemplate"]], RawBoxes[ TemplateBox[{ GraphicsBox[{ RGBColor[0, NCache[2/3, 0.6666666666666666], 0], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], "\"Copied\""}, "PrettyTooltipTemplate"]]], UpdateInterval -> 1, TrackedSymbols :> {RSNB`clickTime$$}], StandardForm], Evaluator -> "System"], ButtonFunction :> (RSNB`clickTime$$ = AbsoluteTime[]; CopyToClipboard[ BinaryDeserialize[ BaseDecode[#2], Defer]]), Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Method -> "Queued", Evaluator -> "System"], MouseAppearanceTag["LinkHand"]]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], DynamicModuleValues :> {}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["PrettyTooltipTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ TooltipBox[#, FrameBox[ StyleBox[#2, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain", StripOnInput -> False], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8, StripOnInput -> False], TooltipDelay -> 0.1, TooltipStyle -> {Background -> None, CellFrame -> 0}], Annotation[#, Framed[ Style[ RSNB`$$tooltip, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain"], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8], "Tooltip"]& ]& )}], Cell[ StyleData["ToolsGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Template Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection automatically using appropriate \ documentation styles\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2790153672590285854; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Template Input"; DefinitionNotebookClient`TemplateInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 2790153672590285854]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Literal Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection as literal Wolfram Language code\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4138174468017918531; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Literal Input"; DefinitionNotebookClient`LiteralInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 4138174468017918531]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Insert Delimiter\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert example delimiter\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1887802176716758884; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Insert Delimiter"; DefinitionNotebookClient`DelimiterInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 1887802176716758884]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Subscripted Variable\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert subscripted variable placeholder\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3787878858871814623; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Subscripted Variable"; DefinitionNotebookClient`SubscriptInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 3787878858871814623]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], ActionMenuBox[ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ TemplateBox[{ "\"Tables\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\ \[FilledDownTriangle]\""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Table functions\""}, "PrettyTooltipTemplate"], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert table with two columns\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5800166344906378520; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with two columns"; DefinitionNotebookClient`TableInsert[2]]]], DefinitionNotebookClient`ButtonCodeID[ 5800166344906378520]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Insert table with three columns\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 533841403879783297; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with three columns"; DefinitionNotebookClient`TableInsert[3]]]], DefinitionNotebookClient`ButtonCodeID[ 533841403879783297]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Add a row to the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4413051590217973467; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Add a row to the selected table"; DefinitionNotebookClient`TableRowInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 4413051590217973467]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Sort the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 9150037060110806081; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Sort the selected table"; DefinitionNotebookClient`TableSort[]]]], DefinitionNotebookClient`ButtonCodeID[ 9150037060110806081]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Merge selected tables\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2347719643166780208; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Merge selected tables"; DefinitionNotebookClient`TableMerge[]]]], DefinitionNotebookClient`ButtonCodeID[ 2347719643166780208]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ActionMenuBox[ FrameBox[ ButtonBox[ StyleBox[ TemplateBox[{ "\"Cells\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\[FilledDownTriangle]\ \""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert comment for reviewer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 2572781756330727330; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Insert comment for reviewer"; DefinitionNotebookClient`CommentInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 2572781756330727330]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as comments\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3646530685697756512; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as comments"; DefinitionNotebookClient`CommentToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 3646530685697756512]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as excluded\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1866935765212102190; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as excluded"; DefinitionNotebookClient`ExclusionToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 1866935765212102190]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { GrayLevel[0.9]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> {1 -> GrayLevel[0.9]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.5}, 5}, "Rows" -> {{Automatic}}}, FrameStyle -> GrayLevel[0.75]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], Cell[ StyleData["MainGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, {0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, { 34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, {23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, { 24.953, 23.914}, {25.418, 23.91}, {29.746, 23.91}, { 30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, {33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, {31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> {Automatic, 32}, ImagePadding -> {{5, 0}, {0, 0}}, BaselinePosition -> Scaled[0.25], AspectRatio -> Automatic, Background -> RGBColor[0.988235, 0.419608, 0.203922], ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], StyleBox[ TagBox[ GridBox[{{ StyleBox[ "\"Function Resource\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", StripOnInput -> False], StyleBox[ "\"DEFINITION NOTEBOOK\"", FontFamily -> "Source Sans Pro", FontTracking -> "SemiCondensed", FontVariations -> {"CapsType" -> "AllSmallCaps"}, StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "ColumnsIndexed" -> {2 -> RGBColor[1., 1., 1.]}, "Rows" -> {{None}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], FontSize -> 24, FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", TemplateBox[{ StyleBox[ TemplateBox[{ "\"Function Repository\"", "\" \[RightGuillemet] \""}, "RowDefault"], "Text", FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False], "https://resources.wolframcloud.com/FunctionRepository"}, "HyperlinkURL"]}, { TemplateBox[{ TemplateBox[{ "\"Open Sample\"", "\"View a completed sample definition notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4393071033038384034; DefinitionNotebookClient`$ClickedButton = "Open Sample"; DefinitionNotebookClient`ViewExampleNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[4393071033038384034]]& , "\"View a completed sample definition notebook\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ "\"Style Guidelines\"", "\"View general guidelines for authoring resource \ functions\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5906117565281445171; DefinitionNotebookClient`$ClickedButton = "Style Guidelines"; DefinitionNotebookClient`ViewStyleGuidelines[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[5906117565281445171]]& , "\"View general guidelines for authoring resource functions\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{"\"Tools\"", PaneSelectorBox[{False -> GraphicsBox[{ RGBColor[1., 1., 1.], AbsoluteThickness[1.], LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], LineBox[{{5, 2.5}, {5, 7.5}}], LineBox[{{2.5, 5}, {7.5, 5}}]}, ImageSize -> 9, PlotRangePadding -> 1.5], True -> GraphicsBox[{ RGBColor[1., 1., 1.], AbsoluteThickness[1.], LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], LineBox[{{2.5, 5}, {7.5, 5}}]}, ImageSize -> 9, PlotRangePadding -> 1.5]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ToolsOpen"}, True]], BaselinePosition -> Scaled[0]]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.35}}}], "Grid"], "\"Toggle documentation toolbar\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5074018684552945401; DefinitionNotebookClient`$ClickedButton = "Tools"; DefinitionNotebookClient`ToggleToolbar[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[5074018684552945401]]& , "\"Toggle documentation toolbar\"", False}, "OrangeButtonTemplate"], TagBox[ GridBox[{{"\"\"", "\"\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxDividers -> { "ColumnsIndexed" -> {2 -> True}, "Rows" -> {{False}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{2}}}, GridBoxSpacings -> {"Columns" -> {{0.5}}}, FrameStyle -> RGBColor[0.994118, 0.709804, 0.601961]], "Grid"], TemplateBox[{ TemplateBox[{ "\"Check\"", "\"Check notebook for potential errors\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 7891204313296928191; DefinitionNotebookClient`$ClickedButton = "Check"; DefinitionNotebookClient`CheckDefinitionNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[7891204313296928191]]& , "\"Check notebook for potential errors\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{"\"Preview\"", "\"Generate a preview notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4299709568580201021; DefinitionNotebookClient`$ClickedButton = "Preview"; DefinitionNotebookClient`PreviewResource[ ButtonNotebook[], "Notebook"], DefinitionNotebookClient`ButtonCodeID[4299709568580201021]]& , "\"Generate a preview notebook\"", True}, "OrangeButtonTemplate"], ActionMenuBox[ TemplateBox[{ TemplateBox[{"\"Deploy\"", TemplateBox[{5}, "Spacer1"], "\"\[FilledDownTriangle]\""}, "RowDefault"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1898445052439169298; Null, DefinitionNotebookClient`ButtonCodeID[1898445052439169298]]& , "\"\"", True}, "OrangeButtonTemplate"], { "\"Locally on this computer\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 8714502586816766511; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Locally on this computer"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "Local"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8714502586816766511]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"For my cloud account\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1389539917011878958; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "For my cloud account"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPrivate"]]]]], DefinitionNotebookClient`ButtonCodeID[ 1389539917011878958]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Publicly in the cloud\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5593410685219912767; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Publicly in the cloud"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPublic"]]]]], DefinitionNotebookClient`ButtonCodeID[ 5593410685219912767]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"In this session only (without documentation)\"" :> With[{RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$\ AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$SuppressDynamicEvents = True, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 8586347731213964380; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "In this session only (without documentation)"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "KernelSession"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8586347731213964380]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ItemBox[ StyleBox[ DynamicBox[ ToBoxes[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}, ""], StandardForm], Initialization :> (CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}] = "")], "Text", GrayLevel[1], StripOnInput -> False], ItemSize -> Fit, StripOnInput -> False], DynamicBox[ ToBoxes[ If[ CurrentValue[ EvaluationNotebook[], { TaggingRules, "SubmissionReviewData", "Review"}, False], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit Update\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit changes to update your resource submission\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3196298050911436087; DefinitionNotebookClient`$ClickedButton = "SubmitUpdate"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepositoryUpdate[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3196298050911436087]]& , "\"Submit changes to update your resource submission\"", True}, "OrangeButtonTemplate"]], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit to Repository\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit your function to the Wolfram Function \ Repository\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3704832848557640569; DefinitionNotebookClient`$ClickedButton = "Submit"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepository[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3704832848557640569]]& , "\"Submit your function to the Wolfram Function \ Repository\"", True}, "OrangeButtonTemplate"]]], StandardForm], Evaluator -> "System", SingleEvaluation -> True]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {-1 -> Right}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { RGBColor[0.988235, 0.419608, 0.203922], RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> { 1 -> RGBColor[0.988235, 0.419608, 0.203922], 2 -> RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.9}, 5}, "RowsIndexed" -> {1 -> 1.1, 2 -> 1.3, 3 -> 0.25}}, FrameStyle -> RGBColor[0.988235, 0.419608, 0.203922]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], Cell[ StyleData["ReviewerCommentLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{#, TemplateBox[{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, { 0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, {34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, { 23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, {24.953, 23.914}, { 25.418, 23.91}, {29.746, 23.91}, {30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, { 33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, { 31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> 12, AspectRatio -> Automatic, Background -> None, ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], "Wolfram Function Repository Reviewer"}, "PrettyTooltipTemplate"]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.25}}}], "Grid"]& )}], Cell[ StyleData["CommentCellLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ StyleBox[#, FontSize -> 11]}, { StyleBox[ DynamicBox[ ToBoxes[ DateString[ TimeZoneConvert[ DateObject[#2, TimeZone -> 0]], { "Month", "/", "Day", "/", "Year", " ", "Hour24", ":", "Minute"}], StandardForm], SingleEvaluation -> True], FontSize -> 9]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{Automatic}}, "Rows" -> {{0}}}], "Grid"], "CommentLabel", ShowStringCharacters -> False]& )}], Cell[ StyleData["OrangeButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (FrameBox[ ButtonBox[ StyleBox[#, "Text", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Condensed", FontSize -> 13, FontColor -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], GrayLevel[1], RGBColor[0.9568627450980391, 0.8019607843137255, 0.75]], Evaluator -> "System"], StripOnInput -> False], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[]}, If[#4, CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]]; With[{RSNB`$cp$ = $ContextPath}, Quiet[ Block[{$ContextPath = RSNB`$cp$, ResourceSystemClient`$AsyncronousResourceInformationUpdates = False, DefinitionNotebookClient`$ButtonCodeID = None}, Internal`WithLocalSettings[ DefinitionNotebookClient`$ButtonsDisabled = True; Once[ ReleaseHold[ CurrentValue[ RSNB`nb$, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; Needs["DefinitionNotebookClient`"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3145484069433207908; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ #2[]]]], DefinitionNotebookClient`ButtonCodeID[3145484069433207908]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; Null], FrameMargins -> {{5, 5}, {0, 0}}, Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8CJZ47CsMQUA2qYY8cOe/Zsl82ZQBGQFF gOLEGPI8UOymHTtE1xUkE+BsoCxQDR5DgLJotuNCyOagGQJ3A0EEVInVEKB/ iTQBguDhg2wIZkjiR0D1EI2Q1AiJTbSQxI8gKiHxzgAGlBtCFZdQMUyoFTtU SSfUSrFUyTvUysVULE9IQlQ0BD8gprQHAOYEDp4= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoY8DpK86ikKQUA2qYacdhZaZ8CxXJsNGQFF gOLEGHLfX3yHOTeadmQElAWqwWMIUBaPdmSEbA6aIRA3rMCrfQXMPVgNAfqX SGdAEDx8kA3BDEn8CKgeohGSGiGxSZIJEASJdwYwoNwQqriEimFCrdihSjqh VoqlSt6hVi6mYnlCEqKiIfgBMaU9AAiH5q8= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8zTb72JMMQUA2qYZ8Wdr69/1LNF8DRYDi xBjyvsz115UjEPFvL589PbgNgoBsiCBQFqgGjyFAWYjIpwe3D2YFLNdmQ0ZA EaA4RAGyOWiGQNzw/ubllQY8aCZAEFAcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+y IZCQxPQFJgKqgYQzRCMkNUJiExKSBE2AIEg4Q+KdAQwoN4QqLqFimFArdqiS TqiVYqmSd6iVi6lYnpCEqGgIfkBMaQ8AIISqgg== "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> RGBColor[0.921569, 0.341176, 0.105882], Method -> "Queued", ImageSize -> {All, 23}, Evaluator -> Automatic], FrameStyle -> Directive[ RGBColor[0.921569, 0.341176, 0.105882], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False]& )}], Cell[ StyleData["SuggestionGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ FrameBox[ AdjustmentBox[ TagBox[ GridBox[{{ TemplateBox[{#2, #3, {16., 16.}, {{1., 17.}, {1., 17.}}}, "SuggestionIconTemplate"], PaneBox[#, ImageSizeAction -> "ShrinkToFit", BaselinePosition -> Baseline, ImageSize -> Full], RowBox[{ AdjustmentBox[ TemplateBox[{ ActionMenuBox[ TagBox[ PaneSelectorBox[{False -> GraphicsBox[{ EdgeForm[ Directive[ GrayLevel[1, 0], Thickness[0.025]]], FaceForm[#4], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], #5, LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0], True -> GraphicsBox[{ EdgeForm[ Directive[#5, Thickness[0.025]]], FaceForm[#2], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], GrayLevel[1], LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], MouseAppearanceTag["LinkHand"]], #6, Appearance -> None, Method -> "Queued"], "\"View suggestions\""}, "PrettyTooltipTemplate"], BoxBaselineShift -> -0.5], " "}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {Automatic, Automatic, Fit}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], BoxMargins -> {{0.25, -0.5}, {0.15, -0.15}}], RoundingRadius -> {13, 75}, Background -> #4, FrameStyle -> None, FrameMargins -> {{0, 8}, {0, 0}}, ImageMargins -> {{0, 0}, {5, 5}}, StripOnInput -> False], "Text", FontColor -> #5, FontSize -> 14, FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Plain", PrivateFontOptions -> {"OperatorSubstitution" -> False}, LineBreakWithin -> False]& )}], Cell[ StyleData["SuggestionIconTemplate"], TemplateBoxOptions -> {DisplayFunction -> (GraphicsBox[{ Thickness[0.05555555555555555], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGZigIIGAwcIQ8kBxk94ekHp9k9Vh4qXaoYcOfoO m+a+X37stKZDbP+hrxpzdOA0TBymDqYPl7n2pnG7PHlk4PzZRxQ2FGWIwPWD jI3p54WbLxuVYn3fnwluD8S8H/Yo9gD5KPYA+TB7YPph9sDMh9EwcZg6FPdh MRfdXpi7YPph7oaZD/MXzB5c4QCzBwA8nn+Z "]]}, FaceForm[#]], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{8.175292500000001, 7.416875}, {7.796855000000001, 11.3084375}, {7.796855000000001, 13.38}, {10.11998, 13.38}, {10.11998, 11.3084375}, { 9.741542500000001, 7.416875}, {8.175292500000001, 7.416875}}, CompressedData[" 1:eJxTTMoPSmViYGCQBGIQ/cTvZcLf/4oOD6tE1rk/5HNQjDzAkqeL4FsusdsW 1KjgwAAGAg7hCSdehX2Xd5BvfR24Q07QwaZCOJPjjZyDHdf1xQW2Qg56LJYa iWlyDv2HvmrEzBeG80GmVbmIwvkvtjT6Sb8Qg+t/BLLPUwJuPti6DEm4/WD7 2qTg7gMZJyIm7QBzP4y/zEVob88lJTi/7+dk7hV1ynD9c3LzfPxZVODmr3ro 0futUwVu/0bpbbqnzqjA3Qfjw9wP48P8B9MP8z/MfFj4wOyHhR/MfbDwRQ9/ ACBxmlc= "]}]}, FaceForm[#2]]}, ImageSize -> #3, PlotRange -> #4, AspectRatio -> Automatic, BaselinePosition -> Scaled[0.1]]& )}], Cell[ StyleData["FormEditValuesButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TemplateBox[{ TagBox[ PaneBox[ PaneSelectorBox[{False -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWHlMVEcYf28XlGM5VlcRapRDDFK0sBaLBWVXUDxTKpe4JgvoQlALAsvV hHIoV4KK6wGiQlUqoqDcKKysDSZtPZJWTTzaxGrV2mqrNtqKB3Qnz8+Zd6Cv tn90vkgyv+/4zc58M9/3dEtIXZoooSgqw8r8Z2l8tjo9PT43wtE8iUrJSE5K 0a1akKLXJenSAxKkZlD58h9y+X+M8Z7a/I3G7V/lHQgKp2kGmzw9rcrQb+j/ ZItPIGBvNywsVVGVJ01DWAqbpBYUFZ1hGsTYvssRqTLHt4nvoIgvbP6ZjM+I Nt9PzUePPdbvcvX+ZwzTQ9vv8yMh6R04fFNY0/ciOkM8wzjXY4+F47xJgiPF cqRuY3kOlnUGLFq4khsv53NPv8zd7NXs/lYsR+158Gm9l1Tu7IYwmq7oJaMd uWMnR7jMMXLd/isYt7UXx4F9Rjtj1NmNXPPsCKyh6S9+AHzUOHEcpR3gMWM+ iQdHrq1kZFkmidvYQS633399ZBf31G21F/ZdLmmvPo0zVcyalCFg33Qr78Ce 7+qv5jdOm8W3e39u9yN+npR3ieHQ5ArlWGwW28pBIXwfilvFcESnC2eyMoS0 ii8UstncZ2XDjiaROihGjbMcyWVJLBP0N2ELC8vm229icHFPKKo+Y3zK3Jj6 q2lV3gFvZpk4BfSqKHwfFC4fLNDml3cVt2IGO7m+5sRzfoSNxglemGVV8dZT yRXqaKeJ5V1gkWIALX5bk8r5u+3x3qEbwvuN3kJ1DN9j5mLQdz60skXIeM9X PoPMnWYzdD4cjoGRMC3XRyI5+CNolyQhJK4A5mWdXGs7Ofs3HP+z9nz16fbf Scz41Muf67c8B7Q7z6L5RiPMAxZxbfU1OFbDtVDNSGtmnb4qQz/W1F1ElYsc 8rG9A6BF8x1fw2zhSnbddHHHJ115kl3rJNI1mzBL6HI2x9SglrugQzHzG7Ft RQ95IglF+DfwqylNb2gRugnWMnNteFWLj/+FsNlLyd3tfoTrTPWZV+vUcBnQ cHbre8HoTzy3ljGYxzT2Cep3MespaibRtZWwGy9vnPmkmXPgjy1fgte7Mxlk fhwZa/8V+9EQTZuPzwg4HBSA1J4XZqCotB1gExTO58hrYOoYM5RzcCcAHHIn QKpPD8eBzx12GHP0PAlfjXPI3C8J7JXlSNjt9vuSYVrKkjbwUs4R2quCwxLU mFJTZpCoaQjXuPqrgPmqhBhs7XH1lTsxmP889su24lOEZuzEyJE7ZJ3Gu23o Z9bDHvitrb2A0Um+NedwxKO/IGzrKZhn15FnRFHeAdh2zSZuXxscCXtpGorR kxqpRWx2zxPQsTk8/bgrxe+MaWj9UXw/be11pZih5VduxzPCqu03kiPFALPM 3VyOCV5kv9P3ovJk6rbkipI2du3n39AwLegO3UBzn0CYH3vMfzHUMeyM4Mu6 7Vwfiqr6BrRxBWhO0/suAxK5jm8fpoX7LszAz4bJStAanylcGCwiFbD9V2ja xk4ZosmNTsc+Xv51F4Xit9yduwJbqaJ0JYEfoT4xaw9YFDaBVuaId93cVb58 MxPLsL/UIlSz2URmft3FGL2tA7YI1UAONF7HOeWnxhb6XULrJFnQsLHz+XDW x6ooZQjcOD4DKXsvkfnu6i1kYxpaVcw/H/5QRQl7L0lk27HfLJCtp8Rw6EqF fDe08F+54MjaC0jX8aDpFtglV4jhCAoH+44HzPvdfFuTy63xMGwd5GMpKq8B fNTRpNZj2vw4RvznkfhoZ7A/fBO9AdzTEhrM70HiNBGj1jJcRY3PJvmSHod+ Ao3Yr2j8HVXeNXMx7Cr7K7HmHOzFZGXWHpytjmPEcXx2kIzWcG15juOYqUHk dz+S2OwRVmFa3DkhaboljgF1R9wc6R3A/RJIz5PWe1wsNlssB0XFZgllI8Qe TrOhxcJSPAfqIjabhOLkNYSvFsL3XlqsG67qv264eqcYuv4gI9V/bz+Kptcf IbETz4ualXP+zf/+WMuWJO08i2J1P0qrYjJTIl2WyXx5NV6PK1C88/bR/7vx N3kqZvY= "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}], True -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWG1MU1cY7m1vS4GWttBLy0dLWyhl5aultrT0C2QzM5rMIWgyluDHkMwf YgBF9gc1cWpijDNuRNFsv2Rmuqmb/NjIYIFkG2qyAYnAljidODfdmItu+AHs Xi6n59x7D3LH9mPnRJLzvB/Pue95z3nfat3UWLVFKpFImpX0n6qNrRVNTRvb 1mrpRc225tcbttW/tnJbS31DfZN/k4wGS+b/MSb/jxFvt7QX95R86TytXyMh WEztye1w97v7c97SBAG2tEHIqRpXX/ksnPlnCVIiMTWXz0DMN5rZSGqX4l+u t+wp+wn1z05Lu7ZCiIYfOjoTnf+MQfd8aFLoiZmRR4FbeEl02tQsnkFpCT/E +1lsUtViOezHOJYzhZdSVqVt5vvLe0/ldpzk7mbZN2I5vEPAJnjPdlBpnQOJ 4s9Qb2V3SB0Dk9rM7b4xiJNJ4jigjSINiaAV3TO1FjEgSr+PWRjFcRR+AiyS X0RxqjrnCDtNO1Bcpga5HJp8tud4m/2Yd9g3WvixZxBmqpg96SqBfmDCeXrZ t6XjzjOaMEbvhfADYZ4UdYvhMLfhcsy8k6sl1+PvQ8EFMRymJnwm6ypRLcse nI7rc1kC1xshk+sVRmkcn8V2AGvfi1jKy24vxhBvs+71XI4+Zm9M6XhuR5J/ cZaE54CcqoH3IS49eaWlvai74AJkIHWOE9GnQg/FPQl5kMW6zz2QfSh1nTKr qBto2I8CKXxbbQeF0VYVB27i4828hanrhRYpq4E8dF+WOBcFe8xmZv5OcxhC 9xdiYKexjm9DSP0/AGl6A4NYdoN14SW+NqnjfkPkT++QZzD0G4pFH6u9fDvz LiD1XGHWxT1gnbKKr+s4AX35rxtqpfHsPrXl7n4o8Y4wlQsditTIIyBl1iVf gVXaZm7djLfBk3b1cWsdIcs5DFkMr3A5NKHg3RgH7dN5BsmUT9ETse6F34Cp pkTBedxNkKno2hCrxZG/GIyq4mTKA1hnPJdj+6wVMEiYlzg6PX8mT2UqFlMV cU/Q0cnuJ/8ciuYcAdGYv3H0SbPnIByuL4BVUoBFjBtQX74xeQrwZmmHZwQ4 5PrYmQ7hGSSS3HeADt0XCTicXWwdY4duOewEAIfCEMu/wYU44LmDCEOOyFTG VphDdL+EiZU0DkQ7NEks0FIWXgRWuuW4WOV/QDCNqSTJh6Lls7DGlY4DTFuO YyCTYPVVGFgseQX3Zct6Yy6mxyFSdget0zDa7n52P9wB31rvMERVLs9VxOPP DOYeAOu8d9Ezor/Qj0TwML+vpapBLOlvb0ElBGlujUzF7iCHQ+Xm7xS+M3RN /AjeTzLJth8yBH/hdzxSZfBXlMN+NHZfTvI5EvLQfic67eqzH8s+VHiRW/uF N9RYB2SBm8xaEwTr8EPhi5G6npsRwml/m29Dv4FfA6llNxs+3yhAMrcL9Y11 4L7jGYTZoC6JffmTuHQWy2wEmG+MvvRqXaW5zdSE2Hi9Izj/wbuGV6EWVWN7 U/8S0yc6TsXux1kgJbUw6nRXOf9m2g5Ae4I01Lp60cz3jphaSA3UMNSCHPDf gDmlrYAajk7cPlEWZsjUmjL9y1SNrhLcOCEDOn3X0HxPdOJ0ymet+4TnIxxU Dd46fQtXj/tmgekeEMNh24+zLTgvfOWoau8wIwv9HpgAetmHxHDo1wB92nbu /S67bW7j13gwSI0ila6+XcAmdR0qVRUZN7AzeQWKK9KAfuAW8wbwTws32O9h pjILojIVrKLRJyoXahH4EUjE/oqGv6OKulNWg6hyfyV6roJYqEscp2C2yilx HM73UW/+6+ZdckoTQn/3M9PcKlUa62DnNBerCXEMTHfEz5HII9gvxbCp4D0+ Zm4Vy0H3kjtx2Qh8LyShs1UunoPpIly9OD/OroytONx3La1+oar/rJHotB8N /4F6Kv1Onkz3hx+iWPRp/jm6Y/gX//sjU6U3eK4wvsIPcjvYzCRkph3sLy// DcvuuIyle//vxt/PCE6d "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], ImageSize -> {Automatic, 15}, ImageSizeAction -> "ResizeToFit"], MouseAppearanceTag["LinkHand"]], "\"Edit values\""}, "PrettyTooltipTemplate"]& )}], Cell["Documentation", "Section"], Cell["Usage", "Subsection"], Cell[ StyleData["UsageInputs", StyleDefinitions -> StyleData["Input"]], CellMargins -> {{66, 10}, {0, 8}}, StyleKeyMapping -> {"Tab" -> "UsageDescription"}, Evaluatable -> False, CellEventActions -> {"ReturnKeyDown" :> With[{RSNB`nb$ = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[RSNB`nb$, Cell["", "UsageDescription"], All]; SelectionMove[RSNB`nb$, Before, CellContents]], {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, ShowAutoStyles -> False, ShowCodeAssist -> False, CodeAssistOptions -> {"DynamicHighlighting" -> False}, LineSpacing -> {1, 3}, TabSpacings -> {2.5}, CounterIncrements -> "Text", FontFamily -> "Source Sans Pro", FontSize -> 15, FontWeight -> "Plain"], Cell[ StyleData["UsageDescription", StyleDefinitions -> StyleData["Text"]], CellMargins -> {{86, 10}, {7, 0}}, StyleKeyMapping -> {"Backspace" -> "UsageInputs"}, CellGroupingRules -> "OutputGrouping", CellEventActions -> {"ReturnKeyDown" :> With[{RSNB`nb$ = Notebooks[ EvaluationCell[]]}, SelectionMove[ EvaluationCell[], After, Cell]; NotebookWrite[RSNB`nb$, Cell[ BoxData[""], "UsageInputs", FontFamily -> "Source Sans Pro"], All]; SelectionMove[RSNB`nb$, Before, CellContents]], {"KeyDown", "\t"} :> Replace[SelectionMove[ SelectedNotebook[], After, Cell]; NotebookFind[ SelectedNotebook[], "TabNext", Next, CellTags, AutoScroll -> True, WrapAround -> True], Blank[NotebookSelection] :> SelectionMove[ SelectedNotebook[], All, CellContents, AutoScroll -> True]]}, ShowAutoSpellCheck -> False], Cell["Details & Options", "Subsection"], Cell[ StyleData["Notes", StyleDefinitions -> StyleData["Item"]], CellDingbat -> StyleBox["\[FilledVerySmallSquare]", FontColor -> GrayLevel[0.6]], CellMargins -> {{66, 24}, {9, 7}}, ReturnCreatesNewCell -> False, StyleKeyMapping -> {}, DefaultNewCellStyle -> "Notes", ShowAutoSpellCheck -> False, GridBoxOptions -> {BaseStyle -> "TableNotes"}], Cell[ StyleData["TableNotes", StyleDefinitions -> StyleData["Notes"]], CellDingbat -> None, CellFrameColor -> RGBColor[0.749, 0.694, 0.553], StyleMenuListing -> None, ButtonBoxOptions -> {Appearance -> {Automatic, None}}, GridBoxOptions -> { FrameStyle -> GrayLevel[0.906], GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{True}}}, GridDefaultElement -> Cell["\[Placeholder]", "TableText"]}], Cell[ StyleData["TableText"], DefaultInlineFormatType -> "DefaultInputInlineFormatType", AutoQuoteCharacters -> {}, StyleMenuListing -> None], Cell["Examples", "Subsection"], Cell[ StyleData["ExampleDelimiter"], Selectable -> False, ShowCellBracket -> Automatic, CellMargins -> {{66, 14}, {5, 10}}, Evaluatable -> True, CellGroupingRules -> {"SectionGrouping", 58}, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False, CellLabelAutoDelete -> True, TabFilling -> "\[LongDash]\[NegativeThickSpace]", TabSpacings -> {100}, StyleMenuListing -> None, FontFamily -> "Verdana", FontWeight -> Bold, FontSlant -> "Plain", FontColor -> GrayLevel[0.906]], Cell[ StyleData["ExampleText", StyleDefinitions -> StyleData["Text"]]], Cell[ StyleData["PageBreak", StyleDefinitions -> StyleData["ExampleDelimiter"]], Selectable -> False, CellFrame -> {{0, 0}, {1, 0}}, CellMargins -> {{66, 14}, {15, -5}}, CellElementSpacings -> {"CellMinHeight" -> 1}, Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), CellFrameColor -> GrayLevel[ Rational[77, 85]]], Cell[ StyleData["Subsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["Subsubsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["ExampleImage"], PageWidth :> 650, CellMargins -> {{66, 66}, {16, 5}}, Evaluatable -> False, ShowCellLabel -> False, MenuSortingValue -> 10000, RasterBoxOptions -> {ImageEditMode -> False}], Cell["Links", "Section"], Cell[ StyleData["Link"], FontFamily -> "Source Sans Pro", FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.855, 0.396, 0.145], RGBColor[0.02, 0.286, 0.651]]]], Cell[ StyleData["StringTypeLink", StyleDefinitions -> StyleData["Link"]], FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.969, 0.467, 0.], GrayLevel[0.467]]]], Cell[ StyleData["CharactersRefLink"], ShowSpecialCharacters -> False], Cell["Annotation", "Section"], Cell[ StyleData["Excluded"], CellBracketOptions -> { "Color" -> RGBColor[0.9, 0.4, 0.4], "Thickness" -> 2}, GeneratedCellStyles -> { "Graphics" -> {"Graphics", "Excluded"}, "Message" -> {"Message", "MSG", "Excluded"}, "Output" -> {"Output", "Excluded"}, "Print" -> {"Print", "Excluded"}, "PrintTemporary" -> {"PrintTemporary", "Excluded"}}, CellFrameMargins -> 4, CellFrameLabels -> {{None, Cell[ BoxData[ TemplateBox[{ StyleBox[ "\"excluded\"", "ExcludedCellLabel", StripOnInput -> False], "\"Excluded cells will not appear anywhere in the published \ resource except for the definition notebook\""}, "PrettyTooltipTemplate"]], "ExcludedCellLabel"]}, {None, None}}, StyleMenuListing -> None, Background -> RGBColor[1, 0.95, 0.95]], Cell[ StyleData["ExcludedCellLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontFamily -> "Source Sans Pro", FontSize -> 9, FontWeight -> Plain, FontSlant -> Italic, FontColor -> RGBColor[0.9, 0.4, 0.4, 0.5], Background -> None], Cell[ StyleData["Comment", StyleDefinitions -> StyleData["Text"]], CellFrame -> {{3, 0}, {0, 0}}, CellMargins -> {{66, 0}, {1, 0}}, CellElementSpacings -> {"ClosedCellHeight" -> 0}, GeneratedCellStyles -> { "Graphics" -> {"Graphics", "Comment"}, "Message" -> {"Message", "MSG", "Comment"}, "Output" -> {"Output", "Comment"}, "Print" -> {"Print", "Comment"}, "PrintTemporary" -> {"PrintTemporary", "Comment"}}, CellFrameColor -> RGBColor[0.880722, 0.611041, 0.142051], CellFrameLabelMargins -> {{0, 10}, {0, 0}}, FontColor -> GrayLevel[0.25], Background -> RGBColor[0.982, 0.942, 0.871]], Cell[ StyleData["AuthorComment", StyleDefinitions -> StyleData["Comment"]], GeneratedCellStyles -> { "Graphics" -> {"Graphics", "AuthorComment"}, "Message" -> {"Message", "MSG", "AuthorComment"}, "Output" -> {"Output", "AuthorComment"}, "Print" -> {"Print", "AuthorComment"}, "PrintTemporary" -> {"PrintTemporary", "AuthorComment"}}, CellFrameColor -> RGBColor[0.368417, 0.506779, 0.709798], Background -> RGBColor[0.905, 0.926, 0.956]], Cell[ StyleData["ReviewerComment", StyleDefinitions -> StyleData["Comment"]], GeneratedCellStyles -> { "Graphics" -> {"Graphics", "ReviewerComment"}, "Message" -> {"Message", "MSG", "ReviewerComment"}, "Output" -> {"Output", "ReviewerComment"}, "Print" -> {"Print", "ReviewerComment"}, "PrintTemporary" -> {"PrintTemporary", "ReviewerComment"}}, CellFrameColor -> RGBColor[0.560181, 0.691569, 0.194885], Background -> RGBColor[0.934, 0.954, 0.879]], Cell[ StyleData["CommentLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontSlant -> "Italic", FontColor -> GrayLevel[0.5]], Cell["Special Input", "Section"], Cell[ StyleData["FormObjectCell"], CellMargins -> {{66, 66}, {16, 5}}], Cell[ StyleData["LocalFileInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued", ButtonFunction :> With[{RSNB`file = SystemDialogInput["FileOpen"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { None, None}}], Cell[ StyleData["LocalDirectoryInput", StyleDefinitions -> StyleData["Input"]], CellFrameLabels -> {{None, Cell[ BoxData[ ButtonBox[ "\"Choose\"", FrameMargins -> {{5, 5}, {0, 0}}, BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued", ButtonFunction :> With[{RSNB`file = SystemDialogInput["Directory"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { None, None}}], Cell["Misc", "Section"], Cell[ StyleData["Item"], DefaultNewCellStyle -> "Item"], Cell[ StyleData["ButtonText"], FontFamily -> "Sans Serif", FontSize -> 11, FontWeight -> Bold, FontColor -> RGBColor[0.459, 0.459, 0.459]], Cell[ StyleData["InlineFormula"], HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, LanguageCategory -> "Formula", AutoSpacing -> True, ScriptLevel -> 1, SingleLetterItalics -> False, SpanMaxSize -> 1, StyleMenuListing -> None, FontFamily -> "Source Sans Pro", FontSize -> 1. Inherited, ButtonBoxOptions -> {Appearance -> {Automatic, None}}, FractionBoxOptions -> {BaseStyle -> {SpanMaxSize -> Automatic}}, GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["DockedCell"], CellFrameColor -> GrayLevel[0.75], Background -> GrayLevel[0.9]]}, Visible -> False, FrontEndVersion -> "13.1 for Linux x86 (64-bit) (June 16, 2022)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Name"->{ Cell[621, 23, 88, 2, 70, "Title",ExpressionUUID->"459eb2e4-23f1-4ff8-818b-813e9233941f", CellTags->{"Name", "TemplateCell", "Title"}, CellID->786230840]}, "TemplateCell"->{ Cell[621, 23, 88, 2, 70, "Title",ExpressionUUID->"459eb2e4-23f1-4ff8-818b-813e9233941f", CellTags->{"Name", "TemplateCell", "Title"}, CellID->786230840], Cell[712, 27, 120, 2, 70, "Text",ExpressionUUID->"5a78aa24-a8ca-4598-957e-20f8fcd083f2", CellTags->{"Description", "TemplateCell"}, CellID->557153629]}, "Title"->{ Cell[621, 23, 88, 2, 70, "Title",ExpressionUUID->"459eb2e4-23f1-4ff8-818b-813e9233941f", CellTags->{"Name", "TemplateCell", "Title"}, CellID->786230840]}, "Description"->{ Cell[712, 27, 120, 2, 70, "Text",ExpressionUUID->"5a78aa24-a8ca-4598-957e-20f8fcd083f2", CellTags->{"Description", "TemplateCell"}, CellID->557153629]}, "Definition"->{ Cell[857, 33, 1206, 29, 70, "Section",ExpressionUUID->"62b48ee1-1103-4846-847a-35b04f1b955e", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "Function"->{ Cell[857, 33, 1206, 29, 70, "Section",ExpressionUUID->"62b48ee1-1103-4846-847a-35b04f1b955e", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "TemplateCellGroup"->{ Cell[857, 33, 1206, 29, 70, "Section",ExpressionUUID->"62b48ee1-1103-4846-847a-35b04f1b955e", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[10688, 293, 1980, 50, 70, "Subsection",ExpressionUUID->"c6236d1c-9015-4d2e-98a1-d3a2a5baa8b5", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[15580, 459, 1429, 32, 70, "Subsection",ExpressionUUID->"89f5a2b5-ec42-4fc6-9c19-08d8eeb581b7", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[17308, 509, 7029, 152, 70, "Section",ExpressionUUID->"e6f91bc7-e9fd-43f3-a57c-64481b9181df", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[222718, 4362, 1026, 26, 70, "Subsection",ExpressionUUID->"4a434b30-7195-4f6c-b4be-cad69c0800ea", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[223831, 4396, 996, 26, 70, "Subsection",ExpressionUUID->"6578a965-7e17-4f11-82ab-f72bcc8e8c58", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[225283, 4448, 221, 6, 70, "Subsection",ExpressionUUID->"e3f27ef3-004a-4c62-9941-25827f6eaa33", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[233970, 4717, 980, 26, 70, "Subsection",ExpressionUUID->"387ecd0e-13f6-45fe-bed9-0e72be8ccc92", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[235092, 4754, 1039, 26, 70, "Subsection",ExpressionUUID->"b73fd477-3f17-4cab-91ed-6f1ebf73eb68", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[236699, 4795, 1084, 26, 70, "Subsection",ExpressionUUID->"3b6f7d76-3021-4f9e-8bdd-da58ef58c617", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[238339, 4836, 923, 26, 70, "Subsection",ExpressionUUID->"2c7e3fcc-03af-4ecb-b920-5911ce7f2ab3", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[239559, 4874, 1874, 45, 70, "Subsection",ExpressionUUID->"b61f8355-43b9-48a2-b6bf-c339049ed5f9", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[241790, 4940, 955, 25, 70, "Subsection",ExpressionUUID->"356af31a-9489-4548-84d3-bacd9643f3d1", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[242770, 4969, 1174, 31, 70, "Subsubsection",ExpressionUUID->"6924b052-a53d-459c-8530-5c20bc2a5406", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[244073, 5009, 1113, 29, 70, "Subsubsection",ExpressionUUID->"6843e435-9d46-4530-bf71-e29e4fc0749e", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[247324, 5107, 1280, 33, 70, "Subsubsection",ExpressionUUID->"26ae9d50-e181-469c-8286-8d4a265f3cde", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[250793, 5210, 1913, 46, 70, "Subsubsection",ExpressionUUID->"7273c262-5938-4339-a27f-5d267eef780c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[256732, 5380, 1071, 27, 70, "Subsubsection",ExpressionUUID->"4929b95e-27e1-4cd7-b1fd-3f1e0850668e", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[259085, 5452, 1155, 28, 70, "Section",ExpressionUUID->"b4d534f4-494d-4f0c-9e10-97f0245c2420", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[260809, 5495, 1033, 26, 70, "Section",ExpressionUUID->"8617926d-cbce-4248-aee4-53af9be78c45", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]}, "Documentation"->{ Cell[10468, 284, 195, 5, 70, "Section",ExpressionUUID->"71908613-f8d8-424b-907f-fac2591294bd", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307]}, "TemplateSection"->{ Cell[10468, 284, 195, 5, 70, "Section",ExpressionUUID->"71908613-f8d8-424b-907f-fac2591294bd", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[222444, 4353, 249, 5, 70, "Section",ExpressionUUID->"d431db6b-ac27-4d86-94ed-aede258e4be0", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Usage"->{ Cell[10688, 293, 1980, 50, 70, "Subsection",ExpressionUUID->"c6236d1c-9015-4d2e-98a1-d3a2a5baa8b5", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310]}, "Details & Options"->{ Cell[15580, 459, 1429, 32, 70, "Subsection",ExpressionUUID->"89f5a2b5-ec42-4fc6-9c19-08d8eeb581b7", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Notes"->{ Cell[15580, 459, 1429, 32, 70, "Subsection",ExpressionUUID->"89f5a2b5-ec42-4fc6-9c19-08d8eeb581b7", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "TabNext"->{ Cell[17012, 493, 247, 10, 70, "Notes",ExpressionUUID->"faf46072-d8df-4f05-989f-58a9ccb25796", CellTags->"TabNext", CellID->53045600], Cell[236134, 4782, 528, 8, 70, "Item",ExpressionUUID->"ffda81d8-8f65-450e-8bb5-2b5a12a8e384", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661], Cell[237786, 4823, 516, 8, 70, "Text",ExpressionUUID->"2efcd8ba-c35e-4fed-b690-ecec524b4299", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[260243, 5482, 529, 8, 70, "Text",ExpressionUUID->"b778f947-4393-42d3-94b9-09ed34588267", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[261845, 5523, 515, 8, 70, "Text",ExpressionUUID->"7d3d70a5-bfe6-4ad9-8355-422b637c5e49", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Examples"->{ Cell[17308, 509, 7029, 152, 70, "Section",ExpressionUUID->"e6f91bc7-e9fd-43f3-a57c-64481b9181df", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011]}, "Source & Additional Information"->{ Cell[222444, 4353, 249, 5, 70, "Section",ExpressionUUID->"d431db6b-ac27-4d86-94ed-aede258e4be0", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Contributed By"->{ Cell[222718, 4362, 1026, 26, 70, "Subsection",ExpressionUUID->"4a434b30-7195-4f6c-b4be-cad69c0800ea", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "ContributorInformation"->{ Cell[222718, 4362, 1026, 26, 70, "Subsection",ExpressionUUID->"4a434b30-7195-4f6c-b4be-cad69c0800ea", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "Keywords"->{ Cell[223831, 4396, 996, 26, 70, "Subsection",ExpressionUUID->"6578a965-7e17-4f11-82ab-f72bcc8e8c58", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425]}, "Categories"->{ Cell[225283, 4448, 221, 6, 70, "Subsection",ExpressionUUID->"e3f27ef3-004a-4c62-9941-25827f6eaa33", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[225507, 4456, 8426, 256, 70, "Output",ExpressionUUID->"5ca05f36-b8ab-499c-95d4-fc999e449eb0", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->326074788]}, "Categories-Checkboxes"->{ Cell[225507, 4456, 8426, 256, 70, "Output",ExpressionUUID->"5ca05f36-b8ab-499c-95d4-fc999e449eb0", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->326074788]}, "CheckboxCell"->{ Cell[225507, 4456, 8426, 256, 70, "Output",ExpressionUUID->"5ca05f36-b8ab-499c-95d4-fc999e449eb0", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->326074788], Cell[245189, 5040, 2098, 62, 70, "Output",ExpressionUUID->"856180a5-764f-434f-9533-376541ddb5f2", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368], Cell[248607, 5142, 2149, 63, 70, "Output",ExpressionUUID->"cb499aa3-c265-4bab-9f2c-406a7e2131b0", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753], Cell[252709, 5258, 3986, 117, 70, "Output",ExpressionUUID->"79b28a6a-6043-41c1-bc89-8ff28c113c80", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750], Cell[257806, 5409, 1218, 36, 70, "Output",ExpressionUUID->"c40a908c-8250-489f-9ea8-e2b62f1fb549", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "Related Symbols"->{ Cell[233970, 4717, 980, 26, 70, "Subsection",ExpressionUUID->"387ecd0e-13f6-45fe-bed9-0e72be8ccc92", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169]}, "Related Resource Objects"->{ Cell[235092, 4754, 1039, 26, 70, "Subsection",ExpressionUUID->"b73fd477-3f17-4cab-91ed-6f1ebf73eb68", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472]}, "DefaultContent"->{ Cell[236134, 4782, 528, 8, 70, "Item",ExpressionUUID->"ffda81d8-8f65-450e-8bb5-2b5a12a8e384", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661], Cell[237786, 4823, 516, 8, 70, "Text",ExpressionUUID->"2efcd8ba-c35e-4fed-b690-ecec524b4299", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423], Cell[241458, 4923, 158, 5, 70, "Input",ExpressionUUID->"a74ea796-0225-4944-b7b2-feff599cd94a", CellTags->"DefaultContent", CellID->946203791], Cell[241619, 4930, 122, 4, 70, "Output",ExpressionUUID->"194e44c7-2c94-4198-b666-b2efd7b29458", CellTags->"DefaultContent", CellID->168370258], Cell[243947, 5002, 89, 2, 70, "Text",ExpressionUUID->"38aa984c-0fc7-4b41-bb2b-968c4d286815", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768], Cell[260243, 5482, 529, 8, 70, "Text",ExpressionUUID->"b778f947-4393-42d3-94b9-09ed34588267", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[261845, 5523, 515, 8, 70, "Text",ExpressionUUID->"7d3d70a5-bfe6-4ad9-8355-422b637c5e49", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Source/Reference Citation"->{ Cell[236699, 4795, 1084, 26, 70, "Subsection",ExpressionUUID->"3b6f7d76-3021-4f9e-8bdd-da58ef58c617", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552]}, "Links"->{ Cell[238339, 4836, 923, 26, 70, "Subsection",ExpressionUUID->"2c7e3fcc-03af-4ecb-b920-5911ce7f2ab3", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773]}, "Tests"->{ Cell[239559, 4874, 1874, 45, 70, "Subsection",ExpressionUUID->"b61f8355-43b9-48a2-b6bf-c339049ed5f9", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "VerificationTests"->{ Cell[239559, 4874, 1874, 45, 70, "Subsection",ExpressionUUID->"b61f8355-43b9-48a2-b6bf-c339049ed5f9", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "Compatibility"->{ Cell[241790, 4940, 955, 25, 70, "Subsection",ExpressionUUID->"356af31a-9489-4548-84d3-bacd9643f3d1", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822]}, "CompatibilityWolframLanguageVersionRequired"->{ Cell[242770, 4969, 1174, 31, 70, "Subsubsection",ExpressionUUID->"6924b052-a53d-459c-8530-5c20bc2a5406", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "Wolfram Language Version"->{ Cell[242770, 4969, 1174, 31, 70, "Subsubsection",ExpressionUUID->"6924b052-a53d-459c-8530-5c20bc2a5406", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "ScrapeDefault"->{ Cell[243947, 5002, 89, 2, 70, "Text",ExpressionUUID->"38aa984c-0fc7-4b41-bb2b-968c4d286815", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768]}, "CompatibilityOperatingSystem"->{ Cell[244073, 5009, 1113, 29, 70, "Subsubsection",ExpressionUUID->"6843e435-9d46-4530-bf71-e29e4fc0749e", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[245189, 5040, 2098, 62, 70, "Output",ExpressionUUID->"856180a5-764f-434f-9533-376541ddb5f2", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368]}, "Operating System"->{ Cell[244073, 5009, 1113, 29, 70, "Subsubsection",ExpressionUUID->"6843e435-9d46-4530-bf71-e29e4fc0749e", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406]}, "CompatibilityOperatingSystem-Checkboxes"->{ Cell[245189, 5040, 2098, 62, 70, "Output",ExpressionUUID->"856180a5-764f-434f-9533-376541ddb5f2", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368]}, "CompatibilityFeatures"->{ Cell[247324, 5107, 1280, 33, 70, "Subsubsection",ExpressionUUID->"26ae9d50-e181-469c-8286-8d4a265f3cde", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[248607, 5142, 2149, 63, 70, "Output",ExpressionUUID->"cb499aa3-c265-4bab-9f2c-406a7e2131b0", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753]}, "Required Features"->{ Cell[247324, 5107, 1280, 33, 70, "Subsubsection",ExpressionUUID->"26ae9d50-e181-469c-8286-8d4a265f3cde", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156]}, "CompatibilityFeatures-Checkboxes"->{ Cell[248607, 5142, 2149, 63, 70, "Output",ExpressionUUID->"cb499aa3-c265-4bab-9f2c-406a7e2131b0", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753]}, "CompatibilityEvaluationEnvironment"->{ Cell[250793, 5210, 1913, 46, 70, "Subsubsection",ExpressionUUID->"7273c262-5938-4339-a27f-5d267eef780c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[252709, 5258, 3986, 117, 70, "Output",ExpressionUUID->"79b28a6a-6043-41c1-bc89-8ff28c113c80", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750]}, "Environments"->{ Cell[250793, 5210, 1913, 46, 70, "Subsubsection",ExpressionUUID->"7273c262-5938-4339-a27f-5d267eef780c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563]}, "CompatibilityEvaluationEnvironment-Checkboxes"->{ Cell[252709, 5258, 3986, 117, 70, "Output",ExpressionUUID->"79b28a6a-6043-41c1-bc89-8ff28c113c80", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750]}, "Cloud Support"->{ Cell[256732, 5380, 1071, 27, 70, "Subsubsection",ExpressionUUID->"4929b95e-27e1-4cd7-b1fd-3f1e0850668e", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371]}, "CompatibilityCloudSupport"->{ Cell[256732, 5380, 1071, 27, 70, "Subsubsection",ExpressionUUID->"4929b95e-27e1-4cd7-b1fd-3f1e0850668e", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[257806, 5409, 1218, 36, 70, "Output",ExpressionUUID->"c40a908c-8250-489f-9ea8-e2b62f1fb549", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "CompatibilityCloudSupport-Checkboxes"->{ Cell[257806, 5409, 1218, 36, 70, "Output",ExpressionUUID->"c40a908c-8250-489f-9ea8-e2b62f1fb549", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "Author Notes"->{ Cell[259085, 5452, 1155, 28, 70, "Section",ExpressionUUID->"b4d534f4-494d-4f0c-9e10-97f0245c2420", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591]}, "Submission Notes"->{ Cell[260809, 5495, 1033, 26, 70, "Section",ExpressionUUID->"8617926d-cbce-4248-aee4-53af9be78c45", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 385356, 7851}, {"TemplateCell", 385538, 7855}, {"Title", 385873, 7862}, {"Description", 386054, 7866}, {"Definition", 386232, 7870}, {"Function", 386428, 7874}, {"TemplateCellGroup", 386633, 7878}, {"Documentation", 390487, 7939}, {"TemplateSection", 390681, 7943}, {"Usage", 391056, 7950}, {"Details & Options", 391251, 7954}, {"Notes", 391455, 7958}, {"TabNext", 391661, 7962}, {"Examples", 392471, 7978}, {"Source & Additional Information", 392681, 7982}, {"Contributed By", 392894, 7986}, {"ContributorInformation", 393130, 7990}, {"Keywords", 393352, 7994}, {"Categories", 393544, 7998}, {"Categories-Checkboxes", 393942, 8005}, {"CheckboxCell", 394156, 8009}, {"Related Symbols", 395281, 8025}, {"Related Resource Objects", 395494, 8029}, {"DefaultContent", 395707, 8033}, {"Source/Reference Citation", 396863, 8055}, {"Links", 397068, 8059}, {"Tests", 397252, 8063}, {"VerificationTests", 397470, 8067}, {"Compatibility", 397684, 8071}, {"CompatibilityWolframLanguageVersionRequired", 397914, 8075}, {"Wolfram Language Version", 398187, 8079}, {"ScrapeDefault", 398449, 8083}, {"CompatibilityOperatingSystem", 398653, 8087}, {"Operating System", 399124, 8094}, {"CompatibilityOperatingSystem-Checkboxes", 399389, 8098}, {"CompatibilityFeatures", 399647, 8102}, {"Required Features", 400099, 8109}, {"CompatibilityFeatures-Checkboxes", 400351, 8113}, {"CompatibilityEvaluationEnvironment", 400608, 8117}, {"Environments", 401089, 8124}, {"CompatibilityEvaluationEnvironment-Checkboxes", 401362, 8128}, {"Cloud Support", 401624, 8132}, {"CompatibilityCloudSupport", 401869, 8136}, {"CompatibilityCloudSupport-Checkboxes", 402348, 8143}, {"Author Notes", 402591, 8147}, {"Submission Notes", 402791, 8151} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[621, 23, 88, 2, 70, "Title",ExpressionUUID->"459eb2e4-23f1-4ff8-818b-813e9233941f", CellTags->{"Name", "TemplateCell", "Title"}, CellID->786230840], Cell[712, 27, 120, 2, 70, "Text",ExpressionUUID->"5a78aa24-a8ca-4598-957e-20f8fcd083f2", CellTags->{"Description", "TemplateCell"}, CellID->557153629], Cell[CellGroupData[{ Cell[857, 33, 1206, 29, 70, "Section",ExpressionUUID->"62b48ee1-1103-4846-847a-35b04f1b955e", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[2066, 64, 7736, 194, 70, "Input",ExpressionUUID->"984c603a-903d-48e7-9a85-469003be73cf", InitializationCell->True, CellID->786495458], Cell[9805, 260, 626, 19, 70, "Input",ExpressionUUID->"6867057e-8aa4-4e8a-8c7b-d4e9e24f92f4", InitializationCell->True, CellID->601929048] }, Open ]], Cell[CellGroupData[{ Cell[10468, 284, 195, 5, 70, "Section",ExpressionUUID->"71908613-f8d8-424b-907f-fac2591294bd", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[10688, 293, 1980, 50, 70, "Subsection",ExpressionUUID->"c6236d1c-9015-4d2e-98a1-d3a2a5baa8b5", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[12693, 347, 229, 7, 70, "UsageInputs",ExpressionUUID->"3dbecc9d-4ba4-4cab-8faf-3de311b41a99", CellID->35197956], Cell[12925, 356, 442, 15, 70, "UsageDescription",ExpressionUUID->"aa6a1948-880c-493b-8dcb-cac068481efc", CellID->35237349] }, Open ]], Cell[CellGroupData[{ Cell[13404, 376, 724, 21, 70, "UsageInputs",ExpressionUUID->"a142ac6b-6a99-43d7-9bf0-b375b2e99700", CellID->131625813], Cell[14131, 399, 455, 15, 70, "UsageDescription",ExpressionUUID->"ffc7e3c0-342a-48d1-903e-9b5b9f1765ef", CellID->314044687] }, Open ]], Cell[CellGroupData[{ Cell[14623, 419, 414, 15, 70, "UsageInputs",ExpressionUUID->"feee8716-9cb0-470b-9296-d65c6447e2d9", CellID->257550955], Cell[15040, 436, 491, 17, 70, "UsageDescription",ExpressionUUID->"3e780678-3c94-44fb-b532-b0dbe7ac2d2f", CellID->89525106] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[15580, 459, 1429, 32, 70, "Subsection",ExpressionUUID->"89f5a2b5-ec42-4fc6-9c19-08d8eeb581b7", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[17012, 493, 247, 10, 70, "Notes",ExpressionUUID->"faf46072-d8df-4f05-989f-58a9ccb25796", CellTags->"TabNext", CellID->53045600] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[17308, 509, 7029, 152, 70, "Section",ExpressionUUID->"e6f91bc7-e9fd-43f3-a57c-64481b9181df", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell[24362, 665, 75, 2, 70, "Subsection",ExpressionUUID->"473e2d27-dfe1-419c-bcfb-fc1ef6ba8b73", CellID->904125756], Cell[24440, 669, 268, 7, 70, "Text",ExpressionUUID->"d3bb5430-c461-414d-adc5-75521ee75199", CellID->774429530], Cell[CellGroupData[{ Cell[24733, 680, 504, 16, 70, "Input",ExpressionUUID->"6c345be8-9845-4591-aeaa-6abd86796754", CellID->64118044], Cell[25240, 698, 3321, 72, 70, "Output",ExpressionUUID->"904059cf-d410-4d32-954c-bdf7b5669e20", CellID->557009726] }, Open ]], Cell[28576, 773, 286, 10, 70, "Text",ExpressionUUID->"fd17f52e-52c2-49a4-ab08-cea5d5abc327", CellID->309140691], Cell[CellGroupData[{ Cell[28887, 787, 157, 5, 70, "Input",ExpressionUUID->"941ff9d9-b361-4b7f-a4b0-967766b5f701", CellID->337447623], Cell[29047, 794, 108, 3, 70, "Output",ExpressionUUID->"70092695-2487-4b10-9bf3-46197f6586fc", CellID->708886313] }, Open ]], Cell[29170, 800, 309, 10, 70, "Text",ExpressionUUID->"e1e8d0fe-e4ed-455a-b84b-3ef5ee6349dc", CellID->661623005], Cell[CellGroupData[{ Cell[29504, 814, 192, 6, 70, "Input",ExpressionUUID->"3ceca481-0de9-4e0f-9412-fd4da80f800c", CellID->56325002], Cell[29699, 822, 108, 3, 70, "Output",ExpressionUUID->"f0712138-0689-4375-9c04-2d9a3f5a59a2", CellID->515217328] }, Open ]], Cell[CellGroupData[{ Cell[29844, 830, 407, 13, 70, "Input",ExpressionUUID->"f5f87aa2-4e82-4914-b224-0ab50d5d0e50", CellID->528199399], Cell[30254, 845, 2020, 51, 70, "Output",ExpressionUUID->"54c9ec02-f45e-4a98-93c6-008ce10ed267", CellID->213950455] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[32323, 902, 66, 2, 70, "Subsection",ExpressionUUID->"096be8d4-098e-4e41-90e2-bbf95f99d122", CellID->204653245], Cell[32392, 906, 327, 8, 70, "Text",ExpressionUUID->"b2a29fb7-b662-4978-88e4-7169b124c833", CellID->491601926], Cell[CellGroupData[{ Cell[32744, 918, 839, 25, 70, "Input",ExpressionUUID->"7babaeeb-d20c-4ae7-844c-515c4a2b01fb", CellID->996378962], Cell[33586, 945, 104747, 1724, 70, "Output",ExpressionUUID->"5e71f4d6-718a-4ddb-ab4a-5f4171da5b09", CellID->249584098] }, Open ]], Cell[CellGroupData[{ Cell[138370, 2674, 206, 7, 70, "Input",ExpressionUUID->"16d68979-ad83-4365-99c8-fa7804ad9a80", CellID->663942630], Cell[138579, 2683, 109, 3, 70, "Output",ExpressionUUID->"daec8bf8-f874-4e48-b608-d0947283e17a", CellID->612362556] }, Open ]], Cell[CellGroupData[{ Cell[138725, 2691, 668, 20, 70, "Input",ExpressionUUID->"b0ff5b00-d807-40e5-921b-53a025989b1a", CellID->747797642], Cell[139396, 2713, 61457, 1014, 70, "Output",ExpressionUUID->"095b9aaf-eb19-4236-90bc-e1f9df3449dd", CellID->772415991] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[200902, 3733, 68, 2, 70, "Subsection",ExpressionUUID->"c741a7f2-c445-42db-bb64-6b15a2eaf711", CellID->890561554], Cell[200973, 3737, 374, 10, 70, "Text",ExpressionUUID->"ce4fd7de-b617-4b31-967a-95e74901fc98", CellID->597558521], Cell[CellGroupData[{ Cell[201372, 3751, 504, 16, 70, "Input",ExpressionUUID->"04cea721-150c-4841-ab94-44034ea9bdd3", CellID->973818431], Cell[201879, 3769, 2018, 51, 70, "Output",ExpressionUUID->"f6d958eb-578a-4288-969d-d66262361efa", CellID->621206479] }, Open ]], Cell[CellGroupData[{ Cell[203934, 3825, 456, 15, 70, "Input",ExpressionUUID->"d7328d48-7f9a-4455-a830-2f2da43aa044", CellID->481152698], Cell[204393, 3842, 2304, 60, 70, "Output",ExpressionUUID->"2f1fa8e5-2164-442e-9373-c9094e952039", CellID->790554681] }, Open ]], Cell[CellGroupData[{ Cell[206734, 3907, 513, 15, 70, "Input",ExpressionUUID->"50535e90-6109-42ad-8401-f39df620cfe1", CellID->305549119], Cell[207250, 3924, 2308, 60, 70, "Output",ExpressionUUID->"85f838ba-8fff-4579-bfcd-2dda71bbce62", CellID->465971161] }, Open ]], Cell[209573, 3987, 304, 7, 70, "Text",ExpressionUUID->"b4402742-c6b2-45df-87ce-714dd681c83c", CellID->157789760], Cell[CellGroupData[{ Cell[209902, 3998, 726, 22, 70, "Input",ExpressionUUID->"3f7a7d5f-08a3-4dde-95b2-91ff5ff05352", CellID->411884958], Cell[210631, 4022, 2304, 60, 70, "Output",ExpressionUUID->"81661414-6f11-486c-acb9-5b0e664e3077", CellID->315621942] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[212984, 4088, 76, 2, 70, "Subsection",ExpressionUUID->"3581e373-5998-49d2-ab51-236e48ae314f", CellID->158766396], Cell[213063, 4092, 324, 9, 70, "Text",ExpressionUUID->"eece6f62-99be-4707-a01e-33914f4677dc", CellID->278021634], Cell[CellGroupData[{ Cell[213412, 4105, 504, 16, 70, "Input",ExpressionUUID->"09c3d2e7-315a-4c3e-9c6a-cba02a13452c", CellID->64118045], Cell[213919, 4123, 3332, 72, 70, "Output",ExpressionUUID->"acbfa1d9-8f77-4c1c-bc05-af64c8c6ad46", CellID->718526101] }, Open ]], Cell[217266, 4198, 67, 2, 70, "Text",ExpressionUUID->"4ccfec4e-f8fd-4803-87b8-8e1e850a5067", CellID->392935807], Cell[CellGroupData[{ Cell[217358, 4204, 467, 16, 70, "Input",ExpressionUUID->"2ac6ebb4-9278-421f-8b04-3d14cfbe8ebe", CellID->364003637], Cell[217828, 4222, 2012, 50, 70, "Output",ExpressionUUID->"13d68b96-0445-4287-8d23-d31f6dfa51e1", CellID->459017028] }, Open ]], Cell[219855, 4275, 82, 2, 70, "Text",ExpressionUUID->"529125c8-fd25-4cad-a77b-8c6e6844f77f", CellID->112046913], Cell[CellGroupData[{ Cell[219962, 4281, 407, 13, 70, "Input",ExpressionUUID->"739548ce-55bb-454d-a54b-fbc260a57fdb", CellID->528199400], Cell[220372, 4296, 2011, 50, 70, "Output",ExpressionUUID->"31e448f3-a878-4c88-a87d-369249558e7c", CellID->72261701] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[222444, 4353, 249, 5, 70, "Section",ExpressionUUID->"d431db6b-ac27-4d86-94ed-aede258e4be0", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[222718, 4362, 1026, 26, 70, "Subsection",ExpressionUUID->"4a434b30-7195-4f6c-b4be-cad69c0800ea", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[223747, 4390, 47, 1, 70, "Text",ExpressionUUID->"ed989d33-542b-497d-9253-420ae0d2c443", CellID->180302432] }, Open ]], Cell[CellGroupData[{ Cell[223831, 4396, 996, 26, 70, "Subsection",ExpressionUUID->"6578a965-7e17-4f11-82ab-f72bcc8e8c58", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[224830, 4424, 40, 1, 70, "Item",ExpressionUUID->"cc93b9ec-86ee-4120-9da9-53aeb2660748", CellID->14005086], Cell[224873, 4427, 42, 1, 70, "Item",ExpressionUUID->"0e6f4a73-4472-4d1f-bff0-726ab82b01e9", CellID->402311560], Cell[224918, 4430, 52, 1, 70, "Item",ExpressionUUID->"7ce4eee4-ae1c-4f8d-a6a4-df0d738dbe66", CellID->229095759], Cell[224973, 4433, 63, 1, 70, "Item",ExpressionUUID->"6debe743-1359-454e-ba4a-b8878184e058", CellID->360746217], Cell[225039, 4436, 52, 1, 70, "Item",ExpressionUUID->"84833863-0975-4c75-83f9-befa6bf0f2c8", CellID->77913871], Cell[225094, 4439, 75, 1, 70, "Item",ExpressionUUID->"252cf5b7-0913-4cc2-8565-b0c2b203d9ea", CellID->467147347], Cell[225172, 4442, 74, 1, 70, "Item",ExpressionUUID->"1211000e-9cbb-4e9e-9fbd-8a02711b4ba0", CellID->506514609] }, Open ]], Cell[CellGroupData[{ Cell[225283, 4448, 221, 6, 70, "Subsection",ExpressionUUID->"e3f27ef3-004a-4c62-9941-25827f6eaa33", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[225507, 4456, 8426, 256, 70, "Output",ExpressionUUID->"5ca05f36-b8ab-499c-95d4-fc999e449eb0", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->326074788] }, Open ]], Cell[CellGroupData[{ Cell[233970, 4717, 980, 26, 70, "Subsection",ExpressionUUID->"387ecd0e-13f6-45fe-bed9-0e72be8ccc92", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[234953, 4745, 50, 1, 70, "Item",ExpressionUUID->"6988f191-36bf-4331-ae6c-18b22c1495e7", CellID->878381504], Cell[235006, 4748, 49, 1, 70, "Item",ExpressionUUID->"2eded96a-633b-4e88-9690-306f8177d319", CellID->796505631] }, Open ]], Cell[CellGroupData[{ Cell[235092, 4754, 1039, 26, 70, "Subsection",ExpressionUUID->"b73fd477-3f17-4cab-91ed-6f1ebf73eb68", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[236134, 4782, 528, 8, 70, "Item",ExpressionUUID->"ffda81d8-8f65-450e-8bb5-2b5a12a8e384", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661] }, Open ]], Cell[CellGroupData[{ Cell[236699, 4795, 1084, 26, 70, "Subsection",ExpressionUUID->"3b6f7d76-3021-4f9e-8bdd-da58ef58c617", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[237786, 4823, 516, 8, 70, "Text",ExpressionUUID->"2efcd8ba-c35e-4fed-b690-ecec524b4299", CellTags->{"DefaultContent", "TabNext"}, CellID->436399423] }, Open ]], Cell[CellGroupData[{ Cell[238339, 4836, 923, 26, 70, "Subsection",ExpressionUUID->"2c7e3fcc-03af-4ecb-b920-5911ce7f2ab3", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[239265, 4864, 257, 5, 70, "Item",ExpressionUUID->"5de7b452-a9b1-48cd-b0fe-8fec82cf07d0", CellID->752187411] }, Open ]], Cell[CellGroupData[{ Cell[239559, 4874, 1874, 45, 70, "Subsection",ExpressionUUID->"b61f8355-43b9-48a2-b6bf-c339049ed5f9", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[CellGroupData[{ Cell[241458, 4923, 158, 5, 70, "Input",ExpressionUUID->"a74ea796-0225-4944-b7b2-feff599cd94a", CellTags->"DefaultContent", CellID->946203791], Cell[241619, 4930, 122, 4, 70, "Output",ExpressionUUID->"194e44c7-2c94-4198-b666-b2efd7b29458", CellTags->"DefaultContent", CellID->168370258] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[241790, 4940, 955, 25, 70, "Subsection",ExpressionUUID->"356af31a-9489-4548-84d3-bacd9643f3d1", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[242770, 4969, 1174, 31, 70, "Subsubsection",ExpressionUUID->"6924b052-a53d-459c-8530-5c20bc2a5406", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[243947, 5002, 89, 2, 70, "Text",ExpressionUUID->"38aa984c-0fc7-4b41-bb2b-968c4d286815", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[244073, 5009, 1113, 29, 70, "Subsubsection",ExpressionUUID->"6843e435-9d46-4530-bf71-e29e4fc0749e", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[245189, 5040, 2098, 62, 70, "Output",ExpressionUUID->"856180a5-764f-434f-9533-376541ddb5f2", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368] }, Closed]], Cell[CellGroupData[{ Cell[247324, 5107, 1280, 33, 70, "Subsubsection",ExpressionUUID->"26ae9d50-e181-469c-8286-8d4a265f3cde", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[248607, 5142, 2149, 63, 70, "Output",ExpressionUUID->"cb499aa3-c265-4bab-9f2c-406a7e2131b0", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753] }, Closed]], Cell[CellGroupData[{ Cell[250793, 5210, 1913, 46, 70, "Subsubsection",ExpressionUUID->"7273c262-5938-4339-a27f-5d267eef780c", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[252709, 5258, 3986, 117, 70, "Output",ExpressionUUID->"79b28a6a-6043-41c1-bc89-8ff28c113c80", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750] }, Closed]], Cell[CellGroupData[{ Cell[256732, 5380, 1071, 27, 70, "Subsubsection",ExpressionUUID->"4929b95e-27e1-4cd7-b1fd-3f1e0850668e", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[257806, 5409, 1218, 36, 70, "Output",ExpressionUUID->"c40a908c-8250-489f-9ea8-e2b62f1fb549", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[259085, 5452, 1155, 28, 70, "Section",ExpressionUUID->"b4d534f4-494d-4f0c-9e10-97f0245c2420", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[260243, 5482, 529, 8, 70, "Text",ExpressionUUID->"b778f947-4393-42d3-94b9-09ed34588267", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[260809, 5495, 1033, 26, 70, "Section",ExpressionUUID->"8617926d-cbce-4248-aee4-53af9be78c45", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell[261845, 5523, 515, 8, 70, "Text",ExpressionUUID->"7d3d70a5-bfe6-4ad9-8355-422b637c5e49", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)