(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 193993, 4020] NotebookOptionsPosition[ 189010, 3897] NotebookOutlinePosition[ 190768, 3949] CellTagsIndexPosition[ 190725, 3946] WindowTitle->ResetDataset | Example Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ "Basic Examples", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->462042388], Cell[TextData[{ Cell[BoxData[ StyleBox["ResetDataset", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " conducts useful type deduction and provides attractive column headers for \ the data after type inference in determining the ", Cell[BoxData[ FormBox[ SuperscriptBox[ StyleBox["y", "TI"], "th"], TraditionalForm]]], " part of the original ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Dataset", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Dataset", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " fails to capture all the regularities:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.769889983821445*^9, 3.7698900548787127`*^9}, { 3.7699407659267063`*^9, 3.769940768184783*^9}, 3.769965690821748*^9, { 3.7730718004192486`*^9, 3.773071856522732*^9}, {3.7731097194781456`*^9, 3.7731097298567524`*^9}, 3.855164602649522*^9}, CellID->13078159], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"ds", "=", RowBox[{"Dataset", "[", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "9"}], ",", RowBox[{"\"\\"", "\[Rule]", "4"}]}], "\[RightAssociation]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "3"}], ",", RowBox[{"\"\\"", "\[Rule]", "4"}]}], "\[RightAssociation]"}]}]}], "\[RightAssociation]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "8"}], ",", RowBox[{"\"\\"", "\[Rule]", "5"}]}], "\[RightAssociation]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "8"}], ",", RowBox[{"\"\\"", "\[Rule]", "5"}]}], "\[RightAssociation]"}]}]}], "\[RightAssociation]"}]}]}], "\[RightAssociation]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"ds", "[", "\"\\"", "]"}], ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/ResetDataset"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "ResetDataset"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["ResetDataset"], BoxID -> "ResetDataset", Selectable->False], "[", RowBox[{"ds", "[", "\"\\"", "]"}], "]"}]}], "}"}]}], "\[IndentingNewLine]", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.769889962093441*^9, 3.769889979353009*^9}}, CellLabel->"In[1]:=", CellID->1790486466], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnQ10Ddfe/6MuSUuJtxXiXuKttGkpSZQblkS8Li9RvcplLZf430RIQrxd 5QYlhHhZrZdWc5GLKEVcQrEQ+nJFBElWyokn0ZB4CUEkKSKkyf/3nL2es846 L/vMnDNzZia+n7VqpTNz9vz2Pns+s/ecPXt3CJk1NvQNFxeXuW70z9ip/wic M2fqZ5+40/+Mi5obHhb19/83PGre38P+PqdPSH3aeJT+y63n4vK/f9cCAAAA ALx+/A+oiyhdrQAAQlHaFkAWlK5WAAChsGv2NzWhwpCM0UR4SlcrAIBQVKgU FYZkjCbCU7paAQCEokKlqDAkYzQRntLVCgAgFBUqRYUhGaOJ8JSuVgAAoahQ KSoMyRhNhKd0tQIACEWFSlFhSMZoIjylqxUAQCgqVIoKQzJGE+EpXa0AAEJR oVJUGJIxmghP6WoFABCKCpWiwpCM0UR4SlcrAIBQVKgUFYZkjCbCU7paAQCE okKlqDAkYzQRntLVCgAgFBUqRYUhGaOJ8JSuVgAAoahQKSoMyRhNhKd0tQIA CEWFSlFhSMZoIjylqxUAQCgqVIoKQzJGE+EpXa0AAEJRoVJUGJIxmghP6WoF ABCKCpWiwpCM0UR4SlcrAIBQVKgUFYZkjCPhbdy4MTQ09OzZs9KGZAwkDIC2 UKHxVBiSMZAwAEBCVGg8FYZkDCQMAJAQFRpPhSEZAwkDACREhcZTYUjGQMK1 WKQbvN7IcTXJ5wQ7EBhSYWHhjh07Fi5cOGPGjLlz527evDknJ0c94eXm5iYk JMTExMycOfOf//znwYMHS0tLIWEA6gByXE3yOcEOhIR06dKliIiIUD3h4eHs j7CwsJSUFDWEd/LkSeOo2B/Lly9ft25dXZKwfLlQNncAWAMSZpSUlMyePZts 9uWXX964caOioqK4uHjfvn3MeDqdTtnwKAAm3g0bNly/fr2srOzmzZu7d+8O /T8gYZXnDgBrQMKMpKQkUtnq1atJv8bbt2zZQtt37typbHgUGIWxfv16k/D2 7NkDCWsidwBYAxJmzJs3j1SWkZFhsp2anf/5z39+/PFHOaOzEd6jR4+YaXNz c0123b9/f8aMGZCw+nMHgDUg4d+MLFdcXOzMqAzww9PpdBQbydakGcyIiYmB hNWfOwCsAQkTeXl55LHp06c7MyRj+OGlp6dTeJ999pnFvevXr4eE1Z87AKwB Cf+m79SzlnBJSYkzozLAD492cVrCS5YsgYTVnzsArAEJM6Kjo0ll2dnZJtuv Xr26Zs2ahIQEOaOzEd7jx4/ZPeL69esmu+iugWfCmsgdANaAhBlbt25lww9M tpN+afv27dvljM52eGvXrmXj00waw3v37sXoCE3kDgBrQMKM27dvszc1vvrq q5s3b5LrHj58mJyczJ4V//LLL8qGl5uby8YJf/HFF3l5eeXl5RSwwcCQsPpz B4A1IGEDaWlps2bNYk5jfXz2psbRo0fVEN7hw4cNyqX7guHvzz//HBJWf+4A sAYkbExRUVFiYuKKFSuoVbxo0aJNmzbJ/a6cqPCys7MTEhKWLFnCJExBnjx5 8siRI5Cw+nMHgDUgYTUgNrzS0tIbN27Qv/KFZAwkDIB8QMJqQBPhSVtJ1FNt IGGgLJCwGtBEeNJWEvVUG/lyV15enpube/36dTkSB04jPz+fvscnT57IlD4k rAY0EZ60lUQ91Ua+3O3evdvFxaV+/fpyJK5pxowZQyXz73//W+lABNGiRQuK dtOmTTKlDwmrAU2EJ20lUU+1gYQNVFRUxMTE9O3b193d3dPTMygoaNu2bb// /rvkJ1JEwsnJyS5WaN26NeeDkLAkqDAkYzQRnrSVRD3VBhJm6HQ6Dw8PJiWK 2SAoPz+/p0+fSnsuRSQcHx8PCSuICkMyRhPhSVtJ1FNtIGGiqqrq3XffpWh9 fHzOnz//8uVLKpkDBw4wLf/tb3+T9nSKSDg0NJROGhkZmW3G1atXOR+EhCVB hSEZo4nwpK0k6qk2Dubu4cOHU6ZMoXTMdykr4UePHgk/OC0tjUL9wx/+UFxc bLz90KFDtN3NzY20LGFskkhYVAaJgQMH0kn37dsn9kQcCVdWVoaEhNy9e1ds msZAwmpAE+FJW0nUU20cyV1paemHH35IV2hQUBA1Jk32CpRwQUEBNdK8vLxc XV2pX/zJJ5/8/PPP9sVjgOTZtGlTatMKPD4hIYFC7dSpk8n2e/fusQ67Tqez L5LLly9PnjyZmtlvvvlmt27dli5d+vz5c8clLDaDRLt27eikV65cEXsuaxJ+ 9erVqFGjaBfl68GDB2KTNQAJqwFNhCdtJVFPtbE7d+Xl5b1792aOmjBhgvkP WEIkfPz48bfeeosl0qBBA/ZHvXr14uPj7QjJQFJSEqVDmhLonFOnTrGWMFnX eDv7MYvuDmVlZXaEsXnz5oYNG7JMvfHGG+wPHx+fQYMGOShhsRl88eIFC4C+ NbHnsibhmpoaagazTH3wwQePHz8WmzIDElYDmghP2kriSLXJzc3dvn37ypUr o6KiZs+eTY0ruiQLCwudmbunT5/6+/uzC3D06NHUKDI/xqaEqSHdvHlzOoYa VNeuXSONl5SULFy4kHn40qVLYqMyJjo6mtIhgfAfeDLIJ0OHDqXje/TokZqa WlFRQZHs2rWrZcuWtHH58uV2BJCRkUG5oI8PHz48MzPz5cuX+fn59JUZfg5z 8HGEqAxSS54O9vDwoNvN4MGDqcdBJR8QELBs2bJnz57xP8t5HEFfGd1/DTcX +25VkLAa0ER40lYSu6sNKcIwf9GMGTPY5HIE2fjXX391Tu6oQx0YGMguPbqi qZVl8TCbEmYa6d+/PznQePu4ceNoO+VOVFQmVFdXs6egJByyn83jKysrZ86c aTJsgNrA//rXv+wLgPJFKQwZMsQkd3PmzJFEwqIymJKSwm5t7NTGwz/at2/P b07zf5ij+y97ukL07dv3N0u/DvCBhNWAJsKTtpLYV23u37/PZhzdsWPHnTt3 aAv1LqkNyZYXsW/aZ7G5I+WyRiPRr18/TjvKpoQ9PT3pgO+//95ke1ZWVmxs 7J49e4RHZZGHDx+SYegU7dq1o54C/+CLFy96e3uzfFEDuHHjxuzv4OBgKnax p6a2NPv45cuXzaMitzsu4VoxGdywYQOLh+7a1HImc1JTf+/evexBcZcuXTjD 8GyOjqiqqjJUCWpd0z1aVC7kkzCoY0hbSaxVG74wqYdOsl2wYIHJ5Pbnz5+n 7StWrJBbwtSnHj16NLvcfH19+Q8Y+RKmU7N07PhNh8QYJAzSCztL586dTZ73 GpORkdGoUSMX/QguwwCJnJwcaufTxq5du5aWloqKkL4pF/2wCovverz33nt8 CUuewczMzKSkpHPnzplsLygoYLeb9evXW/uskCFqJN4BAwawSEjI1jpHFpHj +lLGEUBmpK0k1qoNX5jkXvKe+Vp7Z8+eZVMryy3hiRMnsgvNy8vL5g8xfAmT 4lz0v4WJKyY9TZs2dRHPypUrrSXIHh2YjweurKxkwly8eLGoCI8cOUKf6tix o8W9Q4YM4UtY8gxymDp1Kn12/Pjx1g4QOE6YqiUrK2LMmDHCA5Dj+hJyNTkZ 52jEbhBerchqQ22e7Oxscu/+/fvXrFkTHh7uHAknJyeTNl30v/VTZ5Z/MF/C 1JVmF6zYRiZx5syZE8Jg4xCIkJAQk2ezBqhvzjJFx5vvJf266B9ci4qQvh0X fUvY4knff/99voSlzSCfuLg4+ri/v7+1AwRK+NixY2x8C9UNUU9aIGE1gPBq BVeb8+fPL1261LCwSHR0NHUkN2/e7BwJEwcPHmTKon9TUlI4R9p8JsyubvM+ 8oULFwICAiZPniw8KotQc5T9FEUNeM4UEOSuZs2a0WFHjx4137tgwQIX/fgN Uad++vQpc2NmZqbJLrrpkJz5EhaIwAxWVVWt1mPxyc/06dMpBbqPW/u4EAlT e4BligycmJgoJhOQsCpAeLXCqs0PP/zAVndKSEhIS0srKipi2+lKd5qEiQMH DjAPu7q6UpvN2mE2JTxp0iQX/fgBk+2kX9o+bdo0UVGZkJeXxzr1Y8eOtTiC zphhw4axI022l5eXd+zY0b6eflBQkIt+fJpJA5VZ3XEJi8pg9+7d6Ui6ZZts Ly4uZsPwvvvuO2uftSlhummyB8tk4B07dojKRS0krA4QXq2wasMW1Dt06JDJ dvaDndMkXGvk4UaNGll7b8umhOkmwt7U+PTTT/Pz80lWJL1ly5axT9FdRmxU Bqghyrr8I0aMEPLGcXp6OutKU5NSp9NVV1c/e/YsNTXVz8/PRT/2wPgBeGxs LN0H6V9+mleuXGHN1JEjR+bk5FCalF+DgR2UsNgMsvevCQqAvWVcUVFBLX82 Ywbdgzif5Us4KyvL3d3dRT/+zQ4D10LC6gDh1QqrNvPnzyfZZmRkmGzfuXOn kyVM7N+/n3mY2mPmne5aYW/MkRzYJcyeoLI/6HJeu3atHSEZmDdvHqUzaNAg 4T/TUyeaDZBw0b+7ZxhSSwY2eW2EvalN/9pMk9rPBuWysmL07NnTQQnbkcF1 69YZ3tpjY+QYgYGB/DF4HAnn5ua2atWKfWXbt2+3JyeQsDpAeLXCqs0XX3xB so2Pj6erhm0pLCz85ptv2PNhUrT5wAlZ6wb1Ydmwf09PT/PRoQLnjrh161ZY WJivry85sHPnztS5dvBdOeLBgwchISE23wUzgZqIkZGRffr0odtKmzZtBg4c GBcXZ54v4RImzp07N3nyZG9vb1ZQ1PLfsmXL6tWrHZSwfRmkVit9ysvLi+53 HTp0CA4Optu3zU9x5o5gA+TIwNu2bRMViTGQsBpAeLXCqk1eXt6MGTPIt+Hh 4YsXL54zZw79PXfu3DNnzjAPf/bZZ2QwZ9aNffv2kViOHDlivktDU1mKhXoB dNcQ9RGSuU6nE/sigxrgtIRTU1MbN25s90uFDEhYDSC8WsHV5saNG9SU+sc/ /kFttlWrVn377bfUKKLtycnJUVFRpOX09HQn1w1rb1vUYQlTyY8cOVLpKJwE /5mwI/OnMSBhNYDwapWrNvLlrq5K+MmTJwMGDNi8ebPSgTgJTOouCbCcI0DC 9lFXJTx8+PCIiAjz+ZPrKpCwJMByjgAJ20ddlfDrBiQsCbCcI0DC9nH8+HEf H5+PPvpIjsSB0wgKCqLvkfM2h4NAwmrgdQuvrKzs66+/njBhgr+/f3V1tfFZ UDfA6wYkrAa0Fd748eNHjx4dHx9vsiikQM6ePdumTZspU6acPn3aeC5uSBi8 nkDCakBb4RUVFf30009Llixp27at2PH2BQUFLVu2tPieLyQMXk8gYWMqKipi YmL69u3r7u7u6ekZFBS0bds2zuxM0pYY/xi25KJFWrdurUh4t2/f9vLyIiEL T2q+Hs5ZVFs3AJAJSNiATqfz8PBgWjNegsrPz4+z9ImEJcY/hrr/apNwrX7C AfOptzgMGzbs+PHjnLOos24AIB+QMKOqqorNp+Tj40Od5ZcvX9KnDhw4wLRs vuKAHCXGPyY0NNRFv/pMthlCVpuVKbzCwsJ27doJT6pfv34///wz5ywqrBsA yAokzEhLS2MTPZn82MRmwHNzcxMyXZ6DJcY/hi0su2/fPvnCsAYnvCdPnri7 uwtPyt/fHxIGwBhlJfzTTz9RI5P6+02aNGnWrJm3t3dERMS1a9ecf6ElJCSQ 4jp16mSy/d69e6zLr9PppC0l8xLjH8OWheWvzS0TfAk3bdpUeFKQMAAmKCjh r7/+2vDo1dXV1TDVJ9k4MzPTyRfaqVOnWEvYZMFW9nMYhVdWViZtKZmXGOeA Fy9esPLhL+8rE5AwAPKhlIQLCwvZmgJTpky5fv06bSHLnTt3ji1XSs1jJ19o NTU1Q4cOpVP36NEjNTW1oqKipKRk165dbOmT5cuXS1tEFkuMcwC1wykMDw8P ulkMHjy4devWzZs3DwgIWLZsmdgpVaUNT3IJA/B6Ys+VaR2WJt+K7FnrH//4 R5NZuNnr9r169XKyhGv1q3vPnDnTZOABtYEdnCxUeIlxDkhJSWFzR5sP3mjf vr3czyg44UHCAEiCPVemdViafCuSe6npS51rk+1bt24lsXTv3t35Er548aK3 tzczGzWA2cp9RHBwMH/1E6lKjHPAhg0bWDBhYWFXr1599eoVNdT37t3LHhR3 6dJF1kF0nPDwOAIAB1FKwgZu3Lhx4sQJcu/8+fP79+/fsGFDRSSckZHBFtiK jIw0DJDIycmhvj9t7Nq1a2lpqbSlZF5inAMyMzOTkpLM10YvKChgN4v169cr Eh4kDICDKCjh3bt3s/VSGS1atAgKCqJmpyISJv9bHA9cWVnJHlMvXrxY2lIy LzH7Pjt16lQKb/z48dKGZAwkDIB8KCVhNiSsfv36EydO3LNnj06nY9uPHj3q fAlT754tBUttcvO9pF/aRZaWtpTMS8y+z8bFxVF4JDdpQzIGEgZAPpSSMGmW 1BETE2Oynf1g52QJ19TUNGvWjM5LtwDzvQsWLKBdo0aNkraUzEvM2t6qqqrV eiyuZjV9+nQKLzw8XJHwIGEAHEQpCbdt25bUcfDgQZPt7OVc5z+OGDZsGJ3X fBqE8vLyjh070q6VK1dKW0rmJcY5gN2zoqOjTbYXFxezQXTyzTjNDw8SBsBB lJIwk96AAQNu3brFtly7du2vf/0rez7s6elpPnBC1gstPT29QYMGdOqJEyfq dLrq6upnz56lpqb6+fnRxnbt2j1+/FjaUjIvMc4BrINAULP87t27tfoJ36jd zua7oMKULzZ+eHZI+L///S/nLBJ+6VLVDQBkRSkJX7hwwc3NjQTSsGHDzp07 s+ach4fHli1bmG06dOiQnJzszAstMTGRDZAgSMiGQblk4EuXLklbRBZLjH/M unXrDC8Vurq6Gn7QDAwMVHAEXVlZmSgJ9+zZ8/r165yzSPWNS1s3AJAPpSRM XL58+eOPPybFkfp69+4dFRVVVFRE2xctWvT222+Tlvfv3+/kC40amZGRkX36 9CGxtGnTZuDAgXFxcc+fP5e2fKyVmM3DsrKyQkJCvLy86P5FN6ng4OCdO3fK HRs/vN9//52+PoHp0MHNmjWz9oofJAxeTxSUsDNR+YWm6fDodnDz5k0h6Rw9 enTMmDH8s6BugNcNSFgNaDq8BQsWxMbG2kwkPT393Xff/eWXX/hnQd0ArxuQ sBrQdHj379/39vY+ffq0tQN+/PHHIUOGBAQE8B+tQ8Lg9QQSVgNaD6+wsPAv f/nLiBEjkpOTzfceO3asW7du48aNu3Hjhs2z1KW6UV5enpuba+2HSKAV8vPz 6Xt88uSJTOlDwmpA6+FR/YyMjPT19d2+fbu1Yw4dOvTOO++QrvlnqUt1g00J WL9+fTkS1zRjxoyhkhG7VLdStGjRgqLdtGmTTOlzamBxcXF2dvarV6/sS9P5 VxMHrVtOWfjhUXuvd+/e27Zts5nOl19+OWnSJP5Z6lLd0JyEnbbauCIStnu9 cqUknJSUxF5eoOaN2GkSIWGxaDq8FStWTJ06VUg6lZWVTZo0oX85Z+F/j998 801oaOjx48c1UTe0JWFnrjauiITtXq9cKQn37NnTECHVfDvSlPAycRxNW05x +OG988471GMSmFSnTp3y8vI4Z+F/j5CwTDh5tXFFJGz3euVKSdjf398g4ZCQ EDvSlPAycRxNW05xOOHV1NS4ubkJf5/lz3/+M13jnLPwv0cVSvjhw4dTpkyh dMx3KSvhR48eCT/YyauNSyJhURmsdWC9co6EqVtHemQzCdiNtRpIVwq1cFiv 5OOPP7YjTQkvE8fRruXUACe88vLyJk2aCE/KwQl81Cbh0tLSDz/8kK6RoKAg akya7BUo4YKCAsqUl5eXq6sr9Ys/+eQTa0UkHJJn06ZNrd3vzJFvtfHLly9P njyZmtlvvvlmt27dli5dSrdsxyUsNoO1DqxXbk3Cr169GjVqFO2ifFmc4VAg /BqYlJREp5g2bZodaUp4mTiOdi2nBjjhOXkWNVVJmP0iyRw1YcIE8x+whEiY 8sJWvGUzlrA/6tWrFx8fb0dIBtiVS1+NQOfItNr45s2b2Vo5hGHmEx8fn0GD BjkoYbEZdGS9cmsSpm4gNYNZpj744AO75/ji18BZs2ZR+lu3brUjTQkvE8fR ruXUgAolTK5ITEycP39+RETEihUr6HK+c+eOM+vG06dPDY/sRo8ebXEQkU0J U0O6efPmLvrZqq9du0YaLykpWbhwIfOwg9NGRUdHu+gXrOE/8GTIsdp4RkYG mwVr+PDhmZmZL1++zM/Pj4qKMjzndPBxhKgMOrJeOedxBH1ldP813Fzsu1Vx aiDV88aNG9NtWuyzF0hYLNoNTxEJUyto3rx5oXrCwsLYH3RJUs/XOXWDOtSB gYHs0qMrmlpZFg+zKWGmkf79+5MDjbePGzeOts+YMUNUVCZUV1ezp6AkHLKf zeMlX22cLRk2ZMgQk9zNmTNHEgmLyqAj65Xzf5ij+y97ukL07dv3N0u/DvCx VgNv377Nfi3duHGjfWna40rZ0K7l1IDaJEzipQbw6dOni4uLqYVALUZqPTIP P3z4UO66QcpljUaiX79+nHaUTQl7enrSAd9//73J9qysrNjY2D179giPyiJU GmQYF/10rJzXZBjSrjZObWn2cbozmkfF5mJ1fHSE8Aw6sl65zdERVVVVhipB rWux8y5arIHffvst+wpWrVolKjXjNEEdw+J3rYiECerqGm8nS8yePZu2f/fd d7JKmPrUo0ePZpebr68v/wEjX8J0apaOHb/pkBiDhEF6YWfp3LmzyfNeYyRf bZzujC76YRUW3/Vgi+dyJCx5Bh1Zr1zIEDUS74ABA1gkJGRrnSOLWKyBR44c oQqWmpoqPB3zNEEdw+J3rYiEV6xYYb7r8OHD1nZJKOGJEyeyC83Ly8vmDzF8 CZPiXPS/hQk8tTFU5i7i4SzRJflq4+QQ+lTHjh0t7h0yZAhfwpJnkIPN9coF jhOmxj8rK4IzZas5FmtgjR7hiVhMU+y1ICuiLjTno93wFJHwrl27zHdlZ2fT rqioKFnrRnJyMluY+4033qDOLP9gvoSpK80uWLGNTOLMmTMnhMHGIbjoR/tb u6jlWG2cvg4XfUvY4knff/99voSlzSAfm+uVC5TwsWPH2PgWqhuinrTIcflD wmLRbniKSJhaWea7CgsL2ZMKcpqsdePgwYNMWfRvSkoK50ibz4TZ1W3eR75w 4UJAQMDkyZOFR2URKij2UxQ14DlTQMix2vjTp0+ZGzMzM0120RfEljZz/Jmw wAw6uF65EAmfPXuWZYoMnJiYKCYTkLAq0G546mkJU++eds2dO9cJdePAgQPM w66urtRms3aYTQlPmjTJRT9+wGQ76ddF/Ph8E/Ly8linfuzYsTan4ZJjtfGg oCAX/fg0kwYqs7rjEhaVQUfWK7cpYbppsgfLZOAdO3aIykUtJKwOtBueIhIm IZjvokYp7aLWjnPqhsHDjRo1svbelk0JFxUVsTc1Pv300/z8fJIVSW/ZsmXs U2lpaWKjMkANUdblHzFihJA3jkWtNh4bG0utR5vLqVy5coU1U0eOHEm3SEqT 8mswsIMSFptBR9Yr50s4KyvL3d3dRT/+zQ4D10LC6kC74YmVcL9+/SQZHWEy JLikpIQaObT9xIkTTqsb+/fvZx6mEjDvdNcKe2OO5MAuYfYElf1Bl/PatWvt CMnAvHnzKJ1BgwYJ/5le+Grj7E1t+tdmmnS7NCiXlRWDzQ/miITtyKDd65Vz JJybm9uqVSv2lXEm0+YDCasB7YZHEiaHCE9q6NChJ0+e5JyF/z0aJBwZGXn2 7FlyL7XQqMW1aNEi2kj/lpWVObNuUB+WDfv39PQ0Hx0qcO6IW7duhYWF+fr6 kgM7d+5MnWsH35UjHjx4EBISYvNdMBMErjYuXMLEuXPnJk+e7O3tzQqKWv5b tmyhDouDErYvg/atV86ZO4INkCMDC5lP2xqQsBrQbnh37tz505/+JDypOXPm LF26lHMW/vfIJLxhwwbqDrO3NtgfxKxZs65du+b8urFv3z4Sy5EjR8x3aWgq S7FQL4DuGqI+QjLX6XRiX2RQA5yWcGpqauPGje1+qZABCasB7YZHTcGRI0cK T4q6by1btqR/rZ2F/z0yCefk5JBvN27cSEoPDw9fuHAhtWeoFadU3bD2tkUd lvCqVatEfe+ahv9M2JH50xiQsBrQaHiPHj2i7vOxY8dEpUZNR+q8r1mzhlRs /K6oUtVGvsKvqxJ+8uTJgAEDNm/erHQgTkLBNeYcTNP5VxMHjVpOJZiERz3K vLy8r776qkOHDsuWLbMjwaKiosWLF/fr18/Ly6u6utr4LHWpbtRVCQ8fPjwi IsJ8/uS6CiQsCdqynNowCS8wMNDX15cuw6ysLMnPUpfqRl2V8OsGJCwJ2rKc 2nBOeHVPwsePH/fx8fnoo4/kSBw4jaCgIPoeOW9zOAgkrAYQXm1dlDAAQoCE 1QDCq4WEweuKUhJma4KsWbMGF1otJGx0FufUBw3VDVDngYSNqaioiImJ6du3 r7u7u6enZ1BQ0LZt2zizM0lbYvxj2JKLFmndurXi4Ul1FufUBzvqBgAyAQkb 0Ol0Hh4eTGvGS1D5+flxlj6RsMT4x8THx0PCStUNAOQDEmZUVVWx+ZR8fHzO nz//8uVL+tSBAweYls1XHJCjxPjHhIaGuuhXn8k2Q8hqs3KHJ9VZnFMfRNUN AGQFEmakpaWxiZ4MC2wx2Ax4bm5uQqbLc7DE+MewhWX37dsnXxjWgIQBkA/F Jfzrr7+GhIS0bdv2rbfe6tWr17Rp0+S4Em1mMyEhgeLp1KmTyfZ79+6xLr9O p5O2lMxLjH8MWxaWvza3TEDCAMiHshKOiIho3bo1s5xhqs/mzZsfPnzYyRfa qVOnWEvYZMFW9nOYq6trWVmZtKVkXmKcA168eMHKh7+8r0xAwgDIh7ISJrFQ A3jTpk03b94sLi6mvn/79u2Zh+2eFMu+C62mpmbo0KF06h49eqSmplZUVJSU lOzatYstfbJ8+XJpi8hiiXEOoHY4heHh4UE3i8GDB9Odi4ooICBg2bJlYqdU lSM8Cc8CwOuJHFeTEAkTBw8eNN5eWFjI1hy0Y7EwRyRcq1/de+bMmSYDD6gN 7OBkocJLjHNASkoKmzvafPAG3bbkfkYhRyWxdhYAXk/kuJqESNjHx8d819Kl S2lXr169nCzhixcvent7M7NRA5it3EcEBwfzVz+RqsQ4B2zYsIEFExYWdvXq 1VevXlFDfe/evexBcZcuXWQdRCdHJQEAyIdwCZNSzHedOHGCdr399tvOlHBG RgZbYCsyMtIwQCInJ4f6/rSxa9eupaWlcpcY54DMzMykpCTztdELCgrYzWL9 +vUKhgcAUBXCJfz555+b76KWHmv1UWPPaRLu37+/xfHAlZWV7733Hu1avHix 3CVm32enTp1K4Y0fP17akIyBhAHQFsIlPH36dPNdbKCCh4eHVAa2KWHq3bOl YKkRbr6X9Eu7yNJyl5h9n42Li6Pw/P39pQ3JGEgYAG0hXMJ+fn7mu2JjY5lV nCbhmpoa9mvg0aNHzfcuWLCAdo0aNUruErO2t6qqarUei6tZ0Y2MwgsPD1cq PACA2hAuYcJkSPDt27fZPPZr1651moSJYcOG0UnHjh1rsr28vLxjx460a+XK lXKXGOeA7t27UwzR0dEm24uLi9kgOvlmnBYSHgBAVYiScKNGjbZu3Xrnzh1q 5qWkpDDj0b+lpaXOlHB6enqDBg3o1BMnTtTpdNXV1c+ePUtNTaW2Om1s167d 48eP5S4xzgHs7WmCmuV3796t1U/4Ru12Nt8F3UHki01IeAAAVSFcwkOGDGFD XuvVq2cY++ru7v7DDz9IaGAhEiYSExPZAAmChGwYlEsGvnTpkhNKjH/MunXr DC8Vurq6GsYJBwYGKj6CDgCgKoRL+PTp0+TbkSNHtmrVqmHDhqS70NDQvLw8 aQ0sUMIENTIjIyP79OnTtGnTNm3aDBw4MC4u7vnz584pMZuHZWVlhYSEeHl5 ubm5dejQITg4eOfOnXLHJjw8AIBKECJhJ6NyjSA8AICEQMJiQXgAAAmBhMWC 8AAAEgIJiwXhAQAkBBIWC8IDAEgIJCwWhAcAkBBIWCwIDwAgIZCwWBAeAEBC IGGxIDwAgIRAwmJBeAAACYGExYLwAAASAgmLBeEBACQEEhYLwgMASAgkLBaE BwCQkP8BdRGlqxUAQChK2wLIgtLVCgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA8Lrz/wHF+fsO "], {{0, 179}, { 471, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{235.5, Automatic}, ImageSizeRaw->{471, 179}, PlotRange->{{0, 471}, {0, 179}}]], "Output", TaggingRules->{}, CellChangeTimes->{3.7699408293051033`*^9, 3.769941144330304*^9, 3.769946948231597*^9}, CellLabel->"Out[1]=", CellID->1693940315] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Scope", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->964056545], Cell[TextData[{ "Here the passengers on the ", StyleBox["Titanic", FontSlant->"Italic"], " are grouped according to sex and cabin class and then counted, but the \ original grouping fails to realize that the data is better presented in a \ \[OpenCurlyDoubleQuote]spread\[CloseCurlyDoubleQuote] format with row headers \ and column headers, rather than in a narrow way:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.769890704739562*^9, 3.7698908288498297`*^9}, 3.7730718834188185`*^9}, CellID->1420314324], Cell[BoxData[ RowBox[{ RowBox[{"titanic", "=", RowBox[{"ExampleData", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.769891351275749*^9, 3.76989135489939*^9}}, CellLabel->"In[1]:=", CellID->1112059206], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"beforeReset", ",", "afterReset"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"beforeReset", "=", RowBox[{"titanic", "[", RowBox[{ RowBox[{"GroupBy", "[", RowBox[{"#sex", "&"}], "]"}], ",", RowBox[{"GroupBy", "[", RowBox[{"#class", "&"}], "]"}], ",", "Length", ",", RowBox[{"#survived", "&"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"afterReset", "=", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/ResetDataset"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "ResetDataset"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["ResetDataset"], BoxID -> "ResetDataset", Selectable->False], "[", "beforeReset", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"Labeled", "[", RowBox[{"beforeReset", ",", "\"\\""}], "]"}], ",", RowBox[{"Labeled", "[", RowBox[{"afterReset", ",", "\"\\""}], "]"}]}], "}"}]}]}], "\[IndentingNewLine]", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7698905660674553`*^9, 3.769890686953546*^9}, { 3.7698908396581993`*^9, 3.769890854242023*^9}, 3.769891360634386*^9}, CellLabel->"In[2]:=", CellID->2115413253], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsnXdcFFf3/9eOitgAC4oNsLeoaIixG7uJCuo32GISxS6PFTVRo9hiSxSR RNQYe4s9KrZYo6KCBXiwAtKLINEYC/7Ob8/jvDazu7Ozs7szc/G8/+C13Llz 79kz957PnNk7MzWGT+g7oqBGo5lkB3/6fjGt/X/+80VAvzLwj8/4SaNGjv/6 q27jJ3898uv/tBpeCAr9Cmg0baH+///8liAIgiAIgiAIglA9/yUINaH0hCAI gg2UjlUE8S+UnhAEQbABRoxcwhCMOodRFWDUbIIgFIHR+CwPjDqHURVg1GyC IBSB0fgsD4w6h1EVYNRsgiAUgdH4LA+MOodRFWDUbIIgFIHR+CwPjDqHURVg 1GyCIBSB0fgsD4w6h1EVYNRsgiAUgdH4LA+MOodRFWDUbIIgFIHR+CwPjDqH URVg1GyCIBSB0fgsD4w6h1EVYNRsgiAUgdH4LA+MOodRFWDUbIIgFIHR+CwP jDqHURVg1GyCIBSB0fgsD4w6h1EVYNRsgiAUgdH4LA+MOodRFWDUbIIgFIHR +CwPjDqHURVg1GyCIBSB0fgsD4w6h1EVYNRsgiAUgdH4LA+MOodRFWDUbIIg FEFkfM7Ozp4+fbqrq6udnd3KlStliMAS+OCDDzQazfbt263VoATxGjBgwMyZ M61lgDQkqICvr+/cuXNtNMZEQuJFEIR4RMbnRYsWabRUqFBhzZo1MkRgCSgu XmfPngUDevbsKbnHU6dOffnll8uXL5fcQq754hUeHg5mf/bZZ2Iq//XXX/Xq 1YP6jx49slZNhMSLIAjxiIzPHTp0gCg0ceJES4KqrVFWvDIyMjw9PS0Ur7Vr 10ILXbt2ldxCrpni9eLFiw8//FC8eA0ZMgRPY0xKkviaCIkXQRDiERmfURf2 7t1rSVC1NYqI17179zZu3Ojv71+pUiWM1UyIV3JyMjhq2rRplStXRrPFiNe6 des07xCWJPE1eUNRTE2CIAizxOu3336zJKjaGkXEa/HixZp/w4R4rVy5kme2 SfG6efNm8eLFHRwcTEqS+Jr6Q1FMTYIgCJPxecKECbwoFxgYyG2Ni4vz8/Or WbOmnZ0dpB6dOnXasmXL06dPdVsANfH19d2/f39CQsKIESNcXFyKFStWrVq1 gICAJ0+eQIUNGzY0b968RIkS5cqVa9OmzdGjR3k2pKWlLVq0CEI6duTq6tq+ fXvId3JycnSrGRQv6GL+/PmNGzcuWbJk2bJloaMlS5akpKSIVwHhOleuXAl6 R5cuXQTEKzMz88cff/Ty8qpYsSIYU79+/ZEjR8bExOBWCPg8P8OXFWOkMbOF j/vt27fXvaNHjx4mxQuarV27dsGCBXfs2CEsSeJrGhyKYmoSBEGYjM9r1qwB 1cCz6GbNmsHnrVu34qZDhw5BHMYAVaRIES7q9u7dG+SGa2HGjBlQOHnyZIjG 8AHEC3QKa4Ko+fv7wweQs6pVqxYoUAA+Fy5c+Pz589zuSUlJjRo1wvpQAU7p uY5ACnVN1RevO3fugFph5UKFCkFExc916tSB6C1SBUQJhpapU6caE6/09PQW LVpg72BG0aJF8XPp0qVv3boFFe7evQu+bdiwIRQ6OTnB52HDhonvWt9s8WNg 1qxZJsXr888/hzpQMzs7W1iSxNc0OBTFm00QxPuM5MuGDx8+hMALhT4+PuHh 4ZAEQRYGmQVkN1D45ZdfcjVRvEDdoJGIiIhcbQ4CkZnToGnTpmVkZEA5tIM/ wQwePJjbHdXN2dl57969WVlZudp075tvvsF9dY3niRckgC1btoQSKP/9999B PlJTU6ERUC4obNCgAbZmUgXE6AUiIF4zZ85E4QbFh2QQbLt48SIkX6gaXDX5 F2y8FSFeaFW7du1ev34tLEniaxobiuLNJgjifUayeOFasn79+vFqHjt2DHIc SJG41AbFC7It7hIZkJKSgnkQr4XAwEAobNWqFVeCqVNQUBCvo7p160L57t27 eUZy4vXzzz/jxbfk5GTdHSGW4uIKiLTC39qK4gXxHDYtXrxYtxCUFJLKLl26 cCUqFK8bN27Y2dnByQOkwPCvgCSJrykwFMWbTRDE+4xk8SpTpgyU6F7f42jW rBlsWrVqFf6L4tWpUydeNbzkuG3bNt1C/KEEuuNKsrXw9oXkpUaNGryLhDzx 6tWrF/y7cOFCfQvxh7z+/fsLf2srilf37t1hU8eOHR88eCDQgtrECxJqNzc3 OM0ICwvDEmOSJL6m8FAUbzZBEO8z0sTr/v37GJe6devWUw+89AeahZVRvCBT 47Xp4uIC5X/88YduIWRSPPFCsrKyLl68CEq3aNEiX1/fqlWrogEC4uXh4QH/ tmzZUt9C/Gnp448/FqMCJp3DISBeR48eLVy4sEb7i94nn3wyf/58KNG/bqk2 8QJ9h02zZ8/mSoxJkviawkNRvNkEQbzPSBOvM2fOaEwxfvx4rIziNXToUF6b KF5nz57VLdQXL0hVQPjs7e2xWQj+9evXB/2qUqWKsHjpLu0wSNOmTcWogEnn cAiIV672Fz2I8PhDIVKqVKlBgwbFxsZydVQlXhs2bIDyDh06vHnzhis0KEni a5ociuLNJgjifUaaeN27dw91hLdY3SCWiFdmZmbt2rWhpEaNGgsWLDh9+nR6 ejpuwudCCIiXu7s7/Hvs2DGTFhrDuuKFQEg/derUwoULu3TpUqhQIY12FUd8 fDxuVZV4TZ482eQpSrt27cyqaXIomjuACYJ4P5H8mxdkDVBy7do1/cqHDh0C DYqLi8N/LREvUCL4t3z58gkJCbzdcSGHgHjhz0wGHyN88eJF6OjGjRvC39pa 4gUSfFYL3tfGERUVVaFCBY3O0hFViRd8ncJ6oOBqtLcewL8dO3Y0q6bJoWju ACYI4v1EsngNGDAASvr27ctLviDT0WjXFnJr/CwRr6CgII2hn8Du3LmDN4sJ iNfq1avh31q1avGED/4FNYRNhw8fFv7WVhQvvLFLPw3Em7+Cg4PxX1WJl0HE Xwyky4YEQdgOyeIVExOD8tGtW7dz585BTgEhetOmTXif19ixY7malogXPqcd Tt1//fVXLIGOQkNDcV/gxx9/5BnJiReoKt7d7ObmdvDgwZSUlKdPn546dapx 48Ya7Q9evCeBGFMBk87hELhs+NFHH8Gm2rVrgyV4U9uDBw+wPmQloMVYDcWr QYMG4js1Zrb4MUDiRRAEc0gWr1ztY524B2sUK1aMe34FyJnu9TELF2zgMjaN 9rkTkEZhjwMHDvTx8YEPdnZ2vXv31jVSNxe7fPky9wwQUEDuuRbVq1e/e/eu SBUwWY1DQLyuXbtWsmRJ7B0cxT1jpECBArq3m4G0YTmY3aZNG/Fd65stfgyQ eBEEwRyWiBfG5BEjRnh6etrb21epUqVDhw7cw6M4LBSvrKyspUuXNmnSpFSp Uq6uriBVO3bsgPLIyMiGDRuCeHFB3uCzDePj46dPn96+fXtHR8fy5cuDqYGB gdyqD2Gsu2ADmho1ahTYXKZMGXAXpFdDhgwJDw/XrQPJ4Pjx48HO4sWLt27d WnzX+maLHwMkXgRBMIe58fm9glHnMKoCjJpNEIQiMBqf5YFR5zCqAoyaTRCE IjAan+WBUecwqgKMmk0QhCIwGp/lgVHnMKoCjJpNEIQiMBqf5YFR5zCqAoya TRCEIjAan+WBUecwqgKMmk0QhCIwGp/lgVHnMKoCjJpNEIQiMBqf5YFR5zCq AoyaTRCEIjAan+WBUecwqgKMmk0QhCIwGp/lgVHnMKoCjJpNEIQiMBqf5YFR 5zCqAoyaTRCEIjAan+WBUecwqgKMmk0QhCIwGp/lgVHnMKoCjJpNEIQiMBqf 5YFR5zCqAoyaTRCEIjAan+Xhv4TsKD0hCIJgA4wYSquESlE2jL+fKD0hCIJg A4wYSquESmHUOYyqAKNmEwShCIzGZ3lg1DmMqgCjZhMEoQiMxmd5YNQ5jKoA o2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3lg1DmMqgCjZhMEoQiMxmd5YNQ5 jKoAo2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3lg1DmMqgCjZhMEoQiMxmd5 YNQ5jKoAo2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3lg1DmMqgCjZhMEoQiM xmd5YNQ5jKoAo2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3lg1DmMqgCjZhME oQiMxmd5UJtzSpcurdFo7ty5I1xNggr4+vrOnTvXRmNMJCReBEGIR23xWVWI dM7jx4+nT5/eqFEjBwcH0JcWLVr4+/snJSVZ3R4biVd4eDg0+9lnnxmrkJ2d HRAQ4OHhUaxYsUqVKoHSRUVFGat84MCBbt26OTs7g7VeXl7BwcFv3rwRPxTF m00QxPsMiZcAYpwDkb9ixYoaLQUKFChUqBB+huh95swZ69pjC/F68eLFhx9+ KCBecXFx1atXxy9VsGBB/AAqdvjwYV5NEKlhw4Zp3sFV7tKlixj9IvEiCEI8 JF4CmHQOpCQ1a9aE+FyrVq2tW7fGx8enp6cfPHiwQYMGUOjq6gpJmRXtsaJ4 JScnb9++fdq0aZUrV0aJMSheeXl5KG1ubm6nT5/++++/IyIievXqBSWQZkJ2 qVsZsjMoL1GixPr161NSUp4/f75p0yb4FwoDAwNFDkWzRi9BEO8tJF4CmHTO L7/8gmlIdHS0bvnDhw8rVKgAmxYsWGBFe6woXitXrtT8G4PitXfvXthUsmTJ +/fvc4UgYR988AGUjxkzhiuMjY0tUqQIFILG6bYQFBSEOi5yKJqsRhAE8ZbE SxCTzvHz84PI3LJlS/1NX375JWzq27cv/nv9+nVfX9/vv/8ePm/bts3Lywsy l7Jly7Zq1QrSE/3dN27cCAmOi4uLvb29p6dnSEhIrlXF6/bt2+ve0aNHD2Pi 5e3tDZv69+/PK1+7di2Uly9f/vXr11gyefJkKGnfvj2v5tOnT6drefLkiZih KFyHIAgCIfESwKRzfHx8QFAgbutvmjBhAv7cg//+/vvv8G/Pnj3nzJkDHwoX LgzJCPzFrCcwMJDbMTMzc/Dgwfq/HA0fPhz0zhYLNmbNmmVMvOrVqwebtmzZ witPTk5Gq7iOGjduDP+uX7/ewqEoeXcL+yUIwhKUmrnmx/X3AsnOgSzDzc0N gvmMGTOwBMWrcuXKRYoUAf1KT0+HwoSEBPz9qESJEtnZ2Vhz/vz5uPZj4sSJ N2/ezMrKOnv2bJs2bTg5k1O8SpUqBZsuXLigv8nOzg42/fbbb/gvZGHw77lz 586fPw+aXrNmzRo1avTp0+enn37Ky8sTPxTFm20t5J/mBJH/UGrmSojP7wPS nAOp08CBA3FJQ1xcHBaieAHjx4/XrQz6BToF5deuXYN/4+PjMb2aPXu2bjWQ tmbNmsksXtAp9hgTE6O/V5UqVWDThg0b3mqXLGJNf39//Dq6tG7dGsRa5FAU b7a1oCkgAKPOIbPlhGauCpHgnP3799etWxeTKRAsrpwTL/0GcaX9xYsX4fPO nTvhs6OjY1paGq/arl27ZBav2NhY7DE5OVl/L7yiuHr1avj88OFDTqpatmwZ FhYGCSPoMqRdZcuWhUJQc5FDUbzZ1oKmgACMOofMlhOauSrELOeA+rRr1w4D OGRJly5d0t2K4gVZlf6OLi4unHjhNcOOHTvqV+MEQjbxghQSewQV098Lzd6+ fTt8Bp3Cmo0aNfrnn390q4GQ4abw8HAxQ1G82daCpoAAjDqHzJYTmrkqRKRz UlNTJ06ciKsvatSoERISkpOTw6uD4gVb9XfXFa+xY8fC58GDBxvsqFixYjL/ 5oU/bIEQG9t07tw5+Pzq1StcWGJwwUbt2rVhU3BwsJihKN5sa0FTQABGnUNm ywnNXBUixjmQdDRs2BCvEy5btuzJkycGq6F41axZU3+TrngtXrwYPnfq1Em/ WlxcnPwLNvAW7J07d/LKMzIy0BjIB7EEL37ybvJCunbtCpsCAgLEDEXxZlsL mgICMOocMltOaOaqEJPOAanCdRRNmjS5fv26QE2R4rV792747OTkBOrAq7Zn zx75xQsKYdPQoUN55Xh3dqVKlSDnwpK2bdsaS69w4aX+enuDQ1G82daCpoAA jDqHzJYTmrkqxKRzQkNDNdpHJ6Wmpgo3JVK8EhMTy5UrB//OnTtXt05OTo6n p6f84rV582bYVLZsWd3lgnl5eR06dIDyOXPmcIV427KHh8fz5891Wzhw4IBG e7ea7jM6BIaieLOtBU0BARh1DpktJzRzVYhJ53h5eWm0q9+vGCEmJgZrihQv YNGiRRrtfV6TJk0CnQLZunz5cqdOnbjlfHKK1+vXr3HxJHzTx48fQwnYM2bM GI32oVi6qxBfvnxZp04dXG146dIl+DcrKyskJARX/k+dOlXkUBRvtrWgKSAA o84hs+WEZq4KMekcjMwCeHt7Y03x4pWZmYk/EiHcUzjs7e3xFyg5xQuIiopy dHREG1xdXfGx+WAVrjPUBZQan+ioazY64cWLFyKHonizrQVNAQEYdQ6ZLSc0 c1WIsHPi4+OFlUuaeOVqLxKuWbOmV69eVatWxXbgw9GjRzt37iy/eL3VPgwK sq1q1aoVLVrU2dnZx8fn2rVrBmump6dDwuju7m5nZ4dP2OAewSFyKIo321rQ FBCAUeeQ2XJCM1eFqME5jx8/vn79uv7aewGUGksWQlNAhTDqHDJbTmjmqhBG nUPiJaFfpQ+aSmHUOWS2nNDMVSGMOofES0K/Sh80lcKoc8hsOaGZq0IYdQ6J l4R+lT5oKoVR55DZckIzV4Uw6hwSLwn9Kn3QVAqjziGz5YRmrgph1DkkXhL6 VfqgqRRGnUNmywnNXBXCqHNIvCT0q/RBUymMOofMlhOauSqEUeeQeEnoV+mD plIkOGft2rV79uyxkT0iUdsxnTBhwogRI+Lj44WrKWv2kSNHwMiff/7Z3B1p 5qoQRp1D4iWhX6UPmkox1znR0dEQAH/88UfJPd6+fXvjxo1Hjx6V3EKuaLPT 0tJ27949d+7c8ePHg74EBgZu3749PT3dkq4NYl3xevjwIUgMmD127NipU6cu WbLkxIkTZt0KahASr/wEo84h8ZLQr9IHTaWY5ZwnT54sWLDAQvE6deoUtLBy 5UrJLeSKM/vevXuTJ08eoWXkyJF+fn74edKkSVFRUZb0ro8Vxev06dOjR49G U0eNGjXiHfPmzcvKyrLESBKv/ASjziHxktCv0gdNpYhxTlJS0rlz5yBn4bRA /eIFecqMGTOgI/h78eLF1NRUUN7r16/Pnj0bCqdPnw5JmSUG8LCWeD1+/Hjc uHHoYUhys7OzMzIywGOQOULhL7/8YomRJF75CUadQ+IloV+lD5pKEeMcDHq6 qF+8QG2hF0hhEhISdMuTk5Mh84JNhw4dssQAHtYSrz179kA7ixYt4l0kPHr0 KOaMlhhJ4pWfYNQ5JF4S+lX6oKkUMc65e/fuiXesWLFCQLwgUwgLC4PYCzka ZBCQ5mzatAmyCdz66NEjnghCWmQjs6FfaH/BggX6mzZu3Aib1qxZg//ev38f 4vnvv/8Ony9dugTGQ5ozceLEhQsXnj9/Xn93kMVVq1ZNmTIFviC0f/r06Vzr idfq1auhnYMHD/LKY2Nj0WMpKSlYcu/ePTD72LFjudorjQEBAaDU3HveQaN/ /fXX+fPnjx07FkwNDQ0FESfxyk8w6hwSLwn9Kn3QVIq5ztm1a5cx8YLIGRgY yP3GxP1eA4EdZCtX+yZWSLjmzJkDhf/5z3/g8/r1621kdnBwMPS7Y8cO/U3b tm0DA0CF8d+IiAj8Rvv27YMPfn5+06dP534g09URkOZ169ZxygvfET9s2LAB L+tZLl7Xrl0DcUR36YKJ5JgxY7iM7Pr161ACX/PChQucJShekZGRuj/2cUcB vE3ilW/4LyE7NAVUhbnOERAvvOQF5/k3btyAGPv06VNoGX9jgoSCqybbgg2D gGEzZ84EA7jV/iheYDaoLegXxv+0tDRIr6AcMhdOL0DIUA5A/kBfQMuio6OX LFnCyZnVl8qDDyGHunz5MpgH7W/fvp3bhOIF7gULIVuE5Au+CNTPyMjA66KQ 1YaHh2dmZiYlJUGCBsKHRpJ45Q9ki9gEB00BVWGucwTE6/vvv4dNR44c0S28 evXq3LlzuTQnV1HxArkJCQmB3iFR4q6/oXgBW7du1a0M+oVpy/379+Hf1NRU TK9A4HSrgbTNnz/fFuJ19OhRbtkhKBSoLWgTtxXFCwgKCtItxwMEiS1vRcqf f/5J4pWfYNQ5So0lC6EpoEKsKF4//PADbFq2bBkkCwItKCVe165d+/bbb1EI QLC4ck68uN/mOPDiG3aEwR9EQX+9OmRGthCv/fv3cxf9/Pz8goODExMTua2c eN27d093r++++87gr2bcJhKv/AGjziHxktCv0gdNpVhRvCIjI/GnIvi7fPly iJ9QAskOr5r84gU1MSsEIEuKjY3V3YriBVmV/o54sQ47wmuGIM361UCsbXTZ EIAMMTw8HH9MnDZtGneHNYrXqFGjeOsScaX9rVu39Jv65ZdfSLzyDYw6h8RL Qr9KHzSVYkXxytUugVu7di0uvUNAFNatW6ebMsgpXpmZmdu2bUNJDQgIOH36 tO4VNgTFC7bq764rXps3b4bP8F0MdoTX92z3eCjQLPwli7sqi+I1a9YsXjV0 O+8GAQRXpJB45Q8YdQ6Jl4R+lT5oKsW64oVALnD79u3Dhw+vWLEChQNUIDU1 FbfKJl5paWm4snHs2LFHjx419nglFC+Di/Z1xQvXmRvMvCA5skrmlZGRcUGL vsICQUFB0EVoaCj+i+L17bff8qrhmQP4X78FvH2AxCt/wKhzSLwk9Kv0QVMp 1hIvXHoH8DQC4jmmDKBZWCLbEzZwHcV3332HKy6MIVK8rly5gr95cfdScVy9 etUq4sXlTbyfsZDly5fDJm7xvzHxmjdvHpTDmYN+C+gQEq/8AaPOIfGS0K/S B02lWFG88MauyMhI3ib8vebkyZP4rzzi9ccff0AvM2fOzMzMFG5KpHiBsvj7 +8O/+/fv160DWRI+79Eqlw2/+eabEf9eEo9Ay/hj1sWLF7HEmHjt3bt3hPZZ HLznD3MKS+KVP2DUOSReEvpV+qCpFCteNly0aBFsgvALcRXTk+TkZKzv5+cX FxeH1VC8Zs+ebVOz0ZitW7feNQK3tlCkeAGQzozQ3ucF6Q+oCcgWtLNs2TLu Bz7LxQskHt21e/du/KEQxBeSPhQ1SJ24BTDGxAvq4yLJWbNm3bhxIysrKy0t DZodO3YsiVd+glHnkHhJ6Ffpg6ZSrChe9+/fx+wAIzwXLeEzd80wV2eNN8TY JUuW2MhsvCdLgODgYKwpXrxAOCBh5FrgnsIB3xofAmyVBRsbNmzgutB9qjzo F3cCkGtcvHK1NwVwzgcjufX2tFQ+P8Goc0i8JPSr9EFTKVYUr1ztQ9F//fXX OXPmTJgwAZ9tGBoayvsFBxIWSIj8/f3HjBmzePFiW5idmpoqrFzSxAuNhyxm 1apV06ZNw3bgQ2RkJP4gZa3VhpcvXwYPQ++jR4+ePn06JHfHjh3j/ZgoIF65 2sdIbtq0CTI1fLAG6BccCLCTxCvfwKhzSLwk9Kv0QVMpjDpHDWanpaVBsmlw ZaAx5DcbJO/hw4fcUk9p0MxVIYw6h8RLQr9KHzSVwqhzyGw5oZmrQhh1DomX hH6VPmgqhVHnkNlyQjNXhTDqHBIvCf0qfdBUCqPOIbPlhGauCmHUOSReEvpV +qCpFEadQ2bLCc1cFaKscxYvXqzRaHx9fc3d0XZjKTExsWvXrr/99pstGqcp oEIYdQ6ZLSc0c1WISOdERkaCxDRu3LhEiRJVqlRp27ZtUFCQ/uOyzcXW4vXk yZNvv/22SZMmpUuXLlOmTKtWraZNm5aTkyOwy9KlS8GklStXCtQ5cOBAt27d nJ2doVkvL6/g4OA3b96IH4pialoXmgICMOocMltOaOaqEDHOCQkJKVasmEZL kSJFNO/44IMPeK97MxebildUVFSlSpXQ1AIFChQqVAg/V6hQ4cqVKwZ3efDg Qfny5QXEC0Rq2LBhnAcKFiyIH7p06SJGv2gKqBBGnUNmywnNXBVi0jkxMTH2 9vYQn3v06HHu3LmsrKyUlJS1a9eWKlUKCkeMGGFJ77YTr9evX7u5uUHj7u7u e/fuzczM/Pvvv0+cONGoUSMorF69OiRlXOU7d+6EhoZ+9dVXkFeiGBkTr4CA ANgK1davXw9+eP78+aZNm3CvwMBAkUPR3AFsOTQFBGDUOWS2nNDMVSEmnTNj xgyIzB999BHvIuHy5cuh3NnZ2ZLebSdeO3bsgJYhYYyPj9cth1SxYsWKsGnZ smVc4Weffab5NwbFKzY2FhPP06dP65YHBQVBoaurq8ihaLKa1aEpIACjziGz 5YRmrgox6RwM7PPnz+eVX7p0CeM897Sxq1evggzhs7JDQkIgu7Gzs8vIyMCt Dx48GDVqVLNmzSBPcXFxGTp0aHR0tO3Ea9y4cdCyl5eX/iY/Pz/Y1L9/f64k LCxs3TswXzMoXpMnT4ZN7du355U/ffp0uhbdbE5gKArXsQU0BQRg1DlktpzQ zFUhJp1z4MCBjRs36r9TGwohkhcvXpzLyA4ePAgl3t7emzdvLlCgAEobitex Y8cw39H9nahMmTL4+5EtxOv//u//oH1IG/U3TZkyBa+CGtyxdevWxsSrcePG sGn9+vXSxuFbEi9VwqhzyGw5oZmrQsx1DmQZkEPt2rWrcuXKEMn9/f25TShe DRo0gNwKUh5Ivo4cOQL1U1JSKlSoAJtq1qy5b9++1NTU+/fvgzqA8KGKyblU /tWrVx4eHtDpnDlzDFYQEC9cy3Hu3Lnz58/7+PjA16lRo0afPn1++umnvLw8 8UNRgtkWQlNAAEadQ2bLCc1cFWKWc5YvX84tOwSFmjlzpu5znlG8AIjnuuXT pk2DQkdHx4SEBN3Wdu7cKbN4/fPPP4MGDYIeS5cuDSmhwTrGxOvFixdoLeg1 l1dywF7p6ekih6K5ZlvOfwmCsBilZq654fE9wSznfPfdd1zcLlSoEGQfsbGx 3FZOvK5evaq7V5MmTXAxnn6DTZs2lU28jh8/Xr9+fZTdM2fOGKtmTLwePnzI SVXLli3DwsKysrJAjiHtKlu2LBQOHDhQ5FA0y2yrIP80J4j8h1Iz19zw+J4g wTlxcXH79u1r0aIFLrFLSkrCchSvokWL4jtkOUqWLAnl3DvQdfn6669lEK+I iIiOHTui7nh6ekZGRgpUNiZeoFPYQqNGjSCD090EQoabwsPDxQxFkWZbEZoC Aih1UCyEzJYTmrkqRLJzEhMT8Zcs7m16KF7u7u661UDaMLBHR0frNzJnzhyb itezZ8+mTp1auHBh6KVWrVq//PKLyVuJjYnXq1evcKmJwQUbtWvXhk3BwcFi hqJJs60OTQEBKJzKCZktoV+lp4hKEXZOcnLyZi28d5giffr0gYg9dOhQ/BfF q169erxqpUuXhnLd16BzjBw50nbilZWVhesDS5QosXr1alAfMaNFYMEGLpjk 3eSFdO3aFTYFBASIGYpizLAuNAUEoHAqJ2S2hH6VniIqRdg5XN7E+xkL+eST T2DT5MmT8V9j4tWsWTMoX7hwoX4LzZs3t5F4gVR5enpqtM+wiomJET9aBMSr bdu2xtIrvDtsy5YtYoaieGOsBU0BASicygmZLaFfpaeISjHpnDp16vCWxCNR UVH42KitW7diiTHx+uabbzTaZ3EkJibqlu/Zs8d2qw1BR6BlDw+PZ8+emTVa BMRr7dq12Obz5891yw8cOKDR3r92//59MUPRLHusAk0BASicygmZLaFfpaeI SjHpHEg0cG1hQEDA3bt3oSQ1NXX37t34Kw9kVVlZWVjTmHhBfbzg5u7ufvjw 4bS0tISEBGiWe5CgLcTr448/hpYnTZp02whgg8EdBcTr5cuXKOUtW7a8dOkS /AvfPSQkxMHBAQqnTp0qciiKHLdWhKaAABRO5YTMltCv0lNEpYhxzvDhw7lV 4kWLFuU+QyQHFeCqGROvXO1jOjipAh3k1tvjKnpbiBf+0CaAsZXtAuIFxMTE 4DIVANeBIN7e3i9evBA5FMUMWutCU0AACqdyQmZL6FfpKaJSRDpn165dPXv2 rFy5crFixVxdXTt16rRixQrekngB8QJu3brl5+fXvHlzfLAG6NfQoUOPHTtm C/HKzMwUVi7J4gWkp6dDQgdZpJ2dHT5hQ/ybK2kKqBAKp3JCZkvoV+kpolLk d052dnZERER8fLwljdAUkNCvtY5gPoPGkpyQ2RL6VXqKqBRGnUNTQEK/Sh80 lUJjSU7IbAn9Kj1FVAqjzqEpIKFfpQ+aSqGxJCdktoR+lZ4iKoVR59AUkNCv 0gdNpdBYkhMyW0K/Sk8RlcKoc2gKSOhX6YOmUmgsyQmZjWRnZwcHBw8cOPCj jz56/fq1cL9KTxGVwqhzaApI6Ffpg6ZSaCzJSf4we8CAAb17916yZElycrKE 1k6dOlWpUqVhw4aFhYXdvXvXZL9KTxGVwqhz8scUkLlfk16Fs8Hp06e7urra 2dmtXLlShuMogQ8++ECj0Wzfvt1aDUo4KL6+vnPnzrXRwRLJ+2O2SBITE7t2 7Sr+vhWz4JkdHx9/9uzZb7/91sXFZePGjWY19eDBA0dHxwsXLojv11pDPZ/B qHNIvCT0a9KrixYtwpvgKlSosGbNGhmOowQUF6/w8HAw4LPPPhNT+a+//qpX rx7Uf/TokbVqIlY3G05dAgICPDw8ihUrBnkBKF1UVJSxygcOHOjWrZuzs3Pp 0qW9vLyCg4NNvq/BLLOfPHkC0tCkSRNov0yZMq1atZo2bVpOTo7ALkuXLhW+ Q9MWZickJFSvXh2ETEwjyBQtIiszGp/lgVHnkHhJ6NekVzt06ADTf+LEiTIc QckoK14vXrz48MMPxYvXkCFD8HzApCSJr4lY1+y4uDgIwmgAvvoHABU7fPgw ryZE+2HDhnE3+3OVu3TpIkYIxJgNognqic0WKFCgUKFC3DnVlStXDO4C6Uz5 8uUFxMt2Zm/YsKFv374mW+CA9PDIkSMiKzMan+WBUeeQeEno16RXURf27t0r wxGUjCLilZycDD3CyX/lypUx6IkRr3Xr1nHRUliSxNfkHVOrmJ2Xl4fS5ubm dvr06b///jsiIqJXr15Q4uDgkJSUpFsZsjON9jVD69evT0lJef78+aZNm/Dh b4GBgZab/fr1a3xHg7u7OwzFzMxMsOfEiRONGjWCQlBYSMq4ynfu3AkNDf3q q6+4p88ZEy/bmQ267+rqarIFjtatW587d05kZUbjszww6hwSLwn9mvQq6sJv v/0mwxGUjCLiBSGR93gxk+J18+bN4sWL40ObhSVJfE39Y2oVs0EjYFPJkiV1 X4sAkoGuHjNmDFcYGxtbpEgRjd5b7YKCgjTa96pbbvaOHTsw6YuPj9ctT0tL w+d7L1u2jCuEr8P7ggbFy6Zmg5iWKVPGZAscH330EYmXVWDUOSReEvoV8OeE CRN4QQBOR7mtcG7p5+dXs2ZNOzu7SpUqderUacuWLU+fPtVtAdTE19d3//79 CQkJI0aMcHFxgfhTrVo1OOPFZ2Bu2LChefPmcK5brly5Nm3aHD16lGcDRKdF ixZ17doVO4KQ0r59+40bN/JehGpQvKCL+fPnN27cGCJw2bJloaMlS5bACba1 xtLt27fXvaNHjx4mxQuarV27dsGCBTEUC0iS+JoGj6lVzPb29oZN/fv355Xj O4DKly/PreWePHkylMBx4dWEwTBdi25aJM3scePGQRdeXl76m2AQ8uwMCwvj viDmawbFy6Zmw76lS5cW3l0XEi9rwahzSLwk9CvgzzVr1oBq4Ml/s2bN4DP3 mrZDhw7hGS+Ap69I7969QW64FmbMmKHRvpkUpAc+gHjpvvLG398fT6erVq2K 7xQoXLjw+fPnud2TkpLwupBG+zMHPr0ZASnUNVVfvO7cuYNvNdVo31nA/ZzB e+uBtcbSrFmzTIrX559/DnWgZnZ2trAkia9p8JhaxWxcKKL/KtXk5GQ0iesI X02+fv168f2aa/b//d//QSIDw0l/05QpU6B3UGGDOwo8UtumZpN4KQWjziHx ktCvSa/qXzZ8+PAhvlzGx8cnPDwckiDIwn788UfIbqDwyy+/5GqieIG6QSMR ERFQkpmZqfsT+bRp0zIyMqAc2sGfYAYPHsztjurm7Oy8d+9efEMcdISvMcXg yTOSEy84eW7ZsqVG+8rs33//PT09PTU1FRrBN681aNCAe9+ctcaSSfHChKVd u3aQsAhLkviaxo6pVcwuVaoUbDK4eBtSYBwS+C8uioDYCyceMCTgRAVfrPDT Tz/l5eXZwmyOV69eeXh4QO9z5swxWEFAvGxqtgziRRAqQfw4txbYrwTxwiVw /fr149U8duwYvpeNS21QvCDbiomJ4aqlpKRgHsRrITAwEApbtWrFlWDqFBQU xOuobt26UL57926ekZx4/fzzz/AvhCNIE3R3BAnAFWsgEMLf2tyDIixeN27c gIAPKozrHAQkSXxNgWNqudlcv3Dg9PeqUqUKbNqwYcNb7ZJFrAlnGtwr+ThA O+DMwepmI//888+gQYOgF5AJOAUyWMeYeNnabBIv4v1B/Di3FtivcAzPNSRe ZcqUgRLd63sczZo1g02rVq3Cf1G8OnXqxKuGlxy3bdumW4i/70B3XEm2Ft6+ EBbgDFnz74uEPPHCRXELFy7UtxB/yOvfv7/wtzb3oAiIF2Smbm5uoNdhYWFY YkySxNcUPqaWmx0bG4v9GnxYBF5RXL16NXyGNJyL+ZDtguWQ1SYkJED+gpm4 sXfkWWI2cPz48fr16+Op0ZkzZ4xVMyZetjabLhsqBaPOUUoFLIQt8bp//z5O +W7duvXUAy/9gWZhZRQvyNR4bbq4uED5H3/8oVsImRRPvBCIKhcvXgSlW7Ro ka+vb9WqVdEAAfHCS0kQlPQtbNiwIWz6+OOPrTuWBMQLhBI2zZ49mysxJkni awofU8vN5t7cCiqmvxcePvD2W+0NuVizUaNGkArpVgNFwE3h4eFWNDsiIqJj x47YsqenZ2RkpEBlY+Jla7NJvJSCUeeQeEno16RXeeIFZ7kaU4wfPx4ro3gN HTqU1yZGv7Nnz+oW6ovXgwcPQPjs7e2x2cKFC8PJNugXXrYSEC/dpR0Gadq0 qXXHkjEV2LBhA5R36NBB96ZXg5IkvqbJY2q52W/f/bB16dIlY5sw2L569Qov Ahtc+VC7dm3YFBwcbBWznz17NnXqVBgG0GatWrV++eUXk7cSGxMvW5tN4qUU jDqHxEtCvya9yhOve/fuoY7wFqsbxBLxgpN/jCE1atRYsGDB6dOn09PTcRPe PCsgXu7u7vDvsWPHTFpoDGupAK7HFqZdu3Zm1TR5TC03G8AFojt37uSVZ2Rk oDEPHz7EErwIzLtbCunatStsCggIsNxsSMBxfWCJEiVWr14N6iNcHxFYsGFT s0m8lIJR55B4SejXpFf1f/PCdWjXrl3Tr3zo0CHQoLi4OPzXEvECJdJo7ydK SEjg7Y4LOQTEq3v37hiy9C28ePEidHTjxg3hb20tFcBMgQf3aCP4AP927NjR rJomj6nlZr99d6svHDteOeQ7UF6pUiVOPtq2bWssT8HbrPTX25trNvTl6emJ w8PgGhJjCIiXTc0m8VIKRp1D4iWhX5Ne1RevAQMGQEnfvn15yRdkOnhizK3x s0S88EEH+j+B3blzB28WExAvODPHK0s84YN/cYH04cOHhb+1FVVAH/EXAxW8 bLh582bYVLZsWd11d3l5efisS92l6bi238PD4/nz57otHDhwQKN9YKDuMzqk mQ06gl08e/ZM1Bd7h4B42dRsEi+lYNQ5JF4S+jXpVX3xglNflI9u3brBjIN5 mpmZuWnTJlymNXbsWK6mJeIFWzHj+PXXX7EEOgoNDcV9gR9//JFnJCdeoKp4 dzOcQh88eDAlJeXp06enTp3C605NmzblPQnE8rGU/8Tr9evXeEuCl5fX48eP 32oXQ44ZM0ajva9cdxXiy5cv8Qa6li1bXrp0Cf7NysoKCQnB29sho7Tc7I8/ /hiamjRp0m0jwGmJwR0FxMumZksQr/Pnz4uszGh8lgdGnUPiJaFfk141+GzD DRs2cA/WgFDGPb8C5Ayf+4RYuGADV98BTk5OkEZhjwMHDvTx8YEPdnZ2vXv3 1jVSNxe7fPky9wwQUMCiRYvi5+rVq9+9e9fqYyn/iddb7YPcHR0d0QBXV1e8 hlm4cGFcZ6gLnM9UqFABa+KCCsTb2/vFixeWm403xQtgbGW7gHjZ1Gw4cGaJ F5xQib8cymh8lgdGnUPiJaFfk1419mDea9eujRgxwtPT097evkqVKh06dOAe HsVhoXjBmfDSpUubNGlSqlQpCJ4gVTt27IDyyMjIhg0bgni1adNG10jesw3j 4+OnT5/evn17iMDly5cHUwMDA7lVH8KQeCGQYUG2Va1aNVB/Z2dnOG2A426w JjgWMiN3d3c4LvioCvGvgBQ2m1u3b3Xxsp3Zb968KVmypMh2oHLZsmXFXxFl ND7LA6POIfGS0K/SB02l0FiSk3xpNkghtyBTmIMHD4o87dHtV+kpolIYdU6+ nAK27lfpg6ZSaCzJSb40e+rUqfPnzzfZyJ9//lm3bt1bt26Z26/SU0SlMOqc fDkFbN2v0gdNpdBYkpN8aXZKSkr9+vW5J33p88cff3zyySft2rW7evWqhH6V niIqhVHn5MspYOt+lT5oKoXGkpzkV7Pj4uK8vb179OixZ88e/a2HDh2qU6eO j4/PvXv3JPSr9BRRKYw6J79OAZv2q/RBUyk0luQkv5r95MmTcePGNW/ePDQ0 1FidvXv3enh4gMyZ26/SU0SlMOqc/DoFdElOTo6IiBD5bBwx/Sp90FTK+zCW 1EO+NDsnJ8fT03PdunUm2/nhhx98fX3N7VfpKfI/DC70VRAJzhkwYMDMmTNt ZI9IJEwBGDNz5841axerI97szZs3471OcC73119/WaVfZQ+ZasmX4VS15Euz 582b98UXX4hp5++//3ZwcIC/ZvWr9BT5H6yLFz4MoWfPnpJ7PHXq1Jdffrl8 +XLJLeSaH3DCw8MN3uSSkpJi8r4S3iNSo6Ojhw8f3rRp0+LFi1epUmXQoEE3 btwwayiKqQntcwaEhISIbF+4X0scno/Jl+FUteRLsz08PCIiIkQ2VatWLYNv nxHoV+kp8j+YFq+MjAx8ZqYl4oXPGevatavkFnLNDDgvXrzAh5NLE6/27dtz 9VesWFGsWDEs5547AR9+/fVX8UNRTM2PPvqIMwC0UuQ3Fe7XEofnY/JlOFUt +c/svLw8Ozs73lMTBfDy8rpw4YJZ/So9Rf4Hi+J17969jRs3+vv743vVWRGv 5ORk8PO0adPwtYkGxevVq1cRRrh+/Tq+v/XQoUNY+eTJkwW0jBkz5uHDhzBo wTOQRWq0D5y5efOmyKEoZtDC8IbTOXxKT58+fcTsYrJfSxyej8l/4VTN5D+z c3JyHBwcxDfF7oN5WRSvxYsX85IRJsRr5cqVPLPNurf9xx9/1GifPcuV4Dun Ro8ezasJmRH6RORQFG8DPu4b9FH8LgL9WuLwfEz+C6dqJv+ZrfhT5eE029fX 9/vvvwcZDQwMhDAFmaCTk9Pnn38O59i52t96unTpUqZMmRIlSjRq1CgoKEj/ adVbtmzp27dvgwYNoE7FihWbNWu2YMGCpKQk3TrGxGvr1q1t27YtV64c7Fuv Xr2JEydGR0dbPC9NI8Y5V65cCXoHOEFAvDIzMyHmQ14MX79kyZKQuYwcOTIm Jga3Qm7CU5OaNWtaYrbwcb99+/a6d/To0cMs8QKbixcvDvZzP62mp6ejzfp3 aty/fx+TL/j6YoaiSBuACRMmQMsg9+J3EehXmqvzPfkvnKqZ/Ge24uL1+++/ a7QPyu7Vq5dG+148fBkQUKdOnY0bNxYpUqRAgQKurq7cM6uXLl2q28LgwYO5 mKz7anKQsNTUVK6avnilpaUNGjSIq8/9kgKp6L59+6w7T/UxN6xNnTrVmHhB eG/RogUaX7BgQc5RcGRv3boFFe7evQsJV8OGDTXah4fD52HDhllitvgBY9bD VF+9egVfBMQoMjKSKzxz5oxG+9Byg68jx7elg8qLGYoibYbTHnt7eziZycjI ELmLcL/SXJ3vyX/hVM3kP7NVIl4gHBBUOckIDg7mNAUi7YMHD3K1L7lr166d RvvCBW73vXv3YmQDRcPX80Ek37RpE76IFs78uZr64jVp0iQogVQFqiUmJmZn Z1+8eBFfTg2BC8O+7bCieM2cORM2ubi4HDp0CA4oZKbwRfBnI1ANrpr8Czbe mileS5Ysgcrjxo3TLcT0CtC/xxCOGm4y+ZBq8WbDMMNXLEEmK6a+mH4tcXg+ Jv+FUzWT/8xWiXgB27Zt0y2HvEmjfcEN5EdcIS4Xh0QsMzMTS/z9/TXaZ/Xz mh0xYgSUT5gwgSvhiRdoUzEtFy5c0N0RIn+nTp2gpq+vr5lz0TysKF6o6YsX L9YtBFlv1KhRly5duBKVixcc6NJadN8q+1a7pqhcuXLQyPTp03m74MU9YPXq 1WKGokkbtm7dCjkXNLhgwQKTlcXwX4IgLMbg5FKJeBUvXhwSH91yfBfe6NGj dQuTkpIwWHHXA3NycmBH/V/BQHqg2pgxY7gSnnjhSX737t31TcJ3HlWqVElc OJeIGOfoIiBe8C1gU8eOHTFFNYbKxcvPzw8lWH9TSEgI5tdTpkyB3p89exYR EfHFF1/AaQyOhxUrVogZiiZt2L9/f/PmzU+ePGmypkhkn+UEkQ8xOLlUIl41 atTglUMyBeXz58/XLQTN4okXB0QzyDVWrlw5atQofDu5sHjhQms3N7eeemAi A4HR5HvMLUGMc3QREK+jR4/iK0rh7yeffAJOg5KsrCxeNTWLV1RUFGiTk5OT sZerorTx8Pb2hpEDH3bs2CFmKJq0Nk+LyWriMfcov1eYO5ZUApktJ+oXL/3F byhegYGBuoX64gX2f/vtt9xtUHilsXfv3nhLr4B4QZDXD4Y8UlJSLJ2fxrGi eAHh4eH9+/fXfZF3qVKlBg0aFBsby9VRs3iNHDkSqkFiJVDnxIkTMCrq1avn 6Ojo5eUVGhoKQlOyZEnY0eSYVGrmkngJkP/CqZrJf2azLl5DhgzRaNcH+vv7 79+/PyEhAcsx1AuIF94iBKHVktlnCdYVLyQ7O/vUqVMLFy7s0qUL3mbr4uIS Hx+PW1UrXjk5OahB5k4ubhX9/fv3hWuSeKmQ/BdO1Uz+M5tp8QKpKliwIPx7 /Phx3u64kENAvCDCw7/9+vXTNykmJmb37t0nT54UNQOlYi3xyszMPKsFDqVu eVRUVIUKFTTam5WwRLXihXclt23b1liFS5cunTlzJi0tjVe+atUq2LFq1aom r/WReKmQ/BdO1Uz+M5tp8eLuveVd34N43qRJE2HxunbtWuHChYsUKXL+/Hnd fZ8+fdq+fXuNdm2bmXPRPKwoXnhj17Fjx3ib8Oav4OBg/Fe14tW8eXOoA0pk rIK3tzdU8PPz0y2EI4VP3pg3b57IoSjebGtB4iVA/gunaib/mW2ueLVu3Vo9 4pWTk4P3c02YMAEXz0NAO3HiBHfHro+PD7ev/n1eo0aNgpKSJUtCVMd1erdv 38Y46eDgAJmLZVPTBFa8bIjPkoVIfvDgwYyMDCiBr4P1QaDv3LmD1VC8GjRo YLnZ4geMSfGCQ4mLBm/dumWsDuiyRruEZsGCBXCI//nnH8jF8GaKunXrinnN AYmXCsl/4VTN5D+zQbzKlCkjvqkuXbocPXrUrH6FB7CFv3nhhSPA3t7e3d29 RIkSGu2zNWbMmIHhrnHjxvfu3cs1JF5JSUmtWrXiVjhwT+eARo4cOWKFySmI FcULskj8zUijfcIGOgG/PnfNEABpw/KKFSu2adPGErPFDxiT4vXLL79otE9W Eb70980333BHinsWioeHx6NHj8QPRfFmWwsSLwHyXzhVM/nP7MePH1etWlV8 U//5z39mz55tVr/CA9hC8QL27NkDodjJyalcuXIdOnRYuHBhdnY2JCDdu3cH PXJ1db17926ukWcbgnb/8MMPoAjVqlWD+N+wYUNIx1DsbI0VxQtbA8vBfjgV AR2H9GrIkCHh4eG6dSBnGT9+PMgEuAUyaEvMFj9gTIoXHmgxz28PCwvr3Llz pUqV4As2bdp08eLF4t+GQOKlQvJfOFUz+c/sHTt2iHkoN0d0dLSjoyP8Fd+v 0lNEpTDqnPw3BWToV+mDplJoLMlJPjMb0hM3NzfurUkigeSlcuXKcN4LEib8 nnSauQIw6px8NgXk6Vfpg6ZSaCzJSf4w+/nz57GxsWvWrKlRo8acOXMkNBgf Hz9z5szWrVtXr1799evXwv0qPUVUCqPOyR9TQOZ+lT5oKoXGkpzkD7Pbt2/f vHnzsWPH3rhxQ4Z+lZ4iKoVR5+SPKSBzv0ofNJVCY0lOyGwJ/So9RVQKo86h KSChX6UPmkqhsSQnZLaEfpWeIiqFUefQFJDQr9IHTaXQWJITMltCv0pPEZXC qHNoCkjoV+mD9j8M3i2iIBIOiq+v79y5c210sESiBrMTExO7du1q8h2sutDM ldCv0lNEpTDqHJoCEvpV+qD9D9bFKzw83OA9gykpKRpTtGvXTneX6Ojo4cOH N23atHjx4lWqVBk0aJD4BQAKms2xdOlS2Lpy5UrxZkibAkOHDoWONm7cqL9J vA/DwsJ69+5du3ZtqOnh4fHpp5+eOnXKpmZbjqpmrtpg1DkkXhL6Vfqg/Q+m xevFixcffvihZBVo3749V3/FihXFihXjPa0FPvz666/ij6n8ZnM8ePCgfPny MohXaGgomqEvXuJ9qPsmPq6mRvuiYRuZbRVUNXPVBqPOIfGS0K/SB+1/sChe ycnJYPC0adMqV66MQU9fBV69ehVhhOvXr9evXx/24u5mPXnyZAEtY8aMefjw YV5e3r179/DVtIULF75586bIYyqz2cCdO3dATb766ivu+W82Fa9bt25xT8zj iZd4H+7fvx9bmDVrVmxsLNQEyQ4ICMDCXbt2Wd1sa6Gqmas2GHUOiZeEfpU+ aP+DRfGC+MxLRky+2FQXfNvO2LFjuRJ8E4H+aT++4E/M44YUMRuAFnht2k68 4OjUqVMH5Mne3l5fvMT7EN9KP3PmTF5NHx8fKB8wYIB1zbYiqpq5aoNR55B4 SehX2KVwmu3r6/v999/n5OQEBgZCZLCzs3Nycvr888/htBYqnD17tkuXLmXK lIFT7kaNGgUFBT19+pTXyJYtW/r27dugQQOoU7FixWbNmi1YsCApKUm3jjHx 2rp1a9u2bcuVKwf71qtXb+LEidHR0RaPFNOIOSi3b99e944ePXqYpQIxMTGQ O0AKw713gHt7KWQKvMr379/HxCEzM1PMMZXTbCQsLIxr083NzabiBQMS0yV8 t5SueJnlQ0dHRyi5evUqr+YPP/yg0b7hwrpmWxFG47M8MOocEi8J/Qq7FJ9N 3a1bt169emm0D9jHXzQAOPuFuFGkSBE4B3Z1dcUXtwFLly7VbWHw4MHc2Th3 qUejfb2C7iOs9cUrLS1t0KBBXH3uJwkHB4d9+/ZZd+ToY+5BEfNuOI5Xr161 aNECAmlkZCRXeObMGWihUKFCb9680d8Fzhlg65UrV8QcUznN1qd169a2E6+Q kBCN9uWwr1+/1hcv8T6ECtu1wLHmVcMfwjp37mxFs60Lo/FZHhh1DomXhH6F XYriBcIB2RYnGcHBwZymdO3aFd83l5CQgNdhqlevzu2+d+9eDCagaMnJyVAC 58abNm3CV93BWTpXU1+8Jk2apNG+IgeqJSYmZmdnX7x4EbrTaF8MdOvWLesN HAPYVAWWLFkClceNG6dbiKkBEBcXx6sPXx83mVx/Lr/Z+thOvCIiIkCAnJ2d IW2Hf/XFyxIfghrGx8dD2gVdwPnY4cOHrWW21WE0PsvDfwnZUecUQPECtm3b pluOb9uEhAvyI67w7NmzGu2b2vDtq4C/vz+UDBw4kNfsiBEjNNr3tHIlPPEC bSqm5cKFC7o7Pn36tFOnTlDT19fXzEFtHuYeFPEqAB4rrQV0XLc8Ly+vXLly Gu170nm7gKPwKKxevVrMMZXTbH1sJF5w6N3d3QsWLBgWFoYl+uIl2Yeff/45 nGJhBRjVu3fvtpbZtkDMzH1vkS9kE+9Q5xRA8SpevDgkPrrl+KP26NGjdQvh fBinP3c9MCcnB3bU/xUMf7YYM2YMV8ITLzzJ7969u75JEFhgU6VKlcSNZYmY e1DEqwBelVq8eLH+JrwmBlF0ypQp0PuzZ88g1/jiiy/wdd7AihUrxBxTmc3m YSPxGjBgADT77bffciX64vVWqg8ho+cqODg4BAQEvHz50ipm2wIxM/e9hVHn KDWWLETNUwDFq0aNGrxyfE3n/PnzdQsNvo8VgQCyd+9eCGijRo1q1KgRVhMQ L1zb7Obm1lMPvDgJoUZfE62IjVQgKioK4qqTk9OLFy8MVtC984jD29sbDgF8 2LFjh5hjKr/ZuthCvIKCgjTaO8t0f8wyKF5vpfoQWk5MTITWXFxcRAq6mmfu ewujziHxktCvsEstfJn4kydP4FQZsiQuhri6uvbu3dvT01NYvD755BP9+MMj JSXF0hFjHBupwMiRI6EaJAUCdU6cOAHurVevnqOjo5eXV2hoaF5eXsmSJWHH c+fOiTmmipjNYXXxiomJKVasWIUKFZKTk3XLjYnXW8t8ePnyZRxgJh9souaZ +97CqHNIvCT0K+xSC8VryJAheB3G399///79CQkJWD516lRh8cK7ciC0WjIe LMEWKpCTk4Px09zDza0Av3//vnBNNZhtdfE6dOiQyTMZQLgLng/h7+7du409 CQpyTKi5efNmS8y2HYzGZ3lg1DkkXhL6FXapJeIFUlWwYEH49/jx47zdcSGH gHgtXLgQ/u3Xr5++SXAeDmHn5MmTosaEVGyhAnh7b9u2bY1VuHTp0pkzZ9LS 0njlq1atgh2rVq0K6YOwGYqYzcPq4nX48OHChsDBBmMM/8XKIn2Ij9cAkdLv 7s2bNyjWMG4tMdt2MBqf5YFR55B4SehX2KWWiNfNmzcNXt/LzMzECz4C4nXt 2jUIR0WKFDl//rzuvk+fPm3fvr1Gu5zMzNFhHrZQgebNm0MdiKLGKnh7e0MF Pz8/3UL4yvjUiHnz5ok8pjKbzcOm93npYvCyoUgfJiUlofzBCOc1+9tvv+G4 tcot4baA0fgsD4w6h8RLQr/CLrVEvHJycvB+rgkTJuDieYghJ06caNGiBVbz 8fHh9tW/z2vUqFFQAufAa9euxVvJbt++jaHJwcEhKirKssFiAqurAPgE17Pd unXLWJ1jx45ptGtRFixYAL76559/II/AuxLq1q3Le6iFwDGV2WweyoqXeB/i NW1nZ+dNmzZlZ2dDSUZGRnBwcJkyZaDc39/fRmZbDqPxWR4YdQ6Jl4R+hV1q 4W9eeK0GsLe3d3d3x6e2QiSZMWMGRpjGjRvfu3cv15B4wblxq1atuF80uKdz QCNHjhyxwnARxOoq8Msvv2i0jygRvvT3zTffcF+Ze6iIh4fHo0ePxB9T+c3W RVnxeivah3ByxZ1HAdyD6IHevXuD6tnIbMthND7LA6POIfGS0K+wSy0UL2DP nj1t2rRxcnIqV65chw4dFi5cCGe5cIrbvXt30CNXV9e7d+/mGnm24ZMnT374 4YeePXtWq1YNUrCGDRtCOoZiZ2usrgLosT59+phsKiwsrHPnzpUqVQLFb9q0 6eLFi58/fy7SDAXN5lBcvN6K9uHLly9Xr14NBsP4tLOzq1evXt++fSF3s6nZ lsNofJYHRp1D4iWhX6UPmkqhsSQnZLaEfpWeIiqFUefQFJDQr9IHTaXQWJIT MltCv0pPEZXCqHNoCkjoV+mDplJoLMkJmS2hX6WniEph1Dk0BST0q/RBUyk0 luSEzJbQr9JTRKUw6hyaAhL6VfqgqRQaS3JCZkvoV+kpolIYdQ5NAQn9Kn3Q VAqNJTkhsyX0q/QUUSlqc07p0qU1Gs2dO3eEq0kYS76+vnPnzrXiuEpMTOza tavJlwbqQlNAhVA4lRMyW0K/Sk8RlSLSOY8fP54+fXqjRo0cHBxAX1q0aOHv 75+UlGR1e2wkXuHh4QZvcklJSdGYol27dgbbXLp0qTw3uVgOTQEBKJzKCZkt oV+lp4hKEeMciPwVK1bESF6gQAHuPaTOzs5nzpyxrj22EK8XL158+OGHksWr ffv2+m0+ePCgfPnyJF75AAqnckJmS+hX6SmiUkw6Jzs7u2bNmhCla9WqtXXr 1vj4+PT09IMHDzZo0ECjfWcTJGVWtMeK4pWcnLx9+/Zp06ZVrlwZZUhfvF69 ehVhhOvXr9evXx/2OnToEFcfDAsNDf3qq6/w8UckXvkACqdyQmZL6FfpKaJS TDoHn3hWrFix6Oho3fKHDx9WqFABNi1YsMCK9lhRvEBWeDmUmFemcuDrIcaO HatbCC3w2iTxYh0Kp3JCZkvoV+kpolJMOgdftN2yZUv9TfgC9759++K/kKr4 +vp+//338Hnbtm1eXl4ODg5ly5Zt1arVpk2b9HffuHFjr169XFxc7O3tPT09 Q0JCcq0qXrdv3173jh49epglXjExMcWLF4fMi/d877CwMK5NNzc3Eq98AIVT OSGzJfSr9BRRKSad4+PjA4IyefJk/U0TJkyA6N2lSxf8F5/s2rNnzzlz5sCH woULu7q6ci+S032ya2Zm5uDBg7nkBd9jCAwfPhz0zuq/eb0V/Q505NWrVy1a tADLIyMjBarJ9lRSy6EpIACFUzkhsyX0q/QUUSmSnfPkyRNMPWbMmIElKF6V K1cuUqQI6Fd6enqu9h27kF5ptK+3yM7Oxprz58/HtR8TJ068efNmVlbW2bNn 27Rpw8mZsuK1ZMkSqDxu3DjhaiRe+QMKp3JCZkvoV+kpolKkOQdSJ3yBAiRK cXFxWIjiBYwfP163MugXvuTu2rVr8G98fDymV7Nnz9atBtKGL5JTVrzS0tJK awHxFa7JnHgRBGEJSs1cc+Pze4IE5+zfv79u3bqYTIFgceWceOk3iCvtL168 CJ937twJnx0dHUEmeNV27dqluHjhb3yLFy82WZPEiyDeK5SauWbF5/cHs5wD 6tOuXTvUF8iSLl26pLsVxQuyKv0dXVxcOPHCa4YdO3bUr/bw4UNlxSsqKqpQ oUJOTk4vXrww2SZD4kUQBIuQeAkg0jmpqakTJ07E1Rc1atQICQnJycnh1UHx gq36u+uK19ixY+Hz4MGDDXaEb+hWSrxGjhwJ1aZMmSKmTRIvgiBsComXAGKc k5CQ0LBhQ7xOuGzZsidPnhisZuw98rn/Fq/FixfD506dOulXi4uLUzDzAjku WbIkXvYU0yaJF0EQNoXESwCTzgGpwnUUTZo0uX79ukBNkeK1e/du+Ozk5JSR kcGrtmfPHgXFC+9Kbtu2rcg2SbwIgrApJF4CmHROaGgohGg3N7fU1FThpkSK V2JiYrly5eDfuXPn6taBxMfT01NB8WrevDnUWbVqlcg2SbwIgrApJF4CmHSO l5cXrn6/YoSYmBisKVK8gEWLFuF9XpMmTQKdAtm6fPlyp06dFLzPC6QZ1/Pf unVLZJskXgRB2BQSLwFMOgfvyRLA29sba4oXr8zMzK5du3ItcE/hsLe3x4cA yy9e+AjH8uXL5+XliWyTxIsgCJtC4iWAsHPi4+OFlUuaeOVqLxKuWbOmV69e VatWxXbgw9GjRzt37qyIeOE913369BHfJokXQRA2hcRLADU45/Hjx9evX9df ey8AoyrAqNkEQSiCGuKzamHUOYyqAKNmEwShCIzGZ3lg1DmMqgCjZhMEoQiM xmd5YNQ5jKoAo2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3lg1DmMqgCjZhME oQiMxmd5YNQ5jKoAo2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3lg1DmMqgCj ZhMEoQiMxmd5YNQ5jKoAo2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3lg1DmM qgCjZhMEoQiMxmd5YNQ5jKoAo2YTBKEIjMZneWDUOYyqAKNmEwShCIzGZ3n4 LyE7Sk8IgiDYACOG0iqhUpQN4+8nSk8IgiDYACOG0iqhUhh1DqMqwKjZBEEo AqPxWR4YdQ6jKsCo2QRBKAKj8VkeGHUOoyrAqNkEQSgCo/FZHhh1DqMqwKjZ BEEoAqPxWR4YdQ6jKsCo2QRBKAKj8VkeGHUOoyrAqNkEQSgCo/FZHhh1DqMq wKjZBEEoAqPxWR4YdQ6jKsCo2QRBKAKj8VkeGHUOoyrAqNkEQSgCo/FZHhh1 DqMqwKjZBEEoAqPxWR4YdQ6jKsCo2QRBKAKj8VkeGHUOoyrAqNkEQSgCo/FZ Hhh1DqMqwKjZBEEoAqPxWR4YdQ6jKsCo2QRBKAKj8VkelHXO4sWLNRqNr6+v uTsyqgKMmk0QhCKQeAkg0jmRkZEgMY0bNy5RokSVKlXatm0bFBSUnZ1tYe8y i9fQoUOhu40bN+pvio6OHj58eNOmTYsXLw5fcNCgQTdu3DDYSFhYWO/evWvX rg01PTw8Pv3001OnTpk1FM01myCI9xMSLwHEOCckJKRYsWIaLUWKFNG844MP PkhLS7OkdznFKzQ0FM3WF68VK1bof0H48Ouvv/Jq+vn5cV9f1xWjR48WPxTN MpsgiPcWEi8BTDonJibG3t4e4nOPHj3OnTuXlZWVkpKydu3aUqVKQeGIESMs 6V028bp16xYkSgbF6+TJkwW0jBkz5uHDh3l5effu3fvyyy+hZuHChW/evMnV 3L9/P7Ywa9as2NhYqAmuCAgIwMJdu3aJHIrizSYI4n2GxEsAk86ZMWMGROaP PvqId5Fw+fLlUO7s7GxJ7/KIF9SvU6cOyBOqME+8ateubTB1Gj58OJT37NmT K2nXrh2UzJw5k1fTx8cHygcMGCByKIo0mxBPZGTkoEGDXF1dixYtWrZs2YYN G06YMAEKlbaLICyCxEsAk8757LPPIDLPnz+fV37p0iXMOOLi4rDk6tWrIEMr V67M1V5prF69up2dXUZGBm598ODBqFGjmjVrVqJECRcXl6FDh0ZHR8sjXtA+ pktNmjThiVd6ejp+C8i2eHvdv38fk6/MzEwscXR0hBL4mryaP/zwA5Q3aNBA 5FAUaTYhkqNHj3JXfSG/LleuHJyowOegoCClTSMIiyDxEsCkcw4cOADR/tat W7xyKMRYwWVkBw8ehBJvb+/Nmzdj9ABQvI4dO1axYkUsKViwIH4oU6bMsGHD bC1eIKPQRdu2bV+/fq0vXmfOnIGSQoUKvXnzRn9fEF/YeuXKFfgMFbZrgd55 1fCHsM6dO4scimLMJkTyzz//VK5cGQ/xnTt38vLyoPDFixdHjhxJTk7Wr1+3 bl2orH8QCdnYsWMHHIJJkyYpbQgDkHgJYK5znj59CjnUrl27MGL4+/tzm1C8 IAGB3MrLywtUAwII1E9JSalQoQJsqlmz5r59+1JTUyGpgQSN+xHKduIVEREB AuTs7JyUlAT/6osXpleYP/L2TUxMxE2//fabwcZBDePj4yHtgi5ArA8fPixy KJqsRojn+PHjeBIF40pMfRgMJF7KsmbNGhIvkZB4CWCWc5YvX85dnwGFmjlz Zk5ODrcVxQvo06ePbvm0adOg0NHRMSEhQbe1nTt32lS8QDfd3d0h0QsLC8MS ffGCE/Vy5cpB4fTp03m7T5gwAc1bvXq1fuOff/455GtYwdXVdffu3eKHopia hEjg6MAhaNasmcj6hQsXJvFSlnnz5pF4iYTESwCznPPdd99x1wMhdPv4+MTG xnJbOfG6evWq7l4oGYGBgfoNNm3a1HbiNWDAAGj822+/5Ur0xevtu+uK8HWm TJkCbT579gzytS+++IL7pitWrNBvvGvXrlwFBweHgICAly9fihyK4oYtIYrv v/8eDkHHjh3FVM7OzsZDlkvipRwTJ04k8RIJiZcAEpwTFxe3b9++Fi1aYNKR lJSE5SheRYsWffLkiW79kiVLQvnJkyf1m/r6669tJF5BQUHQcvv27XV/zDIo Xm//ffcWh7e3d40aNeDDjh07DHYBLScmJkJrLi4uUO2zzz4TORRFjNn3kb/+ +uvnn3/u3bt3tWrVIMGHjBgkyWBKC2dH+seLx+nTp7n60KDJ+rNnz9bvCEYa iKOnp2epUqVKlChRv359OEtJT083aD+O/3HjxuG/ME0gStetW9fOzq548eJu bm76i4LMAoyB9hs2bMj9u2zZMkg5S5cuDZOucuXKBgfqpUuXBg0aVKVKFajj 7Ozcq1evQ4cOGesiKysLTlBbtmwJbRYpUqRixYrdu3f/6aef4IxOwCoxLtqw YYPJQwBIckx+hsRLAMnOgbiNv2QtXrwYS3Dyuru761YDacNhGR0drd/InDlz bCFeMTExEP3APN5P9sbECzhx4sTAgQPr1avn6Ojo5eUVGhqal5eHsnvu3Dnh AXb58mX8jsYeysEbisJ13kMgaYVRhNdvNdoVnnhTAwLBkFc/MjLS5R0QZqEO HG6Xf3Px4kWufrdu3RprwdsiUAIa/5vg4GBeLyCREPOxPnyoWbMmXih2cnLS X3H69p14DRs2DD5v27aN+0kXAQkTk5sLkKsVr+rVq6MH4AMv8p89e1a3/qtX r8aOHYubQFY8PDw4Dw8fPlx/hRLM0EqVKsHWAgUKgNyDDOHvgxrtNf89e/bo myTeRfv37+dcjYcM6jTWwxL/5EtIvAQQdg4E/81adH/D4ujTpw8MwqFDh+K/ OHkh/vOq4Vg9deqUfgsjR460hXjBuaXlp3ncKvr79++/1S7tgCzA2JOgYCZC TXCUmKFoasC+d8CJPcrQ1KlT4QQA42p8fHz//v3xEFy4cMHYvmZdNrx16xY2 mGvqsmFsbGzZsmWh5qeffnr37l0shMRk/PjxUAhpDnzm7YLjv2/fvlu2bIEP 5cuXh3MzSHwSEhIgkq9fv16MhQLkasULBAjOzRwcHCAzAg06efLko0ePoqKi Vq1a9fz5c936Y8aM0WjX9MLZGuomnI/BAMY8dNGiRbz28TZGSLvgu3OFMFy/ /vprOIsLDw+33EVIv379NHTZUBwkXgIIO4fLm3g/YyGffPIJbJo8eTL+a0y8 mjVrBuULFy7Ub6F58+a2EK/Dhw8XNgR+l4IFC+K/WBnCy5kzZ9LS0niNQDSA ylWrVsXV1/h4DRAp/e4g2GKOdvz4cTFD0bzh+37w559/ZmRk6Jd/+OGHXDpj EBuJFzSIzepnKJCha7R3PvLKcfzXqlULBkPr1q0Nfh1LyNWKF4xbmGIVK1YU TvPPnTun0f6SC+rG23Tnzh0oB1H766+/uEIY5Jg0GbyoCOeu+oUSXISQeImH xEsAk86pU6eO5t9L4hE42cNrO1u3bsUSY+L1zTffaLTP4khMTNQt37NnD0YS 2R7Ma/Cyobe3NxT6+fnpFj59+hQvMc2bNw9LQMdR/n7//Xdes7/99ht+Ee52 ZuGhaK7Z7zN4CgGDylgFW4hXRESERvvsysePH+tvhTQQtrZo0YJXzi1Ycnd3 NxjtLSRXK14a7RXI69evC1fGZwuMGjXK4NbOnTvDVt7NHXgdEvKs169fmzRG mosQEi/xkHgJYNI5wcHBeAoXEBBw9+5dKElNTd29ezfGdsiqsrKysKYx8YL6 eIcyTGqYL5DjJCQkQLMlSpRQg3gdO3ZMo73Ov2DBAtCsf/75B3IxzBbr1q37 999/czWHDBmCKrxp06bs7GwogbNr+CJwEov6LnIommv2ewWkACAxcEYE5zxD hw7FQ1ahQgVj9W0hXvjgl7Zt2xrcCgMetsKZG68cxz8MpPPnz4sxxlxy34kX DFThmtzPtbqrVnTBK3tLly7VLTxx4gT+Tufm5rZo0SLhgSrNRQiJl3hIvAQQ 4xx8yh9StGhR7jMkZbdv3+aqGROvXO1jOjipAh3kFpljaFJWvADMDRHuWfEe Hh6PHj3SrQan07jGEuFueQN69+4NqidyKJpr9nvC1atXQa3Kly+PLi1VqlT9 +vUbNWqk0f5+ZGwvW4gX/lpkEryezIHjX8BUC8l9J17wLYRrcj/XCqN7FwkS HR3dt29fbnrWqlULZO7y5cv6XUhzEULiJR4SLwFEOmfXrl09e/asXLkyRGxX V9dOnTqtWLGCtyReQLwAmHF+fn7NmzfHszuYIBCpMOtRXLzeat/S1blz50qV KsHpYtOmTeHEkvfzN/Ly5cvVq1e3bt3aycnJzs4OvixMdvgWZg1Fc81+H5gy ZQoMCThzGDBgAKRd3ANPTCqCLcRr9OjRUMfFxWWAcQYNGsTbSz3ilZaWhjW7 dOki8BX27dtncPfExMTg4OBevXph+gZ8/PHHUVFRunWkuQgh8RIPiZcA8jsn Ozs7IiIiPj7ekkYYVQFGzbY1mzZt0mjXp925c4e3ybriFRsbi9HY2EI4JDAw EOp4enqKaVO8qRaSK1q83rx5g5cFjhw5YkmPf//99+bNm/FuR0dHR91FTdJc hHz++eewL+R0ltj2nkDiJQCjzmFUBRg129b06NEDohnIkP4m64rXX3/9hfE/ OjpaoNqff/6p0a5KffjwoZhmRZpqIbmixeut9gkwUPOLL76wvF/QLAcHB2jt p59+4gqluQiZPHmyRtwrhAhG47M8MOocRlWAUbNtTevWrTWG1iE8ffoU7yW0 lni9ffdeG4OP/NKlVatWUK1Dhw5ifspEVCVekHOhuBw9elRM4y9fvvzxxx+N fVlciMi7j1uCixB8HGWFChVevHhh1o7vIYzGZ3lg1DmMqgCjZtsaf39/vDDF rY7Lycn5+eefq1Spgut8rChe+CiwcuXK7dmzB29Qev369bVr13j3Q4FA4LvC a9eufeDAgVevXmF5YmLid999V6dOHVxuqouqxAvA9w0VKlRozJgx3IJ2EKnj x49/8sknvJuwZs6cqdGuMwwJCUlJSeHKIe0aNWqURrs+n/fmBQkuQuLj43FZ lLe3N/cugIyMjC1btujeeka8JfEShFHnMKoCjJptayDK4e2EGu0TIVxcXPCG WTirx1+prCheEJm5ByuBMjo5OeEL5j744ANezT///NPV1RVrQuiGz/gcFaBS pUr6T4hSm3iBTumuCXR2doavwC2R/eqrr3QrJyUl+fr6otsLFChQsWLFevXq Va1aFe9tLF68+M6dO/W7MNdFHLjSHvuCXbiVISCC5rolf8NofJYHRp3DqAow arYMgH7NmjWrRo0a+DzYvn37cosNQM6sKF4AnO2PHz++Vq1aEMmh8QYNGgwZ MsRgcH727NkPP/zQtm1bMADCOIRZyFkgNzG4ElVt4oWEh4d/+eWXkFKBuIBG wEkCKFpERITByvfu3ZszZ85HH31UoUIFOBD29vaNGjWaNGmSwA9bZrlIF8h8 27dvX7Zs2aJFi4LqtWvXDpJBCb+g5W8Yjc/ywKhzGFUBRs0mCEIRGI3P8sCo cxhVAUbNJghCERiNz/LAqHMYVQFGzSYIQhEYjc/ywKhzGFUBRs0mCEIRGI3P 8sCocxhVAUbNJghCERiNz/LAqHMYVQFGzSYIQhEYjc/ywKhzGFUBRs0mCEIR GI3P8sCocxhVAUbNJghCEf5LEGpC6QlBEAQbKB2rCOJfKD0hCIIgCIIgCIIg CIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIg CIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIg CIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIg CIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIg CIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIg1M7ChQs1Gk3Hjh1l6zE1NXXy5Ml1 69YtUaJEyZIl3d3dfX19Dx8+LJsBBEEQBOvILF4JCQlVqlTRaClcuLCTkxP8 hc8+Pj7yGEAQBEHkA2QWr379+kF3rq6ux48ff/XqFZTk5eWFh4dfvXpVHgMI s9ixYwccr0mTJiltCEEQxL+QU7z++uuvIkWKQHeHDh2SoTvCctasWUPiRRCE CpFTvG7fvo0XDHNzc2XojrCcefPmkXgRBKFCULw6deokQ19Xr16FvgoVKiRD X4RVmDhxIokXQRAqBMWrW7du8PnUqVOffvqpo6Nj8eLFGzZsuGDBgr///tvY jpcuXRo0aFCVKlWKFi3q7Ozcq1cvYxcDS5YsqRFk9uzZ+ntFREQMGzbM1dUV 2wfDBC42Hjx4ENoZN24c/hsXFwdRt27dunZ2dvBd3Nzc7t27x9vlzZs327dv 79q1K3xf6AI6+uKLLyA3NOUwUUBqCfaAD7l/ly1b1qxZs9KlS0NflStX3rFj h/5e4l0KZGVlfffddy1btoQ2ixQpUrFixe7du//000/Pnj0TsOr777/39PQs VapUiRIl6tevHxAQkJ6ezqu2YcMG4eOFSHIMQRCEdeDEa8SIEdwiQC5AtWjR Iicnh7fLq1evxo4dixUgBnp4eJQrVw7/HT58OIgCrz5UcNECARmrufwbCOy8 XebNm1egQAGsDJGW+9yvXz+DwRnFC8QOPm/btg0ESzfMgoS9fPlSt35aWlqb Nm1wa/ny5d3d3eGLYFa4bt06S336TryqV68OnyMjI+EDL/KfPXvWEpdGR0dX qlQJtoJnqlWrBjLE+Ra0eM+ePfomQdrLrfOEDzVr1oQvC5+dnJx4q2X279/f +B2gjFinsR6We4kgCEIyKF4QAwsWLDh69GiIinl5eXBWD6foGNz8/Px4u4wZ MwbKy5Qps3HjRhQF2AWyNoiiUL5o0SJjfYm8bLhy5Uo0adq0aSkpKW+1Kz3W rl1rb28P5f3799ffBcWrb9++W7ZsQT2aM2cOJDIJCQnQ6fr163UrQzrZvHlz qFavXr0//vgDC+GLhISEgMyBeRcuXBDhOSFQvECAYmJiHBwcIDMCDTp58uSj R4+ioqJWrVr1/Plz3frmurRdu3ZQDmlXbGwsV/jf//7366+/hjw3PDycVx+q lS1bFnaBBPbu3btYCEd5/PjxUAiZIHw2+EVwdShdNiQIQm2geIEuHD16lLdp /vz5sKlo0aKZmZlc4blz51CAIBTz6t+5cwfKIQKD1hjsS4x4JScnYxIEvfM2 hYWFYQp27Ngx3iYUr1q1akHobt26dUZGhkAX3333HVSuWLEi9MXbBBKpscYv gChekMOCPkJHN27cEKhsrktB1/C8wuBFRf1MGejYsaNGuyxHP4kbOHCgQW8j JF4EQagTgdWGEAZxZfvOnTu5ws8++wxKRo0aZbC1zp07w1Zjj8sQI16QZWAu gHeB8ejTpw9sBRt45ShegLu7u8HozfH69WvIy6CmwV+dIOsB6QQLhRsxCYoX XrG8fv3/tXduoez+cRxfLhyKxQVziBI5laXUUtLYhUMhSSmHskjhkpYiSVGk mNTiCnFDJBcu5FByMYVWalJKtCmHJCUj2u/dPvW0tmfPnmf8+7v4vK627/n5 rL7v5/P9fr7fnUkXDsGktA4JPwuPE3QwNpsNhfFTOhwO/1y4mbQ+LFqXxYth mL+JdKh8VlYWcoeGhugr3vkp+uLg4EC0PC1DTU5OiubKEa/KykqU6ejoEM2l WAK1Wu2TTuIFv+zo6EiicXB8fEzupMvlEi2g1WpRwH/lTRGCeI2NjUmXDM2k u7u7tK+XmZkJub+8vJToYnx8HCX1er1o7vPzM7neorksXgzD/E2kxctgMKi8 ovgeHx9VMhDEzgc54kXagVGJ5h4eHlIXPifFSLzgUgV93rW1NTmPsL+/H7Qp CQTxOj8/ly4ZskkvLi7q6+uFUJaMjAzIHKTZvwvaUAsKZNS/LosXwzB/E2nx osAAk8lEXx8eHmiiq6ioaAzM5uamaGtyxCs/P19CvGh7CLy+vnqnyxev1dVV lWcNTWL8wDsQIgTki9cPTep0Oi0WS01NjXAeoaSkxG63e5fp7u5WeSI8Jdpv aWkRbZ/Fi2GYv4m0eGHGQ67ZbKav39/fERERSNne3g6hLznihTkcZTo7O0Vz FxcXVWJrXPLFi7Z44LAEiir5FeSL1w9NKvD+/r68vJyenq7yRMtDE4Ws0dFR JOp0uhCabWpqQl34dD8ZG8MwzK8jIV5nZ2c0A3sHy9GelNFoDKEvOeJFM61G oxE9z0WOABwNn3T54vX5+alWq1EYOqho8IqQL17un5nUB2gWPd38/LyQaLVa kRIWFnZ9fa20wb6+PtSFa/bzsTEMw/wiJF65ubk+C3FfX18UX11YWOidDgeB ZkL/0PqgyBEvh8MRGRmpErt2Y29vD/0iC1LlkyVfvIDJZELhpKSkm5sbJcNX gCLxUmpS6O/MzMzHx4doLgUiWiwW78SioiIkGgyGQLUCMTs7S+8SgeJbGIZh /hdIvGjHf2lpiULE7XZ7VVUVzag+d0GAtrY20qCenh4h+hoz6s7OTnl5eaAT Q27Zh5QnJiZoZa+/v184pDw3NxcTE6PyHLP1r6JIvKAstLMWGxs7PT0tqDY+ LCws5OXlBQ1ZlNOFfPFyKzTpwMCAyhNnCJuQfQi4XV1dXSpPfL6PLmMYZL3s 7OytrS3hGILT6RwZGcnJyXl5eREd2O3tLR2XaGhouL+/p8Snp6eVlZX/dN2V YRhGGhIvo9EI54skgxwfVeC7kjCpegewJSQkpKWl0caNKnCUu1vJxbyDg4Pe 10ORwwVqa2tFb6RXJF5uz1Fo4XoojCclJSU5OZlO/uLxf35DlFLxUmTSu7u7 5uZmGi2slJiYCMFNTU2le72ioqK8z+UJWK1WtEkN4hnxOT4+nr7CCZX4PzWK tKe+UEWIDIEIKjULwzDMb0HiBZ/L5XJNTU0VFBRgZtNoNI2NjTabTaLiyclJ e3s73v9RHhMa3t4x/UpXUXSr/OnpaWtrK+bk8PBwzJnV1dWBIu7cysXL7Tlg tbGxUVdXB9mCcwEvTKfTDQ8PQxrkNxIIpeJFKDLp1dUVRltcXIwfC+OPjo7W arW9vb0SG1tvb29ms1mv18NQ9DfWcOvgvvncVeXP+vp6WVlZXFwc3WBcWloK ZzCEHTSGYRiGYRiGYRiGYRiGYRiGYRiGYRiG+cv8A6AQ1es= "], {{0, 360}, {575, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{287.5, Automatic}, ImageSizeRaw->{575, 360}, PlotRange->{{0, 575}, {0, 360}}]], "Output", TaggingRules->{}, CellChangeTimes->{3.769890643851727*^9, 3.769890687877459*^9, 3.76989085466831*^9, 3.769891365323347*^9, 3.769938383974041*^9, 3.769940639561489*^9, 3.7699411445824823`*^9, 3.769946948469366*^9}, CellLabel->"Out[2]=", CellID->2104445857] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Properties and Relations", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->754506620], Cell[TextData[{ "One can see that the internal representation of the data can change after \ ", Cell[BoxData[ StyleBox["ResetDataset", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], ", here being transformed from a struct in which the values are associations \ to an ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Association", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Association", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " in which the values are structs:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.769890367149934*^9, 3.7698903819575768`*^9}, { 3.769890479217845*^9, 3.769890504703066*^9}, {3.769965827430297*^9, 3.769965852653953*^9}, 3.8551646120418577`*^9}, CellID->1730168417], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"ds", "=", RowBox[{"Dataset", "[", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "9"}], ",", RowBox[{"\"\\"", "\[Rule]", "4"}]}], "\[RightAssociation]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "3"}], ",", RowBox[{"\"\\"", "\[Rule]", "4"}]}], "\[RightAssociation]"}]}]}], "\[RightAssociation]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "8"}], ",", RowBox[{"\"\\"", "\[Rule]", "5"}]}], "\[RightAssociation]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "8"}], ",", RowBox[{"\"\\"", "\[Rule]", "5"}]}], "\[RightAssociation]"}]}]}], "\[RightAssociation]"}]}]}], "\[RightAssociation]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Column", "[", RowBox[{"{", RowBox[{ RowBox[{"Framed", "@", RowBox[{"TreeForm", "[", RowBox[{ RowBox[{"Dataset`GetType", "[", RowBox[{"ds", "[", "\"\\"", "]"}], "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "500"}]}], "]"}]}], ",", RowBox[{"Framed", "@", RowBox[{"TreeForm", "[", RowBox[{ RowBox[{"Dataset`GetType", "[", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{ LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True->GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{ LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/ResetDataset"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "ResetDataset"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["ResetDataset"], BoxID -> "ResetDataset", Selectable->False], "[", RowBox[{"ds", "[", "\"\\"", "]"}], "]"}], "]"}], ",", RowBox[{"ImageSize", "\[Rule]", "500"}]}], "]"}]}]}], "}"}], "]"}]}], "\[IndentingNewLine]", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.769890389335619*^9, 3.769890464552032*^9}}, CellLabel->"In[1]:=", CellID->51154405], Cell[BoxData[ TagBox[GridBox[{ { FrameBox[ GraphicsBox[ TagBox[GraphicsComplexBox[CompressedData[" 1:eJxTTMoPSmViYGAQBWIQLb04z84j9of9I28uv1klfA4Q/g17CM3hwAAFIb8u 6X1zZYLKv7CH8XecW2A2P5DVAaYeZh66ehmoOCr/hT3MPlR7PsH5MPNQ9f+A 64fZI4PmD1T7ORxQ9cP4L+xh7ofZV19u4/YxgxvOh5mHbj6q/UJweQBFEHn5 "], { {RGBColor[0.55, 0.45, 0.45], LineBox[{{1, 2}, {1, 5}, {2, 3}, {2, 4}, {5, 6}, {5, 14}, {6, 7}, { 6, 11}, {6, 13}, {7, 8}, {8, 9}, {8, 10}, {11, 12}, {14, 15}, {14, 19}, {14, 21}, {15, 16}, {16, 17}, {16, 18}, {19, 20}}]}, { TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Struct", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 1], TagBox[ RowBox[{"Struct", "[", RowBox[{ RowBox[{"{", RowBox[{"\"a\"", ",", "\"b\""}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Assoc", "[", RowBox[{ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}], ",", "2"}], "]"}], ",", RowBox[{"Assoc", "[", RowBox[{ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}], ",", "2"}], "]"}]}], "}"}]}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Struct[{"a", "b"}, { TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]], TypeSystem`Atom[Integer], 2], TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]], TypeSystem`Atom[Integer], 2]}]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["List", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 2], TagBox[ RowBox[{"{", RowBox[{"\"a\"", ",", "\"b\""}], "}"}], HoldForm]], Annotation[#, HoldForm[{"a", "b"}], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"a\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 3], TagBox["\"a\"", HoldForm]], Annotation[#, HoldForm["a"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"b\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 4], TagBox["\"b\"", HoldForm]], Annotation[#, HoldForm["b"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["List", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 5], TagBox[ RowBox[{"{", RowBox[{ RowBox[{"Assoc", "[", RowBox[{ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}], ",", "2"}], "]"}], ",", RowBox[{"Assoc", "[", RowBox[{ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}], ",", "2"}], "]"}]}], "}"}], HoldForm]], Annotation[#, HoldForm[{ TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]], TypeSystem`Atom[Integer], 2], TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]], TypeSystem`Atom[Integer], 2]}], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Assoc", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 6], TagBox[ RowBox[{"Assoc", "[", RowBox[{ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}], ",", "2"}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]], TypeSystem`Atom[Integer], 2]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Atom", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 7], TagBox[ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Enumeration", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 8], TagBox[ RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Enumeration["c", "d"]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"c\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 9], TagBox["\"c\"", HoldForm]], Annotation[#, HoldForm["c"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"d\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 10], TagBox["\"d\"", HoldForm]], Annotation[#, HoldForm["d"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Atom", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 11], TagBox[ RowBox[{"Atom", "[", "Integer", "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Atom[Integer]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["Integer", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 12], TagBox["Integer", HoldForm]], Annotation[#, HoldForm[Integer], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["2", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 13], TagBox["2", HoldForm]], Annotation[#, HoldForm[2], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Assoc", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 14], TagBox[ RowBox[{"Assoc", "[", RowBox[{ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}], ",", "2"}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]], TypeSystem`Atom[Integer], 2]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Atom", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 15], TagBox[ RowBox[{"Atom", "[", RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Atom[ TypeSystem`Enumeration["c", "d"]]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Enumeration", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 16], TagBox[ RowBox[{"Enumeration", "[", RowBox[{"\"c\"", ",", "\"d\""}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Enumeration["c", "d"]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"c\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 17], TagBox["\"c\"", HoldForm]], Annotation[#, HoldForm["c"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"d\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 18], TagBox["\"d\"", HoldForm]], Annotation[#, HoldForm["d"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Atom", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 19], TagBox[ RowBox[{"Atom", "[", "Integer", "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Atom[Integer]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["Integer", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 20], TagBox["Integer", HoldForm]], Annotation[#, HoldForm[Integer], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["2", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.022222222222222223`], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 21], TagBox["2", HoldForm]], Annotation[#, HoldForm[2], "Tooltip"]& ]}}], Annotation[#, VertexCoordinateRules -> CompressedData[" 1:eJxTTMoPSmViYGAQBWIQLb04z84j9of9I28uv1klfA4Q/g17CM3hwAAFIb8u 6X1zZYLKv7CH8XecW2A2P5DVAaYeZh66ehmoOCr/hT3MPlR7PsH5MPNQ9f+A 64fZI4PmD1T7ORxQ9cP4L+xh7ofZV19u4/YxgxvOh5mHbj6q/UJweQBFEHn5 "]]& ], AspectRatio->NCache[3^Rational[-1, 2], 0.5773502691896258], FormatType:>StandardForm, FrameTicks->Automatic, ImageSize->500, PlotRange->All, PlotRangePadding->Scaled[0.1]], StripOnInput->False]}, { FrameBox[ GraphicsBox[ TagBox[ GraphicsComplexBox[{{1.1692256444309357`, 3.117935051815828}, {0., 2.3384512888618714`}, {0., 1.558967525907914}, {1.558967525907914, 2.3384512888618714`}, {0.779483762953957, 1.558967525907914}, { 0.3897418814769785, 0.7794837629539568}, {1.1692256444309357`, 0.7794837629539568}, {2.3384512888618714`, 1.558967525907914}, { 1.9487094073848927`, 0.7794837629539568}, {1.9487094073848927`, 0.}, {2.72819317033885, 0.7794837629539568}, {2.72819317033885, 0.}, {2.3384512888618714`, 2.3384512888618714`}}, { {RGBColor[0.55, 0.45, 0.45], LineBox[{{1, 2}, {1, 4}, {1, 13}, {2, 3}, {4, 5}, {4, 8}, {5, 6}, { 5, 7}, {8, 9}, {8, 11}, {9, 10}, {11, 12}}]}, { TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Assoc", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 1], TagBox[ RowBox[{"Assoc", "[", RowBox[{ RowBox[{"Atom", "[", "String", "]"}], ",", RowBox[{"Struct", "[", RowBox[{ RowBox[{"{", RowBox[{"\"c\"", ",", "\"d\""}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Atom", "[", "Integer", "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}]}], "}"}]}], "]"}], ",", "2"}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Assoc[ TypeSystem`Atom[String], TypeSystem`Struct[{"c", "d"}, { TypeSystem`Atom[Integer], TypeSystem`Atom[Integer]}], 2]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Atom", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 2], TagBox[ RowBox[{"Atom", "[", "String", "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Atom[String]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["String", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 3], TagBox["String", HoldForm]], Annotation[#, HoldForm[String], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Struct", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 4], TagBox[ RowBox[{"Struct", "[", RowBox[{ RowBox[{"{", RowBox[{"\"c\"", ",", "\"d\""}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Atom", "[", "Integer", "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}]}], "}"}]}], "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Struct[{"c", "d"}, { TypeSystem`Atom[Integer], TypeSystem`Atom[Integer]}]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["List", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 5], TagBox[ RowBox[{"{", RowBox[{"\"c\"", ",", "\"d\""}], "}"}], HoldForm]], Annotation[#, HoldForm[{"c", "d"}], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"c\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 6], TagBox["\"c\"", HoldForm]], Annotation[#, HoldForm["c"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["\<\"d\"\>", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 7], TagBox["\"d\"", HoldForm]], Annotation[#, HoldForm["d"], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["List", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 8], TagBox[ RowBox[{"{", RowBox[{ RowBox[{"Atom", "[", "Integer", "]"}], ",", RowBox[{"Atom", "[", "Integer", "]"}]}], "}"}], HoldForm]], Annotation[#, HoldForm[{ TypeSystem`Atom[Integer], TypeSystem`Atom[Integer]}], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Atom", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 9], TagBox[ RowBox[{"Atom", "[", "Integer", "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Atom[Integer]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["Integer", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 10], TagBox["Integer", HoldForm]], Annotation[#, HoldForm[Integer], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox["Atom", "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 11], TagBox[ RowBox[{"Atom", "[", "Integer", "]"}], HoldForm]], Annotation[#, HoldForm[ TypeSystem`Atom[Integer]], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["Integer", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 12], TagBox["Integer", HoldForm]], Annotation[#, HoldForm[Integer], "Tooltip"]& ], TagBox[ TooltipBox[InsetBox[ FrameBox[ StyleBox[ TagBox["2", HoldForm], "StandardForm", "Output", StripOnInput->False, FontSize->Scaled[0.05], FontColor->GrayLevel[0], $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0]], Background->RGBColor[1., 1., 0.871], FrameStyle->GrayLevel[0.5], StripOnInput->False], 13], TagBox["2", HoldForm]], Annotation[#, HoldForm[2], "Tooltip"]& ]}}], Annotation[#, VertexCoordinateRules -> {{1.1692256444309357`, 3.117935051815828}, { 0., 2.3384512888618714`}, {0., 1.558967525907914}, { 1.558967525907914, 2.3384512888618714`}, {0.779483762953957, 1.558967525907914}, {0.3897418814769785, 0.7794837629539568}, { 1.1692256444309357`, 0.7794837629539568}, {2.3384512888618714`, 1.558967525907914}, {1.9487094073848927`, 0.7794837629539568}, { 1.9487094073848927`, 0.}, {2.72819317033885, 0.7794837629539568}, { 2.72819317033885, 0.}, {2.3384512888618714`, 2.3384512888618714`}}]& ], AspectRatio->NCache[Rational[5, 7]^Rational[1, 2], 0.8451542547285166], FormatType:>StandardForm, FrameTicks->Automatic, ImageSize->500, PlotRange->All, PlotRangePadding->Scaled[0.1]], StripOnInput->False]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]], "Output", TaggingRules->{}, CellChangeTimes->{{3.769890425560203*^9, 3.769890465366312*^9}, 3.76994063983856*^9, 3.769941144861828*^9, 3.769946948701419*^9}, CellLabel->"Out[1]=", CellID->1744733607] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Possible Issues", "\[NonBreakingSpace]", Cell["(3)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->92483860], Cell[TextData[{ "Often ", Cell[BoxData[ StyleBox["ResetDataset", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " does nothing, though it would not seem to do any harm:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.769889843664152*^9, 3.7698898531314487`*^9}, { 3.769890223648238*^9, 3.76989023156453*^9}, 3.855164636184896*^9}, CellID->688836941], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"d", "=", RowBox[{"Dataset", "[", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/ResetDataset"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "ResetDataset"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["ResetDataset"], BoxID -> "ResetDataset", Selectable->False], "[", "d", "]"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7698898698310137`*^9, 3.769889917928787*^9}}, CellLabel->"In[1]:=", CellID->1473618778], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnWtIVGkcxr1sjWaZgWQl1kgXsr40MIhkVNOHTIourmLRB9NsZeki2G6y FWoY0eVLBVmBlUGELZsQahRDQTcIIioiMi1jnNICoUnNwNTZd+ewg5y5eM55 z5n3fU/PDxQ9Dv/n//yfmXNxZt5JLynP+y0mKipqbxz5lldc6aioKP7r1yTy S8Gevb+X7dlRmrvnjx1lOyqySmLJxlry9Tf5+u9nLwCKeSMIcG0ErP0pBa6N IDIqNBjR4c/pmpUKDUhfdBUakL7oKjQgfdFVaED6oqvQgPRFV6EB6YuuQgPS F12FBqQvugoNSF90FRqQvugqNCB90VVoQPqiq9CA9EVXoQHpi65CA9IXXYUG pM+DSkdHR1FRkc1mS0hISEtLW7VqVX19/fDwMD8dGlHTTK41q1y+fNlisUT5 mDBhQtT/2O32wcFBHjo0oqbJXGtTcbvdU6ZMIa43bNjw9OnToaGh/v7+hoaG xMREsnHnzp3MOzSipvlca1OpqakhfpcvXy7b4505c4ZsT0lJMbJBZumbz7U2 lfz8fOL3xIkTsu0vXryQ9oS9vb2GNcgsffO51qbidDobGxvfvXsn2042kiHE x8cbehbEKn3zudZFZXR09PPnz83NzampqWQOlZWVBvUmwckVnwlc06uQo57/ NJhcBB06dGhkZMS49rx8pG8O1/QqR48ejY6OluYQGxu7ZcuWjx8/Gteel4/0 zeFaLxVywnP79u2srCwyjTlz5nz9+tWI3iR4SF9CdNf6qng8nhkzZpBRnDx5 Ut+uxsJP+hLiutag0tfX94+PoEe6goICMofS0lLDGmSTvilda1Ah+zfpePfq 1avAv+bm5pI/7d+/37AG2aRvStfaVBYtWhT0Gsflckn/C21qajKsQWZ7fvO5 1qZy8eJF6Vy3urq6u7ubbBkYGGhtbc3IyCDbMzMzh4aG2HZoRE3zudasUlZW 5n+Ga+LEif6fyQOks7OThw6NqGky1zQqzc3NGzduTE1NtVgsVqs1Jyenrq7u x48f/HRoRE0zuWalQgNvV3yRAelLIH3RVWhA+qKr0ID0RVehAenrgsfjOXv2 7ObNm7Ozs/2vTPgJ52BQTX2RdVhYWLh+/frjx4/39PRoqHb37t2ZM2du27bN 6XR2dHSEUuEQpE/o6uq6f/9+VVUVufZsaGhQVaqzszM5OfnRo0fjqnAI0h+L 2+22Wq3knqC81J8+VKnwA9KXcenSpby8POWl1qxZc/PmTbUqnID0Zbhcrtmz ZysvtWzZsgcPHqhV4QSkL+PLly9JSUnKS5GTfKRvdE19CZ/+1KlTlZdC+hGo qS9IXwLpy9A9ff7RMsHQsHajlKDNI31KWLtRStDmsefnsKa+IH0JpC8D6XNY U1+QvgTSl4H0OaypL0hfAunL0JD+w4cP1apwAtKX4fF4VKVvs9na2trUqnAC 0pcxMjKSkJCgsA658bRp0759+6ZWhROQfiDp6env379XUkd6N4o2FR5A+oHs 27fv8OHD4xZ5/PhxRkbGy5cvtanwANIP5NOnT4sXL3Y6naFucO/evdWrV69c ufLJkyeaVXgA6QfF5XLl5+evXbv2+vXrgX9taWlZuHBhQUHB27dvaVSYg/SD Qq77du/ebbfbL1y4EOo2TU1NCxYsIPcTzSrMCdNhT0/P8+fPNbyjVmjXXt/S IpmZmfX19ePWOXXq1NatW7Wp8ECoDq9cuSKtm03u/wMDA7rU5IfwHdbW1hYX Fyup8/3798TERPJdg0oYioqKyOTVvrNAA6E6tNls/uUUzp8/r0vNcWHuWoLs z8lOT2GpuXPntre3a1AJBTnWSGNnOIfs7Gx/+iUlJbrUDA8Prr2+NWPj4uKU f0DA0qVLg76RJ7xKKMj1Y3x8PPM5EEfkIRAbG0va2LRpky41w8CJa6/voE92 5spL6fgsT39/P7mUiI6Onjx5MvM5eH1Hf9LG9u3bdawZCFeuGT7HR04gif2D Bw8uWbKE+RwI5eXlpI1z587pWDMQrlyzSp+cXBHvK1asGB4e5mEO3d3d5ME4 adIktR+UILRrJumTk0xysjF9+nRp8Trmc3C73dLSeadPn9arZiC8ufaySL+v r2/+/PkxMTH+/y2zncPVq1elQ/CRI0f0qhkIb64lIp9+YWEhcV1VVeXfwnYO N27csNvtd+7c0bFmILy5lohw+tKnUDkcjrELVrOdw6gPfWvK4NC1RCTTb2tr s1gsKSkpshVjeJiDcTV5dh3J9FtaWqIUoLwZtTBJn2fXkUy/tbX1l2BI9skZ kfSr8mbUwiR9nl3z8IpuHvaBka/Jg2u16RuxcgsPc4h8TR5cq125JScn59at W2pVwsPDHCJfkwfXHz58SEtLU16qoqKiurparUp4eJhD5Gvy4PratWvr1q1T Xur169fJycnkuyoVTuAq/YgRqsPe3t558+aRSxJV1RobG2fNmnXs2DFyHxj7 Oihx58BbTX2RdTg4ONje3l5XV5eenl5TU6OhYFdX14EDB8gZoNVqxSrNYrl2 OBx2u33Xrl3Pnj0zToVDkL7oKjQgfdFVaED6oqvQgPRFV6EB6YuuQgPSF12F BqQvugoNSF90FRqQvugqNCB90VVoQPpGq/APXBsBa39KgWsAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABA5PkX0HVcTw== "], {{0, 131}, {170, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{85., Automatic}, ImageSizeRaw->{170, 131}, PlotRange->{{0, 170}, {0, 131}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7698898867766447`*^9, 3.7698899186652727`*^9}, 3.769940639982662*^9, 3.7699411450138597`*^9, 3.769946948829011*^9}, CellLabel->"Out[1]=", CellID->1574396520] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->816244460], Cell[TextData[{ "There are limits to what ", Cell[BoxData[ StyleBox["ResetDataset", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can do. It does not, for example, sort the keys in a way that would \ produce a more attractive presentation:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.76989011672793*^9, 3.769890144734125*^9}, { 3.855164647666891*^9, 3.85516466094281*^9}}, CellID->1057098397], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"ds", "=", RowBox[{"Dataset", "[", RowBox[{"{", RowBox[{ RowBox[{"Association", "[", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "4"}], ",", RowBox[{"\"\\"", "\[Rule]", "5"}]}], "]"}], ",", RowBox[{"Association", "[", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "6"}], ",", RowBox[{"\"\\"", "\[Rule]", "2"}]}], "]"}]}], "}"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"ds", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["ResetDataset", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/ResetDataset"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "ResetDataset"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["ResetDataset"], BoxID -> "ResetDataset", Selectable->False], "[", "ds", "]"}], ",", RowBox[{"ds", "[", RowBox[{"Map", "[", "KeySort", "]"}], "]"}]}], "}"}]}], "]"}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.769890080952064*^9, 3.769890111918654*^9}, { 3.7698901477959146`*^9, 3.7698901866907387`*^9}}, CellLabel->"In[2]:=", CellID->456798644], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnQtQFef5xg+aAAG5KQaEiHiB8ZIBQ5SJt1HjYP2PmVqTJmrMVMUEMAGs WtCaBM1oEjVq2kQrOrURo4k4whg10oDx1tpk4g0jEGq9BFBRqig0xDhg/b91 p2coh7NnOef7dr/d7/nN6MC3e7599332edg9t+2dPPfZlE42m22BL/337KyF Y+fPn/Xb54Lpl+czF8xJzXzl5f/L/M0rqa/Mfyq5Mw3W0r/TXjbbf36+DwAA QDz+DsQDElsethIDU2D0QQfaARJbHrYSA1OgSP8vaRD8UOdRHiQWCsHLA/yA E4UCYes5EkoMTAGcKBQIW8+RUGJgCuBEoUDYeo6EEgNTACcKBcLWcySUGJgC OFEoELaeI6HEwBTAiUKBsPUcCSUGpgBOFAqEredIKDEwBXCiUCBsPUdCiYEp gBOFAmHrORJKDEwBnCgUCFvPkVBiYArgRKFA2HqOhBIDUwAnCgXC1nMklBiY AjhRKBC2niOhxMAUwIlCgbD1HAklBqYAThQKhK3nSCgxMAVwolAgbD1HQomB KYATtTBjxgybzbZlyxYeErQGYes5EkoMTAGc6JLNmzfbHmBSJ0Jil5hdYmAK 4ER1zp49+8gjj5jaiZBYHQtIDEwBnKgCrd+/f38vL68uXbqY14mQWIV/WUJi YArgRBWmT59OBnzjjTcGDx5sXidCYhWsITEwBdqdePTo0RkzZgwdOjQwMDAk JGTQoEHp6enl5eW8vcMW7Yf6xo0byX2jR49uaWkxtRMhsTMsIzEwBRqduGHD hs6dOyvPa/n4+HTq1En5mSx56tQpHRzECo2Hemlpqa+v76OPPnr16lX61dRO hMTtYiWJgSnQ4sSqqio/Pz86FGfOnFlZWUkjt2/fPnTo0MCBA2mQzoV08RAb tBzqjY2NMTExlDYlJSXKiKmdCIkdsaTEwEPYiuJMJvWjt7CwkI7Dxx57jA7R 1uMff/wxjSckJPC0DmO0dHXKlCm0Xzk5OfYRCzhRvS2Q2AISAw9hK4ozmdSP XjIgnec0NDS0Gc/NzaXjMy4ujptv2OOyq+vXr6edGjt27L179+yDFnCielsg seUlNhbBKxQnbO2cP3++qKiIDJiVlTVq1Chvb2+LOZGuoH18fMLCwmpra1uP y+NESMy2+c7k4DGn0Y1XQ/AKhQpbupx8/PHHbf+lW7du48aNmzRpksWcuG/f PpsGeMvBY06XnYHElpfYQASvUJyw3bRpEx1+nTt3fvHFF7dv315RUaGM7927 12JO/Pzzzx9qD8WAnTp1Un7lLQePOdXbAoktL7GxCF6hOGFLXqPj8M0332wz rryqYiUnOsPy15iQ2PISG4vgFYoTtpGRkXQc7tq1q814SkoKnMgWo5wIiS0v sbEIXqE4YTthwgTbgw/afP/998pIeXn5tGnTlCuviIgIx1exhQVObBdIbHmJ jUXwCsUJ26+++srX15cORW9v7379+oWGhtLPYWFhyltoiN69excUFOjTFg+B E9sFElteYmMRvEJxwpY4ceLE5MmTo6Ki/P39ExMTMzMzq6uraXzx4sUBAQHk zZ07d/JvCQP06arbGOhESKwPCFsBESpsLQOcaHkgsYAIXiHClgdwouWBxAIi eIUIWx7AiZYHEguI4BUibHkAJ1oeSCwggleIsOUBnGh5ILGACF4hwpYHcKLl gcQCIniFCFsewImWBxILiOAVImx5ACdaHkgsIIJXiLDlAZxoeSCxgLiscOPG jSkpKfv379etpNYgbHkAJ1oeSCwgCFtTyMQWONHyQGIBQdiaQia2wImWBxIL CMLWFDKxBU60PJBYQBC2ppCJLXCi5YHEKnz33XebN29+++23MzMzf/3rXy9Z smTbtm1VVVX6iKKygj1sr169+tFHH2VlZaWnpy9btmzLli2XL1/Wpzy2ojiT CQgFJLY8PCR2GSlffvllWlpaygNeffXV1NRU5WdK3QsXLuiQZiorKGFLyf+b 3/xGqcpe3rx5806cOKFDeWxFcSYTEApIbHl4SKyeJ9euXaNzRcquP/3pT8q5 YkNDQ3l5eU5ODg3S6a4OaaayghK2FLBUZElJSW1t7Y0bN44fP75o0SIlb//5 z3/yLo+tKO7JZCX06arbGOVEKwGJ24WCi1IrOzu7sbGx9fixY8donC7YeWqi NWyJb775pvU4/Y2gE28az8/P510eW1Hck8lKwImWBxK3C2Usncq2SVri4MGD FGVvvfUWN0H+g8awbTfzd+/ezfvPAcKWB3Ci5YHE6ly9erW0tJQydufOnStX rpwzZ444Ybt161bHRVQtLcrMzORWHcKWC3Ci5YHEzjh27NiSJUtS/su8efPW rFmzbt06ccL2s88+c1xUVVWlFFxfX8+1PLaiuC2TZYATLQ8kbpfDhw9TXqWl pW3atOlvf/ubcjdP4tSpU+KEbbtntt9++y0tWrBgAa/iELZ8gBMtDyRuF4pT iqzCwsI248oLZ4KE7dtvv+24aM+ePbRoxYoV3KpD2HIBTrQ8kLhdsrKyHF/r J/Ly8sQJW6LNW2rr6urmzZtH40VFRbzLYyuKezJZCTjR8kDidvnd735HkbVq 1apr164pI1VVVfaIoyh2fKMCc1FUVrBXkpGRcfDgQcrYmzdvnjx5cvHixTRI /9++fZt3eWxFcU8mKwEnWh5I3C7nzp179dVXKbjmzJnz+uuvz58/X3ki9MCB A0rK/fa3vz1+/DhXUVRWUMJ27dq1ymfcUlNT7R92mzt3bnl5OafCWpfHVhT3 ZLIScKLlgcTOOH/+/Pr16xcuXEhnj++8884nn3xy/fp1Gi8oKMjMzKT4/frr r7mKorKCErbffvst5eoHH3xAxdAfhUWLFuXl5V25coVTVW3KYyuK2zJZBjjR 8kBiARG8QoQtD+BEywOJBUTwChG2PIATLQ8kFhDBK0TY8gBOtDyQWEAErxBh ywM40fJAYgERvEJxwnbq1Kk2m23lypX67DhXtHS1oKDA5oTw8HAd5OAxp3pb ILHlJTYWwStE2PJAS1dXrVolmxMhseUlNhbBK0TY8kBLV1NSUmh/MzIySh0o KyvTQQ4ec6q3BRJbXmJjEbxChC0PtHT16aefpv3dsWMH7+Y7grD1HEgsIIJX iLDlgZauRkVF0f6ePHmSd/MdQdh6DiQWEMErFDBsL1y4kJycHBkZ6efnl5CQ MHv2bJEb2C4uu/rTTz916tSJ9rehoYF38x0xPGwhMW8QtgIiWtimp6eHh4cr LyIoxyrRtWvX3bt369MQJrjsakVFBe1XWFhYcXFxUlIS7TLt45gxY5YuXdrU 1KSPHDzmVG8LJLa8xMYieIWihS25j852Pvzww0uXLtXW1hYWFvbq1Usxow7f FMEKl13ds2cP7ZSXl5cSNZ07d7a/Tk37y/vC09iwhcQWlthYBK9QtLAldu3a 1Xq8qqoqJCSExrnesYItLru6du1aZWdTU1PLysqam5vr6uo+/fRT5Vm+mJiY H374gbccPOZUbwsktoDEwEPYiuJMJvWjV3Hik08+6bhoyZIltCghIYGLbTjg squnTp3atm3boUOH2oxfvHixS5cutLNr1qzhLQePOdXbAonvm19i4CFsRXEm k/rRqziRTgMcFxUVFdGigIAAPr5hjyddnTVrFu3slClT2ErQGh6iQ2LtmFpi tnOyRfAKRQvbdu9SRFdhyhUZXYjxsQ5jPOnqu+++S3s6YsQIthK0xtiwhcSm lpjtnGwRvELRwjYtLc1xUXFxsfLCLh/fsEe9q3fv3l3xgOvXrzsupQ7Qzs6Z M4e3HDzmVG8LJFYwtcRs52SL4BWKFrZDhw51XLR8+XLlTICPb9jjsqtxcXG0 R/PmzWszXltbGxoaSovy8/N5y8FjTvW2QOL75peY7ZxsEbxC0cKWaPN+y5qa mm7dutH4e++9x9M9LHHZ1cLCQmVns7Ozr1y5QiONjY179+4dMGAADU6YMEEH OXjMqd4WSGwBidnOyRbBKxQwbP39/XNzcy9fvkyXYHv27OnTpw8N0v/19fX6 +MhztHR19erV9rf0+/j42N+EOXbs2GvXrukgB4851dsCiS0gMds52SJ4haKF 7fjx45W3f3t5ednfBx4cHHz48GF9TMQEjV09ffp0cnJydHS0r69v7969J02a lJeXx1uL+0aHLSRm23kVOcSfky2CVyha2JaUlJDpnnnmme7du3t7e0dFRaWk pJw7d04fB7FCQtEhsVAgbAVEnLC1EhKKDomFAmErIAhbHkgoOiQWCoStgCBs eSCh6JBYKBC2AoKw5YGEokNioUDYCgjClgcSig6JhQJhKyDMy7t9+/aGDRum Tp06YsSIlpaW1lsx2h/6IZvo9yGxYCBsBaRNeVOmTPn5z3++atWq2tpaN2Y7 ePBgjx49Zs6cWVJS8o9//KPNVoz2h36YS3SGcxrdeP2QVmK2c7JF8ArblFdd XX306NGcnJzIyMgtW7Z0aKqLFy+GhoYeO3bM2VaM9od+mEt0hnMa3Xj9kFZi Nx44Y8YMm83W0TxxAy0VFhQU2JwQHh5uSHk1NTXR0dEUvNqnynqAylaM9od+ SOtEoxuvH9JK3NFHbd68WYkyQcKWLttFC1vio48+evbZZ7VPNWHChP3796ts xWh/6Ie0TjS68fohrcQdesjZs2cfeeQRocI2JSWFisnIyCh1oKyszKjyqqqq oqKitE81cuTIv/zlLypbMdof+iGtE41uvH5IK7H29alL/fv39/LyUm4DJEjY Pv3001TMjh07eBfjiEp5t27dCg4O1j7ViBEjELYK0jrR6Mbrh7QSa19/+vTp FGtvvPHG4MGDxQlb5YabvO9u3C7qYRsUFKR9KoStHWmdaHTj9UNaiTWuvHHj Rsq00aNHt7S0iBO2P/30k/Kllw0NDbyLcQRhywNpnWh04/VDWom1rFlaWurr 6/voo49evXqVfhUnbCsqKmwP7r5UXFyclJQUHh7etWvXMWPGLF26tKmpycDy mIctEAp3DhfnGL03oB14SOxytcbGxpiYGDqBLCkpUUbECds9e/YoX6SsvGZn /zplolevXryfW1ApD2Frbdw5XJxj9N6AduAhscvVpkyZQtmVk5NjHxEnbNeu XatEa2pqallZWXNzc11d3aeffqo8kUt/I3744QdDysPTCG7D41BnCD8nGt14 /ZBWYvV11q9fr9z35969e/ZBccL21KlT27ZtO3ToUJvxixcvKm+ZWLNmjSHl IWzdRlonGt14/ZBWYpUVKisrfXx8wsLC2nzYX5ywVWHWrFlUJJ2Wsy2pNQhb HkjrRKMbrx/SSqyywr59+5x9OKs1bKvqUIUqvPvuu1QbhRjbklqDsOWBtE40 uvH6Ia3EKit8/vnnD7WHkrGdOnVSfmVblfYK7969u+IB169fd1yalpZGRc6Z M8eQ8hC2biOtE41uvH5IK7EbDxTnaYS4uDiqZN68eW3Ga2trQ0NDaVF+fr4h 5SFs3UZaJxrdeP2QVmI3HihO2BYWFiqn2dnZ2VeuXLn/4I1qe/fuHTBgAA1O mDDBqPLcCNu//vWvKlsx2h/6Ia0TjW68fkgrsRsPFCdsidWrVysfIiN8fHzs zySPHTv22rVrRpV3+/btDoXtE088UVlZqbIVo/2hH9I60ejG64e0ErvxQKHC ljh9+nRycnJ0dLSvr2/v3r0nTZqUl5fHuzb18u7du+fv769xHlo5JCTE2Ufe 4EShQNh6jrQSs52TLYJXqF4exf6lS5e0zLN3795f/OIX6lsx2h/6YWrRPZnT 6Mbrh7QSs52TLYJXqF5ednb28uXLXU7y9ddfDxgw4OzZs+pbMdof+mFq0T2Z 0+jG64e0ErOdky2CV6he3rVr1wYNGmT/QglHjhw5Mn78+DFjxhw/ftzlVoz2 h36YWnRP5jS68fohrcRs52SL4BW6LK+qquqXv/zlxIkTCwoKHJfu27evf//+ zz///Pnz511uxWh/6IfZRXd7TqMbrx/SSsx2TrYIXqHL8m7dupWRkTFkyJDN mzc7W6ewsDA2NpZiWX0rRvtDP8wrem1tbWlpaXNzs3tzGt14/ZBWYo9L44jg FaqX19DQkJiY+Mc//tHlPL///e+nT5+uvhWj/aEfJhV927ZtDz/8sM1mo7+t Hf2uOUgsFPwkZlQgFwSvUL28ZcuWzZo1S8s8d+7cCQwMpP9VtqJ+9E6dOpWO gZUrV+pjFq5oF/3MmTMzZ87s2bOnn59ffHx8VlaWDjfscFbeE088YX+P98aN G92YU70tkNgCEjMqkAuCV6heXmxsLF1xaJyqb9++586dU9mK+tEroRNzc3OV 0wzlazqUH8iVbb6hjjnOyhsxYoTdicnJyW7Mqd4WSGwBiRkVyAXBK1Qp79// /revr++PP/6ocarhw4cfO3ZMZSvqR69sTiwqKlLct2jRIlq5ubn5yJEjMTEx NJKUlKSx5+7hrDySj/68KvcKmTx5shtzqrcFEltAYkYFckHwClXKo4udwMBA 7VN5+EU0UjmRfNevXz/a36VLl7YeLysrU26QdPHiRe2d7yjq5W3bto0KmD17 thtzqrcFEt83v8Qel8YRwStUKU/nb/2SyonK1ywHBATQym0WrV69mk6EuN57 Tr28uXPnUm10/evGnOptgcQKppbY49I4IniFAobthQsXkpOTIyMj/fz8EhIS 6O+vy8eKhkvRlaP9V7/6lfb2MkSlvKtXr3bp0oU6f+PGDTfmVG8LJNYNfhKz qI4XglcoWtimp6eHh4e3eUGha9euu3fv1sdETHAp+nPPPUf7tWzZsqqqqtde e23AgAERERFJSUk5OTmNjY3ae+4ezsqrqalRvtjzgw8+cG9O9bZAYgtIzKI6 XgheoWhhS+6jv7kffvjhpUuXamtrCwsLe/XqpZjxypUr+vjIc1yKPmzYMNqp V155hS4zbf9LVFTUN998o73tbtBueZ988olyg9F33nnH7TnV2wKJLSAx8JB2 e2tI2BK7du1qPU4nBiEhITS+YMECjuZhikpXFZR4IehSeuvWrZcvX66vr9+/ f//AgQNpsE+fPvrfv/6zzz4bMmTIl19+6cmc6m2BxBaQGHhIu701JGyffPJJ x0VLliyhRQkJCVxswwGVrir07duX9sjf37/Nd0rU1dUpsaP//ev//QAP51Rv CyS+b36JPauLL4JXKFrYpqamOi4qKiqyv7BrClyKPmrUKGevnlAHbMbdv97D OdXbAokVTC0x2znZIniFooXtW2+95biorKxMuSKjswI+1mGMS9GVnaXTOcdF K1asoEXDhg3T3vmOYmzYQmJTS8x2TrYIXqFoYZuWlua4qLi4mBaFhYXx8Q17 XIquXDW3e27z8ssvKy+saO98RzE2bCGxqSVmOydbBK9QtLAdOnSo46Lly5fT Ipqfj2/Y41L0iooKLy8vHx+f8vLy1uM1NTWBgYE2znfHMzZsIbGpJWY7J1sE r5Bh2I4cOZLJuxHavN+SDs5u3brR+HvvvcfTPSzRIvrs2bNppyIiIpSX5u/c ufPFF18oH5ynC8yWlhbtne8oxoYtJDa1xGznZIvgFaqHbXBwsPapfvazn/35 z39W2Yr60Wt3or+/f25u7uXLl69fv75nz54+ffoob5Wpr6/XxUYM0CJ6U1PT 8OHDlV2mUyDlu0GI+Pj4CxcuaG+7GxgetpDYvBKznZMtgleoUh55oWfPntqn mj9/frsvB9zviBPHjx+vHJOtD07K/MOHD+tjIiZoFL25ufn9998fMmRIQEBA 9+7dk5KS1qxZ48ZX6HcUY8MWEptaYrZzskXwClXKy8/Pf+aZZ7RP9d1334WG htL/zraifvQqTiwpKSHT0XbpyPT29o6KikpJSTl37pw+DmKFeUX3cE71tkBi 3UDYCoiz8m7cuNGvX799+/Z1aLYdO3ZERESsXLmSIrf1B2S0ONFKmFR0z+c0 uvH6Ia3EbOdki+AVtinvxx9/pHOMP/zhD717927zPZwaqa6ufv3110eOHBkd HW1/CQBOFAqEredIKzHbOdkieIVtyhs7duyQIUPS09NPnz7NfCtG+0M/zCU6 wzmNbrx+SCsx2znZIniF+pQHJwoFwtZzpJWY7ZxsEbxChC0PJBQdEgsFwlZA ELY8kFB0SCwUCFsBQdjyQELRIbFQGBu2t27dysnJGTx4cFBQUHBw8FNPPbVw 4cKGhga29XhS4ZkzZ2bOnNmzZ08/P7/4+PisrCyhyvN8K0b7Qz+kdaLRjdcP aSV2uVpFRUWPHj0cPzcXFhZmyP0pHMnNzX344YeVquw3ZqLgra2tFaE8Jlsx 2h/6Ia0TjW68fkgrsfo6LS0tyg3cY2JiCgsLb968eefOnQMHDsTFxdFgdHQ0 nfSyraqjFRYVFSkBu2jRIlq5ubn5yJEjyhdWJCUl8atNY3mstmK0P/RDWica 3Xj9kFZi9XXy8/MptXx8fKqrq1uP19XVKXf51P/+FK2haFX+FrT5EEFZWRmd hNP4xYsXDSyP4VaM9od+SOtEoxuvH9JKrL5ORkYGRdbw4cMdF6WlpdGiF154 gW1VrXFZ4b59++w3BGmzaPXq1XSue/LkSQPLY7gVo/2hH9I60ejG64e0Equv M23atODg4MWLFzsuysrKoqCbOHEi26pa47LCuXPnOrtXkQ4gbHkgrRONbrx+ SCuxe4+l6/fY2FjH63e2uKzwueeeoxqWLVtWVVX12muvDRgwICIiIikpKScn p7GxkV9hGstjuBWj/aEf0jrR6Mbrh7QSu/HAu3fvvvTSS5RyQUFBN27cYFtV a1xWOGzYMOWGRAEBAbb/JSoqSpA3SzDZChAKSGx5eEjc0UcVFxcPGjSI0szP z+/w4cNsS2qDywp79eqlRGtkZOTWrVsvX75cX1+/f//+gQMHKl9f3/q7CvUv j+FWgFBAYsvDQ2Lt65eWlo4bN04Jt8TExDNnzrCtxxGXFfbt21e5Ucj58+db j9fV1YWEhBj+ZgmGWzH6yk8/9Omq2/BzotGN1w9pJdayZlNTU3Z29kMPPUTx RfmWl5d37949tsW0i8sKR40a5ewFstTUVGd3Q2YFwpYH0jrR6Mbrh7QSu1yN Lszj4+OV5w3WrVunwz2A7LisULlXSLt371qxYoVyI05exSFs+SCtE41uvH5I K7H6OhStiYmJlFoJCQmVlZVsC3CJywopZp2dvr788svKa2fcqkPYckFaJxrd eP2QVmL1dbZv306RFRsb29TUxHbrWnBZYUVFhZeXl4+PT3l5eevxmpqawMBA qnzLli0GlsdwK0b7Qz+kdaLRjdcPaSVWX0d5UnTBggVlTqBYY1tVRyucPXs2 VRgREbFr1y7S8c6dO1988YXy3QjDhg2z38nLqPJYbcVof+iHtE40uvH6Ia3E 6usEBQXZVJk6dSrbqjpaIZ1yDx8+3PFLyeLj4y9cuMCvNo3lsdqK0f7QD2md aHTj9UNaiVVWuHnzpnrSihC29x88sfz+++8PGTIkICCge/fuSUlJa9as0eGF PIQtD6R1otGN1w9pJWY7J1sErxBhywMJRYfEQoGwFRCELQ8kFB0SCwXCVkAQ tjyQUHRILBQIWwFB2PJAQtEhsVAgbAUEYcsDCUWHxEKBsBUQhC0PJBQdEgsF wlZAELY8kFB0SCwUCFsBQdjyQGNXb926lZOTM3jw4KCgoODg4KeeemrhwoUN DQ36yMFjTqMbrx/SSsx2TrYIXiHClgdaulpRUdGjRw/Hjw2GhYWZ8fYckNgR S0rMdk62CF4hwpYHLrva0tKi3L8+JiamsLDw5s2bd+7cOXDgQFxcHA1GR0fT GRFvOXjMaXTj9UNaidnOyRbBK0TY8sBlV/Pz88lxPj4+1dXVrcfr6urCw8PN eHsOSNwGq0rMdk62CF4hwpYHLruakZFBdhs+fLjjorS0NFr0wgsvcFMDYcsA aSVmOydbBK9QtLA9evTojBkzhg4dGhgYGBISMmjQoPT09PLyct7eYYvLrk6b Ni04OHjx4sWOi7KyssiJEydO5KaGwWELiU0tMds52SJ4hUKF7YYNG+wvItD1 V6dOnZSfyZKnTp3SwUGscLurzc3NsbGxtMtLly5lroIdA8MWEptdYuAhbEVx JpP60VtVVeXn50cH4cyZMysrK2nk9u3bhw4dUm7pTudCuniIDe519e7duy+9 9BLtbFBQ0I0bN3gIocBDdEisBQtIDDyErSjOZFI/egsLC+kgfOyxxxobG1uP f/zxx7YH94/jaR3GuNHV4uJiuqC2Pbgn6eHDhzkJocBDdEjsErNLDEyBFieS Aek8p6Ghoc14bm4uHZ9xcXHcfMOeDh3qpaWl48aNU66mExMTz5w5w1WL+8aF LSQ2tcTAFGhxop3z588XFRWRAbOyskaNGuXt7W1VJzY1NWVnZz/00EO0g337 9s3Ly7t3755ucvCYU2N/IDFvELbSotGJdDn5+OOP229X1K1bNzofmDRpkiWd WF9fHx8fr1xUrlu3TodbINkxMGwhsT4gbKVFixM3bdpEh2Xnzp1ffPHF7du3 V1RUKON79+61nhPJd3Q5qTxRWVlZqZsQCkaFLSTWDYSttGhxovIxxjfffLPN uPKqisWcSFFDOxUbG0uXmbqpYMeosIXEuoGwlRYtToyMjKSDc9euXW3GU1JS rOfEUaNG0U4tWLCgzAk1NTW85eAxp3pbILGpJQamQIsTJ0yYQAfn6NGjv//+ e2WkvLx82rRpypN7ERERjq9iC4vLQz0oKMimytSpU3nLwWNO9bZAYlNLDEyB Fid+9dVXvr6+dBB6e3v369cvNDTU9uDL6NavX68cnL179y4oKNDHSh6ifqjf vHlT3YZmdCIkbo0lJQamQIsTiRMnTkyePDkqKsrf3z8xMTEzM7O6uprGFy9e HBAQQN7cuXMnfxsxQPBD3aiw/Rck1gvBywP80OhEyyD4oW5g2FoGCSUGpgBO FAqEredIKDEwBXCiUCBsPUdCiYEpgBOFAmHrORJKDEwBnCgUCFvPkVBiYArg RKFA2HqOhBIDUwAnCgXC1nMklBiYAjhRKBC2niOhxMAUwIlCgbD1HAklBqYA ThQKhK3nSCgxMAVwolAgbD1HQomBKYAThQJh6zkSSgxMAZwoFAhbz5FQYmAK 4EShQNh6joQSA1PwdyAekNjysJUYmAKjDzrQDpDY8rCVGAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA afl/ZZgNJw== "], {{0, 231}, {463, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{231.5, Automatic}, ImageSizeRaw->{463, 231}, PlotRange->{{0, 463}, {0, 231}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7698901007989187`*^9, 3.769890112718726*^9}, 3.769890188505394*^9, 3.769940640194528*^9, 3.769941145134325*^9, 3.7699469489323597`*^9}, CellLabel->"Out[2]=", CellID->1458434855] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->495102184], Cell[TextData[{ "There are methods other than ", Cell[BoxData[ StyleBox["ResetDataset", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " for transforming the presentation of a ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Dataset", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Dataset", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ", such as sorting the keys:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7698905295598*^9, 3.7698905492650642`*^9}, { 3.769891414873167*^9, 3.769891424398759*^9}, 3.769965871078209*^9, { 3.8551646773427*^9, 3.855164683022038*^9}}, CellID->1818494984], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f1", "=", RowBox[{"GroupBy", "[", RowBox[{"#class", "&"}], "]"}]}], ",", RowBox[{"f2", "=", RowBox[{"GroupBy", "[", RowBox[{"#sex", "&"}], "]"}]}], ",", RowBox[{"f3", "=", RowBox[{"Mean", "/*", "Round"}]}], ",", RowBox[{"f4", "=", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"#age", ",", "\"\\""}], "]"}], "&"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"queryResult1", "=", RowBox[{"titanic", "[", RowBox[{"f1", ",", "f2", ",", "f3", ",", "f4"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"queryResult2", "=", RowBox[{"titanic", "[", RowBox[{"f1", ",", RowBox[{"f2", "/*", "KeySort"}], ",", "f3", ",", "f4"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"queryResult1", ",", "queryResult2"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.769891385725527*^9, 3.769891392105525*^9}}, CellLabel->"In[3]:=", CellID->959898210], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsnQtcFdX2x/GVbzPL0kxSs7TyUVnmra6l15uPq35KRb2+lcS3giAipIjy 8o0oIJqCqCCKmAEKiqSI+AQh8ZGCCCiivDkKPrD+y7Nu85/msIfzGs6Mru+H j58ze/bsWbPOWvu395w9Y/sp84ZZ1TYzM7NtAP8Mm7ywz/z5kxcNbw4bFnNt Z0ybO/WHgXPtpk6bOr/XlDpQOLCWmdknUP/Z5z8JgiAIQrH8ThAvGKbOOYIg xDB1D0EQNY2pc44gCDEwT1UKRLmWSw31vSzIMwQhf5TbtyvXcqmhvpcFeYYg 5I9y+3blWi411PeyIM8QhPxRbt+uXMulhvpeFuQZgpA/yu3blWu51FDfy4I8 QxDyR7l9u3Itlxrqe1mQZwhC/ii3b1eu5VJDfS8L8gxByB/l9u3KtVxqqO9l QZ4hCPmj3L5duZZLDfW9LMgzBCF/lNu3K9dyqaG+lwV5hiDkj3L7duVaLjXU 97IgzxCE/FFu365cy6WG+l4W5BmCkD/K7duVa7nUUN/LgjxDEPJHuX27ci2X Gup7WZBnCEL+KLdvV67lUkN9LwvyDEHIH+X27cq1XGqo72VBniEI+aNf3z5q 1CgnJycpelTtIVViQX0vC/IMQcgfPfr2+Ph4MzOzwYMH691txsXFWVparl27 Vu8WVNqpUklJiYODg7m5eYMGDby8vAw5nXR88skn4M/du3cbq0Et+978vNwQ //Vrfpzv8MPoZfN+8PVYfPrYkadPn4of9ehhxQqHOfPHf1eUf89IMVhzkCoR hPzRVZUKCgp69uxpoCpt2rQJWhgwYIDeLai0UyVPT08zNW+88Yavr68hp5MO k6jSuRNx9pMtQFzgb8Gk4fgB/tYtsXv86JHIgcH+67EmqRJBEFKgpSqlp6cH Bgba2Ni0bt0a+3lFqFLfvn3hRNbW1oacSGpqXpVKCgsWTf0vKMu2de45mRmV lZUPKyrOnohztBoDhfu2+7MOhMkUp1+kSgRBSIGWqrRixQqzv6MIVcIOPzw8 3JATSU3Nq1JM+G6QlY2uToL7dQmxB6HcefakKo/Kzb650HIkKhepEkEQEqGl Kp09e9bnL/r37y+iSoWFhd7e3l988UWrVq0aN2784YcfTps27erVq7j3t99+ E6hbhw4dDOl7xetgh79//379TlEz1LwqBXqvBFn5NWq/oDw3OxMV576qTLAL JlOe9rNsJ3x/4XRCtaqUevYkVHCZa/nHH38Idh05sFctiI64GXtgb8hm77KS YvgL8PJcNHV0dHiItrGrO6RKBCF/9FjtYG9vz1Kl/Pz8zz77DOWmdu3aL730 En5++eWXL168CBWuX78OU6SuXbtCYcuWLeHzpEmTDOl7WXvnzZsnkD83Nzdu b1ZW1vTp00EQGzRo0Lp16379+u3atausrIzfAsjE2LFjDxw4kJOTY2Vl1aZN m/r167/99tuLFi0qLi6GCgEBAZ9++mmjRo1atGjRu3fv6OhogQ337t3z9PSE a8QTmZub9+nTJzAwsLS0lF+tSlWCU7i6unbv3h2U/ZVXXoETrVy5Mi8vT3vP iH3paSkXTp8ouJsnKIdCkAyYEGmuedjpuxZ2HQrbVfHgQbWq9OTxY7xDeOP3 y4JdIG1QfuZ4LG5uWL4INm9l3fByXoDNRoYGaRu7ukOqRBDyx7iq5OTkBLug A4+MjIR+Ffr5xMREmC5B4XfffcdVq4E7eL6+vtB+s2bN4EQ9evSAz8HBwbgL bIN5HEpVvXr1ONkaOnQo6AjXgqOjIxTa2dmBpuBFgQBhTVArGxsb+AA61bZt 21q1asHnunXrJiQkcIfn5uZ269YN60OFhg0bcicCjeObqqlKly5dAhnCynXq 1AF9x8+dO3dOS0vT0jPaxwDMaFSlJZcunIPZTZW6kBgXDeU+7j+CWmmjSsCu TV5QJzxoM78wK+MaFDr8MBpmXliCqrTexd7RakzUnh1gg6Q3BkmVCEL+GFeV vvnmG9i1YsUKfmF4eDj0z/379+dKavh3Jf4dvMzMTJi4QaGFhcX58+dh2gLz Jm9vb5iPQKGlpSVXE1UJZAsaSUlJUalvTsLMjhOXhQsXFhQUQDm08+abb0LJ +PHjucNRtl5//XW4/KKiIpV6grZ48WI8lm+5QJVAyj///HMogfJDhw7B9PPu 3bvQCEgSFHbp0gVbq9YzWgZAQuxBbjEe6EXM/lDBbTeYyNhPsVgya2JpcRFs aqlKV1KT8Ccqfmv7tvtDYchmb64EVWnBpOE5mRk6RK2+kCoRhPwxrioNGjQI dv3rX/+6ceOGSAsmVKUJEyZAyfDhwwU1Y2JiYFYCkxpuMoKqBPMj7kcxIC8v D2cughbc3NygsFevXlwJTnZ8fHwEJ3r//fehPCwsTGAkp0pbtmzBn9vu3LnD P/DmzZu4ABK8J37VOvW9RyP22U74HoXGbuKwHb5rSosKub0V5Q/c7WZAhd/T Uv5Xop0qPa2sXDxzAlRLv3wRSyr/Ksm4msZVQ1XavmGlblGrL6RKBCF/jKtK 0dHRdevWxdtZ3377raurK5Roju1NqErNmzeHEv6tNo4ePXrArg0bNuAmqlK/ fv0E1fDuX0hICL8wNDQUZzdcSYkawbHFxcXt27cX3K8TqNKQIUNg08PDQ9NC /LFs5MiR4letR997X1V29eKF9S72oBHLbaaCGGF50MZVUMJfgaClKgFhAX5Q LSxwE25eTDoDm2620/mzJ1Slwz/v0clavSFVIgj5Y1xVUqlvZ0G3iXfJkKZN m44bN+7atWtcHVOpUkZGBpo0cODAwRrgXTgQI6yMqgRzK0Gbbdq0gfLjx4/z C2HuI1AlBBQ5MTERJMzT03Ps2LFt27ZFA0RU6b333oPNzz//XNNCXCXyz3/+ UxvP6BEMoDjOsyeBTMRHR8Dm2fij8NnXYzFfR7RXJZgTQbUlsybi2omA9Z6a AoSqlHzqhB7W6gGpEkHIH6OrEgLThLi4OBjw9+/fv06dOrhaIDs7G/eaSpWO HTtmVh1z587FyqhKEydOFLSJqhQfH88v1FSlGzdugKI1adIEm4XJ44cffgjC 9NZbb4mrEn9dRJV8/PHH2niG9Y0/rChPPZsIf5rLtoHtG54tGg/d6gOffwkJ 5J6ZZf35uP/IOhG07zLv2fKJa2mp5fdV9pMtbCd8X1TwNy1DVQJjDAhhHSBV Igj5Y0RVKiwsjFeDC6c5Ll++/MYbb/B/EDGVKqWnp6NACNZmV4khqgSu6NSp E5S0b9/e3d39119/zc/Px13/+Mc/xFXp3Xffhc2YmJhqLWQh3vdWlP9vspN3 K1tz7+ZVy2BX1N6d8Dli93a7ScOFfxOHcT9Cwaaf5xKR6PolOABq7tnme/Lo s1V8m1Y4CyqQKhEEIcC4qoQPKGn2qPgQk5+fH26a8Helpk2bQklSUpJm5cjI SBCXrKws3DRElUBiYPPVV1/NyckRHI6rIERUCVeMVPku2cTERDjRhQsXxK+6 2r4XX6+quQIcJjL4nNFv50+xjtX+Dh6Qk5kONRfPGL/O2e7ZnbrEeEEFUiWC IAQY9w7el19+CbtgmhAREYGrpm/cuIH1YYZy6dIlrIaq1KVLF53OW2XfK15H U5VGjRoFJcOGDRNMl0BJzdQr7riVb4aoko+PT5U/M4EH8KEnEVXauHEjbL7z zjsCRYNNkDnYFRUVJX7V1fa9Z47H4mQnOjwE13s/elhxOeX8ioWzodzLeUFl ZSXrWJ1UCfBYMBPrO04b8+TxY8FeUiWCIAQYV5VgDtK4cWP8+aN27drcY6e1 atXir2cGzcLyVq1a9e7dW6ezC/pe8TqaqnT16lW0auDAgSdOnCguLoYpXlBQ ED6vNHv2bK6mIaqE/9lHnTp1duzYgSVwoq1bt+KxgLe3t8BITpVALvHx244d O4Kj8vLyysrK4uLiunfvjj8qCd5BwfKM+Pe+d5sf99vQgskjuM8wjSq8J3zn Ax9dVSl6XzDWDwvw09xLqkQQhACjr3aA1mbMmNG1a9fmzZs3adIEJkQTJkw4 f/48vw70q3PnzoWRf8OGDb/66iudzi7oe8XrVPkevICAAO6VDvXr1+fenAA6 xf9FzMDVDiNHjsRmW7ZsCRMfPOPo0aMtLCzgQ4MGDYYOHco3kj97OnPmDPf2 CZA27sVN7dq1u379upaeqfarv3Th3DYvD5e5lvaTLVxtrPxXupyMPfSUPUtC dFWl3OybWD8r45rmXlIlgiAE6KFKMkFvVVKp53RWVlY9e/YE3Xzrrbf69u3L vY+Iw0BVKioqWr169UcffdS0aVNzc3PQoNDQUChPTU0FyQZV4iaJVb4HLzs7 28HBoU+fPq+99hrIN5jq5ubGLZkQR1Z97/mTx3AKZmpDniErzxAEUSXPtyq9 mMiq7/V2WVjl+8lNgqw8QxBElSi3b1eu5VIjh763/MH9hxXl8dERIEn2UyxU pSWmtQeRg2cIghBHuX27ci2XGjn0vbv81nErKCT9zyl0Qg6eIQhCHOX27cq1 XGrk0Pce3LvTfrKF0/Rx8KHKl0iYBDl4hiAIcZTbtyvXcqmRSd9b7XK+mkcm niEIQgTl9u3KtVxqqO9lQZ4hCPmj3L5duZZLDfW9LMgzBCF/lNu3K9dyqaG+ lwV5hiDkj3L7duVaLjXU97IgzxCE/FFu365cy6WG+l4W5BmCkD/K7duVa7nU UN/LgjxDEPJHuX27ci2XGup7WZBnCEL+KLdvV67lUkN9LwvyDEHIH+X27cq1 XGqo72VBniEI+aPcvv13gtALKTKIIF4cjJtBrJwytcLog2m/F0K5SJFBBPHi YNwMYuWUqRVGH5RrudTUTOQoESk8o9w4VK7lUkOeYUGqJI5yLZcaUiUWpEp8 lGu51JBnWJAqiaNcy6WGVIkFqRIf5VouNeQZFqRK4ijXcqkhVWJBqsRHuZZL DXmGBamSOMq1XGpIlViQKvFRruVSQ55hQaokjnItlxpSJRakSnyUa7nUkGdY kCqJo1zLpYZUiQWpEh/lWi415BkWpEriKNdyqSFVYkGqxEe5lksNeYYFqZI4 yrVcakiVWJAq8VGu5VJDnmFBqiSOci2XGlIlFqRKfJRrudSQZ1iQKomjXMul hlSJBakSH+VaLjXkGRakSuIo13KpIVViQarER7mWSw15hgWpkjjKtVxqSJVY kCrxUa7lUkOeYUGqJI5yLZcaUiUWpEp8lGu51JBnWJAqiaNcy6WGVIkFqRIf 5VouNeQZFqRK4sjH8k8++cTMzGz37t2mNuR/aBk5+Xm5If7r1/w43+GH0cvm /eDrsfj0sSNPnz4VVAsP2jJ//HdV/u3wWS1NVEoFqRIf5VouNeQZFqRK4sjH ciWq0rkTcfaTLVBcFkwazgnNuiV2jx894tfcsno5qVK1bZr6O9cH5VouNeQZ FqRK4sjHcsWpUklhwaKp/wVZ2bbOPSczo7Ky8mFFxdkTcY5WY6Bw33Z/fmWP BTOhEFTsdlam4K8o/57E4WlkSJX4aGN5aWlpWFiYg4PDzJkzY2JiasYwXVm+ fLmVldWpU6eM1aB8vlOjX5qBkCqJIx/LFadKMeG7QWg2ujoJ7tclxB6EcufZ k7gSqIAzqbKSYqlCsAYhVeKjjeVRUVFWamxtbY8ePVozhukKqVKNQaokjnws V5wqBXqvBKH5NWq/oDw3OxNvzd1XlWFJ4b082ISJlU5BlXr2JBzlMtfyjz/+ EOw6cmCvWhAdcTP2wN6Qzd4gefAX4OW5aOro6PAQnc6lE6RKfLSxfPXq1dAr hoSE1IxJ+kGqVGOQKolTreXJycljx45dtWpVaWmpm5tbp06dGjRo0LJlyzFj xmRmZkKF+Pj4/v37N2/evFGjRt26dfPx8SkrKxM0smvXrmHDhnXp0gXqtGrV qkePHu7u7rm5ufw6LFUKDg7++uuvW7RoAcd+8MEH1tbWV65cMcalV0O1kfN7 WsqF0ycK7uYJyqEQJGOh5UhuDvX7xRQoWbt4vk5B9eTxY7xDeOP3y4Jdnvaz oPzM8Vjc3LB8EWzeyrrh5bwABTEyNEinc+kEqRIfbSzHXvHcuXM1Y5J+kCrV GKRK4lRr+aFDh0AsBg4cOGTIEPjwqhozNZ07dw4MDKxXr16tWrXMzc1feukl LIeRIb+F8ePHm/1Fw4YNuc+gTXfv3uWqaarSvXv3xo0bx9WHE+GHZs2a/fzz z0Z3hQBdIwdmNKrSkksXzsHsRqALJ2MPQUnAes/EuOh1znaOVmOWW0/dsmb5 2fijmvMgPrs2ecGB4UGb+YVZGdeg0OGH0Q8rKrAEVWm9iz20HLVnB9gg6W9V pEp8tFel8+fP14xJ+kGqVGOQKomjpSqBIsD8iNMCPz8/TiwGDBhw48YNKMzJ yfnmm2+gpF27dtzh4eHhUFKnTh2Qqjt37kBJfn5+UFBQ06ZNofynn37iamqq kq2tLZTA3Aqq3b59u6SkJDExEU4HhTBvunjxolE9IUSnyEmIPcgtxgO9iNkf ypebA7u2QbnthO+xgt3EYdwCvI2uTuUP7rOavZKahD9R8Vvbt90fCkM2e3Ml qEoLJg3PyczQPXh1hlSJj7jlMNO3+jsRERHc3ry8PMgFR0fHmTNn2tnZrVmz BiJccKsB+tItW7YkJSXBIG379u0LFiyAyg4ODmFhYaWlpSr1zQpXV9fZs2fb 2NisXLkyNTVVYENRUVFUVJSXlxeeaOHChZCMJ06cEJyoyq4bTgEGu7i4zJkz x9raGk508ODBgoICwz0DZGRkwKVBDwOWwFkWL14M5s2fP3/z5s3YV1y5cmXd unXz5s2DqwMbYmNjNe/DgMd8fX2dnZ2hDvgQLIyMjIROptpLw2PBY+A3OHbJ kiUhISHQiWlzaQZCqiSOlqoECO6Kw0wHCmGKBMnCFUKCQCFMnQoLC7EEvnEo GT16tKBZCBIoh3jjSgSqBKJTX83Jkyf5B0JY9uvXD2qOHTtW98vVAZ0i52jE Pr7o7PBdU1pUyO3dus4dyu2nWMRHR8AsBiQG/oVDQL+gfKfvWlazTysrF8+c AHXSL1/Eksq/SjKupnHVUJW2b1ipV/DqDKkSH3HLjx49CnIwd+5cCHjoMOEz 9IS468KFC9CLolTNmDGDk60NGzaAjnAt7Nu3DwpDQ0NBU+ADqBJ0oVgTunTI F/iAWjNt2jT4PH369KtXr3KHQ/8M/TnWhwqzZs3iTgQaxzdVs+vOysoCm7Ey NIvtAyAfsMtAzwApKSnQ2vr16+GS4YONGu4UoJvgFjgpXBrnH+iO+C3AeJW7 HP6lwbVwXVCVlwYe5h/LtQ/fVA1MaUmVxNFSlRo2bAhTFX65hYUFlEM68Atz c3NRwrhbczDWggM1RzigKVANAokrEagSjGFgc9CgQZomwSgRdrVu3Vrrq9QH PSLnvqrs6sUL613sQSOW20ytKH+A5VdSk5NOHs+7nSOon3LmJAqZyBwnLMAP KoQFbsLNi0lnYNPNdjp/9oSqdPjnPTpZqzekSnz0u4MHcwEYkkGhn59feno6 JAjMm44cOQLzESgMDAzkaqIqQbcJjeAvuZBQ27Zt43rUvXv3FhcXQzm0A5oF JfxbEChbtra2586dwxSGE4WHh+Oxt27dEhjJdd1gkru7O/bwIB9wCujnoRHQ CyiEuYmgQ9DDM6hKcGkwP+KcAzrOXRqIOE6aYOi7atUqKFm0aBF3OBiDcgl9 FE7fwMiEhAQcAxw/fpx1aQCoPJTAqACqgXBDNwWmwumgEET/5s2b4pdmIKRK 4mipSu3btxeUw/QHymEoxS8EMRKoEgdEIOQCfO8QhN26dcNqIqpkaWkJmx07 dhysAd4nhBmZptgZEb0jp+LBA+fZk0AmYGZUbWXX+dOg5smj0awKMCeCCktm TcS1EwHrPTUFCFUp+dQJPazVA1IlPvqp0tatW6HE19dXUDM1NRVnJdxkBFUJ ukq+gkAnjDMXQQsRERFQ6OHhwZXgZCc2NlZwoiVLlkD52bNnBUZyXfexY8dg EyZogvt1IGo4xYuLixO/ai1VSfPeGtrs4ODAnzNeuXIFp3ucGqLg+vv7C5qF OSCUBwcHsy4NRGemGv6kUqUW4jVr1uAkVPzSDIRUSRwtValDhw6CclQlNzc3 fqGmKsHoBeIf5jXc71Dm5uZDhw7t2bOnuCp9++23ZtUBCWIEFzAQj5yHFeWp ZxPhr8rlCts3PFs0HrrVp9rI8V/pAjUP7t3JqgDtu8x7tnziWlpq+X2V/WQL 2wnfFxX8bTEDqhIYU+3pjAKpEh/9VAknSoJekV8Z5k24iaoEvaWgGkqDoD8/ ffo0zm64klI1gmOhBCYdgsMFXTfeVYuKitK0MCQkBHZt2rRJ/Kq1VCXoBAQW wvwRynfs2MEvhBkNShh3aw5EBA7UHJqCpkC1nTt3si7t4MGDeOdQ0ySQaZxD iV+agZAqiSO1Kk2YMAFXzdnY2Bw4cID7MdHe3l5claZMmQKbP/74o4EXqDfi kVNR/gBvvuXdytbcu3nVMtgVpdaa/LzcoxH7WPMmXON94XSCSHT9EhwAdfZs 84UpFXzYtMJZUIFUyYTooUq5ubnYwULH6K0B3oUDMcLKqEowtxK0idUuX77M L8ROla9KCMwvwEjolkFloNNeuHCh5iRF0HVD6sGmu7u7poVLly6FXStWrDDQ M6hK/JtyCEx/rP6+LAQAMRKoEkdmZua5c+diYmJAyLgf0URUKTAwEDadnJw0 Lw3vE8KMTJ73YSinEENUCTSodu3asHn48GHB4bgKQkSVPDw8YHP48OGaJsEI MywsTOpn5KuNnBUOc6p8MggmMvic0W/nT8Hm/bJSXHSXlnRGGDYXU2Dis2Dy iJLCApET5WSmw+GLZ4xf52z37E5dYrygAqmSCdFDlS5dumRVHdwNKHFVEjy7 p6lKd+7cgWPnzJmDzU6fPt3Z2RmECYaF4qrEXzxQJcuWLTPQM6hKjo6OgnIt VQkmSvv37+dWjFipb/rBFA9/DhNRpbVr11brfy3XGeoHqZI4kqrSb7/9VuWt Noirjz76SFyVkpKS6tatW69evYSEBP6xMIbp06cP1IQI1P1ydaDayDlzPBZX 3EWHh5QWF0HJo4cVl1POr1g4G8q9nBdUVlZizf07tqjf7TD69LEjDyvKoURV WpJw5KDT9HFQDjOpagMMX6MHf47Txjx5/Fiwl1TJhOg9VwKB0GZAbogqwRQJ FyfAfCQyMhLUENdFqNSjPnFVwrmS5jpz7ZFalfC3ublz50KngSvnsXzv3r3i qhQQEACb4eHhel+agZAqiSOpKsFgBp9LmjdvHsYSpGFsbOxnn32G1SwsLLhj NZ9XmjFjBpQ0btx406ZN+EhUWlraiBEj8Jag4N6F0dEmcvZu8+OePIIpD/cZ plGF9/7/nQ8gT/h6IvzjnmyCidK+QH/xB2mR6H3BeEhYgJ/mXlIlE6KHKgG4 TiwjI0Oz8oULF0BcuIGcIaoE/bCVesU1//ENBFcUiKjS+vXrYbPKd8nC9cKJ MCVFkFSV4IpwvQcMfQWH4yoIEVXC1xJqLjUBbt26BZcmq2chKac0MfB3JZhQ Y0mTJk3efffdRo0amanf6gChiOvounfvnp6erqpKlWBI2atXL25tA/deCGjk 4MGDxrl+NlpGzqUL57Z5ebjMtQStcbWx8l/pcjL20NO/Zkl8Lp4/vXWdu/Ps SfZTLFY5ztvptzbz2hUtAyw3+yaqUlbGNc29pEomRD9VgoEWdoyC6RLMTazU K+64O0iGqBKMAK2q+pkpOzsbH3oSUSU8FvJUoGiwiU8VgXqKX7WkqnTz5s0q b7XB9HDZsmXiqgSDAZiowqBXcw0evrEwLCxM/NIMhFRJHKlVSaVOq969e7ds 2bJFixZ9+/b18PCAyIFYGjRoEAiNubn59evXVYz34BUXF8OYbfDgwW+//TZM mrp27QqxhComNTUTOVpy/uQxnIKZ2pBnkCrx0U+VYEyOugDhDcqCj/UlJCTg 80r8HtUQVcLV1NADc4+iw4mOHz+Ox1rxVvqpqnpeCVcOODk5JScnQ8JCSVpa GhZCz1/t7UdJVQnOjvPNkJAQXCsOJTDHgR4Jq/n5+bEuDdixYweUzJkzJy4u Dh+JysrKwrV/0CyotvilGQipkjjKtVxqZKVK3i4Lq3w/uUkgVeKjnyqp1C9C 4V4pMHPmTO7NCaBT/JXSBq52wEkZMH/+fOj/8YzQ7WMPDOfdsGED30h+1w3D RW4tAU4u8POiRYtu375tuGcM/F0JJBVLQFx+/PFHVHm4CvQY+BMEFF8BrXlp +fn5+Msawi3tgEbAqmovzUBIlcRRruVSIwdVKn9w/2FFeXx0BL6wSFVaYlp7 EFIlPnqrkkp9K2n79u3u7u7Qr9rb269evZp7HxGHgaoE84hDhw7B1AamALhE 7fTp0yr1auqlS5eCKq1cuZJvpOABqLt374aFhYFhIGo2NjZgKogFt2RCHKlV SaV+vQPYj7aBkVFRUSDoeIMFhGbhwoWonqxX/B0+fNjb2xvcAv4Hb8AESvAf GUgEqZI4yrVcauSgSrv81nFrJCT9zyl0glSJj3ItlxryDAtSJXGUa7nUyEGV Du7daT/Zwmn6OPigzVK9moFUiY9yLZca8gwLUiVxlGu51MhBlf5Uvzbc1CYI IVXio1zLpYY8w4JUSRzlWi41MlElGUKqxEe5lksNeYYFqZI4yrVcakiVWJAq 8VGu5VJDnmFBqiSOci2XGlIlFqRKfJRrudSQZ1iQKomjXMulhlSJBakSH+Va LjXkGRakSuIo13KpIVViQarER7mWSw15hgWpkjjKtVxqSJVYkCrxUa7lUkOe YUGqJI5yLZcaUiUWpEp8lGu51JBnWJAqiaNcy6WGVIkFqRIf5VouNeQZFqRK 4ijXcqkhVWJBqsRHuZZLDXmGRU2qEkG8OEiRQabuLfRBuZZLDXmGhRQZxMop gnhxoAwiCEMwbgaxcsrUCqwPyrVcamomcpSIFJ6p+T6BIEyLcTOIlVOm7kf1 QbmWS03NRI4SkcIzyo1DihMW5BkWpEriKNdyqaGcYkGqxIfihAV5hgWpkjjK tVxqKKdYkCrxoThhQZ5hQaokjnItlxrKKRakSnwoTliQZ1iQKomjXMulhnKK BakSH4oTFuQZFqRK4ijXcqmhnGJBqsSH4oQFeYYFqZI4yrVcaiinWJAq8aE4 YUGeYUGqJI5yLZcayikWpEp8KE5YkGdYkCqJo1zLpYZyigWpEh+KExbkGRak SuIo13KpoZxiQarEh+KEBXmGBamSOMq1XGoop1iQKvGhOGFBnmFBqiSOci2X GsopFqRKfChOWJBnWJAqiaNcy6WGcooFqRIfihMW5BkWL6wqvfzyy2ZmZpcu XRKvJkPLZQLlFAtSJT4UJyzIMyzkpkq3bt1ycHDo1q1bs2bNQDg+++wzGxub 3NxcoyeL4lTpk08+AYN3795takP+h5aRU/7gfvS+4DVONo7TxjhNG7vexT4y NKii/IFmzcJ7eaE/bVztZO3ww2h3uxnb1rmnX74oQTBKjnxUadSoUU5OTlJ8 +9pDfS8L8gwLWanS+fPnW7VqZaamVq1aderUwc+vv/76sWPHjJsspEoGok3k 5N3OWTpn8vzx38Gf7YTv7SYOw8/OsydlZ1zn10xOjLefbIF7uWrwFxa4ScrA lASZqFJ8fDwEzODBg/X+iuPi4iwtLdeuXat3CyqtVSk/LzfEf/2aH+fDmGTZ vB98PRafPnbk6dOn4kc9elixwmEOxElR/j0jebrmMK5nwoO2cFkj+Nvhs1qa K5AK+ahSSUlJhw4dII/eeeed4ODg7Ozs/Pz8iIiILl26QKG5uTlMowzJDgGk SgZSbeRA4sCUB5LCfcGM386fenBf9eTx42tpqascraHQ1cYKplFY896d2w6W o6Bwp+9ayME//vhDVVYaFxkOQgaFZ+OPSh2fxkUOqlRQUNCzZ08DVWnTpk3Q woABA/RuQaWdKp07EceNSRZMGs51p+uW2D1+9EjkwGD/9VjzeVUl7T2zZfVy UiU9ziIevdu3b4cUqF+//pUrV/jlmZmZb7zxBuxyd3c3JDsEkCoZSLWRc+F0 AmQE5FRxYT6/HBQH5kqw69ihA1gS+0sYbK52sgY94tfcv+PZ8M/Pc4nRA1JS TKhK6enpgYGBNjY2rVu3xvsM8lelksKCRVP/C1/0tnXuOZkZlZWVDysqzp6I c7QaA4X7tvuzDoQpA9fxPpeqpJNnPBbMhEJQsdtZmYI/xTlHPqo0ffp0SIHP P/9cc5elpSXsGjZsGG4mJyePHTt21apV8DkkJOSLL75o1qzZK6+80qtXr6Cg IM3DIU+HDBnSpk2bJk2awADS399fRapkMNVGDt5S8F7moLkrLMAPdgVtXIWb MEWCzdCfNgqqJSfGQ/mSWROrbD/17EnY6zLXUqBlwJEDe2HXRldH3Iw9sDdk s3dZSTH8BXh5Lpo6Ojo8RIuw1RMTqtKKFSvM/o78VSkmfLf6y3IS3JVKiD2I N3urPCo3++ZCy5HYPz+vqqS9Z6ACzqQgwqUytwaRjypZWFiAUtjZ2Wnumjdv HmRH//79cfPQoUOYbkuXLoUPdevWNTc3h38xDd3c3LgDCwsLx48fz2Vo7dq1 8cOUKVNAyIyiSpxElpaWwqk7derUoEGDli1bjhkzBmZ5KvXtfbC8efPmjRo1 6tatm4+PT1lZmaCRXbt2geZ26dIF6rRq1apHjx4wMRSs8WCpUnBw8Ndff92i RQs49oMPPrC2thZMNiWi2sjZ4bvGadrYqL07NXdFhARCBm1Zsxw3oQ5srnK0 FmQf6tp6F/sq23/y+DGOJG/8flmwy9N+FpSfOR6LmxuWL4LNW1k3vJwXYCcW GRqkZejqgQlV6ezZsz5/AVEnokqQGt7e3jCig3hr3Ljxhx9+OG3atKtXr+Le 3377TaBuHTp0kChOAr1Xwjfya9R+QXludiZ+WfdVZYJdMGWAr9h2wvc4HxdX JeWOXrT3TOG9PNiEdNDJAOV6xohn0S+qi4uLO3bsCHnh6OiIJahKb775Zr16 9UCY8vPzoTAnJwcmRFAOnXNJSQnWdHV1xYUT0FdDohUVFYFG9O7dm8s1w1UJ jRk4cCCe/VU12Hjnzp1hmgZGggGgmy+99BKWr169mt8CXzcbNmzIfQZtunv3 LldNU5Xu3bs3btw4rj6cCD+A4P7888+6+Fgf9I6cp5WVeLcBhoJYAqG+3Hoq lAR6r4AxMMgNdDKwF7qdBZNHXEtLZTW1a5MXHBUetJlfmJVxDQodfhgNfReW oCqBusHQOmrPjksXzkk6tJbD70qAvb09S5UgZT777DNuqMZFJgwLL168CBWu X78OU6SuXbtCIQyx4POkSZMkipPf01IunD5RcDdPUA6F8K3BhEjzl32cXB8K 21Xx4EG1qqTc0Yv2nvn9YgqUrF08XycDlOsZI55Fj5CGEd3o0aOxp83KysJC FAJg7ty5/MogTND/Q3lSUhJsZmdn44TI2dmZXw00Czp846oSKAIkL6cFfn5+ nFhARt+4cQPN++abb6CkXbt23OHh4eFQUqdOHZCqO3fuqNQ9RlBQUNOmTaH8 p59+4mpqqpKtrS2UwFgXqt2+fRuuKzExEU6H0ozdi3ToFzmVT57s8lsHUe04 bQx/DFxSVLDR1UnwKy1I1Y1rV0Rau5KahLcy+IO9fdv9oRCGdlwJ5tSCScNz MjN0NVgP5K9KTk5OsKtNmzaRkZEw6oPJO0QOTJeg8LvvvuOq1dhqBz7P1rqU lsDIAcbwVfZ+iXHRUO7j/iP0ydqo0p/Py+hFxDMnYw9BScB6T3DOOmc7sB9y Z8ua5Wfjj2rOg/g8H54x5Cy6xvOBAwfef/997GOh8+fKOVXSbBMXlkOKwec9 e/bA59deew3mFIJqe/fuNa4qASEhIfxyFD6YIvHPjot1QTpBbbHExsYGSkB5 Bc1aWVlB+bx587gSgSqB6NRXc/LkSf6B0MP069cPao4dO1b80gxEj8iBEd1K h7nPAt5yVPqVNP6ucyfiFs8YP1+9gHzpnMl4kxz+jdi9HeZWrAZh1+KZE6Am 92RT5V8lGVf/v33Mqe0bVupkrd7IX5VwdLRixQp+IQyQunXrxt0nV5lClRJi D3JLzqBXjNkfKuhUYbhuP8ViyayJpcVFsKmlKj0HoxdxzxzYtQ1zZ77GsxUw 2OMWu2ryHHjGwLNoH8kgK5g4eCPr1KlT/L0oBDAP0jwQhn+cKuHtu3/961+a 1TIzM42rSg0bNuRuGyIWFhZQPnPmTH5hbm4unpe7NVdaWgoHav7SBJoC1WbN msWVCFRp5cqVsDlo0CBNk8LCwmBX69atxS/NQHSKnNtZmX6eSzBNvJwX5GZn 8vfir7eQaycORz169PBPtdxAvuDCcnE1wYUT3GNNF5POwKab7XR+lmFOHf55 j05BqzfyVyUIG0wNnMWzqHlVOhqxj9+17vBdU1pUyO2tKH8AIQEVfk9L+V+J dqr0HIxexD2zdZ37s/WuUyzioyPAFRD88C8cAjk1X/3ABavZ58AzBp5FmxiG 7tra2hqXLrRv397f3x/6bUEdFALYq3k4X5Vmz54Nn8ePH1/liWCWYURV0jQG bzyCMgquTqBKHCkpKTBY9fLymjFjBgxZsZqIKuG6xI4dOw7WAAUdZmSaYmdE tIwcUBmY79ip5z4gFjAnEox+oWPBm9uazyXl38nF8SHXC2kCuYPr9PAee8B6 T00BwpxKPnVCh5A1APmrUnR0NKYY/Pvtt99ClEJJUVGRoJpJ7uAB91VlVy9e WO9i/+wurs1U7k0gQRtXQQn/d3YtVenP52X0wvLMldTkpJPH827nCOqnnDmJ /hGZ4zwfntH7LNUGcE5ODv7A2qhRozVr1hQXF1dZDYWgykVBfFXCVbL9+vXT rJaVlWXcuZKmMahK/AWBqqpUCa5xyZIl3NMleNNv6NCh+AikiCpBZ2JWHXl5 eeJXZwjaRE75fdVqJ2u8ZZdw5GCV9+LSr6Th8O/RwwrNvRuWOah/1w5mnQJy x2Xes9vs19JS4XSgYjCkLCr4Wx+FOZV6NlG7aDUU+auSSv0elZEjR+LzEUjT pk3HjRt37do1ro6pVAkBxcHn2mD8D5swaIHPvh6L+b2l9qr0PI1eBJ4Rx3X+ NKh58mg0q8Lz5Bk9ziIevdA/428xH330UXJyskhNLVUJb2S1bNmyoKBAUG3f vn0yUaUJEybg3UgbG5sDBw6ALmM5dikiqjRlyhTY/PHHH8Xtl45qIwc0CFfs rF08/27uLVa121mZeEu8ypfjYQvc87ZV8ktwANTZs80XUg8+bFrhLKhAqsSi pKQkLi7Ow8Ojf//++IIvyKDs7GzcWwOq9LCiHL4X+KvyR/ntG54tjQ7d6gOf f1E/TSD+5+P+I+tEihu9aO8ZcfxXukDNg1U9oIEozjPGPYt49G7duhVvSWne 3RKgpSrdvn27RYsWsOni4sKvU1paijMRk6sSaBA+QnX48GHB4bgKQkSVoCeB zeHDh2uadPXqVVDko0ePil+agVQbOUmJxyGSPRbMxJ+KWMAIDe9+x8dECnbd yrqByx4yRVfi5WSmQ53FM8avc7Z7NqJLjBdUeA5yyoiqVFhYGK9GcC/i8uXL +BIVECMsqQFVgqEICkrerWzNvZtXLYNd+Mgb3gcW/v31sz58gE3x14Aoa/Si vWfy83KPRuxjzZtwjfeF0wkilijLM8Y9i3j0fvHFF2bqxd5nGXCP+GmpSoCn pyf+wmJrawsCBHp05swZXKImB1XinlUU3GqDfgMmjOKqlJSUVLdu3Xr16iUk JPCPLSsr69OnD9R0cHAQvzQDqTZyNro6QiRDwN+5lVXlX0lhAdY8fujAsxU+ k0fE7A/FtVUwZjt3Im7p3ClQ/tMaV/HVrX/+9bqV+eoF508ePxbsfQ5yyriq hA8oxcTECHbhQ0x+fn64WTN38PD1qporwGG4jj84/nb+FOtY7e/g/anA0YuW nrlfVorqnJZ0RniKiyn40B+Xa1WiOM8Y8Szi0YvPFokwYsQIrKm9KkEC4vM7 CPf+hyZNmuCbYE2rSqCS+FzSvHnzcK04aEpsbCz3hKOFhQV3rObzSjNmzICS xo0bQ++Bi6nS0tLAS3hLEIa+4pdmINVGDgiE+P0W/ksj9wX6c0uMIIm4OhuW OYBCVRtg0fuCsX5YgJ/m3ucgp4x7B+/LL7+EXZ06dYqIiMD72xA/WB9yhEsK VKUuXbpIGidnjsfiZCc6PATHJI8eVlxOOb9i4ez56hWblexHA3RSpT+VNnrR 3jP4xshFU0efPnbkYUU5lKhKSxKOHHSaPg7KYSZVrTHK8owRzyISutnZ2eKS pJ8qqdQ9v6+v75AhQ9q2bYvtwIfo6Oh///vfJlclYMOGDZxQvvvuu40aNTJT L4Z3dHQ0U8/yunfvnp6erqpKlXJzc3v16sX5h3svBDRy8OBB8esyHPHIeXBf Ve2vAIJXGWdnXN/hu2aV4zwHy1FuttNhiqT9r6u52TexzayMa5p7n4OcMq4q wUQbBjMYLbVr18aow3jjbt8BoFlY3qpVq969e0sRJ8jebX5cVPDHJDBZKLwn fLMBH11VSXGjFy09A/KEryfCP+7JJhjpwXiv2lsNfyrQM8Y6i35RbURu3bqV nJysudRcBKlVSaVeegEp37JlyxYtWvTt29fDw6OkpARGsIMGDQKhMTc3v379 uorxHrzi4uL169dDz/P2229DP9O1a1eYQKGKSU3NRI6WnD95DFPV1IY8Q/6q hF8fhAoETPPmzWFEBBOiCRMmnD9/nl8HZu5z58599dVXIQ6/+uorSePk0oVz 27w8XOZaQo/qamPlv9LlZOwhkQeoEV1VSYmjF+09c/H86a3r3J1nT7KfYgGj u51+a8V/kOWjRM8Y5Sz6RbVpUa7lUiMrVfJ2WTi/qvdYmgSZqJJMkFWcPPej F715AT2j9JwytRVyRA45Vf7g/sOK8vjoiPnqB9tVpSWmtQchVeIjhzjheO5H L3rzAnpG6TllaivkiBxyCl/0Ol/6lxjrBKkSHznEyYszetGVF9kzSs8pU1sh R+SQUwf37rSfbOE0fRx80OYn3ZqBVImPHOLkxRm96MqL7Bml55SprZAjcsip P9VvkDC1CUJIlfjIIU5enNGLrrwgnikpKfHz8xs9evSXX37JLadXek6Z2go5 IoeckiekSnxkEicvyOhFD+TvmVGjRg0dOnTlypV37tzRo7W4uLjWrVtPmjTp yJEj169fF5zF1PmhD8q1XGpkklMyhFSJD8UJC/IMC4FnsrOz4+PjlyxZ0qZN m8DAQJ2aunHjxmuvvXby5EnWWUydH/qgXMulhnKKBakSH4oTFuQZFizP5OTk tGvXDhRK+6YWqBE5i6nzQx+Ua7nUUE6xIFXiQ3HCgjzDQsQzAQEBw4YN076p AQMGHDx4UOQsps4PfVCu5VJDOcWCVIkPxQkL8gwLEc9kZWWZm5tr39RXX311 4kTVLy5Tek6Z2go5QjnFglSJD8UJC/IMCxHPFBcXN2/eXPumvvzyS1KlFwfK KRakSnwoTliQZ1iIq9LLL7+sfVOkSi8UlFMsSJX4UJywIM+wIFUSR7mWSw3l FAtSJT4UJyzIMyxIlcT5nSD0Qp9sZGPqqyGImqbKRCBVUpEqEfqij/awMfXV EERNU2UikCqp6A4eG5HIecGRwjPKjUOKExbkGRakSuIo13KpoZxiQarEh+KE BXmGBamSOMq1XGoop1iQKvGhOGFBnmFBqiSOci2XGsopFqRKfChOWJBnWJAq iaNcy6WGcooFqRIfihMW5BkWpEriKNdyqaGcYkGqxIfihAV5hoVxVSkhIUHk LKbOD31QruVSQznFglSJD8UJC/IMCxHPlJSU6KRKH3/88dWrV0XOYur80Afl Wi41lFMsSJX4UJywIM+wEPHM06dPGzdurGU7UPmVV1558OCByFlMnR/6oFzL pYZyigWpEh+KExbkGRbinmnfvn1mZqY27URERHz33XfiZzF1fuiDci2XGsop FqRKfChOWJBnWIh7xt7e3tXVtdpGTp8+/f7771+8eFH8LKbOD31QruVSQznF glSJD8UJC/IMC3HP5OXlffjhh0eOHGFVOH78+LfffvvNN9+cO3eu2rOYOj/0 QbmWSw3lFAtSJT4UJyzIMyyq9UxWVtaIESP+85//7Nu3T3NvZGRk586dLSws 0tPTqz2LqfNDH5RrudRQTrEgVeJDccKCPMOiWs8UFxfPmTPn008/3bp1K6tO eHj4e++9B/olfhZT54c+KNdyqaGcYiHimTt37qSkpDx58kS/Nk39nesDxQkL 8gwLcc+Ulpb27Nnzp59+qrad9evXjx07Vvwsps4PfVCu5VJDOcWC5ZmdO3fW q1fPzMwMxnj379/Xo01Tf+d/4+WXX4ZruXTpkng1ihMW5BkW4p5Zvnz55MmT tWmnoqKiWbNm8K/IWWomWYyLNpaXlJQ4ODiYm5s3aNDAy8urZgzTlU8++QT6 kN27dxurQS1zqvzB/eh9wWucbBynjXGaNna9i31kaFBF+f8/QVBWUjx//Hfi fz7uP2oThDKB5ZmPP/7Y7C/8/f31aFOb7+XWrVsQjd26dYN8BOH47LPPbGxs cnNzjfW9cxhXlShOWFTrGY7Ce3mhP21c7WTt8MNod7sZ29a5p19mrkCTM+Ke ee+991JSUrRs6p133rl27ZrIWYyeFzWANpZ7enpiV/PGG2/4+vrWjGG6YhJV yruds3TOZOwxbCd8bzdxGH52nj0pO+M61tGmt/F1X6xlEMoBlme+/PJLTpWm TJmiR5vVfinnz59v1aoVnqJWrVp16tTBz6+//vqxY8eM9dUjRlQlihMW2ngG SU6Mt59sgXu5avAXFrhJyouQBBHP/PHHHzD4Ly8v17KpL7744uTJkyJnMW5S 1AzaWN63b19IT2tr65oxST9qXpWePn0KAzbIC/cFM347f+rBfdWTx4+vpaWu crSGQlcbKxgEPqtWWXk7K7PKv1s3M1Y6zIXKly+c1zII5QDLM5AdMMxDpfj+ ++/1aFP8G4E5e4cOHaBxGB8GBwdnZ2fn5+dHRER06dIFCmEuD9MoY337KuOp EsUJCy09A9y7c9vBchQU7vRdm5+XC123qqw0LjIchAwKz8YfrZELMhoinikt LW3WrJn2Tb2wb2fFDj88PLxmTNKPmlelC6cTICNg/FZcmM8vh3yBkR7sOnbo gHhEnTgcCdXCgzZrH4RyQNwzO3fuhC/C0tJSjzbFv5Ht27dDy/Xr179y5Qq/ PDMzE2bxsMvd3d1Y377KeKpEccJCe8/E/hIGm6udrEGP+DX379gC5X6eS4xu vKSIeIbeGa7SRZX2799fMybpR82rUnjQs4zwXuaguSsswA92BW1cJXL43dxb Cy1HwhgYxodVVkg9exIacZlrKchE4MiBvbBro6sjbsYe2Buy2buspBj+Arw8 F00dHR0eInJqAxH3zLx58+CL2LRJt/sq2sTh9OnToeXPP/9ccxeIIOwaNmwY biYnJ48dO3bVqlXwOSQk5IsvvoDx5yuvvNKrV6+goCDNwwMDA4cMGdKmTZsm TZr07NnT399fZTxVojhhob1nYIoEm6E/bRRUS06Mh/IlsyZW2b4SPUOqpKpO lbCH4ePm5sbtzcrKgo6iQ4cODRo0aN26db9+/Xbt2lVWVsZvAWQC+ocDBw7k 5ORYWVlB4sNY9+233160aBH4HyoEBAR8+umnjRo1atGiRe/evaOjowU23Lt3 z9PTc8CAAXgic3PzPn36QDcCU11+tSpVCU7h6uravXv3xo0bQ6cEJ1q5cmVe Xp72nhGJhx2+a5ymjY3au1NzV0RIIMT8ljXLWcc+raxc52xnN2l4bnYmqw70 Qoum/hfaufH7ZcEuT/tZUH7meCxubli+CDZvZd3wcl6AN9sjQ4NELDcQEc/k 5uZCxw7fZkFBgR5tin8jFhYWkLB2dnaauzBQ+/fvj5uHDh2CzcGDBy9duhQ+ 1K1bF8IG/tWM4cLCwvHjx3PhXbt2be53MRAyo6gSxQkL7T0DdWBzlaP106dP +dVQ19a72FfZvhI9Q6qkqk6VfH19QQ4wPXv06AGfg4ODcVdkZCT3uzOuB0aG Dh0KOsK14OjoCIXQk+AvAqBK0GVhTVArGxsbvCfTtm3bWrVqYQeSkJDAHQ69 XLdu3bhftxs2bMidCDSOb6qmKkF/AjKElevUqcN1OJ07d05LS9PSM3qEHPQk HgtmQmDHhO9m1YmL2q++J7NFvKldm7w0b91kZVyDQocfRj/8a0Uo5hTkpqPV mKg9Oy5dOFeUf08Py7WE5RkYeLz//vvgYW9vb/3a1D5u+UAid+zYEc4LwYYl qEpvvvkmRCYIU35+PhSCeTAhgnKIwJKSEqwJgxYMLWtr699++62oqCg+Ph5G R1yYSbcy/IWNk2rR9AxMYZZbT4WSQO8Vudk3QW7ActhrO+H7BZNHXEtLZTWl OM+QKqn0vYOXmZmJ9zdg+Hr+/HmYtsC8CfoimI/gbwpcTVQl6BygkZSUFJV6 dDpp0iQu6xcuXAjjapV6eRV0I1ACY1fucJSt119/PTw8HHoMlXqCtnjxYjyW b7lAlWDK9vnnn0MJlEMfBf3S3bt3oRGQJCjs0qULtlatZ3SNt8onT3b5rYMI d5w25r6qrMo6qrJS2PusQlmpeGtXUpNwPRL/FsS+7f5QGLL5/3t+zKkFk4bn ZGboarAeVOkZGK7ALAl/3NG7TS2Dlg+E0+jRo+G8MHaC2MBCVCVg7ty5/Mog TDj4SUpKgs3s7GwccTk7O/OrgWbBGExSVXph46RaWJ4pKSrY6OokWJQIUnXj 2hWR1hTnGVIllb6qNGHCBCgZPny4oGZMTAzMSiDxuckIqhKMTq9evcpVy8vL w5mLoAU3Nzco7NWrF1eCkx0fHx/BiXBMHhYWJjCSU6UtW7bAJkzQ7ty5wz/w 5s2brVu3NlP/8CF+1Xrk1O8XU3CtlIPlqPQraaxqeM88LjK82gZh0Lh45gSo zD2XUflXScbV/28fc2r7hpU6Was3VXrmwIED8GUdParnaij9MghOipEAAQZK xJVzqqTZJk7wExMT4fOePXvg82uvvcaf3SN79+6VTpVe5Dip5hC2Z86diFs8 YzwuIF86ZzIoCOpIxO7tcPmsBhXnGVIllb6q1Lx5cyjh32rjwEHmhg0bcBNV qV+/foJq2DmEhITwC0NDQ3F2w5WUqBEcC19c+/btBffrBKqE92o8PDw0LcTf IEaOHCl+1Trl1O2sTD/PJTh+83JeIPIrQN7tHLuJw5bMnPDkSdU/XgvArol7 KONi0hnYdLOdzh/7YU4d/nmPltYaSJWe+UONgW2KfyN8QFa++eYbFA4IuVOn TvH3oirBPEjzwDZt2nCqhLfv/vWvf2lWy8zMlEKVKE5YiHsmIfYg3nM7cTjq 0aOHf6rlBuZBuLBcXE2U5RlSJZVeqpSRkYEJO3DgwMEa4F047g4/qhLMrQRt Yudw/PhxfiHMfQSqhBQVFUE3AhLm6ek5duzYtm3bogEiqvTee++ZqddraVrY tWtX2PXPf/5TG89UGxWQIzBas1OP3CDUYUQn3jnv3fYsRyJCArWMOhjR4Soj /J03YL2nZvpgTiWfqjo4jY7evxdU26b4N4LcvXvX2toaly7A4MTf31+w7kX1 lyrBXs3D+ao0e/ZswR1jPvXr1zeiKlGcsKjWMxUPHuCiBc3nkvLv5OKjtb+n MV+GoCzPkCqp9FKlY8eOmVUHdz8fVWnixImCNrFziI+P5xdqqtKNGzdA0fAH CzP1WogPP/wQhOmtt94SVyX+uogq+fjjj7XxjHhIlN9XrXayxhsOCUcOitxJ QCrKH8B4D+rfu3Nby6iDDHWZZwmHXEtLhdNBDtpO+L6o4G8/xWJOpZ5N1LJN AzGhKuXk5OCgolGjRmvWrMFlnJqgKnXo0EFzF1+VVqxYUeVEXqX++dKIcyWK ExbaeCb9yjNZgZnjo4dVvPBtwzIH2HsoLJh1CmV5hlRJpZcqpaeno0BojlE1 MUSVCgsLO3XqhINed3f3X3/9FRdTAf/4xz/EVendd9+FzZiYmGotZFFtTkEG 4TrStYvn3829pU0I4eOQPm5O2kcd8EtwABy1Z5vvyaPR8GHTCmdBBfnklIFt in8jkLB4f/ijjz5KTk4WqamlKmG8tWzZEtfb8Nm3b5+xVInihIWWnrmdlYk/ J1X5cjxsQfxJZAV5hlRJpe/vSk2bNjX7ayGTgMjISEh2bjWUIaoEEgObr776 KoyQBYfjKggRVRo0aBBsVvkuWeiR4EQXLlwQv+pqcyop8ThEsseCmXijWxvW LbGDQ04cjtI+6oCczHQ4avGM8eucnx2enBgvqCCfnDKwTfFvZOvWrfCdduzY 8e7du+I1tVSl27dvt2jRAjZdXFz4dfC/EjCWKlGcsNDSM0+fPsWZY3xMpGDX rawbuOwhU3QlnoI8o6sqffXVV6RKyKhRo8zUj9ILpkswN8G7K9zKN0NUycfH x6yqn5mgo8CHnkRUaePGjWbqF6YJFA02QeZgV1RUlPhVV5tTG10dIZJhGHbn VlaVfyWFf3uSVFVagq/tupPD/I+6WODjG7hcVvMZf/nklIFtin8jX3zxBd4c PsuAW+eppSqp/nrzcK1atWxtbSGuIJ7PnDnTr18/7k6v4apEccJCe88cP3Tg 2Yq7ySNi9oeWFhf9qb71d+5E3NK5U6D8pzWu1a60UYpnQJWaN2+ufVP9+/eP jo4WOYt49MoT/VQJ0h91YeDAgaDU4MnCwsKgoCB8Xmn27NlcTUNUCfaaqR+A 3bFjB5bAiWDAjMeaqZ/WFBjJqRJ0L/j4LQytIyIi8vLyysrK4uLiunfvjj8q Cd5BwfKMSDxAeM8XfcPzDp/V/PqQRDhg02OtWvS+YGwzLMBPc698csrANsW/ EXy2SIQRI0ZgTe1VCeJ2wIABXAvc+x+aNGmCz30brkoUJyx08sy+QH8Ua5Qn rs6GZQ6gUNUaoxTP3Lp1q23btto3NX/+fGdnZ5GziEevPNFPlVTqNwVxr3So X78+9+YE0Cn+b9AGrnYYOXIkNtuyZUuY+OAZR48ebWFhAR8aNGgwdOhQvpH8 2RMMerm3T4C0vfTSS/i5Xbt2169f19IzrGB4cF8lnlCavQ1sQmGAl6f2IceR m30T28zKqOL/UpFPThnYpsjXkZ2dLS5J+qmSSj2A8fX1HTJkCLe2Ez7A+PPf //634apEccLaq4dnsjOu7/Bds8pxnoPlKDfb6TBF0n7VnFI8ExoaOnjwYO2b unLlymuvvQb/ss5SbUcnQ/RWJSApKcnKyqpnz54wsHzrrbf69u3LvY+Iw0BV KioqWr169UcffdS0aVNzc3PQIPjWoDw1NbVr166gSr179+YbKXgPHnRlDg4O ffr0gS/u1VdfBVPd3Ny4JRPiSNH36s35k8cga1Y4zDG1Ic8w1VypBoCRanJy sjbLeDgoTliQZ1iwPFNQUNCxY8fISOHPZ+JAp/fmm2+uWLECtIn/f0DLJKf0 QLmWS42scsrbZSHk1K9R+01tyDOeY1XSA4oTFuQZFgLPlJeXX7t2DSbs7du3 X7p0qR4NwvDbycnpq6++ateuXeVfq+uVnlOmtkKOyCGnyh/cf1hRHh8dAQll P8VCVVpiWnsQUiU+FCcsyDMsBJ7p06fPp59+Onv27AsXLhj9LKbOD31QruVS I4ecwtdUzpf+1fo6QarEh+KEBXmGRc14Ruk5ZWor5Igccurg3p32ky2cpo+D D4a8Zc64kCrxoThhQZ5hQaokjnItlxo55NSf6uffTW2CEFIlPhQnLMgzLEiV xFGu5VIjk5ySIaRKfChOWJBnWJAqiaNcy6WGcooFqRIfihMW5BkWpEriKNdy qaGcYkGqxIfihAV5hgWpkjjKtVxqKKdYkCrxoThhQZ5hQaokjnItlxrKKRak SnwoTliQZ1iQKomjXMulhnKKBakSH4oTFuQZFqRK4ijXcqmhnGJBqsSH4oQF eYYFqZI4yrVcaiinWJAq8aE4YUGeYUGqJI5yLZcayikW0qkSQbw4GDeDKKcI gjKIIAzBuBlEOUUQUmSQqefH+iCFN54PyDMsasYzSs8pU1shRyinWJAq8aE4 YUGeYUGqJI5yLZcayikWpEp8KE5YkGdYkCqJo1zLpYZyigWpEh+KExbkGRak SuIo13KpoZxiQarEh+KEBXmGBamSOMq1XGoop1iQKvGhOGFBnmFBqiSOci2X GsopFqRKfChOWJBnWJAqiaNcy6WGcooFqRIfihMW5BkWpEriKNdyqaGcYkGq xIfihAV5hgWpkjjKtVxqKKdYkCrxoThhQZ5hQaokjnItlxrKKRakSnwoTliQ Z1iQKomjXMulhnKKBakSH4oTFuQZFqRK4ijXcqmhnGJBqsSH4oQFeYYFqZI4 yrVcaiinWJAq8aE4YUGeYUGqJI5yLZcayikWz6UqrVixwszMbOzYsboeqIc3 dvqtjdkfalwHyhDyDIsXRJUMzCkpTFI6lFMsTKtKqampEOfdu3dv1KjRW2+9 9fXXX/v4+JSUlBj4ddeYKuVkps8f/902Lw+ROmnJZzevWrZk1kTHaWO8lzmc PBr9xx9/GOzjmsbonim8lxf608bVTtYOP4x2t5uxbZ17+uWLxrC0ppGbKskz pww8u1H45JNP4BJ2795takP+B+UUCxOqkr+/f/369c3U1KtXz+wvIHju3btn yNddM6r05Mljb5eFInEC6hOy2Rsq4J/thO/xg/9KF8UJk3E9k5wYbz/ZAr1h N3EY56KwwE3GM7mGkJUqyTanDDm1sVC0KlFOGaVN8W/k6tWrTZo0gSD5z3/+ c+LEiaKiory8vE2bNjVt2hQKraysDPm6JVWlspLiC6dPRIYGLZ07Bb93VpxE 7dkBex0sR505HgtHPX706HzCr7AJhbEH9hrX51JjRM/cu3MbnbDTd21+Xi4I tKqsNC4yHFX7bPxRaa5AKuSjSnLOKUNObSyUqEqUU8ZtU/wbcXR0hAj58ssv BfcW1q5dC+Wvv/66IV+3pKoUHx3BjUNE4iT/Tu6CScNhr2ASnRB7EAqXW081 pselx4ieif0lDHatdrIWTBj379gC5X6eS4xpt/TIR5XknFOGnNpYKFGVKKeM 26b4N/Ldd99BhLi6ugrKT506hfccsrKysOTcuXOQC15eXir1DYp27do1aNCg oKAA9964cWPGjBk9evRo1KhRmzZtJk6ceOXKFUlV6c6trNPHjuDfljXLWXHy S0gg7PJ1Xywof1hRDiMf+Ct/cF/zqNSzJ+Eol7mWmrf4jhzYC7s2ujriJsy2 QjZ7w1AK/gK8PBdNHR0dHqLtN6Q7RvQMDOdgV+hPGwXlyYnxUL5k1sQqG1e0 Z4x1FuXmlK5HSYESVYlyyrhtin8jv/zyS2Bg4MWLFwXlUAiR07BhQ268FxER ASUjRozYuXNnrVq1ML8wg2JiYlq1aoUltWvXxg/NmzefNGlSzax2OBS2ixUn MG6BXWeOx+rkuiePHy+a+l848MbvlwW7PO1n8RvcsHwRbN7KuuHlvAAHUaB0 Op1LJ4zomai9O2HXKkfrp0+f8svDg56N69a72FfZ4HPjGUPOotycEqmQnJwM za5ataq0tNTNza1Tp04gkS1bthwzZkxmZiZUiI+P79+/P9gAKtmtWzcfH5+y sjJBI7t27Ro2bFiXLl2gDtgPkuru7p6bm8uvw1Kl4ODgr7/+ukWLFnDsBx98 YG1tDSqs62XqAeUUC1OpkgAIMxih7d27980334TIsbGx4XZhBmG8ffHFFzC0 O3jwINTPy8t74403YFeHDh1+/vnnu3fvZmRkwPAPsg9TybSqtHjGePy6b1y7 sn3DSjfbaa7zp8Ew49Svh8WXOuza5AUHhgdt5hdmZVx79hPVD6MfVlRgCcYJ xJuj1ZioPTsuXThXlH9Pe8t1xYiegeHWcuupsDfQe0Vu9k1IDbA8Jny37YTv F0wecS0tldXm8+EZQ86i3JwSqXDo0CFoeeDAgUOGDIEPr6rB03Xu3BkktV69 eiCd5ubmL730EpavXr2a38L48eO5dR2cqQBoE1wCV01Tle7duzdu3DiuPrc+ pFmzZnD5ul6prlBOsZCDKq1du5ZbOARp4uTkBKMmbi9mEPD999/zyxcuXAiF r732Wk5ODr+1PXv2mFyVnjx5jCOKn3dt45becX/wFd8vK2W1eSU1Ceo4z57E F6992/2hECbRXAnGyYJJw3MyM7Q3WG+MmEFASVHBRlcngVsgrUDBRdp8Pjxj yFmUm1MiFVCVQBFgfsRpgZ+fHycWAwYMAHmFQrDqm2++gZJ27dpxh4eHh0NJ nTp1QKru3LkDJfn5+UFBQbjG46effuJqaqqSra0tlMDcCqrdvn0b5pKJiYlw OnSa5qzTuFBOsZCDKi1btoy7jQDRZWFhce3aNW4vl0Hnzp3jH/XRRx9BIUz5 NRv8+OOPTatKhfl3ucDwWmr/e1pK+X1VSWEBTJScpo+Dwh0+q1ltPq2sXDxz An+ZROVfJRlX07hqGCcwC9Plm9Ef42bQuRNxOJcEyV46ZzIuC4F/I3Zvh8tn tfl8eMaQsyg3p0QqoCoBISEh/HKY6UAhTJH4a9rj4+OhEC6tsLAQS2AOCCWj R48WNGtlZQXl8+bN40oEqgSiU1/NyZMn+QfCnLFfv376XaxOUE6xkIMqIVlZ WTBS+uyzzzAUuXvCmEEweS8uLubXb9y4MZQfPXpUs6mpU6eaVpVAgFCSVjla Vz558jfnpKXgrpzMdFazYQF+83kPGlxMOgObbrbT+eMZjJPDP+/R3lpDMGIG 4SpEhx9Gnzgc9ejRwz/VqQFjNne7GdVG/nPgGUPOotycEqmAqsT/2QsBJYXy mTNn8gvhElDCuFtzMNeDAzV/aQJTodqsWbO4EoEqrVy5EjYHDRqkaVJYWBjs at26tdZXqQ+UUyzko0oIzKPxzvaKFSuwBDPo3Xff5VfjgrPK3yWXLl1qWlWC kMAbd1WudsBfEk8ejWY1C6MUXDmDv10GrPfUDAmMk+RTJ7S31hCM5ZmKBw/w B1bNZyjy7+TiY4Ag3KxmnwPPGHIW5eaUSAVUpfbt2wvKYfpjprGkEMRIoEoc KSkp4eHhXl5eM2bM6NatG1YTUSVLS0vY7Nix42AN8D4hzMg0xc6IUE6xMIkq 3blzZ6ca/j1tju+//x5CYuLEibiJGfTBBx8Iqr388stQHhcXp9nCtGnTTKtK gPPsSfM1HlZCNq9ygV1Re3awmoVRiss8S6hzLS21/L4K4go0rqjgbz8vYpyk nk3U3lpDMJZn0q88SwG7icMePazQPGrDMgfYeygsmNXsc+AZQ86i3JwSqYCq 1KFDB0E5qpLgdqKmKsF0b8mSJTCv4X6Hglnh0KFDe/bsKa5K3377rVl15OXl 6Xq92kM5xcIkqsSNygS3tRGMFjs7O9xkZRDedvbw8NBs4dNPPzW5Kvm4ObEm RDitTko8LtLyL8EBUGfPNl9oAT5sWuEsqCDzOGF55nZWJt76rih/oHkUrjs9 duiASMtK94whZ1FuTolUMFCVJkyYYKZeNWdjY3PgwAFunYa9vb24Kk2ZMgU2 f/zxR12vyFhQTrEw1R28zp07m/19tSpy+fJlfGtKcHAwlrAyaPHixWbqJ9Zv 377NL9+3bx/GrWlVKTHu2ffrsWDm40eP+OVpyWcxhAru5om0jG9iXDxj/Dpn u2dz58R4QQWZxwnz3ubTpw4/jIZd8TGRgl23sm7gT7SZoquGlO4ZQ86i3JwS qWCIKoEG4UNVhw8fFhyOqyBEVAnEFzaHDx+uadLVq1fDwsKq/H3NiFBOsTCV KuHKzzp16ixatOj69esqdbxBJHTq1MlM/aBBUVER1mRlENTHx/3efffdqKio e/fuQYhCs40aNZKDKlVWVuLvR15L7W9e/x02YXZ8Ki7G0WoMFEbs3l5t46Bo uC7CcdqYJ48fC/bKPE5EPHP80IFnq4Mmj4jZH1paXAQl4JlzJ+LwTV8/rXGt 9tW1ivaMIWdRbk6JVDBElX777bcqb7UVFhbiekIRVUpKSqpbt269evUSEhL4 x5aVlfXp0wdqOjg46HqxOkE5xcJUqqT6awaNcM/HmakfnUtLS+OqsTJIpX6Y ncsXSEZuKSwGpGlVCbibewt/XXp211c9YsG/QO+VT54Iv3dNovcFY/2wAD/N vTKPE3HP7Av05x7jglTiPLNhmQNkU7WNK9ozhpxFuTklUsEQVSotLcXnkubN m4drxUFTYmNjcdkhYGFhwR2r+bzSjBkzoKRx48abNm3CR6LASyNGjMBbgjDH 1PVidYJyioUJVQnYu3fv4MGD33zzzfr165ubm/fr12/dunWC1aoiGaRSP3Qw ffr0Tz/9FJ/phiSaOHFiTEyMHFQJuF9W+ktwgPuCGfZTLPDdDhfPn9ay8dzs mxgnWRnXNPfKPE6q9Ux2xvUdvmtWOc5zsBzlZjsdhnPar/BRtGcMOYtyc0qk goG/K23YsAFLmjRpAlM8lFSYGOK7asH47t27p6enq6pSpdzc3F69enHazb0X Aho5ePCgrleqK5RTLEyrSkakpKQkJSUlOzvbkEZqpofRkvMnj0EkrHCYY2pD nkGeYSE3VTIiRswpkQoGqpJK/bNX7969W7Zs2aJFi759+3p4eIDlBQUFgwYN AqEBacb7mVW+Bw/0ev369aDjb7/9NkyaunbtChMoVDGpoZxi8dyoklGQVZzg f/L1a9R+UxvyDPIMi+dYlYyCci2XGsopFqRKfOQQJ+UP7j+sKMf/V8V+ioWq tMS09iDkGRakSuIo13KpoZxiQarERw5xsstvHfdLpaSvi9cJ8gwLUiVxlGu5 1FBOsSBV4iOHODm4d6f9ZAun6ePgQ7XrOWsM8gwLUiVxlGu51FBOsSBV4iOH OPlT/Ro9U5sghDzDglRJHOVaLjWUUyxIlfjIJE5kCHmGBamSOMq1XGoop1iQ KvGhOGFBnmFBqiSOci2XGsopFqRKfChOWJBnWJAqiaNcy6WGcooFqRIfihMW 5BkWpEriKNdyqaGcYkGqxIfihAV5hgWpkjjKtVxqKKdYkCrxoThhQZ5hQaok jnItlxrKKRakSnwoTliQZ1iQKomjXMulhnKKBakSH4oTFuQZFqRK4ijXcqmh nGIhnSoRxIuDcTOIlVOm7kf1QbmWS03NRI4SkcIzNd8nEIRpMW4GsXLK1P2o Ppj2eyGUi9Q5RRCEIWCemlph9MG0PRuhXEydcwRBiIF5amqF0QflWi411Pey IM8QhPxRbt+uXMulhvpeFuQZgpA/yu3blWu51FDfy4I8QxDyR7l9u3Itlxrq e1mQZwhC/ii3b1eu5VJDfS8L8gxByB/l9u3KtVxqqO9lQZ4hCPmj3L5duZZL DfW9LMgzBCF/lNu3K9dyqaG+lwV5hiDkj3L7duVaLjXU97IgzxCE/FFu365c y6WG+l4W5BmCkD/K7duVa7nUUN/LgjxDEPJHuX27ci2XGup7WZBnCEL+KLdv V67lUkN9LwvyDEHIH+X27cq1XGqo72VBniEI+aPcvl25lkuNHn3vTr+1MftD JYox+UCqRBDyR7l9uzaWl5SUODg4mJubN2jQwMvLq2YM05VPPvnEzMxs9+7d xmpQ1743JzN9/vjvtnl5iNRJSz67edWyJbMmOk4b473M4eTR6D/++MPg6Ktp SJUIQv4836rk6elppuaNN97w9fWtGcN0xbSq9OTJY2+XhSKqBOoTstkbKuCf 7YTv8YP/ShfFCROpEkHIn+dblfr27QsdvrW1dc2YpB8mUaWykuILp09EhgYt nTsFVYalSlF7dsBeB8tRZ47HwlGPHz06n/ArbEJh7IG9EoSkhJAqEYT8eb5V CTv88PDwmjFJP0yiSvHREdz0R0SV8u/kLpg0HPamX77IL0+IPQiFy62nGjMW pYdUiSDkz4ugSvv3768Zk/TDJKp051bW6WNH8G/LmuUsVfolJBB2+bovFpQ/ rCiHeRb8lT+4r3lU6tmTcJTLXEvNW3xHDuyFXRtdHXETZlshm71hCgZ/AV6e i6aOjg4P0TZ2dYdUiSDkz/OqSvPmzTP7O25ubtzerKys6dOnd+jQoUGDBq1b t+7Xr9+uXbvKysr4LYBMjB079sCBAzk5OVZWVm3atKlfv/7bb7+9aNGi4uJi qBAQEPDpp582atSoRYsWvXv3jo6OFthw7949T0/PAQMG4InMzc379OkTGBhY WlrKr1alKsEpXF1du3fv3rhx41deeQVOtHLlyry8PO09o30MHArbxVKl1U7W sOvM8VidgurJ48eLpv4XDrzx+2XBLk/7WfwGNyxfBJu3sm54OS/AKRsonU7n 0glSJYKQP8+rKvn6+oIcNGvWDDr8Hj16wOfg4GDcFRkZ2apVK5SqevXqcbI1 dOhQ0BGuBUdHRyi0s7MDTYEPoEogQFgT1MrGxgY+gE61bdu2Vq1a8Llu3boJ CQnc4bm5ud26dcP6UKFhw4bciUDj+KZqqtKlS5dAhrBynTp1ateujZ87d+6c lpampWe0jwERVVo8YzyKy41rV7ZvWOlmO811/jSY1Jz69bD4Uoddm7zgwPCg zfzCrIxrz36i+mH0w4oKLEFVWu9i72g1JmrPjksXzhXl39Pecl0hVSII+fO8 qhKieQcvMzPz5ZdfhkILC4vz58/DtAXmTd7e3jAfgUJLS0uuJqoSyBY0kpKS AiWFhYWTJk3ixGXhwoUFBQVQDu28+eabUDJ+/HjucJSt119/PTw8vKioSKWe oC1evBiP5VsuUCWYsn3++edQAuWHDh3Kz8+/e/cuNAKSBIVdunTB1qr1jPYx wFKlJ08e4/zl513buKV33B8Iyv2yUlabV1KToI7z7El88dq33R8KQzZ7cyWo SgsmDc/JzNDeYL0hVSII+fOiqdKECROgZPjw4YKaMTExMCuBSQ03GUFVgvnR 1atXuWp5eXk4cxG04ObmBoW9evXiSnCy4+PjIzjR+++/D+VhYWECIzlV2rJl C2zCBO3OnTv8A2/evNm6dWvYtWnTJvGrNpYqFebf5TTIa6n972kp5fdVJYUF MFFymj4OCnf4rGa1+bSycvHMCfxlEpV/lWRcTeOqoSrBLEyXmNUfUiWCkD8v mio1b94cSvi32jh69OgBuzZs2ICbqEr9+vUTVMO7fyEhIfzC0NBQnN1wJSVq BMcWFxe3b99ecL9OoEpDhgyBTQ8PD00L8ceykSNHil+1sVQJBAglaZWjdeWT J38Lm7QU3JWTmc5qNizADyqEBW7CzYtJZ2DTzXY6f/aEqnT45z3aW2sIpEoE IX9eKFXKyMjAG2gDBw4crAHehQMxwsqoSjC3ErTZpk0bKD9+/Di/EOY+AlVC ioqKEhMTQcI8PT3Hjh3btm1bNEBEld577z3Y/PzzzzUt7Nq1K+z65z//qY1n tI8BlirBfAdv3FW52gHXLZw8Gs1qFuZEUGHJrIlPnz6FzYD1npoChKqUfOqE 9tYaAqkSQcifF0qVjh07ZlYdc+fOxcqoShMnThS0iaoUHx/PL9RUpRs3boCi NWnSBJutW7fuhx9+CML01ltviasSf11ElXz88cfaeEb7GBBZ7eA8e5Lmw0rI 5lUusCtqzw5WszAncplnCXWupaWW31fZT7YAjSsq+NtiBlSl1LOJ2ltrCKRK BCF/XihVSk9PR4EQrM2uEkNUqbCwsFOnTlDSvn17d3f3X3/9NT8/H3f94x// EFeld999FzZjYmKqtZCFEVXJx82JNSFyt5sBu5ISj4u0/EtwANTZs80XWoAP m1Y4CyqQKhEEIeCFUiWgadOmUJKUlKRZOTIyEsQlKysLNw1RJZAY2Hz11Vdz cnIEh+MqCBFVGjRoEGxW+S7ZxMREONGFCxfEr9qIqpQY90xNPBbMfPzoEb88 LfksvhOv4G6eSMv43tfFM8avc7Z7dqcuMV5QgVSJIAgBL5oqjRo1CkqGDRsm mC7B3ARX3HEr3wxRJR8fnyp/Zrp06RI+9CSiShs3boTNd955R6BosAkyB7ui oqLEr9qIqlRZWYm/H3kttb95/XfYLL+vOhUX42g1Bgojdm+vtnFQNFwX4Tht zJPHjwV7SZUIghDwoqnS1atXURcGDhx44sSJ4uLiwsLCoKAgfF5p9uzZXE1D VAn2mqkfgN2xYweWwIm2bt2KxwLe3t4CIzlVArnEx287duwYERGRl5dXVlYW FxfXvXt3/FFJ8A4Klme0jwERVQLu5t7CX5fgz079Tjz8C/Re+eSJUGU0id4X jPXDAvw095IqEQQh4EVTJZX6TUHcKx3q16/PvTkBdApfJYQYuNph5MiR2GzL li1h4oNnHD16tIWFBXxo0KDB0KFD+UbyZ09nzpzh3j4B0vbSSy/h53bt2l2/ fl1Lz2gfA+KqBNwvK/0lOMB9wQz7KRb4boeL509r2Xhu9k1UpayMa5p7SZUI ghDwAqoSkJSUZGVl1bNnzyZNmrz11lt9+/bl3kfEYaAqFRUVrV69+qOPPmra tKm5uTloUGhoKJSnpqZ27doVVKl37958IwXvwcvOznZwcOjTp89rr7326quv gqlubm7ckglxZNX3nj95DHRnhcMcUxvyDFl5hiCIKnm+VenFRFZ9L/6Xgr9G 7Te1Ic+QlWcIgqgS5fbtyrVcauTQ95Y/uP+wohz/Fyf7KRaq0hLT2oPIwTME QYij3L5duZZLjRz63l1+67h1EZL+5xQ6IQfPEAQhjnL7duVaLjVy6HsP7t1p P9nCafo4+CD+f17UJHLwDEEQ4ii3b1eu5VIjk773aWWlqU0QIhPPEAQhgnL7 duVaLjXU97IgzxCE/FFu365cy6WG+l4W5BmCkD/K7duVa7nUUN/LgjxDEPJH uX27ci2XGup7WZBnCEL+KLdvV67lUkN9LwvyDEHIH+X27cq1XGqo72VBniEI +aPcvl25lksN9b0syDMEIX+U27cr13Kp+b926qAGABgEgqB/iXVTBfBrgTCj gJDcam/EZ6C/uW2fe/lr2hvxGejvwDLVmwMy1YWA36o3BwAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB7Xa3BUuk= "], {{0, 329}, {562, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{281., Automatic}, ImageSizeRaw->{562, 329}, PlotRange->{{0, 562}, {0, 329}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.769891376445168*^9, 3.76989139269386*^9}, 3.769940640397663*^9, 3.7699411454105053`*^9, 3.769946949083033*^9}, CellLabel->"Out[3]=", CellID->34355426] }, Open ]] }, Open ]] }, Closed]] }, ClosingSaveDialog->False, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"ResetDataset | Example Notebook", Visible->False, FrontEndVersion->"13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions->Notebook[{ Cell[ StyleData[ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb", CharacterEncoding -> "UTF-8"]]], Cell[ StyleData[All, "Working"], Editable -> True, DockedCells -> {}], Cell[ StyleData["Notebook"], Editable -> True, DockedCells -> {}, ScrollingOptions -> {"VerticalScrollRange" -> Automatic}], Cell[ StyleData[ "Section", StyleDefinitions -> StyleData["PrimaryExamplesSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Subsection", StyleDefinitions -> StyleData["ExampleSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsection", StyleDefinitions -> StyleData["ExampleSubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsubsection", StyleDefinitions -> StyleData["ExampleSubsubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Text", StyleDefinitions -> StyleData["ExampleText"]], Editable -> True]}, Visible -> False, FrontEndVersion -> "13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[625, 23, 168, 7, 70, "Subsection",ExpressionUUID->"86ca5101-acfe-46d5-bc1f-2437a496c4f9", CellID->462042388], Cell[796, 32, 1228, 33, 70, "Text",ExpressionUUID->"69249f3a-92ee-4da9-9df0-a309fd81fa11", CellID->13078159], Cell[CellGroupData[{ Cell[2049, 69, 9624, 232, 70, "Input",ExpressionUUID->"ac7ebf0e-843e-465e-9716-34c5aee8e26d", CellID->1790486466], Cell[11676, 303, 13157, 223, 70, "Output",ExpressionUUID->"560a45e8-456f-4943-8ca3-dccdb4b3911d", CellID->1693940315] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[24882, 532, 159, 7, 70, "Subsection",ExpressionUUID->"282a2355-9009-4cb0-9137-26ca59c3a261", CellID->964056545], Cell[25044, 541, 522, 12, 70, "Text",ExpressionUUID->"1911d709-53a8-4902-8541-97b44545ef37", CellID->1420314324], Cell[25569, 555, 322, 10, 70, "Input",ExpressionUUID->"a3e2f613-e2ee-41c1-9f5b-bcc2578fbeca", CellID->1112059206], Cell[CellGroupData[{ Cell[25916, 569, 8819, 214, 70, "Input",ExpressionUUID->"787a65df-b660-4db8-95ee-51adb9abdd47", CellID->2115413253], Cell[34738, 785, 36563, 606, 70, "Output",ExpressionUUID->"9f69abc9-0393-47e1-8ba2-38c7cd74c8cb", CellID->2104445857] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[71350, 1397, 178, 7, 70, "Subsection",ExpressionUUID->"5bf519ea-5e04-47b8-86ec-24a9f2e99813", CellID->754506620], Cell[71531, 1406, 1069, 29, 70, "Text",ExpressionUUID->"75aec7ff-05e2-4334-ab67-cc2d0161a5c6", CellID->1730168417], Cell[CellGroupData[{ Cell[72625, 1439, 10665, 249, 70, "Input",ExpressionUUID->"8ed81656-d169-4197-91eb-4c65450ed672", CellID->51154405], Cell[83293, 1690, 35609, 820, 70, "Output",ExpressionUUID->"876488ce-ac4e-4ed0-a6c5-4ae95e949659", CellID->1744733607] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[118951, 2516, 168, 7, 70, "Subsection",ExpressionUUID->"541622c7-9c0f-4ca8-bb62-21f4562823f1", CellID->92483860], Cell[119122, 2525, 396, 10, 70, "Text",ExpressionUUID->"4973f61c-6357-4a0f-87d0-a9b120586229", CellID->688836941], Cell[CellGroupData[{ Cell[119543, 2539, 8134, 198, 70, "Input",ExpressionUUID->"e82bed02-a868-414f-be3c-c7645d0e4139", CellID->1473618778], Cell[127680, 2739, 3316, 61, 70, "Output",ExpressionUUID->"2919096d-f08a-44fc-9ea5-e53012d78c64", CellID->1574396520] }, Open ]], Cell[CellGroupData[{ Cell[131033, 2805, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"c6119723-abe3-4b1a-ae7c-b33bc71461fd", CellID->816244460], Cell[131180, 2811, 445, 11, 70, "Text",ExpressionUUID->"cb301627-b5c1-4ad4-bada-c492942516c0", CellID->1057098397], Cell[CellGroupData[{ Cell[131650, 2826, 8648, 212, 70, "Input",ExpressionUUID->"5b12f424-0535-44ab-a59b-e835df19c5b5", CellID->456798644], Cell[140301, 3040, 12085, 205, 70, "Output",ExpressionUUID->"a007cdcc-d211-4911-9f4a-3f79cdfa54a4", CellID->1458434855] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[152435, 3251, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"0c2eee25-dbb0-485a-8f89-6dc541792306", CellID->495102184], Cell[152582, 3257, 958, 27, 70, "Text",ExpressionUUID->"26b0bbcf-615e-4f56-b6cf-b8aa709fbde3", CellID->1818494984], Cell[CellGroupData[{ Cell[153565, 3288, 1157, 34, 70, "Input",ExpressionUUID->"33a52ceb-343c-4549-857d-15264dcc90ca", CellID->959898210], Cell[154725, 3324, 34245, 568, 70, "Output",ExpressionUUID->"bad879c4-2f3a-4e60-a4cd-3cbfa56f8446", CellID->34355426] }, Open ]] }, Open ]] }, Closed]] } ] *) (* End of internal cache information *)