(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 10.3' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 1380607, 28373] NotebookOptionsPosition[ 1357774, 27558] NotebookOutlinePosition[ 1359869, 27626] CellTagsIndexPosition[ 1359786, 27621] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ "Neural Networks in ", StyleBox["Mathematica", FontSlant->"Italic"], " 11" }], "Title", CellChangeTimes->{{3.5496241220858183`*^9, 3.5496241316698093`*^9}, { 3.549818710673188*^9, 3.5498187115316067`*^9}, {3.5498190276432457`*^9, 3.549819032858705*^9}, 3.6768395288942833`*^9, 3.6868505876414385`*^9, { 3.6868506286462903`*^9, 3.686850639989707*^9}}], Cell[TextData[StyleBox["Brian Mayer", FontSize->24, FontSlant->"Italic"]], "Text", CellChangeTimes->{{3.549624168509506*^9, 3.549624171985794*^9}, { 3.549624508772977*^9, 3.549624510775043*^9}, {3.5498187159613867`*^9, 3.5498187170087957`*^9}, {3.549819049020514*^9, 3.5498190533440437`*^9}, { 3.676839535949759*^9, 3.676839542654063*^9}}], Cell["\<\ This presentation shows some examples of how to use neural networks.\ \>", "Text", CellChangeTimes->{{3.6868509153984747`*^9, 3.68685097821916*^9}}], Cell[CellGroupData[{ Cell["Contact!", "Chapter", CellChangeTimes->{{3.6868511030943713`*^9, 3.6868511133739614`*^9}, { 3.686851209366808*^9, 3.6868512220801334`*^9}}], Cell[CellGroupData[{ Cell["What is a Neural Network?", "Subchapter", CellChangeTimes->{{3.6870154296535254`*^9, 3.6870154465796003`*^9}}], Cell["\<\ Neural Networks are a computational approach which is based on a large \ collection of neural units loosely modeling the way the brain solves problems \ with large clusters of biological neurons connected by axons.\ \>", "Text", CellChangeTimes->{{3.6874566313486023`*^9, 3.68745663135802*^9}, { 3.687456678073867*^9, 3.6874567167612467`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["What are its Elements?", "Subchapter", CellChangeTimes->{{3.6870154296535254`*^9, 3.6870154465796003`*^9}, { 3.687018750760042*^9, 3.687018760319042*^9}}], Cell[TextData[{ "Mathematica has the following elements for use with neural networks:\n\n\ NetGraph\[LongDash]symbolic representation of trained or untrained net graphs \ to be applied to data\nNetChain\[LongDash]symbolic representation of a simple \ chain of net layers\nNetPort\[LongDash]symbolic representation of a named \ input or output port for a layer\nNetExtract\[LongDash]extract properties and \ weights etc. from net\nNetInitialize\[LongDash]randomly initialize parameters \ for a network\nDotPlusLayer\[LongDash]trainable layer with dense connections \ computing ", StyleBox["w.x + b", FontSlant->"Italic"], "\nElementwiseLayer\[LongDash]apply a specified function to each element in \ a tensor\nTotalLayer\[LongDash]layer adding corresponding elements of \ multiple tensors\nSoftmaxLayer\[LongDash]layer globally normalizing elements \ to the unit interval\nEmbeddingLayer\[LongDash]trainable layer for embedding \ integers into continuous vector spaces\nMeanSquaredLossLayer\n\ MeanAbsoluteLossLayer\nCrossEntropyLossLayer\nCatenateLayer\nFlattenLayer\n\ ReshapeLayer\nSummationLayer\nConvolutionLayer\nDeconvolutionLayer\n\ PoolingLayer\nNetTrain\[LongDash]train parameters in any net from examples\n\ BatchNormalizationLayer\nDropoutLayer\nNetEncoder\[LongDash]convert images, \ categories, etc.to net - compatible numerical arrays\n\ NetDecoder\[LongDash]interpret net - generated numerical arrays as images, \ probabilities, etc.\nRamp\[LongDash]rectified linear (ReLU)\nTanh\n\ LogisticSigmoid" }], "Text", CellChangeTimes->{{3.687018793370042*^9, 3.687018824387042*^9}, { 3.6870189195670424`*^9, 3.687018976603042*^9}, {3.6870194474710407`*^9, 3.6870194735320406`*^9}, {3.687290080842717*^9, 3.6872900947052526`*^9}, { 3.687461987513193*^9, 3.687462064207654*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Basic elements and examples", "Subchapter", CellChangeTimes->{{3.6870154296535254`*^9, 3.6870154465796003`*^9}, 3.687298880939156*^9, {3.6883396439113493`*^9, 3.68833964814053*^9}, { 3.688339737981079*^9, 3.688339747001809*^9}}], Cell[CellGroupData[{ Cell["ElementWise Layer", "Section", CellChangeTimes->{{3.6883279797291403`*^9, 3.688328002996376*^9}}], Cell["How the ElementWise Layer works:", "Text", CellChangeTimes->{{3.687459052020461*^9, 3.6874590707848263`*^9}, { 3.687463722590665*^9, 3.6874637269507093`*^9}, {3.688327867465042*^9, 3.688327888444188*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"netTanh", "=", RowBox[{"ElementwiseLayer", "[", "Tanh", "]"}]}]], "Input", CellChangeTimes->{{3.687015634458902*^9, 3.6870156411512585`*^9}, { 3.687290297772546*^9, 3.687290316403901*^9}, {3.68832790813268*^9, 3.688327912906831*^9}}], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["ElementwiseLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Function\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["Tanh", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Function\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["Tanh", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"tensor\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"tensor\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{ 3.6870152587660975`*^9, 3.6870156418688545`*^9, {3.6872903053557863`*^9, 3.6872903172453127`*^9}, 3.688327913930319*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"netTanh", "[", RowBox[{"{", RowBox[{"2", ",", "1", ",", "0"}], "}"}], "]"}]], "Input", CellChangeTimes->{{3.687015261387763*^9, 3.687015311879588*^9}, { 3.6870153881701226`*^9, 3.6870154163857803`*^9}, 3.6874571934622087`*^9, { 3.688327918044487*^9, 3.688327926718062*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"0.9640275835990906`", ",", "0.7615941762924194`", ",", "0.`"}], "}"}]], "Output", CellChangeTimes->{{3.6870152745976863`*^9, 3.6870153124411774`*^9}, 3.6870156287649384`*^9, 3.687290320689939*^9, {3.687457190165615*^9, 3.6874571939504757`*^9}, {3.688327919968876*^9, 3.688327927595108*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"netRamp", "=", RowBox[{"ElementwiseLayer", "[", "Ramp", "]"}]}]], "Input", CellChangeTimes->{{3.687015634458902*^9, 3.6870156411512585`*^9}, { 3.687290297772546*^9, 3.687290316403901*^9}, {3.68832790813268*^9, 3.688327912906831*^9}, {3.68832801698722*^9, 3.688328027604851*^9}}], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["ElementwiseLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Function\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["Ramp", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Function\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["Ramp", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"tensor\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"tensor\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{ 3.6870152587660975`*^9, 3.6870156418688545`*^9, {3.6872903053557863`*^9, 3.6872903172453127`*^9}, 3.688327913930319*^9, 3.6883280280728407`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"netRamp", "[", RowBox[{"{", RowBox[{ RowBox[{"-", "2"}], ",", "0", ",", ".5", ",", "1", ",", "2"}], "}"}], "]"}]], "Input", CellChangeTimes->{{3.687015261387763*^9, 3.687015311879588*^9}, { 3.6870153881701226`*^9, 3.6870154163857803`*^9}, 3.6874571934622087`*^9, { 3.688327918044487*^9, 3.688327926718062*^9}, {3.6883280322320957`*^9, 3.688328056174412*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"0.`", ",", "0.`", ",", "0.5`", ",", "1.`", ",", "2.`"}], "}"}]], "Output", CellChangeTimes->{{3.6870152745976863`*^9, 3.6870153124411774`*^9}, 3.6870156287649384`*^9, 3.687290320689939*^9, {3.687457190165615*^9, 3.6874571939504757`*^9}, {3.688327919968876*^9, 3.688327927595108*^9}, { 3.688328035967703*^9, 3.688328057588262*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["DotPlus Layer", "Section", CellChangeTimes->{{3.68834237043491*^9, 3.688342374493449*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"dotp", "=", RowBox[{"DotPlusLayer", "[", RowBox[{"5", ",", RowBox[{"\"\\"", "\[Rule]", "3"}]}], "]"}]}]], "Input", CellID->75218466], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["DotPlusLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["5", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["5", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Arrays:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"matrix\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"5\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"optional\"","\" \"",TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"5\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"vector\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"vector\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"5\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{275, 53}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->719206200] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"dotp", "=", RowBox[{"NetInitialize", "[", "dotp", "]"}]}]], "Input", CellID->1550991696], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["DotPlusLayer", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["5", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["5", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Arrays:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"matrix\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"5\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"5\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Ports:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"5\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{265, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1646801376] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"dotp", "[", RowBox[{"{", RowBox[{"0.", ",", "0.2", ",", ".1"}], "}"}], "]"}]], "Input", CellID->499143241], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "0.1284037083387375`"}], ",", RowBox[{"-", "0.03149155154824257`"}], ",", RowBox[{"-", "0.21318522095680237`"}], ",", "0.08010490238666534`", ",", RowBox[{"-", "0.09068252146244049`"}]}], "}"}]], "Output", ImageSize->{405, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1095565954] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"dotPlus", "[", RowBox[{"data_", ",", " ", "weight_", ",", "bias_"}], "]"}], ":=", RowBox[{ RowBox[{"Dot", "[", RowBox[{"weight", ",", "data"}], "]"}], "+", "bias"}]}]], "Input", CellID->1703099260], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"{", RowBox[{"2", ",", "10", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"dotp", "=", RowBox[{"NetInitialize", "@", RowBox[{"DotPlusLayer", "[", RowBox[{"2", ",", RowBox[{"\"\\"", "\[Rule]", " ", "3"}]}], "]"}]}]}], "\[IndentingNewLine]", RowBox[{"dotp", "[", "data", "]"}]}], "Input", CellID->809591688], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["DotPlusLayer", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["2", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["2", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Arrays:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"matrix\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"2\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"2\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Ports:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"2\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{265, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1516611231], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "4.334064483642578`"}], ",", "2.7676756381988525`"}], "}"}]], "Output", ImageSize->{137, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1201553174] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"dotPlus", "[", RowBox[{"data", ",", " ", RowBox[{"NetExtract", "[", RowBox[{"dotp", ",", "\"\\""}], "]"}], ",", RowBox[{"NetExtract", "[", RowBox[{"dotp", ",", "\"\\""}], "]"}]}], "]"}]], "Input", CellID->490945357], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "4.334064424037933`"}], ",", "2.7676755487918854`"}], "}"}]], "Output", ImageSize->{137, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->248686065] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Reshape Layer", "Section", CellChangeTimes->{{3.688342255870318*^9, 3.6883422648220787`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"reshape", "=", RowBox[{"ReshapeLayer", "[", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], "]"}]}]], "Input", CellID->1012209005], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["ReshapeLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dimensions\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dimensions\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"tensor\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"matrix\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"2\"", "\"2\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{283, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->346122736] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"reshape", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}], "]"}]], "Input", CellID->1868793055], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1.`", ",", "2.`"}], "}"}], ",", RowBox[{"{", RowBox[{"3.`", ",", "4.`"}], "}"}]}], "}"}]], "Output", ImageSize->{135, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->256626571] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"reshape", "[", RowBox[{"{", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}]}], "}"}], "}"}], "}"}], "]"}]], "Input",\ CellID->1317188876], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1.`", ",", "2.`"}], "}"}], ",", RowBox[{"{", RowBox[{"3.`", ",", "4.`"}], "}"}]}], "}"}]], "Output", ImageSize->{135, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1383435648] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Total Layer", "Section", CellChangeTimes->{{3.6883796172516336`*^9, 3.688379620871242*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"total", "=", RowBox[{"TotalLayer", "[", "]"}]}]], "Input", CellID->1295468126], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TotalLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox["\<\"none\"\>", StripOnInput->False, GraphicsColor->GrayLevel[0.5], FontColor->GrayLevel[0.5], $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5]], "SummaryItem"], ""} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox["\<\"none\"\>", StripOnInput->False, GraphicsColor->GrayLevel[0.5], FontColor->GrayLevel[0.5], $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5]], "SummaryItem"], ""}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"list of \"","\"tensor\"","\"s\""}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"tensor\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", GeneratedCell->False, CellAutoOverwrite->False, ImageSize->{249, 46}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->2017324128] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"total", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"4.4", ",", "5", ",", "6", ",", "7"}], "}"}]}], "}"}], "]"}]], "Input", CellID->1142513639], Cell[BoxData[ RowBox[{"{", RowBox[{"5.4`", ",", "7", ",", "9", ",", "11"}], "}"}]], "Output", ImageSize->{101, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1523112335] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"total", ":=", RowBox[{ RowBox[{"Total", "[", "#", "]"}], "&"}]}], ";"}]], "Input", CellID->2111771107], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"in1", "=", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"in2", "=", RowBox[{"{", RowBox[{"4", ",", "5", ",", "6"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"TotalLayer", "[", "]"}], "[", RowBox[{"{", RowBox[{"in1", ",", "in2"}], "}"}], "]"}], "\[IndentingNewLine]", RowBox[{"total", "[", RowBox[{"{", RowBox[{"in1", ",", "in2"}], "}"}], "]"}]}], "Input", CellID->500363085], Cell[BoxData[ RowBox[{"{", RowBox[{"5", ",", "7", ",", "9"}], "}"}]], "Output", ImageSize->{61, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->639200774] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Softmax Layer", "Section", CellChangeTimes->{{3.688379625499633*^9, 3.6883796329808397`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SoftmaxLayer", "[", "]"}]], "Input", CellID->1505571084], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["SoftmaxLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"positive integer\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"positive integer\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"vector\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"vector\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{328, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->806005521] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"SoftmaxLayer", "[", "]"}], "[", RowBox[{"{", RowBox[{"0.1", ",", "4.5", ",", RowBox[{"-", "0.2"}], ",", "3.3", ",", "5.4"}], "}"}], "]"}]], "Input", CellID->333396187], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.003246109699830413`", ",", "0.2643984854221344`", ",", "0.0024047777988016605`", ",", "0.07963528484106064`", ",", "0.6503154039382935`"}], "}"}]], "Output", ImageSize->{387, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->863722084] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"softmax", "[", "x_", "]"}], ":=", RowBox[{ RowBox[{"Exp", "[", "x", "]"}], "/", RowBox[{"Total", "@", RowBox[{"Exp", "@", "x"}]}]}]}], ";"}]], "Input", CellID->1706483685], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"{", RowBox[{ RowBox[{"-", "1.2"}], ",", "0.3", ",", "1.42"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"softmax", "@", "data"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SoftmaxLayer", "[", "]"}], "@", "data"}]}], "Input", CellID->811005725], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.052036141281390086`", ",", "0.2332098056433733`", ",", "0.7147540530752365`"}], "}"}]], "Output", ImageSize->{213, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->754728544] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Summation Layer", "Section", CellChangeTimes->{{3.688381255025642*^9, 3.688381260251141*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"sum", "=", RowBox[{"SummationLayer", "[", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "4", "}"}]}], "]"}]}]], "Input", CellID->1122403174], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["SummationLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dimensions\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", "4", "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dimensions\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", "4", "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"vector\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"4\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"scalar\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{286, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->369507319] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"sum", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", RowBox[{"-", "0.3"}]}], "}"}], "]"}]], "Input", CellID->278164154], Cell[BoxData["5.699999809265137`"], "Output", ImageSize->{26, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1175118399] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"sum", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", RowBox[{"-", "0.3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"0.1", ",", "0.2", ",", RowBox[{"-", "0.23"}], ",", "2.3"}], "}"}]}], "}"}], "]"}]], "Input", CellID->1038559828], Cell[BoxData[ RowBox[{"{", RowBox[{"5.699999809265137`", ",", "2.369999885559082`"}], "}"}]], "Output",\ ImageSize->{80, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->144828869] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"sum", "[", "data_", "]"}], ":=", RowBox[{"Total", "[", RowBox[{"data", ",", "Infinity"}], "]"}]}]], "Input", CellID->733790170], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"{", RowBox[{"{", RowBox[{"{", RowBox[{"2.2", ",", "3.4", ",", "4"}], "}"}], "}"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SummationLayer", "[", "]"}], "@", "data"}], "\[IndentingNewLine]", RowBox[{"sum", "@", "data"}]}], "Input", CellID->129330514], Cell[BoxData["9.600000381469727`"], "Output", ImageSize->{26, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1277456163] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["En(De)coders", "Section", CellChangeTimes->{{3.6883279797291403`*^9, 3.688328002996376*^9}, { 3.688331581441991*^9, 3.688331595405761*^9}, {3.6883395373577414`*^9, 3.6883396070377197`*^9}}], Cell[CellGroupData[{ Cell["The Scalar decoder", "Subsection", CellChangeTimes->{{3.688339547437419*^9, 3.688339552067986*^9}, { 3.688384995473065*^9, 3.688384996307343*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"enc", "=", RowBox[{"NetEncoder", "[", "\"\\"", "]"}]}]], "Input", CellID->1446305602], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["NetEncoder", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ GridBox[{{ TagBox[ StyleBox[ TemplateBox[{"\"Type\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ "\"Scalar\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ GridBox[{{ TagBox[ StyleBox[ TemplateBox[{"\"Type\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ "\"Scalar\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{182, 33}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1081552711] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"enc", "[", "Pi", "]"}]], "Input", CellID->971407122], Cell[BoxData[ RowBox[{"{", "3.141592653589793`", "}"}]], "Output", ImageSize->{68, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->2051087927] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"enc", "[", RowBox[{"Range", "[", "10", "]"}], "]"}]], "Input", CellID->755574187], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", "1.`", "}"}], ",", RowBox[{"{", "2.`", "}"}], ",", RowBox[{"{", "3.`", "}"}], ",", RowBox[{"{", "4.`", "}"}], ",", RowBox[{"{", "5.`", "}"}], ",", RowBox[{"{", "6.`", "}"}], ",", RowBox[{"{", "7.`", "}"}], ",", RowBox[{"{", "8.`", "}"}], ",", RowBox[{"{", "9.`", "}"}], ",", RowBox[{"{", "10.`", "}"}]}], "}"}]], "Output", ImageSize->{405, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1139809754] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["The Boolean decoder", "Subsection", CellChangeTimes->{{3.688339547437419*^9, 3.688339552067986*^9}, { 3.6883850555897703`*^9, 3.688385057042735*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"enc", "=", RowBox[{"NetEncoder", "[", "\"\\"", "]"}]}]], "Input", CellID->1978013041], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["NetEncoder", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ GridBox[{{ TagBox[ StyleBox[ TemplateBox[{"\"Type\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ "\"Boolean\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ GridBox[{{ TagBox[ StyleBox[ TemplateBox[{"\"Type\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ "\"Boolean\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{190, 33}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->280962716] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"enc", "@", RowBox[{"{", RowBox[{"False", ",", "True", ",", "False", ",", "False"}], "}"}]}]], "Input", CellID->1076605493], Cell[BoxData[ RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0"}], "}"}]], "Output", ImageSize->{79, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1171689112] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["The Class decoder", "Subsection", CellChangeTimes->{{3.688339547437419*^9, 3.688339552067986*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetGraph", "[", RowBox[{ RowBox[{"{", RowBox[{"Ramp", ",", RowBox[{"SoftmaxLayer", "[", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", "\[Rule]", "2"}], "}"}], ",", RowBox[{"\"\\"", "->", " ", RowBox[{"NetDecoder", "[", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}]}], "}"}], "]"}]}]}], "]"}]}]], "Input",\ CellID->266188320], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnc9vItcdwKftpcf+C70jn3tCQuqlK5SVtqq0SL5k1DgqWqVoslE1kg/E cqwiOIRRD5NIFJXUqWXLytKusRLiGEFJZh2gCFOZNLM1W0JnATMbzy6hGw7b 73sDGBvwz+GHZ78fsewwvHm8N3w/7/vewLI/ZX97a+6HDMO8+WO4u/Xq72wc 9yr/y5/Ag1+98eZvXn/jtV//4o27r73+Gvcz9kew81X48/MfMAzZfoEgCDI1 NJtNVVUVRSkjiEmB8IYgh1CftG0jBHp3cHAA3dQ0rYEgJgXCG4IcQt3EOj95 8uTbb7+d9JlGkHEAoQ4BP2nnRkW9Xn/27NmkzzGCjAMIdQj4STs3Kg4PDyd9 ghFkfEDAT9q5UYEuIy8V6DKCmAN0GUHMAbqMIOYAXUYQc4AuI4g5QJcRxByg ywhiDtBlBDEH6DKCmAN0GUHMAbqMIOYAXUYQc4AuI4g5QJcRxBygywhiDtBl BDEH6DKCmAN0GUHMAbo8zfw3G/G+4wU+elCcdFsuA7Z/nKDLU8zBX73vPqjA 3w/c7g8rk27NxcH2jxV0efqpZFfdf/js+v5eP7Z/PKDLU04ptep2v/evJ5Nu x2XB9o8Nc7ncSq+JHo8nuFV8YQqXSw8+dHs/Kk26GZcG2z9OdJebxbjf4/GL 4XJr0jpeiap/diFXVVWNdOPau6w9/KPb7fa++673nXfe++Rg0s25MNj+8dLO yy1N1aph3rWlTtjGq6GKLrHbg2vvMoJchN45tuTn49ff5WrnAbqMvFSgy+dH UZRAILCwsAD3sG1s5b0cHBxUKsZ/BlIsHr71lvzKK3m4h23D6+8yovY/qTVy m/+T/vwc7mF7dIyo/aOOn5G73GpqmmbgKlwOezyb8pAnR+syvAXuDrBtbOUn yGQyW1tbu7u7BgYVKHzjRl6/wbZR1Q5kFO0Hhb/44Hv9BttGVTuQUbR/1PEz 1OVm+ibDeOK6GZo4w/jT2mmOtYpry/Hj/5dzMy66mDYzYrx4cXEHkPbMMAvS kCdH6zKMqN334u233/5sxEQikb9R7t+///HHH1+9Qrt9t+sybF+9wtMxvP2f f3DkMmxfvcLTMbz9EDPd+IFYMjY4G2e5zMx4qBqaf4bxpE/N2eU1UL/Xdnlt DioISsVmq5lbW3AFc5dy9yRpv23GT6tq9Wf78eXl999/vzJKvv76642NDQih L7/88uHDh4bUyXFfdV2GbUPqHMYo2v+P+42uy7BtSJ3DGEX7IWYmmJcBfrMM D45c1vb8czY91/LLaaqTtuxq75khMDNzy1pLhpQ8u7zXL2MuyAelvU3PrH7E Jv0YrCituW7O6JUsrOXIruYef3NODC7oe+fEdtLP+W3MnN8/R3fPzMXLvXMB 86yXYXZn+EuMc708ivaPc708ivZPbL3cTNuY2fCmh2Fc1RdNse1yFR7bPJuw 1VLTkHf9OZKK1Wp1b5MHC/eq1XK5WK5qLzTJxszotWlVitpO2jmRDBK2hTW5 Wi3uySrxtrXlX1iWirBZlkR4lnw0ppHBZMYV3KuqxfQy7PTTwUQ/XIzLmlYM zsLEIT02lxFkmjnVZVuuqS3bGFc4HbxJXG7uBcGjWU8wKIrBYJAshjsqNXN+ sO1ojk0Pl8hjLdjOwH71KLGG+9J1cy++5uFdc7O2tra0hnQn6266QFuyTD6a Y794sQde24I9E3t0GXl5Od1lCVSSSU6coX5pOZI0PeG4FN8C4pKUltsHaGnP cZdzYDC/1RartSd2nyUyHkum5LoZT6bR/nhObraq7fm87nJ7Tdxam+1xuXN4 TrR1hwh0GXnJOcNlol9rk1zEYkQynS669Dk2XdDKaam7Wm0V16BMmKjdVKvd ybAtnCvTa19QhUcd5rImwVgRJlPs1t6mv5uXb5IluaS1WtUcGU+CdD7f7zLm ZQRpnOVy+2Oo8hZMfEX6oFmOz810PmhiZuNHX+BubvK2zn5eJru1Lf9st+hC uH0dDObYNv9xl+FYj36ljbG5+Fl9GU5dtt1s1zkXTPcfvhfEOTYyNdQr5XKl PrnXv9x3Rcj3P7TmufbT74oMKNoHKdjs+ZhJX7C3aKXnOZ5ggMtJr9Xq3bnE gZXMqnc5c4kDx0hFtDOLsfKkm3EZ5Khg0Yf1297dCQozmHpUYLtpa351cBic P0Iyq8Jy5sLfUZne73BqEpyW+KnfT+nDGJcti8nLHLjIMJc6cExUdgU7iTQh Of2/kNHP7m2G8caKjUYZhiO7OF1jZkaE1t3eKJBBUk6Sa0re5IAB89wRUvGS giZy+YUqbcWrF/v2p3Eu13dYi8VuJanAfncVTmsmeMditVotsOf2vUK9UU+y t0V6uivi7TuxRzt0XLYELz6cjocdgWW9IjskzKadw+K95Q39J7didyHQYxNu Ty+HGTirYuZorlBYZRmrWBkaIQ+DrNVqJ6FkoXOMCrw3Xuo4PeRRRqTp/c7O BacfU+zyJTDQ5aSVsdyTD+k7ZY1W6P75DShQjM4zFm+lErNbFqkVZa/VTgos WixTFWMDqMM8dfE6utxBjkLKsmzI03QlpBKzMNZkj3f1HWiktzw0QipeCzO/ Qb4PH523WLzJSnLROh/Tq6KHlKHAJZZC6PIJ2i7DWbV69UG180bY5/Vpz+EO zPKSj04W2Lns5HyMkCi6ti7Xo16YytqnS+QGURfWLvd6fqezEptvuzw4QkBV e4y6f5gRGIvwEFzWs0A9SV2uXG7INZfLVdF1dFn7qi6fGFThL4GoWo4t6nnZ ytwpkDcqaWesMTrqTtfcbwDX1+X66h2GsS7Sq15T9wFFFN56aBv1ti7HYMRh V3cbQyME1GYE+i7ESKZOViCi2FV4WE6C2l6Sl5mr5uW0uHDNf1dEE2dtcy6X P0z+UeTl3vId/To2HVTp2ewMqvTKEVkuM9ZV8raVg6ylc+XSDhm7HBNgiw1O 12WZ41QE67V0ub4bZHqwe6dt/lO5R+YMbe4u680bFiF/7wmleTI6VZJ3ugdb BYitmEBqC2YutmBu/96XvMm7XDdn5qSLXTeePlqtJkCvmBk7fMMcm1hwWO+t 9LA+yc8TkekCoqFSOezb1xchMNO7DWn6sH7smauHUicvHylgGqZuKoYgo8Rc v6l7DHQZealAlxHEHKDLCGIO0GUEMQfoMoKYA3QZQcwBuowg5gBdRhBzgC4j iDlAlxHEHKDLCGIO0GUEMQfoMoKYA3QZQcwBuowg5gBdRhBzgC4jiDlAlxHE HKDLCGIO0GUEMQfoMoKYA3QZQcwBuoxcIzS1pig17bQiqlJTx9Wc6QJdHgWP H2uZTB3uBz5by4Ycx3BKNSXg5BI1I9tQy0cC4fywZyWB9SWUM+sIsY5AytBm DefwSaP6n+/gfghqVOS6ZyycHdR4Tfbp5/NRPhSIXKHdY+24UaDLhvPpp9Vb t/5540Ye7mG7v0AtG3A4hIJSU0o6itYw3uWU6HCIqWHP1uS8rJya32gpCGkx dabyBlD+6rsHHz7/4oPv4R62+wuoZAB0p0ibtew673D4Sv2F9sPQZ9hfI50P XNHl8XTcQNBlY4FcrIus32C7PztTl09EWttlTUn5nA4HC7clqaRBBC+xTs4J jx1LgZDAkw1e3CYB3VfSzbJ6Sc4XqcFDkqHYP/7p95wowQsUwkvsUgQOLCVE XpSyK75QqqbK20tOp5NlHU5aSaO07uNopc4VaR9aGjgZ0kpEBI9YUsIXVsir 8BLtyX5U4MTEgFbpidQdOWXiC7lYF1m/wXZ/dqYnjZfaA1BN2k5A9fvSipNW z7pD+08KS3rOXlr9C09fcz2bXyHnj6V7QyEf2XDw2/sazFpEOJmkHw5fOKvt bzsd3DaMAkqCczij+49Pdvx4+YZBHTcWdNlYYGrdFVm/Zfr+h6/2HJulkOBa qbVdViE0+fVsg/xHw0sOdkVVU06Hk8RYaRsKRmSNbnApdWBJNgpRquXdDicM CymRZcHiUhSGgVJDpUHP5xtahHMIkpISObiXBHgS5qJaPrISlvbzKxxUChGq yhF4lax60mUVXmxpvUT7wJNX0aJuB7degMeQCEPZbwa1yhHO79dOXePC1Lor sn6DPX2ltFRYYHVzuaVoFvpEKo/I4Iq2LbAszIlpOlY6eRk2UgEnKyTg4IRA tIJGJHwOZygrR0XfCpm01PIrkMqhZCECIwEHA5kvIvcPYn3ljem4saDLxtKf lyuVgXmZTAW1No1OXpYhWFmOwLvdvFssfCNxTprBVYljBSIRtVs6pSTEIU3x WQhjMseuhZxsaDvMc0LAzYmRMOdwF7SG7nJDyQfcNLNxvoRc24bU0qmU592R wjd9ebkUFiH/k0JwDCQmrUBiu5BfpxE+qFXs2XPd8+RlRc4WaEPUmpLdhhPI fpIMOdiQnvW0PAyP4sPOhKc784FuinTZCxs+Mibqp0XSSimRh/mIk4Ok7QzR FioiORGiop/D4x3vL29Ix40FXTac862Xe13WGj152bcNk9uGCnlCiKg1CAka XTWiKtlouzy8ZGe6DnnZQWfXMsk4kDUKCslWDlYkeUp3ORGAbEMOkgJQXSIf IpWSOrSCuCTmVbJsFBLdljb2I27Qh44tJC9TOZQQvSLli0JjTmnVGZy5XiZt cwgFmua0UgIeRL9KgkC0DbT9QqKW6rjczcv6kNW7QYc4yKrOAMmzKsmzZJDM rvAOThA4BxdK6evl3o73lzeq4waCLo+Cs65jrxy/ju1Yyf67vV7e3yYBQqeS gcT+kcI9LkO4pU4p2cnLihSia8Y8rAGh1DokY1UCBVbyJJWRhCUpSnaddbSX v+tZmDnKgU6lfCABq8oVrqeVXOgxfVEWlth0ESpSO0rbS2T2Tvs6vFVnc9Z1 bCUiHLVGCJMJbSEqtl+N9WVr9PqYng0Viafj1+e0m93+wkY25AQr97fJgbQf cEq4mLSiTzNgFODInPnhiY7vHS9PazKs40aBLk8fWq12zo9Iz1/yjEp6Bx31 jEq1409rKchPdE1qaKuGvXhf68ieS70aHKheZDF7svx4O34O0GXkCtToJbV2 nnqZmMaOo8vIldDUCyU38zB9HUeXEcQcoMsIYg7QZQQxB+gygpgDdBlBzAG6 jCDmwMQua5r27NmzSZ9gBBkHEOoQ8JN2blRA754+fTrpc4wg4wBCHQJ+0s6N iufPnz+lYHZGTIyeswAI+Ek7N0Kgdw36b10OEcSk6P9o1twiIwiCIIhp+D99 cmIT "], {{0, 97}, {324, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{324, 97}, PlotRange->{{0, 324}, {0, 97}}]], "Output", ImageSize->{328, 97}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->1055179450] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "[", RowBox[{"{", RowBox[{"0.2", ",", "0.8"}], "}"}], "]"}]], "Input", CellID->1587165754], Cell[BoxData["b"], "Output", ImageSize->{11, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->181014620] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "[", RowBox[{"{", RowBox[{"0.8", ",", "0.2"}], "}"}], "]"}]], "Input", CellID->748128855], Cell[BoxData["a"], "Output", ImageSize->{11, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->573617590] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["The Image decoder", "Subsection", CellChangeTimes->{{3.688339547437419*^9, 3.688339552067986*^9}, { 3.688385025387369*^9, 3.688385026020254*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"enc", "=", RowBox[{"NetEncoder", "[", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"8", ",", "8"}], "}"}], ",", RowBox[{"ColorSpace", "\[Rule]", "\"\\""}]}], "}"}], "]"}]}]], "Input", CellID->1894529386], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["NetEncoder", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ GridBox[{{ TagBox[ StyleBox[ TemplateBox[{"\"Type\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["\"Image\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"ImageSize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"8", ",", "8"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"ColorSpace\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ "\"Grayscale\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"ColorChannels\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Parallelize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["False", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"MeanImage\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["None", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ GridBox[{{ TagBox[ StyleBox[ TemplateBox[{"\"Type\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["\"Image\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"ImageSize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"8", ",", "8"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"ColorSpace\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ "\"Grayscale\"", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"ColorChannels\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Parallelize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["False", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"MeanImage\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["None", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{243, 107}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->473298111] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"enc", "[", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJxTTMoPSmViYGDggOJZM0Fgpz12+qS9iTEIXIbyb9ozgMEDqPhjsvWlp4HA Mwr1vSRb39kzIPCGbH0wmlx9MJpcfajuJ10fjAYAfksAIQ== "], {{0, 8}, {8, 0}}, { 0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag["Real", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{8, 8}, PlotRange->{{0, 8}, {0, 8}}], "]"}]], "Input", CellID->238982094], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ "0.1`", ",", "0.1`", ",", "0.1`", ",", "0.2`", ",", "0.30000000000000004`", ",", "0.4`", ",", "0.5`", ",", "0.6000000000000001`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.1`", ",", "0.1`", ",", "0.2`", ",", "0.30000000000000004`", ",", "0.4`", ",", "0.5`", ",", "0.6000000000000001`", ",", "0.7000000000000001`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.1`", ",", "0.2`", ",", "0.30000000000000004`", ",", "0.4`", ",", "0.5`", ",", "0.6000000000000001`", ",", "0.7000000000000001`", ",", "0.8`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.2`", ",", "0.30000000000000004`", ",", "0.4`", ",", "0.5`", ",", "0.6000000000000001`", ",", "0.7000000000000001`", ",", "0.8`", ",", "0.9`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.30000000000000004`", ",", "0.4`", ",", "0.5`", ",", "0.6000000000000001`", ",", "0.7000000000000001`", ",", "0.8`", ",", "0.9`", ",", "0.9`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.4`", ",", "0.5`", ",", "0.6000000000000001`", ",", "0.7000000000000001`", ",", "0.8`", ",", "0.9`", ",", "0.9`", ",", "0.9`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.5`", ",", "0.6000000000000001`", ",", "0.7000000000000001`", ",", "0.8`", ",", "0.9`", ",", "0.9`", ",", "0.9`", ",", "0.9`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.6000000000000001`", ",", "0.7000000000000001`", ",", "0.8`", ",", "0.9`", ",", "0.9`", ",", "0.9`", ",", "0.9`", ",", "0.9`"}], "}"}]}], "}"}], "}"}]], "Output", ImageSize->{579, 68}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->464960671] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Embedding Layer", "Section", CellChangeTimes->{{3.6883796366101637`*^9, 3.6883796474982433`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"embed", "=", RowBox[{"EmbeddingLayer", "[", RowBox[{"2", ",", "5"}], "]"}]}], ";"}]], "Input", CellID->28659104], Cell[BoxData[ RowBox[{ RowBox[{"embed", "=", RowBox[{"NetInitialize", "[", "embed", "]"}]}], ";"}]], "Input", CellID->637224000], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"embed", "[", "2", "]"}]], "Input", CellID->322820411], Cell[BoxData[ RowBox[{"{", RowBox[{"0.6818026304244995`", ",", RowBox[{"-", "0.2418440580368042`"}], ",", "0.4406326711177826`", ",", "0.7267237305641174`", ",", "0.3782007396221161`"}], "}"}]], "Output", ImageSize->{360, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1833585854] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"embed", "=", RowBox[{"EmbeddingLayer", "[", RowBox[{"2", ",", "3", ",", " ", RowBox[{"\"\\"", "\[Rule]", " ", RowBox[{"NetEncoder", "[", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"True", ",", "False"}], "}"}]}], "}"}], "]"}]}]}], "]"}]}]], "Input", CellID->583614141], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["EmbeddingLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"ClassCount\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["2", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"OutputDimension\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"ClassCount\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["2", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"OutputDimension\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Arrays:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"matrix\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"2\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"encoded\"","\" \"",TemplateBox[{"\"index\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"range\"", "\":\"", "\" \"", TemplateBox[{"1", "\"..\"", "2"}, "RowDefault"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"vector\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{313, 62}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1863623067] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"embed", "=", RowBox[{"NetInitialize", "[", "embed", "]"}]}], ";"}]], "Input", CellID->507265598], Cell[BoxData[ RowBox[{"embed", "[", RowBox[{"{", RowBox[{"True", ",", "True", ",", "False"}], "}"}], "]"}]], "Input", CellID->1636469584] }, Open ]], Cell[CellGroupData[{ Cell["Visualization of nets", "Section", CellChangeTimes->{{3.6883279797291403`*^9, 3.688328002996376*^9}, { 3.688331581441991*^9, 3.688331595405761*^9}, {3.688339454224779*^9, 3.6883394623544493`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetGraph", "[", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "Ramp", ",", "4", ",", "Ramp", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"1", "\[Rule]", RowBox[{"2", "\[Rule]", RowBox[{"3", "\[Rule]", RowBox[{"4", "\[Rule]", "5"}]}]}]}], "}"}]}], "]"}]}]], "Input", CellID->1765745841], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnd9vIud6x0dtL3rZf6H3yNe9QuKyETorpapkFF8ko8ZHB61yLM4eVUiO NLFsqwhfLGgvZiOxqJa8smxZWfbEWFmO1w4u0qyDEcJ0TTe4JiEsGTDjeLII RVxsn3cGMAZsY5tf434/2pBheOed532Z+X7f533H9j/yf/xw8m84jvvT39PL h5/8u8Xh+MT5L/9Ab/71sz/94fefffpv//zZg09//6njn/i/pZ2f0H9/R+XZ 9nsAAADgTlCpVBRFyefzOQAAAG2QPJJIklQOW637CLXu+PiYmqmqahkAAEAb JI8kkiSVd9gOTk5Ofvnll2H3NAAAjDoklSSYw9bsflEqld69ezfsPgYAgFGH pJIEc9ia3S9OT0+H3cEAAGAMSDCHrdn9Al4AAABdAi8AAAAALwAAAAAvAAAA AC8AAAAALwAAAAAvAAAAAC8AAAAALwAAAAAvAAAAAC8AAAAALwAAAAAvAAAA AC8AAAAALwAAAAAvAAAAAC8AAAAALwAAAAAvAAAAAC8YVU72Iy+jb96+fRN/ /fb4MBqO7GeHHdK1eRsPuufcxFevMsOO5SYYPX6Nt189fBQ/HnYUN8fA8cuv Xzycc8/NPXzxWh52LFcDLxhV3oZfxNWzt9mXL/aHF8zNOH7ufviKboLjV4Lw 1AA3QytGj5+x//yRIDw0qJaWDR5/9OmjFzSCk8PuRy/Vq4sPGXjBqKIeH580 v5XfGvN+oFshviIY4V64COPGf/Im+PBpJBpciRrTyYwefzbyRJh7/HhOeBw2 QF4JLxhV5OirN81v49E3F5YdYbLRFUF4/Obk6pKjiZHjP3wsCOHDbOTp4xev 3w47mBtg9PiPg4/cX0UPM/Hn7kfB0R/J3S0vqO6tii6Xy7+ZeW94LzjJZJov HzVzaLzbIfvqqeD+ynjrHHWMHf9JJrjCeOyee7TyynhuZvT4y/LK3KN9lk9m nrhXRv/u1b2gkgl7XC6PGMhVhy3nt6LgmZhJFBRFZc0wuBe8ff7kaTRzLL/Z fyMfZ+Ivnj6PDzuka6IePhEEwf3woXtu7vGL0R8XtWL0+Ou8fv7UoPPtOsaN /83LRWGOXT9PXrwedixXU8sLqqqiFgLOqU1lyGp+OxRxSmy0wOBeQFqkntCg ovZyYsT5agD+v3Nyft1vhGmeI5I8zrDxvaBQf2N4LwAAgEEBL+iefD7v8/lm ZmbolbZ7W3kzx8fHstz7Jyd+/PFHQRAmJibolbZ7Xn+DPsWfyZz++c/p3/0u Sa+03fP6G6D/O4L+75I+xd9v/em7F1Qrqqr2cBUiHXC5NtIXfNhfL6CvQKhD 272tvIVYLLa5ubm/v9/Di4rCttWh7V5V25F+xE8S9MEHSf0fbfeq2o6g/9tB /3dPP+Lvt/5c6AWVvXsc5wrryqqKY5xnT71Mo6uZ1aVw5dyuSlic4mqMieHM 9YW/A3uuMW5GuuDD/noBOXLju/jiiy9e9plgMPgXja+//vqbb765fYUfffRR 416g7dtXeDk9j99q3W9oEW3fvsLLQf+3gP6/Fj2PnzSnoT+kRb0Vt/JVXsCN uTRpVT1jnGvv0pwht0rW0ewW6dVJqsAvZSrVSmJ1ZsqfuJH2t7LnsYx5tKqq 7dnG4PKCL7/8Uu4n33///fr6Ol1C33333eHhYU/q/Pzzzxv3Am33pM6L6Ef8 Dsf/NLSItntS50Wg/9tB/3dPP+InzRliXkA4N3L05swL1APPpEUf6zuX9jQ5 VpemanvGGNzY5JJaTVNKMLF00C7mCb/TLx1suCb0Iza0x1gz0urUvTG9kpnV BNtVOXDemxT9M/reSbGWdCQ8Fm7S45nUdo9NhnPNucjdWS+g7LLnpxjkfGk/ 4h/kfDX6vx30f5f0Kf6hrRdU9izcRGDDxXFThfcVseYFBXpvcW3QVlXZo3G/ J8FSAaVQONhwkoofFAq5XCZXUN+rkoUb02tTCxpKLWlIiMxkLDOr6UIhc5BW mO5XNz0zS1KGNnOSSJ+yR1tVZkZjU/6DgpLZW6KdHs2M9MPFcFpVM/4JSlz2 BuYFAABwV7nUCyyJirpk4aYCe/57zAsqB37S4QmX3y+Kfr+fLQbUpbiS8JBa n80RaYdL7L3qr2UAHuVsYB9oSxcqB+FVl3NqcsJSk32thr36qH9jimSfLROc zRG9f39AvmDxN01MwQsAAOAmXO4FEklxmo3JxzR9VhNs0O4KhKXwJhGWpL10 7QB1z3XeCxLkAM7NmjBXD8TGp0zMzw3m2bqzk00DecKJdKVaqM1H6V5QWxOo rk40eUH98IRoaVgMvAAAAG7MFV7A5Lu6wRaBOZFNB2Wm9DkibUI/vSc1Zuur mVUqE2DWUFEKjckcSyCR09aOqQqXcpEXqBJ5TYBNEVUPNjyNvOAeW5KQ1Gq1 kGB+5Nfmo9q9AHkBAADcksu9oPYYaW7TQl6gvankwpNj9QdFuYnw2S8wqmw4 LfX9zjTbrW56JhpFZwK1deSEx2LxnPcCOtalr1RzlinnhL4MoXmB5V6tzkn/ XvvhB37MEQEA7gQlOZeTS8M7/81+1oz9/Jha6Wq/9rNmHYq2wQpWmh4T1Rcs qlql3RzP6IEXRNxms3v3BgfKsRX3UuwGBw4QWbRys9u5YYdxE9Ihr0kfFoy7 94d4w9yUzLaoxz8+u27A8Gvseq3m2ciwo7gJ8m6t/wlvZNRugVLIyzeGzdMr nWWke4WJrXiXYtf+GbfR/R0UqkTdEr7059va6I0XmG50tUdmOW6UbxN532vV bwQj/l2Q/XGOc29nyuUc2ZlVHHHPbYfFP0vxn+7fp4bsGvErKJdi7NERs3uE L/KLYWO82fVMJpNKpTLyaM0YxES6OsbXU8yh0hG2Juvu5FZdK4zsZgXvkBe8 V6TNcOF6v72id15Q2uVNJquZDSWsD1aoW2P++yaz2WyiPePPUqVyKcKPi1p3 y+L4/e0fdjVfN/mvb8eDYdfL826Rv+AyG3VOM8+W1vU/DbX9gKnqkOO5NnIs ohnAaWqa7NiIXnAaI8F6MD1uNV7nEyUaQox7V9afPYukRqzzT2N0V4qxs2Qx tcJzZlG+UGEO/bzZbGVSZNJyZJnubd2gtUN+iIlaenF/95r55wh7wQ3ooRdE zJzpWfpU+6bMIVnbP71OBTKhac7kluVtq2lWU9Wc22xlBWZNplG/TUpeEw0Y DOgFddIhGvKY1tOjNa7rEhpXa9MUVgN+A6UlnuNX0uV9ryHniE5TNIIw3Xcv +d30Fdx/lhp2QE3I2ybOHGnS7dIuXeTu3IUKI1MbptfZ74MKTZtM7ogcmTVP b+tVaYfkqMANpoLhBS3UvIB61ezWTbn+RVin9bTrdNdKt/MPrQV2bzq5NEDY VWRYLyiF3DQytRrUCBoX4/Ys3ckjPmZoRWbqxM36l7wPrJz5/tJ2f38xXT84 LdW+gByN5az+EVqyKZGecM+a/h6yvD1d84LOCkNSb93WGnAa83Im7yF5gT4K LUU0L5BvNuS7W15QEKfOHiu6rRe0mDL9z8ukPrc9q+cFZu4+G17IEbo9tjXX Hvm5C+N6QWnlPseZZ7VVYwM+IMbSTE6f5GJjuVEfM7RymtsPrYfW10Mrbt40 Pru9b7RL6Hz/j5oXh0g66NrWdL+U3qYRD7+yX75QYcgaasvf2yxTiMikSPwK vc1FyBrcLC/gbpsX7IkzBv+7Zqo4YZmcmvIE2C+1vplk7OrPEWmmrPVm3ZS1 lVe2XMCZV9jXlvPzjQcTrJQx5La9tMX7R3lZU/aaDekFpX0/14TVgMuXsaUH 7Pphl8/0rvG+gRqlXbfVaEams9vof+vs6D2HJj9jOW+NB0t6D1+kMP/VJEXT rC1y5H7jYLOXtGnby2rzx67XztrfO05vOKem7o1NStd7bmf0qFYrhLbi3Nvh Y2TWylS0kWrqvVca5vPAwGDQ5YLrZYiMeP+z8FqfcOqkMDm3eZzShNPSuU9u L0X1vOBMQu8MBpxKAACA4dA8R3THgBcAAECXwAsAAADACwAAAMALAAAAwAsA AADACwAAAMALAAAAwAsAAADACwAAAMALAAAAwAsAAADACwAAAMALAAAAwAsA AADACwAAAMALAAAAwAsAAADACwAAAMALAAAAwAsAAADACwAAAMALAAAAwAsA AADAC8BQkGU5kUjQa8dPi/FF2xl2XyjZuVgy6AvQR8VlR3PxeSmrFqOi3Std GUYx6rPxi8VbNaVbfv5ZjcVK9No5knNNZs2Qinmf3bHT0+DqPdYZycsv7OSv rGORt/mig+kzMDjgBWDwfPvttx9//DHpHb3SdnuBYtxns3lT+WI+n42HRCq5 nOwgPlH6RIzq6rQQShWpeD69Nm+zOQM/dekF7ES+AejaX/9a+PDD//7ggyS9 0vYFkWhNzurk1XLvvaDeY50pppPpfGerai5FvS1Gr7QMYDDgBWDAUC6gG4EO bbdnBy0SLYm8jYRdPVqet2sH8Ys7R2UlLmjba8kffDRSjddETGF65/tB9wIl KjiXtXqKy855qVhW0lvzdrud52vpQ5sXJIN0Mp4+t9kX4vnimtPu03XvKOSw +7Ll7NoCJSHs42XpiKpdE3gtpPnUxSJKuYBuBPo/2m7PDjq5Us0L1Hx0wa6d k2cxU8PnebvDzs4771v0OtmGU9yiGttLCjyvl3QsBIv1Hnvyn//hEJlRpgLz /HyQDszuiE5Rii8vLEaLLV1Ubmuyr9UL8kHRSQW0Pgvk2VmcUlHvM69D3OkQ lf7dC0GliwsGDAZ4ARgwiUTi/GSIjfa0lGkRRoW9FSM+u20+xBTvaIt0Klqk US7PM00rLtptvLDgE0XRy2RmPpCqzREVJQcvarJV01XJSx8HSV+TweWAdNSq wGpKFBY0nSMXIP/JHwXnbY61sjZ/Yl+MJ5cdNucalVfSQdLXuMIGyUIgXixe NnyPxUoNI9D/0Z62JmtzRLwGE3eyMD1mZdlO54xTmXRo3sYvK0rUbrNvZUmk t6hgMK1qG46o0rEkHzpSqbmCzb7T6LFsiHohW2bl6UzJshp0sMZGRQe9tnRR e5NbvEChk82vZbU2ONlZ1JBAfZai9+TKi/GfOkVlCySPisUrcxAwOOAFYMC0 5wWFQuucSYtEp4M00gw8tdvEuD6QVJZZopCP++y8PkdEarMYikalnR0plWXH nXmBXa+nWJtvySd9gpZcOBZ20sW20bgaD4g0JLY7HFSIzYqrSaeN30pHBRu/ ky9v0QCXdzCcgtMpBFMZqla6ahqnPS+Q5Y55gUiKqtYo1/0r7eUb5xScgpj6 qd4ohZzOy0RYcwfpkpL15jf1GL+4FXA6vD7BIQYDDptAeY3uBS1d1Nbkn9ry gmxApPyDFaJjqDfU1DK1JZVco9d8uVNU/CDm5cC1gBeAwdPdeoEujEo2GSJh EqVslM0U7bCP85JdU2a2R8sLmDrFz6lLwwsol0hr7x1MLcs7voVlTcckyjIW dloV+IiGvnZtXbS4RkPlHSa00UW2Ms0vhGg7Sa6zsMVOQBnEvJhUup3S7269 oNkL1HJTXrCwdURllFRw3htUGsmO5nRso+YFF5esp0X1HiN7nWcpwVoqz6bU bLzIOlb3gpYuamsyS4W0nqmFeUROra+/KywvYAlLOa/1mW0hdFQuXxIVGCHg BWAoXOs5osWtFNurpEQ2XGUzKAsBNueQl1gxYe279tXMoqZrVKQ+n8+GuSTy +fgab6vNba/F8y1P7yxGD3xsatxOOHibXZNNbUbFtpzUUhI17XPUYnD6dq61 vHvVc0TLLVNny/H/ra0XHG3Vz2nz7RydWUCTFzi01l1Ysp4X1HssWc7vUKk1 SgYUssta66jPRCnf0kVtTT7/1JZj8WftpPU+I6thJ8xusSX8pNbWi6MCIwS8 ABgLpVhUrjnNrCrF82uUavHSqWrl/KfZ6KI213GuQHHQq55q1+fsvuQVlTR3 wlVNVs9/rLJkSk/iehkV6CPwAgAuIa5Ndvik7LADMRBFbUnaIWHobyjgBQBc iqpgOHtdqM/wiJDRgBcAAACAFwAAAIAXAAAAgBcAAACAFwAAAIAXAAAAuMNe oKrqu3fvht3BAAAw6pBUkmAOW7P7BbXu119/HXYfAwDAqENSSYI5bM3uF7/9 9tuvGsgOAACgI/qYmSDBHLZm9xFqXVn7dYqnAAAA2tB/PfrdNgIAAAAAAADA Lfk/E0iZpA== "], {{0, 97}, {516, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{516, 97}, PlotRange->{{0, 516}, {0, 97}}]], "Output", ImageSize->{520, 97}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->254112871] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetChain", "[", RowBox[{"{", RowBox[{"2", ",", "Ramp", ",", "4", ",", "Ramp", ",", "8"}], "}"}], "]"}]], "Input", CellID->1108115180], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetChain", RowBox[{"[", PanelBox[ DynamicModuleBox[{NeuralNetworks`NetChain`PackagePrivate`grid$$ = Grid[{{ MouseAppearance[ Annotation["", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Input", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["vector", {"Inputs", "Input"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["1", GrayLevel[0.5]], {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"2"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "1"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["2", GrayLevel[0.5]], {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"2"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "2"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["3", GrayLevel[0.5]], {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"4"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "3"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["4", GrayLevel[0.5]], {"Layers", "4"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "4"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"4"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "4"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["5", GrayLevel[0.5]], {"Layers", "5"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "5"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"8"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "5"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation["", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Output", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"8"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Outputs", "Output"}, "Mouse"], "LinkHand"]}}, Alignment -> Left, Spacings -> 1.1], NeuralNetworks`NetChain`PackagePrivate`assoc$$ = Association[ "Type" -> "Chain", "Layers" -> Association[ "1" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {2, NeuralNetworks`SizeT}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {2}]]], "Parameters" -> Association["Size" -> 2, "$InputSize" -> NeuralNetworks`SizeT], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, NeuralNetworks`ListT[1, NeuralNetworks`SizeT]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {2}]]], "2" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {2}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {2}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {2}]]], "3" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {4, 2}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {4}]]], "Parameters" -> Association["Size" -> 4, "$InputSize" -> 2], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {2}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {4}]]], "4" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {4}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {4}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {4}]]], "5" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {8, 4}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {8}]]], "Parameters" -> Association["Size" -> 8, "$InputSize" -> 4], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {4}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {8}]]]], "Connections" -> { NetPort["Layers", "1", "Inputs", "Input"] -> NetPort["Inputs", "Input"], NetPort["Layers", "2", "Inputs", "Input"] -> NetPort["Layers", "1", "Outputs", "Output"], NetPort["Layers", "3", "Inputs", "Input"] -> NetPort["Layers", "2", "Outputs", "Output"], NetPort["Layers", "4", "Inputs", "Input"] -> NetPort["Layers", "3", "Outputs", "Output"], NetPort["Layers", "5", "Inputs", "Input"] -> NetPort["Layers", "4", "Outputs", "Output"], NetPort["Outputs", "Output"] -> NetPort["Layers", "5", "Outputs", "Output"]}, "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, NeuralNetworks`ListT[1, NeuralNetworks`SizeT]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {8}]]], NeuralNetworks`NetChain`PackagePrivate`opart$$, NeuralNetworks`NetChain`PackagePrivate`part$$, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Null}, DynamicBox[ToBoxes[ Column[{ EventHandler[ NeuralNetworks`NetChain`PackagePrivate`grid$$, "MouseClicked" :> If[ ListQ[ NeuralNetworks`NetChain`PackagePrivate`part$$ = MouseAnnotation[]], If[NeuralNetworks`NetChain`PackagePrivate`opart$$ === NeuralNetworks`NetChain`PackagePrivate`part$$, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Null; NeuralNetworks`NetChain`PackagePrivate`opart$$ = Null, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Part[NeuralNetworks`NetChain`PackagePrivate`assoc$$, Apply[ Sequence, NeuralNetworks`NetChain`PackagePrivate`part$$]]; NeuralNetworks`NetChain`PackagePrivate`opart$$ = NeuralNetworks`NetChain`PackagePrivate`part$$; Null]; Null]], NeuralNetworks`NetChain`PackagePrivate`fmtSelected[ NeuralNetworks`NetChain`PackagePrivate`selected$$, NeuralNetworks`NetChain`PackagePrivate`part$$]}, Spacings -> 1], StandardForm], ImageSizeCache->{183., {47.9169921875, 53.0830078125}}, TrackedSymbols:>{NeuralNetworks`NetChain`PackagePrivate`selected$$}], DynamicModuleValues:>{}], BaselinePosition->Automatic], "]"}]}], False], Deploy], LineBreakWithin->False]], "Output", CellChangeTimes->{3.688340393098197*^9}, ImageSize->{271, 122}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetGraph", "[", "%", "]"}]], "Input", CellChangeTimes->{{3.688340384551785*^9, 3.688340386108452*^9}}], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetGraph", "[", PanelBox[ TagBox[ DynamicModuleBox[{NeuralNetworks`NetGraph`PackagePrivate`selection$$ = None, NeuralNetworks`NetGraph`PackagePrivate`outIndex$$ = 6, NeuralNetworks`NetGraph`PackagePrivate`inputs$$ = Association[ "Input" -> NeuralNetworks`TensorT[1, NeuralNetworks`ListT[1, NeuralNetworks`SizeT]]], NeuralNetworks`NetGraph`PackagePrivate`outputs$$ = Association[ "Output" -> NeuralNetworks`TensorT[1, {8}]], NeuralNetworks`NetGraph`PackagePrivate`labels$$ = { "1", "2", "3", "4", "5", "Input", "Output"}, NeuralNetworks`NetGraph`PackagePrivate`vertices$$ = Association[ "1" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {2, NeuralNetworks`SizeT}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {2}]]], "Parameters" -> Association["Size" -> 2, "$InputSize" -> NeuralNetworks`SizeT], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, NeuralNetworks`ListT[1, NeuralNetworks`SizeT]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {2}]]], "2" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {2}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {2}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {2}]]], "3" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {4, 2}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {4}]]], "Parameters" -> Association["Size" -> 4, "$InputSize" -> 2], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {2}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {4}]]], "4" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {4}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {4}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {4}]]], "5" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {8, 4}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {8}]]], "Parameters" -> Association["Size" -> 8, "$InputSize" -> 4], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {4}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {8}]]]], NeuralNetworks`NetGraph`PackagePrivate`vports$$ = { NetPort["Vertices", "1"], NetPort["Vertices", "2"], NetPort["Vertices", "3"], NetPort["Vertices", "4"], NetPort["Vertices", "5"], NetPort["Inputs", "Input"], NetPort["Outputs", "Output"]}}, TagBox[GridBox[{ { TemplateBox[{TagBox[ GraphicsBox[{{ GrayLevel[0.7], { LineBox[{{-5., 3.061616997868383*^-16}, {-4., 2.4492935982947064`*^-16}}], LineBox[{{-4., 2.4492935982947064`*^-16}, {-3., 1.8369701987210297`*^-16}}], LineBox[{{-3., 1.8369701987210297`*^-16}, {-2., 1.2246467991473532`*^-16}}], LineBox[{{-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}}], LineBox[{{-6., 3.6739403974420594`*^-16}, {-5., 3.061616997868383*^-16}}], LineBox[{{-1., 6.123233995736766*^-17}, {0., 0.}}]}}, { InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-4.4, 2.694222958124177*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-3.4, 2.0818995585505003`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-2.4000000000000004`, 1.4695761589768238`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736765*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-1.4, 8.572527594031473*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-5.4, 3.3065463576978537`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736762*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-0.4, 2.4492935982947065`*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}]}, { GrayLevel[0], { AbsolutePointSize[5], {{ GrayLevel[0.35], TagBox[ PointBox[{-5., 3.061616997868383*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 1), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.29, 0.29, 0.83], TagBox[ PointBox[{-4., 2.4492935982947064`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 2), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.35], TagBox[ PointBox[{-3., 1.8369701987210297`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 3), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.29, 0.29, 0.83], TagBox[ PointBox[{-2., 1.2246467991473532`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 4), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.35], TagBox[ PointBox[{-1., 6.123233995736766*^-17}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 5), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.5], TagBox[ PointBox[{-6., 3.6739403974420594`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 6), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.5], TagBox[ PointBox[{0., 0.}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 7), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}}}}, {{ InsetBox[ FormBox["\"1\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-5., 3.061616997868383*^-16}], Offset[{0, -5.5}, {-5., 3.061616997868383*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"2\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-4., 2.4492935982947064`*^-16}], Offset[{0, -5.5}, {-4., 2.4492935982947064`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"3\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-3., 1.8369701987210297`*^-16}], Offset[{0, -5.5}, {-3., 1.8369701987210297`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"4\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-2., 1.2246467991473532`*^-16}], Offset[{0, -5.5}, {-2., 1.2246467991473532`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"5\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-1., 6.123233995736766*^-17}], Offset[{0, -5.5}, {-1., 6.123233995736766*^-17}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"Input\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-6., 3.6739403974420594`*^-16}], Offset[{0, -5.5}, {-6., 3.6739403974420594`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"Output\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {0., 0.}], Offset[{0, -5.5}, {0., 0.}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}]}, StyleBox[{ InsetBox[ FormBox["\"2\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-4.4, 2.694222958124177*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"2\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-3.4, 2.0818995585505003`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"4\"", TraditionalForm], Offset[{3.3677786976552205`*^-16, 5.5}, {-2.4000000000000004`, 1.4695761589768238`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736765*^-17}], InsetBox[ FormBox["\"4\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-1.4, 8.572527594031473*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}], InsetBox[ FormBox["\"\[DottedSquare]\"", TraditionalForm], Offset[{3.3677786976552195`*^-16, 5.5}, {-5.4, 3.3065463576978537`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736762*^-17}], InsetBox[ FormBox["\"8\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-0.4, 2.4492935982947065`*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}]}, FontColor -> GrayLevel[0.5], FontSize -> 8, FontWeight -> "Thin", StripOnInput -> False]}, DynamicModuleBox[{ GeneralUtilities`Graphics`PackagePrivate`vpos$2545 = {{-5., 3.061616997868383*^-16}, {-4., 2.4492935982947064`*^-16}, {-3., 1.8369701987210297`*^-16}, {-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}, {-6., 3.6739403974420594`*^-16}, {0., 0.}}}, DynamicBox[ Typeset`ToBoxes[ If[ Not[ IntegerQ[ NeuralNetworks`NetGraph`PackagePrivate`selection$$]], {}, { AbsolutePointSize[10], Opacity[0.2, Black], Point[ Part[ GeneralUtilities`Graphics`PackagePrivate`vpos$2545, NeuralNetworks`NetGraph`PackagePrivate`selection$$]]}], StandardForm, Graphics], TrackedSymbols :> { NeuralNetworks`NetGraph`PackagePrivate`selection$$}], DynamicModuleValues :> {}]}, ImageSize -> {426., 25.680000000000025`}, AspectRatio -> Full, PlotRangePadding -> 0, ImagePadding -> {{19.5, 22.5}, {15.5, 10.179999999999998`}}, ImageMargins -> {{0, 0}, {15, 15}}, BaseStyle -> {TooltipBoxOptions -> {TooltipDelay -> 0.08}}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = None), Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]],FormBox[ TemplateBox[{ StyleBox["DotPlusLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["ElementwiseLayer", GrayLevel[0.35], StripOnInput -> False]}, "PointLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TemplateBox[{" ", "\" \"", TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #}, "RowDefault"], TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.29, 0.29, 0.83]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.29, 0.29, 0.83]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #2}, "RowDefault"]}, "RowWithSeparators"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{2, 2}, {2, 2}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"PointLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.35], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.23333333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.35]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.35]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.35], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.29, 0.29, 0.83], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.19333333333333333`, 0.19333333333333333`, 0.5533333333333333], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "RGBColor[0.29, 0.29, 0.83]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.29, 0.29, 0.83]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], RGBColor[0.29, 0.29, 0.83], Editable -> False, Selectable -> False], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", RowBox[{"LegendMarkerSize", "\[Rule]", "12"}], ",", RowBox[{"LegendMargins", "\[Rule]", "2"}], ",", RowBox[{ "LegendLayout", "\[Rule]", "GeneralUtilities`Graphics`PackagePrivate`legendTable"}]}]\ , "]"}]& ), Editable -> True], TraditionalForm]}, "Legended", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> Automatic, BaselinePosition -> {1, 1}]& ), Editable->True, InterpretationFunction->(RowBox[{"Legended", "[", RowBox[{#, ",", RowBox[{"Placed", "[", RowBox[{#2, ",", "Below"}], "]"}]}], "]"}]& )]}, { DynamicBox[ToBoxes[ If[ IntegerQ[NeuralNetworks`NetGraph`PackagePrivate`selection$$], Item[ NeuralNetworks`NetGraph`PackagePrivate`vportInfo[ Part[ NeuralNetworks`NetGraph`PackagePrivate`vports$$, NeuralNetworks`NetGraph`PackagePrivate`selection$$], NeuralNetworks`NetGraph`PackagePrivate`inputs$$, NeuralNetworks`NetGraph`PackagePrivate`outputs$$, NeuralNetworks`NetGraph`PackagePrivate`vertices$$], Alignment -> Center], Item["", ItemSize -> {0, 0}]], StandardForm], ImageSizeCache->{0., {0., 6.}}, TrackedSymbols:>{ NeuralNetworks`NetGraph`PackagePrivate`selection$$}]} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], DynamicModuleValues:>{}, Initialization:>{NetGraph}], Deploy, DefaultBaseStyle->"Deploy"], BaselinePosition->(Top -> Scaled[3])], "]"}], False], Deploy], LineBreakWithin->False]], "Output", CellChangeTimes->{3.688340395317795*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Naming layers", "Section", CellChangeTimes->{{3.688340054600745*^9, 3.688340057971293*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"namenet", "=", RowBox[{"NetGraph", "[", RowBox[{ RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"DotPlusLayer", "[", "3", "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"DotPlusLayer", "[", "4", "]"}]}]}], "|>"}], ",", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.688340161693987*^9, 3.6883401662718973`*^9}}, CellID->1814015525], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnd9rIkkewPvuXu7x/oV7F5/vSfDpOBAG9jgussLtNrdZToY9cQcOIQtu yATEPESZh54FVwgkhISw49zGsCOZcc3J9WZURMMoWUOczRlpjZ21Z0QWH+a+ Va1Go/nlaFor3w+M0z+qy2r9fupbVZrk9/w/P5j+Ncdxn/8WHj74+F9Gu/1j x59/Bzt/+ezzf3z62Sd//9NnDz759BP7H/jfwMGP4d8ff8VxZPsdgiDIGFOv 12VZLhaLBQRhFAhvCHIIda1tuw3gNk9OTuB+FUWpIQijQHhDkEOo3wWvT09P f/75Z61fcgS5DSDUIeC1dm7kVCqVt2/fav1iI8htAKEOAa+1cyOnWq1q/Uoj yO0BAa+1cyMHpUbuFCg1gjAGSo0gjIFSIwhjoNQIwhgoNYIwBkqNIIyBUiMI Y6DUCMIYKDWCMAZKjSCMgVIjCGOg1AjCGCg1gjAGSo0gjIFSIwhjoNQIwhgo NYIwBkqNIIyBUo89p+no89j+8fF+8tXxyUEsEk0fad2kG3OcDrofut3uR5GD E63bMjDH3yw+Sk5C81Hqsec48izZ8fvKj54/S2vXmME4ffb4MbmH/W8eLsW0 bsyApJ8+cjoXUeoxYcKlVk5OTjt3peNJCKwejtPPwYqvI3mtGzIIp/vBxZVo LLgWk7RuyjVAqcceKfbDfuduMrZ/YdkxRjk53v/hm4eLTyewSzp47HRGDo6i K4+fvTrWujFXw6jUjfi64HK5/Nv5dxMv9Wk+3+mBkj+YgLjq5uTZ1yu0J3q1 +HBtEnJdN6f54Brhsfvho7UfTq++QGNUqev5iMfl8giBQkNrHYdDyWOZTZVk WSH3M+FSHz/9eiWWP5H20/vSST75bOVpUusm3Zj950tO9+Ki++HS84kcZqi8 eroySXPqhiIrpYDDti1rbOOQkAWb0L6VCZea/OWzUwUe1YfTSf0jf6fdawPI yOgcfoseR4QhqUutnYmXGkFuAko9AMVi0efzzc7OwiNsD7fyTk5OTiRp+HPQ n376yel0WiwWeITtodffBtvfl1HHz8ilbtQVRRniTD0XcLm2cleVGq3U8F44 W8D2cCs/RyKR2N7eTqfTQ4wuaLa5BWwPq9q+YPt7GXX8XCh1PX6P41wR1QxF 0HOeuHKZRo38+nKk+29d1yOCjWuiFyL5a4t7GXGXnpsVryo1Wqmhj22/KV9+ +eXzERMMBv9N+fbbb7/77rv3r/DDDz9sSwHb71/h5WD7zwEx044fiKXhBmft Kqk5vYuqoXj0nCt+aRYvrEMf0Kl9bn0aKvCL+XqjnlqftflTN3H3QuIeo95D q2pckv9vL1N/9dVX0ij58ccfNzc3IZZevnx5cHAwlDq/+OKLthSwPZQ6LwLb 3wvEjIaZGnBsFWDnTGol45k2qtnXsRynXinLtuYRPYHTTy8rjRwkactypte3 lN/hFzNbLot6xRb9FC0vrtvu6dVKZtdT5FA947g3Lfhn1aPTQnMYkPIYuWmP Z5oe1k9HCvXep2BpTg0Dv6E/xW3OSbH9vWg2p67HjZwlsOXiOFvpXV1oSl2C faNrC7YachwysSdFkrNcKmW2HKBjplQqFPKFkvJOEY2cXq1NKVHkZhpPCaS3 MM6u50qlfCYnE4Eb257ZZTEPmwVRgLPkkzWF9Cp6mz9TkvPxZTjoob2KerkQ ySlK3m+BoUT89qVGkHHmUqmNqbqybORsgbj/HpG6nvGDUBaX3y8Ifr+fTJhb TtVTHtDubPhNLxfJvuJv5mSPfJZqAz0a1jORdZfDNm0xNv2lNcRbeXjLBv6S qfTZ8PvduwwIbvT3m+qj1Mjd5XKpRXAqR7KknoqmpEgadQUiYmQbiIhiPNe8 QIm7uqVOgcqO7aZYjYzQPkusPJdeG3kHGWF7IqlcvVFqDvVVqZvz5sa6pUPq 1uUpwdjuK1BqBFG5QmriYWOLrHhxAhlp523q8JtOenNxsT2jbeTXoUyAOF6X S+1xsjGQKtCFMqjCJV8ktSJCpxEgo+9GZsvTztT3yLRdVBqNUop0LH461O+V GjM1gnRyudTNT7EK2zAmFuhOvRCZ1rc+p+IskbMvi9e3HMbWcUeOHFa2PZZ2 0dlAc9EMht9Gz7mJcH3LpS7LcUabw6JO1anUxnvNOqf98d7LM34cfiPjR0Uq FKSKds8/2JdPyBdKlD7Lzn2O0y+f9F2hPgcpWO/4lEqd1Ddopde5voshSB11 Gwzu3QEulBJr7uXEABeOEClsMrgLfY4nvO6zH5vaFaYMc+HbbNd1uar91VyI 16nd/9STtIY/B1YJefl2IptZ6x8G14+QxJp3OXHj2xnfr4kqIrwskUu/8HIx w5FaNxcd5MI5jhvowhFSjZoMc71SSKStbho0Usg9BS+4yTtmLVe5ov3VZROn c4ertF/iDH6tsmQCnp2b2sySluaiZAHKHe3TFV07QiQ3KciQ1O9kcTtSGvAL psOTurLL63QmA0kDpgckKST893UGg0GnI0khW6lVovyUoHohTN0Pv96lPbXO f/MOdvhUsu4paKfOYNJxBi+EVy4sGGgS0fHeXFXyE4853r8r7XpNvBu0NrjH Serrtv+/u0/WonnyLkvhB+CBNi99NQFvvZA461GyazxnEKQLI+TAzxsMJhJK uil3ulKDd4FXX396yeuEQO/1/u4NO6kxlvp9GKLUUQOne5Kr0rfMEJLo8ZlN KJAPzUB6kGBkqFOTSMFtMJECczrdeAxid70G7sEmbORoUwvkXrg16Ihq1c0Z nc4dVTNdO5ckvAMOTkbETdtfzYdMMOjdzGnTXCkMXU+0Q8DKrps078IIkdy6 ZmtDrdsxzITVquglBSgwF+6T6y8Hpb6IptR0Nqd2s613xDSjjoiquybOFH19 vsDuoOP2YSNBVnOrvTwMX3VzBwkvp/OqQVeFbW5un0ZdO68NPOMYDTdrfzYE 29zcZlaz9lYgHrgnHb+DTQrPNKXuHyHgrCms3h+9tQOQWk0HlSiVWvKC1P0G 8JfDqNQlwXa2Kv6+Up/rZuE/OvEshOfUTG3g7pNIkqImzhCm/TA3JpnabeBm QrAB4zqS6Ugq0W3SqAvTU+cy3ZhJfYP2p9fuc5xhM0vU0fDDjhC89YY5daGu kgvD5IBfS9cujBBwnPNSZ8Mkd0cliCh+DXYLUXq/EHLc+2bquDDLym8+UQSL cdpm8wTID2kO9i7vqqvfZ+uurW7WayIzIjLJNqyR96/gby28wrQbcngh7KUT vTFYAK+kZ8gUlDbP4IW2pp/MNfd1D3ZJ20ngcVPNlSW4tbGS+rrt/+v837gO 6OxbI6QndL1R5cGy+mJeFCH/6QilGZhTg/X3O+4C7i/sJbX5EzebVDd/R1lu y2Gz3dNPiwOuNo8fjUYdoOtsw+26YfhNRkTVSmel1YqWn0teTkWSuu4f2jq+ je3D5LWftFCq9hzraTSM/aYgcVcrXWfeP5RamfpMAfbAL58gdwpGf0VwFyg1 cqdAqRGEMVBqBGEMlBpBGAOlRhDGQKkRhDFQagRhDJQaQRgDpUYQxkCpEYQx UGoEYQyUGkEYA6VGEMZAqRGEMVBqBGEMlBpBGAOlRhDGQKkRhDFQagRhDJQa QRgDpUYQxkCpEYQxUGoEYQyU+s4iSVIqlYLHiwqUk0vmM6y+0F7/YntBXwBO lVftncXnxSOlHBOsXvHKlpRjPjO/VB78VpAuUOq7yffff//RRx+BfPAI233L lJM+s9mbLZaLxaNkSIDCq3t9zIvBGSEGxZd480IoW4bixdzGvNnsCPzvmlKT J/Kh1MMCpb6DQHZWjVaB7b75+pxrosCbwVDlcHXeSq/jl3YOa3LSSbc39l77 eLMvqaiFZaK677UqtRxzOlZpPeVVx7xYrsm5F/NWq5Xnmwm9R+q9IDwZD+fN 1oVksbzhsPpiRXLiMGS3+o5qRxsLMCwgp1fFQ6h2w8nTJs1nlRG+bpMCSn0H gVG3uRs40lvsnGsy2RWiPqt5PgTqKIcvwMlYGTI1zwsiydRWM+9c8AmC4CWi zweyzeF3WbTzAnWy6LPad8o10Qung+WashdcDYiH56VWsoJzgUoMOkNHUjwM zpvtG7AvennrUnIPBvqODSgv54Jmsz0pk0GCM5AslzHbE1DqO0hvpi6VSr3F zrmWCzphRL1iNQtJmR6QV0nqLiZ9Vl4dflvNjqVQLCbu7IjZI3LdmdRWtZ6y KnWtuOdz0nRvX9jJlXsytZIMCJDHrXY7FPLFiP0OM/8iF3Oa+Z1i7cUCdB92 gsPpcDiD2TxUK6LQLVDqu8m159TCETimyEd7IfBLEI9iZBC+Q04XRStVjByh mRqG30KyS6221JDdc3TfbraCfTu+hVWaiUXI+ws7HU9EOYT8S8YAJFPb4dng TC22RJbh+AXy56r3oPtYeEGeAHL6vLAnNwcAiApKfWe56er30gvyh9NrclYg OZbMYRcCyRqRmxRzbryEMbCgznzbNcQEO1koK7bmvCQ3g63F5AbZp3PmDZgz dz2ReSmW8ZEZM8y6rXYY4gt0qe0oRFfq6CBByfnszTY4fDtKDaXuAqVGBkAu l+UbLkkpclnuPgBT4EvqkLvPHsVAfKHYXeBcjYgKSo2MP0k69vaJR1o3ZDJA qZFJQJExKV8blBpBGAOlRhDGQKkRhDFQagRhDJQaQRgDpUYQxrgLUiuK8vbt W61faQS5DSDUIeC1dm7kwG2+efNG6xcbQW4DCHUIeK2dGzm//PLLGwrma4Rh 1OQFQMBr7dxtALdZoz8EVEUQRoHwhiC/I0YjCIIgCHv8H4XefsI= "], {{0, 97}, {327, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{327, 97}, PlotRange->{{0, 327}, {0, 97}}]], "Output", ImageSize->{331, 97}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->1748846480] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Concatenation of layers", "Section", CellChangeTimes->{{3.6883279797291403`*^9, 3.688328002996376*^9}, { 3.688331581441991*^9, 3.688331595405761*^9}, {3.6883393697021637`*^9, 3.688339377253696*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetGraph", "[", RowBox[{ RowBox[{"{", RowBox[{"Ramp", ",", "LogisticSigmoid", ",", RowBox[{"CatenateLayer", "[", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "\[Rule]", "2"}], ",", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "\[Rule]", "3"}]}], "}"}]}], "]"}]}]], "Input", CellID->1574982823], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnc9PG2max2t3Z6SV+rL/wt4tTnNYaTSWOG4LTaRerYSlXMbaZrRW1Ivc Ga0s5UAjhBaZCz6VWvJYg4YWSoTU7gQTQggOxGlDjNuN3eCACY4c2ymMi1Bg oRaH7PNWGWNswIbYrrfs70fEKZffeuupgufj533LP/7V+j9f9P2jIAhf/zPd fPGn/+222//k+I9/oTv/+dXX//3nr778r3//6u6Xf/7S/m/Wf6KVf6N/Q/8g CGz5IwAAgAZxfHwsy3I2m00DALiE0pOSlFJVb1s0ETq6vb09OkxFUQoAAC6h 9KQkpVRtYx3t7+9/+PBB7zMNAKgNpSolrN7OaBb5fP7o6EjvcwwAqA2lKiWs 3s5oFgcHB3qfYABAvVDC6u2MZgEXAWAg4CIAAA/ARQAAHoCLAAA8ABcBAHgA LgIA8ABcBADgAbgIAMADcBEAgAfgIgAAD8BFAAAegIsAADwAFwEAeAAuAgDw AFwEAOABuAgAwANwEQCAB+AiAAAPwEUAAB6AiwBoR/ajgWehzUxmM7Ke2dsO LQaiKb1DqgFcBNoMZR9fh0dkFp9Eyk5E6tmTqH7B1AVcBNqAvUwqI6VCi6Fk cv3ZD/efRCW9I9IdRZL2z93N7OkWS33ARcDwSKHx+wHprBzaz0gojaRIaPv8 3U3dYqmP9nLRyeoDcWRkxDOf/AgXdQ6KlDonHyUaiOxf2rpD2E8mywshJbmd 0S2W+tBcdJxcHBsZGRO96RO9dfJJ7I7dHlzblWWFHQZc1DlEl6Pl8tmnAUmn V0aZH/76XSgpSZuRzcxeMvJk/IeI3iHVoFgXnSiysut19M/LOtvk05DFfrF0 BHBR57CfyZS7KBN6spzsdBkVFHUWv3hjgAn98jFacMyxaHwX7Z7egYs6B2l9 cTGyLe3vrQeWt5PrgUAo1fGFkeGAi0BbIK1H1zN8TxIdxuOS2Zz57W/plpab t6O9vT1JavyVxGw263a7BwcH6ZaWG95/0110cqwoSgNnoRLekZGZxCUPwkWA X5iIBEH7oeWm7iscDs/Pz0ej0QZKiRQ0cAotN6rbEpe66Hj1liCMLGqZrYhd wtiqcpUjTpIPJhaPz606XhT7hSJd4mLy+uK5gNWRLmEweMmDcBE4Bz0PUjK+ ffv29evXP//8cygUWl5efvny5YsXL54/f76wsPDsSioa1Gx/9ebp3/ym5CJa vlZXN8Dn8z1UefTo0ezs7Kd3+M0335RcRNVRw39ZV7tI6BpRU1sZ6xJGVq+s mdIPSF3ltko86KMOPMHk8cnx2oPBfs/ajdxTyepYd9eY2tVJdbUFF3UiJJxY LEZuCQaDq6urJBxaWFpaevz4MaUhlQeBQIDW//LLL1tbW2/evCE1pVKpTCYj tZad3/2u5KLM73/f1H3RkU5PT5OCXr16tb293ZA+v/32Wx3rIsIxk6Y7Zy5S Nsb6urVaxzGxqupAmegvruliCF19E8pJgkqi2xMb1TJZ8zg8wY2ZkdvaFjPq ywiSwQf9t7q0TgYfrLFVxxuOW32iZ1Bb2ycWi661sW6hb2ysT13d1beYLq/F 4KJO5Ojo6N27d+Sfh6eQiHZ2dvb3OZo/oqpsaXLy/R/+0Jr5IhqdNXxKR7f5 ouPVbuG2d2ZEEPp3Px6LRRft0v3ukRlaOpFXqe4ZW2OlkLy7uzHjIIts7O6m 08n0rvJRCXYLXVpvyq6KXCya1kQmue7BB4nd3eRGQmbeOZkfG5wIJmkxHRTp UfbSAoXJsKvfs7ErJ1cnaOWYKkNtc3ExoShJz20q3Fbhos7k8PCQhEPP+zMz M36/nxbIQnTLlYI0SEQ0Xvvw4YPegXDNlS7qXjtWJrqFfu+q5xZz0fGGhzxw e8TjEUWPx8Mmg05VcLw2RrY4G6OpmwfZfcVTrIDG5LPCxltVLh1vLD4YcfT3 3e4uakftYfW06pnpJ+2waaKzMdrHjxvkpW5P2cAQLuoI6HmfspuGYDT4ev36 tSzLNExbXl6mYZfeoV0ARFQnV7soSCpIsJqkS/WDssaKlhHvYnCRRuHzizQ8 TxQ3UFZHzrtojQzkmC+K4WRDLD3KZHKumGHz3g42DBtbXEscn+wWx4Oai4pz QicPbpe56HTzNbG7pDi4qBN4+/bty5cvqRCKRCK5XK60nttMh4jqp4aLmD5O ZtgktCCy4ViyXxujqRM6idVgabbmJPmA2niZmo7l3dJgqtu7llbnrqmLEfky FylBcp2XDdFONmbGSnXRLTYlFVROTnbXmA896niw2kWoizqBVCrlV9na2qIq SO9w6gIiuhZXu6h4GT89TwMnUb1znF7s6zq9UC/cXjx7A9vxjKP7dL0jwVYr 82O3S00HvcV5bBqjdY+ddxFtO6LNlAvd/Y7b2jSU6qLuW8U++zyr1ZtveDBG a3+y2eyLFy+ePn365s0bvWO5BsYTUV5Kp6W8fvu/2Wsd2esXleO61quvdbyg aRWs4XHZZXptwupE7bSe7RlwUVshy3IwGJydnd3c3Dw8PNQ7nGtQLaKkXzSp z6q9Q9M65vsl5Odc1lLZcO9++MJGUvi+c+LihyoI33dNhK/9Gkt+3wOiBOm0 LF75+soq4KL2gcZijx8/jsViRhmRlbioIor2CsKQP1k4iN4RBOcKXx/1FhYp ut7peJqWEwE2J+wMpKubBYboGAJ19Cc5WcM2ctFHOTi/uHu9d4/ARe1ALpej QRmls9SEN1U1m0uGZlI4oAroIH5PEFxcueggTCWRGD4r1uL3rYJZlPIBa6+o BiqJvXf8b1fUysnkCW97rGZzj9lkEky9zmi+IK24rE7VUeomb8OiWl7dWblm /cexi24AXGR4EokElUPr6+tHR0d6x3Jtrp4jyoc96jCt56KiQz8kv0kwB8q8 kV+husaZlvw9piE10rTT3DMnUV1kMg35WdljEu5NJ+iBuXsmkzMgBYbM9/xa V+omaWow5L/2QcJFgBMODw/D4fDTp0/LL9YbiKtFVPpj9A9RJvtbF1ZN8is9 gvB98myF5L9XdJHZqdVFmotWnGYTG6ORanr8qrsOwi7B5NomFw2pR5QPqC6S XOSi6wu3vVy0K/afXVaDiwyELMt+v//HH3806G+txlWzfMAsCNNqvrNaoq5Z l9YxR3o0D2nfV5BP+HsFwXo/SkoyC3fYO1WkQI9g9qt1kaDVRWbBparGzyql gOQfog3objpAanKyukj41LpoVRw0+Oc6KuLt7r7+/jEv+1ARg/5VdyDv3r2b nZ2lcZnegdyQei7fhyfustkW+me+t8LVGI0hfe/sLV1HuzuhqTLtsZpO1/UE pELa76Ilq+eFq4cdinYs0TyT1Z3SxmYXKc3vYr15wtebMCp+3nVixtHff6ur L3i961b8cXJyTKgz3nCRIUgmk48fPyYd6R3IDbnG64gO8pKer9+pBQtPOqha VxVx2mnupTLpIH/ukQsaXnf/xbroLIXbBriIfxKJBFVE79+/1zuQG2K8FzQ2 ABqj9c414Upge30n0TngIs7Z2Nh48uQJbzPVme31zVRdX2vYkSJqInAR0IV4 PE4iyuf5GrMo++wLMxTtvyuBiBoOXARaDyXyw4cPZVnWO5Dz7EvS6beHXP0N axBRM4CLQIvREpk3EWW2tyunQPZSFw7WIKImAReBVsJtIjMXVRRCe6lk1bcc cRt/GwAXgZbBeyLvZUoDs4ovotXgPX6DAxeB1mCIRFb29/f22dR19WcDGCJ+ QwMXgRZgoETObK9vY2imB3ARaDYrKyvGTeSjo6OXL18+ffrUoPEbCLgINJUX L14EAgFjfSqjBlkokUjMzMw8evSIw+85aj/gItA81tbWnj17ZrhfhGYhqoW0 b36MN/N7FUEJuAg0CU1ERhzaUBWUSqWWl5d9Pt/c3JwRizojAheBZmBcEWlo k9WhUGhra0vvWDoFuAg0nPYQEcW/sbFhxI+6NShwEWgsbSOigvqxt3qH00HA RaCBvHnzZmZmxrhXnfA6Ih2Bi0Cj4PTd93UDEekLXAQaAp/vvq8fiEh34CLw 6Rg9kY0ef3sAF4FPxOiJbPT42wa4CHwKRk9ko8ffTsBF4MYsLy+3zeV7oDtw EbgZP/30E4nIuC8FhIh4Ay4CN6CdXtAIOAEuAtcFIgLNAC4C1wIiAk0CLgL1 s76+DhGBJgEXgTqhisjQiQwRcQ5cBOoBQzPQbOAiUBOICLQAuAhcDUQEWgNc BK4AIgItAy4Cl7G1tTU9PY0PRgOtAS4CF0KJPDs7i88jAi0DLgLVaImMigi0 ErgIVGD0RDZ6/B0LXATKWVtbi0ajxk1kiMi4wEW8sh8NPAttZjKbkfXM3nZo MRBNNXuXDU1ko8cPWg1cxCuZxScR5exu6tmTaFP31+hENnr8oNXARbyi7O2V Tx0rUmaveTtrQiIbPX7QauAiXpFCy5vldyOhzUvbfhqvXr1qQiK3Ln6IqD2A i3hlP5ksLySU5HamGbt5/vz5jz/+qChK7abXo0XxQ0RtA1zEK5kf/vpdKLkn bUY3pb1k5Ml3P0Qavg/tLR7NOVGtiB8iaifgIn5RlH2qVoo3+w0vXJr+XrMm xw8RtRlwUWeyvb09OzuLV1YDfoCL6iebzbrd7sHBQbql5cZ2Xs7e3p4kSQ3v Npk8+MtfEn/8Y+zOneh33/ma916zFsTv9T6HiNoMuKh+SEEDp9ByYzuvIBwO z8/PR6PRBiY1JfLnn8e0n6+/btZVLY1mx3/37lajugWcABfVD1VEJRd98803 z5qMz+d7qPLo0SMaT316hz090VIu0/Knd3g1TY2fqqPG/nKB7sBF9VNeF337 7bdSM9E+O4hS+NWrV9vb2w3p025/XcplWm5In5fR7PipRmrsLxfoDlxUP62c L6LRTcN3UZpvoVtabmzn5Rg9fqALcBEAgAfgIgAAD8BFAAAegIsAADwAFwEA eAAuqiDgNJudKzfYUArfd06Eb7BhC5HEHmHIn9Y7jJuQmHOZBJVeZzSvdzSg CcBFFZCLTEOBm2w4JAg32rBFSFFXD0tlV6Dx785oPtFeQXD6k4VCmnTaI3Lu fHAT4KIKii7Kr1hNph4zeyruuXufsjfsuWMym80mWtP7fTxfyAesvaKa1ZLY e8f/dsXKEt3kCXOa6Ssuq9UpUpDOgAHrooPk9xPTSXXRf5ec79c5HtAE4KIK Tl0UMAum7xMHhYOwVTDPSer6e9PUIDl3TzA5JcnfYxpSszrtNPewBkMmE+85 kqdxzpARXXRKYs5Jwp9OYCawDYGLKii6iFRjdmplz6lqeu5po5uDFRolBN5W Nli56eCuhUhOA7soP+ekgVoPRNSuwEUVnLmoouyh/1xMNWn/kFYXmYU7cbov BXoEs1+ti7gfOxjXRfn7dwTBPKTOWuMCaXsCF1Wwol1HU+siNWlPyx515pdN Fwnm+1EqiNIea/HCDj1ZU8WU9rtoyerheVpVcpkN6aJ81COU0ePkvP4ENwEu qhMao7EsPsiXd3qQl3B5GYCGABcBAHgALgIA8ABcBADgAbgIAMADcBEAgAfg IgAAD8BFAAAegIsAADwAFwEAeAAuAgDwAFwEAOABuAgAwANwEQCAB+AiAAAP wEUAAB6AiwAAPAAXAQB4AC4CAPAAXAQA4AG4CADAA3ARAIAH4CIAAA/ARQAA HoCLANCQc9lcTtE7is4FLjIW798r4XCebi98NBcZt5zDFsxl3Tb7Uq6RMeRi Prc3dtmjQZd1dClbs49xq8UdamhYl3OYSh08e0a3l0YTn3OcnjLr8GTqorN7 9VFfRS427vZddKgtPQn8AxcZiKdPd7/44pfPP4/RLS1XN8hF3BaLK57NZVMa WaXQeBeFRItFDF32aC4RS2RrVhcsDcVQTWU1gA9//3vms88ygkC3tHxRLCG7 xeKYDMqFgpKNjZKOLjq6q4/6CnJsS/dlLmrNSTAEcJFRoFpIE5H2Q8vV1ZHq ooo/+6KLlGxo1EZpxp74g/TEL0eGrTa7je5bht3jLgdbcIgLSuGClgNWq9bS PurL0V21fPjr3/7PLgZpB3HvsHXYRxumlkSHGIxMjo6HcnJiYdhms1mtFpva SSE1NWpXO7VNBncoUndlGmZ9ItUmVtZi1Jtle3EE1SPZmXPZxaULotLqmAGf fPlJo1qoKCLt57PPqqujnblhCqrUiZxY8i7EqJgR6ZywcCyj3sjp7qxTsVwq NKUFYhuYpCORY5NWq009PRaXWjjFfCLbUj2SSDY3pZZcA1OR2ifh/E5Zz/Zx 9WFlYZTOQapi13WeBKMAFxkFGpqVRKT90JqKNsUxmlWFyWUyV3SRPGmzOFg6 FBKUetZJWQ7ZLLYFysvUAjX0JRR1wR6SL2xpndtRCkpswGIjrYVEq5UslJoj jaUKrD3tKVZQfHaLK5gNiXa6DbroQRqYKDHfpDe4E5u0U6c5luk+2ktErkxD mXY2PJVSj8HB9qLMDVjsU3G6T1XFeOTdRVFZvLGdq2d4aGh2JiL1h9ZUtGGH 445UrEzMiaOTrArKxSapHsoWTo9aiZFNpmK0QmYOG4/kQqwWZVKKT7GWSlwc GFWPjFmIToVWF9GKmiehaqeJYYtlks6BvGSl9rnKXRfqOwlGAS4yCtV1kSRd WBeJlNFKkcJpXZRw0fOtneEYGHAMiPF3QbtNraDkoN3qYhJQ7RS8oiU9j6sl VsRtU0cxuXGbdXzB67C73AN20ee1WwbiSkFzUSEbcw8wSVEttZTILVBNc9qp wzHgi7+rqotSXpHqL9aItqGKSImzfIzHprSsvCAq64UDn3NU10VH795VtGGK GF0oCyQytxRTUiHRQWWdzW6n0m6cdlQ86p05krzdUTyUAXHuXUi0qfWheiYp VCXiFbUt6fjdoVypWK15Eqp3Gp8ivy/FvExq1buWc3WdBKMAFxmI+uaLyl2k FMrqotEFta6P+4ZdPvXPWFSfvZlq2ELRRZe3PB3uUYVgUbMv4RtmJdFUPMue +i1WcalQKLpoyU3P8GyjoJu6W4qN24r5TmXDsBiT2VSJa6kUaWHHN2Cxjqtu ZHURK9gK2XE7k9noHCs6Lo+qBrXni9TKcJwNmpgO2JBqwEdVmc3NShSZlSjM 1cWjliNkGDW8QtwnurxxKntsLtVFWkg7VPPY1AnpnCqS1FldVOskVO9Um8uy aHVp1a4LdZ8EQwAXGYta19Emz19Hs0xG3hTni3YW2F+1Oq3hXto5U1CZi+w0 Rrui5WldlA2OqxMgsUKWxg6WKSqG5CClyWSMTVqQi8RgNhuZslqK0z9TESoW Eu7TTh3uJaWQm7SXRWkff6/u1GojqCagpGc7TC0Ms9GfeqyXR1WbmtfRtHmY 4nW0gUkasO4sMLuq4dhYnZY9O+qdBXfxyCyOpR05p8q3cHYmd9xlR8JKpmzQ oSpbrnUSNqp2SrBzYJ/SpoMqdn2tk8A/cFEnoeRyufomOetvWaOTcmnKNTpV zj+shMZZYdHoqC5FDa8sXkU+d7cceujKQOTLZ3BqnISKnSopKghd5a+RqLVr 4wIXAS7JqVPixdqgQ5HVAZp9/NJ6rr2AiwCnKPJlVUnn0FHnAC4CAPAAXAQA 4AG4CADAA3ARAIAH4CIAAA/ARQAAHmhjFymKcnR0pPcJBgDUhlKVElZvZzQL OrrDw0O9zzEAoDaUqpSwejujWfz666+HKqiOAOAWrWYgKGH1dkYToaMrqO+C PgAAcIn20TbtLSIAAAAAgIbw/5poZF8= "], {{0, 161}, {388, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{388, 161}, PlotRange->{{0, 388}, {0, 161}}]], "Output", ImageSize->{392, 161}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->1734300171] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "[", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0", ",", "1"}], "}"}], "]"}]], "Input", CellID->726772480], Cell[BoxData[ RowBox[{"{", RowBox[{ "0.`", ",", "0.`", ",", "1.`", ",", "0.5`", ",", "0.5`", ",", "0.7310585975646973`"}], "}"}]], "Output", ImageSize->{217, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->2134820047] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Convolutional Networks", "Section", CellChangeTimes->{{3.6883279797291403`*^9, 3.688328002996376*^9}, { 3.688331581441991*^9, 3.688331595405761*^9}, {3.6883393261064997`*^9, 3.688339332742797*^9}}], Cell[CellGroupData[{ Cell["Convolution Layer", "Subsection", CellChangeTimes->{{3.6883813314319687`*^9, 3.6883813431243687`*^9}, 3.688381650745387*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"conv", "=", RowBox[{"ConvolutionLayer", "[", RowBox[{"1", ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"\"\\"", "\[Rule]", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", "2"}], "}"}]}]}], "]"}]}]], "Input", CellID->1996327708], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["ConvolutionLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"OutputChannels\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"KernelSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Stride\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"PaddingSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dilation\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"InputChannels\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"OutputChannels\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"KernelSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Stride\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"PaddingSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dilation\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"InputChannels\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Arrays:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"tensor\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"1\"", "\"1\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"optional\"","\" \"",TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"tensor\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"2\"", "\"2\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"tensor\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"2\"", "\"2\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{340, 122}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->153711080] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"conv", "=", RowBox[{"NetInitialize", "[", "conv", "]"}]}], ";"}]], "Input", CellID->256058735], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"conv", "[", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}]}], "}"}], "}"}], "]"}]], "Input", CellID->1367167862], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0.6678676009178162`", ",", "1.3357352018356323`"}], "}"}], ",", RowBox[{"{", RowBox[{"2.0036027431488037`", ",", "2.6714704036712646`"}], "}"}]}], "}"}], "}"}]], "Output", ImageSize->{294, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->13769669] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"conv", "=", RowBox[{"NetInitialize", "@", RowBox[{"ConvolutionLayer", "[", RowBox[{"3", ",", RowBox[{"{", RowBox[{"3", ",", "3"}], "}"}], ",", RowBox[{"\"\\"", "\[Rule]", " ", RowBox[{"NetEncoder", "[", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"200", ",", "150"}], "}"}]}], "}"}], "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"NetDecoder", "[", "\"\\"", "]"}]}]}], "]"}]}]}]], "Input", CellID->2118575035], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["ConvolutionLayer", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"OutputChannels\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"KernelSize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"3", ",", "3"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Stride\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"PaddingSize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dilation\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"InputChannels\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"OutputChannels\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"KernelSize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"3", ",", "3"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Stride\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"PaddingSize\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Dilation\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"InputChannels\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Arrays:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"3\"", "\"3\"", "\"3\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Ports:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"encoded\"", "\" \"", TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"3\"", "\"150\"", "\"200\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"decoded\"", "\" \"", TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"3\"", "\"148\"", "\"198\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{330, 122}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1964549442] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"conv", "@", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJx0uHdw48eV77tV79/77tbeu3vXK1uWJVuSbQXbsiTLCpZthcnDSdLMkJNH 1gRJo2jZlmXLliVbcTjMORMkCCIQGSBAMIEEQAAEiJwTQQB07at6dave/++c 090/QN66VYddp0/3r3/96++nTzd456XXj136v/7pn/6pG/7c8If+TX38S0MM ylZDotUQv2mM3cIyDmVr3RJthnibEf1bxvhN6GBIQJ9WspsmtC9NsZumxC1j 8pYp0WpKfGkGi7Wa41BldtOcaDUnbpmTrWDYB3qCkySH9UneMqaoD/ZsYz3N KezGfXqEBrllTrWZoCnVbkrBCDfNaGxwcFotrE+yzYQ+joad4fEUBNtN1MRf lGQTQ8Oe9CILi3C/DeZgTrVakmxMNOhgid/EEnywFJTQjfpzk+LYxC2FZuVB /hSW6VvYlLzFOphTFEzht/OeSWkcGPmmNc4m/CU4lngrTQaX2gxTAovdtESh epPWn/W8ZQKlIhCBdW4z0YdjGW+jEehDEnye5lT3XKizdapN54fPbOPvxZm0 WhP44fhIsh3jiVu8TLRjH5KMB5PAD1ibIXHLkGw1AhjgCKMqwcN9YUhXqymO szXHOTxIAo5MkvH1bxM+h8EkScN1h6VjfdrNfJHbaM74lPgi8hNMOFKHzTzF lTJzTUkmVKSVSwYK1hVheLSbmWrwOr6GbXXV2ARY5zoMt6xouLDWZOt8Eqho ZyPPUxwgsVLVKmFDc7NyhKgJynSHJd1uSbeB0SPt1jQNwvpgtR1HS7ZDKwXb LXxkapUGRHFRX/o08uNMWWat3OJi5Xm8U+W/1aNtN8X4prDG2xCGRKcNhuIG E2ifT3ZYkqMznvGPOzp0njYKihnymUAfmBubLcyww0JBWFKafJvoD1mo3Zhs N5LozIzJNoQHSqgiPG0IOZRx6pCgrVEHqR1KC82NFEftQERrQtpi7WbJSdGO 44S3M+1wnetEMdXaaOn4ekqzlfSCNZ9nH5XGb2QLDnLMSyokxQc26EJV9gr+ FD3IFoQ91Q7vnQfjT93irckONFhSbvAiKDsABvSxCpNp5fG01K2DWxp6gnWC g63pdivrk2bG+oBebNh2MXjbfPoWjc9faqUXCWMwMyTa5tHa6evaBCd8h1qR n7HJ5b4/3WzXB9osLI4CtRsirT2zfbPLHchPogPXM9GtDc61jn9x6vKfOsbb LHH2jTDDTkBuPtlpZbNlX8fmyVrpSzl48LEpTIzmZIcJTwewNuEgNujEWYSy BOLEEKLpJYiKBJOGScaUahP03uJicXhAyo46Nok2vkOZrFxcgp9U5gpy/5aN dvc8dZM+zcrFJVGYxKggZgMKdsyzMVG+Nhv/dlJZiGVLtNuwG2maBL/NlqT3 psmom43WzSYW0JbCPvCUDcfkb8cg9gRCOm3pDjTs2Q6OPd1uy7TXIxhst1Np y7TZ6SnR1EGYtfNuLJ5ut0lI43vpYxMdtBSMKDb5Noq3s4gt0SYivbrg7J/b f/Pixb+NGdsMwQ5TuMMS67BEOyfW+1tumNsG+rT+3jnvwOzaVOeU+o+fWa6/ 0rX/xPVLb7aZQp3iczphnvZkh5gqWCdZF3SYz7BunSw+j18K2aYdcw4mkw5K PsiYOJ4ogrmR8k+cJSKBQaK9AYx6AmTpVHwp230sf3ZQU3t93+EeqfehLcy2 P+Ixn+kQsnLVpH1BGx+1Y5+AKtP2t9H2J4rabbwnocJHEBsNniKE7PQg+Nxh bCQZDySrIMQOJi0vr7bZ06wbPm7ntFD/TKc902UnohZSHQusf4qWndafNdmZ kxJGVaEXjQkzQcPB7QkgsI1PO8Ed3BG01LA72Bra+O5gcVqB5NCsS/7ym394 cn/Lvhe7X3l79s+fzHzWJv/wC/W7f1o4d9Fy4aLu5deMl6/azl1aO35s49jh tYst6pMnPnz9dx3zUZhS50KKyiR8exfMDT7EDn4aPrCbIrQsYBkqUwRYugNA stD5SFcOOibwkOq0AE5AWgodK+4C4KfTwohCYDp4HmDfUt9QyIxNZA9JdFuS Hwro0PHBtjwHQ9rI9X1KWQLPjnYmpdi8tNTUwd6oO3PS7BHc44RKh9C63Z5p t6elSJvAo52nC74gHSLYtoDdaKHYwqLfscAshaU900FUdBI8wqgDPpLBDgvo 0IJnuqmEYCcG0+2ONLWm2h1Jzh5ZJ4ctLcnHfIYZyxg082QH/0AGXqKD7Q57 An3+FUmCOTk1YtadPT999GjTdx55/+GnHC8e3Tj9gvfIIf+hvYGD+zYP7t08 tD9w+EDw6KGto4fCp495Lp1ZudB864NPu+0J9u2AUNcClDRDNKgCVCwIgCFR 3RTsovVpX5AuG/ziQRcJhKoT/VSnlSJIfoKlC56LeIpgh0KKJXmx05lYeEbc 4kcGNfF1YKkg3ciPxANDvZNtChvb43xr45gwWxQXW0lT3tTRUJV2jWBDdFtA YzmBtUowdNDW66R1Q9FF/y7GgCPFSGDWwZ2MYIwH0agn7wDYODLtjgw5aF0L mS4HGMYRNrKO+pgpPix2ANhSHY4kGWOYAyxSX7KDsgeChA4aC6KhA99C8YVk vzUy88X4ypVrpuPHm+965JMHn5p84ufuQ/v8hw9sHjoQOATlwc2mQ/6mfZtN B/1NB4MXzngvnvZfPdvxly+7YHAHrYAjhQgRNlRNdkEEPgq+iD6ENUGke0Fs HMEPgIQlcgUSM59nmM55vi+42Xmu7rR95cDtqN8H0nzXs9Wwi9WwpQUAXwGD MgPb19IaorXjaicZRQQG051tGZYoSJT6HqdBhEwdTDjKM9CzzZFkwU57RkIC V8PeCAx7ViCxmAKjBUQ2xCLTrkTpoQrdEJjORdZKRC1CFa2DxRdxnE4aBIya 0t3EGOpF47QvsvEzzKHBUU2GVjsaSJxkCa2e3BakBJLkHLIgSY8JxJEaky/L OpW+d961v/jChXsfmXtu7+xTz2l++az38P5A04FNoAucw4AWVoPHjwYunA2e ORoErj78vNuR6HakumHasAi4Dpku/Byccw8ghHFWRcB6GFfkA12Yi9ivFWu6 ixFFV8fOxhsavxuwtJzsFLo3MiBdEhhCLELZgL4URU928WNF2qGcLorU0wJL FFRmWIlg0PJ21rcMOZQZaMuwpJHpYPvFwaFi6oO+OMIikUCtnbTmtMuyggeW T0B0YCndQfpKy9glEOpg/CwyYzjBU1kWAadrESyDaC1RBI1hhnFhuP7s8S4B Hn/FoqROmoHH2O5YTDLSWArtQMyIKOrAJilmlaIZ4oAD8/GxduXYxOLmb37n OHXi4t0P65/d6z90QP2zZ7XPPOc5csB9ZP/6oQOrhw4uHjywBIydb3E1nwqd Oxa8cu7m+x/2LMQ4PEupHpjzUrprKd3D5k8z76YgGvk9aKluNhm6UQNLAFU3 oDWf6qaTCO75YN02cbzyu0eG3wEIA+jZZWPJnA4Ru7Tfk/yT6SrCgh0LDVSw R76aJXhCwD6pbjvIncWzgx0Ni1I2TrMgMZDtEkh08vTCFEx1Lgo5GAMsOXD5 2Karg0QwiMSylII17OQw0OotpWhh0511QjK8P6wzo2Up27kEZaZ7ESwLDnaG 1mUqsSmLtsi7YU/hiDFTXUsc1y4BGy8pXXRyeCgbsMgSCwp9aUdAWVd8MT2u dA31GcaVvs133wOuzt79cM/Te/v2vvjZkZc+OHjtk9PvfHLh/U+vfPTZqzc/ fau37fdDmrc/sZy7Fj5/avPl8x+99k6XLQQUATY9SxlmzIdv5HEAaYkbfilD jjDrms90ibtNty0D1oMO+l1IVIodE531VMOOWpQYenKJ6YTtttdvCPwQQRLE wcSpwETRyQ+RNMsMjJbOhtNEkCPxk2FIIAw0eXZX6eaQUDd29Czh5upkMODO ZRgwgTg83YtCTbYatOM6mS2nqEodluhBgGSZrRjrj0hwKpZZNcuw6Wb+crZz OQsr340RqGaYdS/DOJlGrrqXBHXA2yKL04soju+lb6EzKC0ZR50bdaCZ47QX MyA3qY/loD0+2q0YUHvHNX7fu7+xnXrx5A9/+f6v22+OrHZoQ53GaJcl0WVL oo4ISXbUnpR3KRUdGu/V6/4r539/7qV20wYA072c7sH5g4Nf0YOflhGkpSku wFvM9IoJsHtyz3yafjkCVPDLBW9fWNrTPXa6+ZOxA5QdQFKwu+FUFfcH5Krh 5GXnCLtgsDyf6RLXki5CopuMt4q0IKRHp4d1EEj0oBBZVu0kUTp5WuBO51Kj OkygtJQfuhfrPXsQD1A8y7MNr9LK1LHJSMbXdjkL1o2WaeSnZ5mj1b2U61nK sc5dK1CCn2V09SyJB1kr6MJeQQJxaElEhh8dQBmJf0qDKTLsT48LdJfYsIhB 71JmUu3q71b1W2LjGt/GO+9aT7/w8vMnvpRZe5Y5KsKyPSvoyPT+sQHt5KzH /es/bF298Jfml1o1KzAO77bCZovzhxEg3ktvwU9eSfcuZ3uXyFjnpVwX/gRG fnrop2KPHS9gvYKcngXQFMtuSg7dPAnTxmG+g/n/kL1Tkt+NBy6npXuRc4Xb mQjpdmRhnB403ONdi7zs4tuZpQKxwWmn0EGDBwobgW9zWs8uIVN3/SmmQlqk lzRPR8uQmjJddUOtYcWAga5llnPqTUQCw4PhhJD0Ehu42ihKtnsF44K3XC8a BdGgD8VFZ+YzQUEUeilhtgJyp0USYKohAF2CwJ4VkR+oA5MbxuliI+NbKLKS GXYkJwd0/aq1/vnExJzP++t3zS2n3n/5vc8GjX3LGTAAoH85B9a7kgUbWMrM jpoH5AujuoDzj58Hr1++dfV3N+ULCA8NiA4jkN7YR9Yr1qFvKdO/lOujr2bW Y88iWguZXnumFynCstfBUwQpnu51ZEn3DF3M+BWC7hJpnoR59qYTShwuLJ/0 LPLM2d14gvAjI80SC++zWO+Dm4KMVOb7l0nPzp1OokjsbraJcqQ+j1PaEXuZ kKCMkW1IODnOw0o9/3StsI0JDjEmsbSaAWPdQL5eJgf5PSu5bpQmR8aquR6K 9JHDfIRqNcueom6ZHj4COGky/moO2ApPBcyhPEBcraal/jQm6k6W5UZvkSlW B/pV/fMh4GoSuHrnHf3ZM5/8qeuTDk3fcqpvJcusn0roP7EQn+1RDer8w8at xY87/Ncvdr354ZfDxj7IRTD4qvQK7gCQ7ME+Woq+lQwfc5kHCaQslmjZXk4C HJTg8+tZr2CDnZ4MrR5xiLAMQJkhTVKmpUzODmJK/mS4B9mpke6SzuulhjOF RzhCFKdkssRVBhh6l3J8hy7/YxKgFEHdOBXp7hVGEarQS9kDgXFmelbTAgwu PTosjQhUmBEV2Z5VMNFzlRBazTERoYmAwUjfarZvNdftzPY4s1jFIPVfZYPA e7FnD/NpZCSWiYWtmV4udIY6pznPkrIw7VVUkKo0FIzvzPQ64b3Z/tVc/ypO aWQxOdWj7Fev9dsiA7aEbM7ne+cd88Vz7W2yz1qVfY4om2cvPoIODDg755aN mgYt0RFjCLm6dqn795/c7NcBV32rmX7ABt4LgztxJvDUwEoOmcTXZWg0HKcf QYWSkHNk+hayfURUvyPbh8BkCaoMnZjEGDtG+dFJ93+mI88qGEcRxeHeU+/P he4Wpzk+spyRYOhd5niwIN+2lC7o7MjVj4xlrnIPT7a5nmWWH7L13cpOFhKC ZR4hEO3rVYEBLg5DhUcEORyPXrbslIJYH2E5jDux7HOyxcz3OCGSh2Dvah71 dYK41I1UZg5/nHhjKvAq6YI4EXJACMmXkYLwLCdHzF/6CmIJXpTv50Tl+p1k q9lp5erokH7QFh2wRYdsSeBqA7g633KrQ3azS99l9uMcnNl+Z3aQJjmyklEN aodnVwes8TFjePmjjs3rl/o/vPlxm6J/JU3jA7qZPm7Z+htpK9FX8w/vZ6yu IEJ9aDlGUT+vot9HEYj3LTEpeTbuxTyQ7q7nZyrZycszvDju6xeMjJT5GQN0 ZLMMwDdsz4rUlMOMAQCwsnGPc7l5sqXrQY6C1K0uE1ZJDoSBZw+nUJmqEiqM FrbjmOK09fIMIUYR6NW7BuOgjn1ORheTBliCSL4fS+zTt8bExSo4fQw5dLI4 CKlJcXo1pZoeEgtn5ST5Vpl2TLJMH1eNW78kIi9zA2Q4h7XCoDM/tpgYb5MN 6Db6F6KQrwaBK53P887bpnPNN7tkncOOdrVzwJllRo9n5baIvEcxZN4anI+P mUNLH7f7r18a/LTzk1ZF/3JCmnA/758DGvGlq2j90hyAcOYTb+waDwj1L+b6 oRQGByXdxNgNLUeXPUQLqyI/UBOmZQ4VpgWx/SnD11FZ5acAE53J18PSeMNO 7OO3lHzvap2iHmdjbpGo4AZa9whORGtWahIMkONkWpNkxANjA2DoRQy4Xqxn v0CFnsoP8Go90o9BtqqF/rV83xrIilCBQ0LzEaiJY9nPBqdI3xq9bo1zwrUT cZ55RIQ9C2OyKowJ/AxSdQB8KvvX0QadOYViZaRPPbgQG1xIDGCZnAKu3n7b eK6ltXe6V+75YtzWv5ZlNMKch1Zz6pnFiUnr8Hx8yBYfM4WWPmrzXbs49EXP Z1+qeu3hfv5SZvAuoohNaa3B2CqtCcY4PwBVfmApN4BOjv1SwCZxXEpGF4Ac j69m+X1AsNSz+hWJxSmQqyd/ysC0N3PSsdIrMgBjBnPCKkMiyzvw/CA6k/UL YHrZSbT6lSaeTNbqRIEKvVx6IS5KLyJOBgaSAA6UJFaun0cwGwwAQhTp4/EC BqFcL/StQxAegYxRGFjjTw2IAQfwET5sPyeQQUIC8dFyKPdabpBM6FWfwwCj l/GD780PrOcG4aXsvRjMT9qjE92KIb1vaDEx6EgMOOKDjqRc6/O9/Y7h/JnW vulhffiTXu3AWnqQgASTLaWUXfJhrWfYHh+2xSdNoZUPv/S9crH7bzdbu+a6 LD42E+xMr0Bbp2fZ24HMtfyQE6dHlhtyguWRnxXkCm9i5IODdC3npWsYOAMr OXE9y0gHaz+jhfHjrJ+zAg86QVbFEbDGskG97Hfyvdzv5NcDKV2Q0KyJ5Yoc Sxd46LDl5Rjg1qgnmbV8Pb2wI4m+dECwwbFZz7NIn4TNOgtSf+aTdlw1jBQG yMBBlsgfXCsNrRWx1SUeWS9AZBBfirwNuPLYk4/PWW2o8mwjEk4OOGHSwAhD hE0/nwC+bggHx1cMuvLgD/JIkU9mvTDiLMxOzPePGgft0cGlxOBSctARH3Kk FHOurXffMp1r+dutwRFr/NN2df9yHF46tJ4bXstpDL6pvtkRa2TUGp4w+nXD mqXrv/K/cuHXLZdvdag6tGuMXjR8b36IldwKvORgFxh4OPmVfD8RNbgCPpS5 weU8+XnMZisMjAb1KS1It0TM0ngS4Y2in50y4l4h5M72MzDWWOLNShmjX4Jk jTPW95W9nO+rpxey9VyfkIOfL9SfadHfAMkQk0mIiNJjbhFECQYYPJJwAwSJ pBqjgroVB1zgFMH6XUxE6InVIWriRKEVB+kRWmFyYHBXXuITzZXjpQv1GiIV Btf/gWf2XpwD6QhvwXcNwytgJsKGcQIliEMQ3j5tC090KQat4aGFyPBScmgp NeSIjS6kzGPa9NuX9adPXHrh7MSoavzL4QmldUa3rFDbVUqLpWNw5st2VfeI +fOby3/4beC1ywsvHp050nTt8Mlb/dpWhYOmitOAtw/Di9y5ITYrHsQSZjvM V6AwvAYGvyaQqKHlApYrBbDB1TxczAbFhbDR+IXNmW8s+/lBL86ONX7uD9Ad YMDJgsjDoOhQL515KeGLrJKTpOepdZ0/SLu7ICTI9bvoKdSUNri0a0jfIUaO i23wOiRMay7NuuhPqg2ulxASbCoOMofIYdUh7tPaUoSsSM+i3EMk9DDrIxyg lG9z2tqDbD4CDyzX8/VZ8Xie4jgBGHyYrO64QdnCMBj6ECmNYLww5sxODc4N za4ML6WHHNHhpRTY0GJ8zJG2D6ozr13Qnmg6ePdDnzy/x3XxRe+1s5vXzweu nQm/ccn50pmVc0edLYc3LxwNnj8UOLs/dPmY4vDhC/uOd46YW8ctCJI7T19d GEGu8mi0DsMCNmYj+OEcMKCIcCoOgbNaGHIWwAEehp14aDIb5EZoMaIEORwe cdwMsO1PyVCQIHYi3kNyuHROzgaVBZE8C9RTAMAJyUvLPrBeqB804hTgirhY ThB7mb56iNPF5RsWe3yIay35AACTpsiWDoUTUoJwwi+NQLd13m3QXRwkfUlZ ZqWhOgYMM0wj2I0teIMxAplAjKJ63FUc4fwUiZ9ig20Pu0vDHvRHwOCN5IxC f3dBYfINtE4MLyZGFtPDjtjQSmp4GdCKjy2mFoeRK/WJpr13/eitR37qO9cU e6kp/tLx2K+ORV47s9RyeOHU86un922ePexrPhBo3ht96cj6hZPXD7/QK3d8 0a8bdmdH4RPwXYVRNzjwOfBSYpt8jLjzI2LmsEpgyNJqYdhZGEaoECdGFERg +6NhFYUeossA8+kykKf8gH2Y6JjSiQQWJ0ikFAFPFesJhO9fbhwSBoOU4b+S 7cUpgxgUhWrM4ellSNgwU9MtbXDBBgUHaacDBrQCQFSJZEKHlg5Vw2fd2IH7 1GdYavXQmKCvpzTEVMbRqA9JPMIxwGVn6WXExYxW3s3pHfTkWeYZ8hSGPQUa hx70gHw0JRofHfKhHJUcjwQYVmXOjGJAM6x0jqxmR5bTI0vRkdX0yEoauBpf Si8OK1OvntOcaNp31w/f+PFP1poPxi4eTfzqWOzKC+5fnXac2rtw/Dnnqb2+ lgO+U8+HWvYkXz7mu3z6tcMnB1SrN9vVI640fhF+b3EU51AccxfGgGeGN+eN rR4u4yj7TCDKWRxxgkO2Bj6ej0Nr7KBkJyZnZrgepCo24SMD4jI5zIAhGAZd EgwMGHEbEbmCHRbsejBMwLD7AxfIVeAblnyxkQvDjUcD37mME84G05Q7IpkI Wook7vaoaxvVAQeVQkKGSaBhUg2MsCmyyDAroYqRbSlvjDBx2eOeElXxRaOC wBHGZ339uWEH/mCRk0mD8/hGcZRGG/Vsg42RjWywCDesbuAEwEBipXxhZFg/ 7EiOrOZGVjKjSzHgahSc5cT4ctoxrMzcuKg5ceT5u3509UePLpzev3XucPjS kdgbF5bPn3Ce3u84sWf55D5IVqGW/bFz+9JXj28AV0dP9xlcbb3GIWeCLdGo B4gqjnnI3CUoR7khZmy5AKoxYgy4AqhGAa21ApXMCmSY0EapCsCM0NEJ5Sgl OjxPoXVdSiD/Jc8zTddLdZ/lSaE1bXMRl5bdVZSSw1eNJWECo55VinwXuzkY YGO0pwRgjJa69GzLY7lR3/tMQeGUoWSSCdtG29ge3WBPlTEIsrIRGG/UJN5C VSJ2lPAb4ahgOUozFE9h65j0oo3SKL4FXzSGRlCRP9rQxBwIjnuwOrOcnGid GLIGhhdTY878KKas2ChwtQpcJSeW00vD6uyNy3Mnjuy980cv/+gx2+km95kj Gy+d8P72NdvZE/aWo4YXm4wnjzrOn/BePB65fDR+5YT78ulXjjf3mdztA5Z+ x9YozB+nURzH2TK04O0c8nFaujEPW3lB/loJyBklWsbWwEpj61SuFdmNAnwG ElLkqhsjZPQrl0mUkqdBNzt2GYFikwrje5nyP8/zbrZhOSQjPCFgRIJnFAfh x8EoF5SfEaNc/ZL4wO1RCSEOTFHs921pyzNOxnhO4PKNMcZQOBYvC7/ujHB9 SyRuifXnOYQkQPMwGFACGpa/cZRhJsgZR0MHxhzxbo95y2PebRYHn8rS+EY9 MupFrsZZdWN7ApLVlHV0wjy+BmkqPbaWG1vNjgJXzvTYamZkNTm+ml4cUgJX 2heP7f32D889/HRby+UvL70z+Ppvp97/a9+HfX2fjPZ+MTV4Szlyc0b9+5ux 65eTV15Yv9T82rHTA2Z3z6ij1+wBomAabCbj0sw9aIx8ipcZ52NsDdcBodL4 OuI0jlABRbxK/BQQM0HUGNm4qzQmoBql3yPsGsnwGOUMlKTjGM/cBjAkckZ4 apXSe5E5wyLDS0qN8HMB1Rn9im0LsRgMtOYECW5qDxeXMTMCingpCXhxEQAP 8EdJxLrDmrxMOHRGSVwm4pgEGzShbTeaRNoYSS8Fx6S4SDsoBGgEbyGbwBKA KY/6ymO+7XFfeQLoohJsnAx5Y00+Hhn34YNK48Zwl2x8MTLuyo4uZSbW8+PO 7PhKbMyZgV+IY6sp2Up6aUiZefXi3Ilj++/5yRuvfTBk8E9qvIrP+kdkxomV 9ORKZmI1PbGcmlxJKuYj/j9/mrhyeu3i6VePNg+aPcPy9S7NMs22NMGnCn5R sCTw3tiWPmec+eulCQCJUBlf3x53QWR7AoNFpMuFyQ3NxS5sDRE3e6qe+jgb bpbqt0dFepdaiQqRHHiSoR1d391ig3sY9lwOLopXcMKbOA9ES/0z2fYXsjZI 76W9T6KgZBQZJU1xr4l4fX24pjvUylaMJZDtMQEhvZ1Vmfol3gqOj3wfx6Zh 2TlUQM64b4dKeO8O8yfQtif8ZYbQpG9nAk3EuVNmQbkrp+iaHlKvTDpTk67c 2DJwVZhw5sZX4uNr2QkwiK9mVoYVuRuX5o4dOfbjZ9omjBPOtHY+qLzZN2Hb HHemoQNEJpfTE6vJyeXEcvto9EqzG7hqOtVvXh/T+DvkdvgWwLj+CVStf5dv m3E+SeDx7UAUjbmgLANUE67SJJaQYEtQTjKHjMEw7sFDdpzIGacgOztYlqDk g86Em/Mz7i6PeaR7Anab4OeLlNt5qh/d4Hphgt2glff+AxJcUy6l2MX41V4c doIyzBhPBeUGNSkF4bczEcuTXlKHJQHvTqOs43xMIqqeNGj1KGNAOeZni7k9 5uOrKhILLjgPkiMhwfqzl06wafg5OeN+sDKVOxj07yBO/vIkOmVqQptgtrkz id2gaVutXhkfUE6sJSfWUpPu/PhKZtxVwJS1mhhfz4FNrGWmnJm1vsnCW5e1 J46fffbYkMklc6ZNk8b29z8fc2yNr6UnnWmZMytbTssgua2m7H2KyJUWz8Xm Nw6fGjStjZvCraPmcX9xAj7ZXyK2wdCZZMtFkUn8EFxVWlgArCxbL8tc5Qkw 9zazSeZ4SpPkT3p4iThRkgckJjzlcSkCgiIJWE5yB7JBGfsgJPwcIekxS0i3 BRZBWTFebjgX6mcE2/JjdQW3+bdIUtJ3MXhY0zg/L7im4372CM8AXCCx8VEy H/IzxsTyY36AJZJ5dya9Ow354SswjPMHcXA2PrMxCgJ1SAXDiXzxXhi/TMCU JwVCMnA2uU0y8wtHQkhEJjbLrBs8pV4Ij7eNyxxbk67MhCs16clPrGYnXUWZ CxzkaoK4ml7LOLvH8m+/rD354tXjF0cdAdVyVNU63HNzasTixUy1lpatZ6dW gK4UmHXSHL52wX3x1I3DJwfM61P2xK0hw4Q3B7OV+bdlmEvp6/zbk/xDypOb vCpjS8cYcwNR5TpRgiIZGUJFp+fkRmmibtvCpCqjojTB7m88H9azIuZMn3TK 4LmDLHn55p1gGYPywzjjwbs94ZNSBBNuZ1LIx3YxY2ZcUtzLj4xJ2vt8B/l2 JqSdzk0ohU1CTQxW6iKS3JM+YYSBzF/mY2KHbZAY1lMadrLBWBUZYBLg+BUZ dzghss06PDK0ymRgRxZgVfTRWJAizCa5s6PwlpQD6oFJs8ydQXOlZRuF8dXM pKcAXE06k1Cis56Rr2XWu8dyb/1KffLF1y++LluJmrSrsu7pydm1Ye36JHKV mlrPAVHw1JQzNS+zhK5ddl86/fqRU0MWl3wp3d6nH3UlJzeBnO0ppIt9Bf9Y 2ea2DINlsUo7PO4py9xknvIU+Bt1nAgtimzg0TnpLan8JaU/J9vITXjyk57i BL/L8ZOFp8HGKqVEBs9ko3k5JI2o1Dc45lWRK/xEFDsUmLLc32H7gu2dCZ4B GsDw4TfKRJUY2CEY2MYHilAmSdYJppq/IhOiy3hPkLhcJ0FQR91oNGqdoib2 7JQfquUp6j/VYPAWLAMVsh1ZEEECfypQmQwyByNTmxihJrRpmFWgOr3JW8GR b5bnDK7xzhnZckLmyaK5MlPe4iQcZ57ilLuAqLgRsAlXdmo97e6dyL37iuZ0 y1svv6laDM4NKWSalSm9v2fCBGeiDHKaKze1lpKtJaed6XnMV5c8l5rfOto8 ZHXJV1IDw7axlQj7XllgeyoAZRm+GqtofClklEXpq8nfAHKAqB2CCtGaIpDA pqAqTOYtT/lKc66Qwu6ZdISnlpPTiwn5SmJqPUPUYfYjoTFVsnMEzbfDciOl x4pQuSzjVq/yLMrygH+bZwmfdBDU5z/JjBKIjEtc/sre93Nxp7maO2KzUwee AajPZnWKtj8tFNcUygnusz5cX5B1WgSlnqwDYAByTwfIQHd0qHMQmspTAh4Z 6xCsTAWrU4GqjByq1g2C0wFopf4AG1ZFKz0Og6uXI3ACTtlC05BnNrJTYO70 lK8gW8tOAVceuGKlZJ4c3LjgMj+9nlnvHUv/+qqqpeWdq2+bVfaRtsFpe2jG Fukc0E5BjlrPyl0F+Xpmej01s5Yyjeo81y8vXWp57fhpOAenV9OD0ytDdj98 Jq6nWAdcgSACNk2RKb4m2Id1m/agTVE57d2ZAkK820iRtzy9geUUMTPF2PAi bDLOCfBWnHZlZ5ZjU66sDG6AG3TIArQ+NBmXnp8XvOprYNu/I8AAvyITGExK zIsTQUa7VUBCEZET4EF6tkLSl9lmR9ssT9eR4LIyZafEUvCeEgaiypJJfQ2D Zf6IFAzuzASREHlwR45ldSZQhVK+taMIVkQTwiAXwEyjEUVbaFjdwkcgyErs g0071K0qdZ7e4uU0NlVm/duqYU3/mH7GA4ufm95Ak7sz08hVDhXx5GXrySlP fsqdl7lzM8609bNu56Xm8RdOvHH+mqqtf3zGIndElYvxnl7t5OIWgCd356ed Sfl6UrEam/uiz3q+WXPq5OlfHLw5o592pkZUnj69a5q+epp/flnycU3IJ+Z3 5Ax+2GUbO8APlRW5dwdtAwGbZj6QhlAxZ0dWTzXlKZEx4FsUixGZ1j3tKXFI 2Fngr0zzxMhPBBnq3pgxKuKAEIcF7W7c+7wqicuygSBnsyKJzrYwHhAgIpwX wqY4QsIJsgyA2YBJNo0kVOTMD7Ikg31gEDLOhnyrSoLuTHM2MDiDMCBCii3q g92wxJ5bOzxCnacwXqVH0NiAM0CUsCkcvzodgrJCERqKt9bw7aE6XfJgWWdy j3fIplYTckDIDVBlpzfycnda7itA+pJ7i9MbhSlXGkSBG9eUJ6dYz9g+69l8 +ezcpZY/t7RMdPRNLQRmFqOzy8nB0YVho2t6PQ1cTbmSclcKrvS2frn/lYtr l5ov/OLgZxMa+Xpq0rTVrViE7DS1VaZ9JBl8IIL0D0FanApSRORMewVXAJWv Mg0RYXIyBokMs8T2FM82ZXaXkHtyE9oN+cY28YC607kg8BYY/BcrT/FUwBIF 54QfBEGpyk1Ou2M6+FWVA3W5pZ0uD9RQTfzkKp41WyxjUErhxjBAXwHZJoha z2DPKoNkpoGE6S2OzQzjZ4s5O2AzXyWB94QODJ5QBYCZITwIp9oMVMk4OeCE sZwJYZOc4gr+LDcWB7pmtnbUS8HxjvEp+9aMpwBX9xlPXu7NyX15uSc74y/K 4ezwFuVewCkz7S0BWnAmKl1wbx/JvvWS5ewLQ5cuDI7NTi9FgCvFSnJidm1w 1g5MKjbyCnd6xp3WrEYd3SPh1y/6rp679OzBNoUJqJtZSPRM2OTB7WniSloE sh2+DkGc3syW2DtgjBx/GZwZXwUM+JGjVajcmRHVaXFjgVK+ybMKM4WvNKn3 yb1l+SblwK8cLg14EOGUQhkPOxIYct4BmZ/me6EqNj6llAatMSdwKfkGYdaA DVRrRAvTtDLDtMbgLhNuRuQN3oQ9OQ+YhUJ1QkhrNkIFhd6qNHaQh3ZAdKrS mJycSh0hjg2DqjYTrirqceSKBcFXhGpoYaiiA6XUBJ3VgW1l7/TAhH7GV5z2 FhS+4gzw4M3P+POKjbRiE9JXFppmIHF5MnJvCXIX5DT94tbWxx8Vf/uy/62r XWcv9AzPKOybSqtPtbClNPhHJo1KZ1i5lphzBLRqq2NM5n3neuzVZtfLZ478 8PF3P/4SYFOsZnrGbdOBgthKFfq6imKLzZ+quDg7ClyZKtt3SBHhpPBViKIK MwWWVTAFogLwQGIp4wEq3UtFRgIMFPAzwRLEtEbAzFA5Vc8qO/xMCdbPCAVr kvKAdJowVOpnAYOkynSs7wghNKkMuteIh6qCo0IRrmaFq0zpgrST1Gc961Vc mVB1lmCTczwqM2EIVhqfmt2q4btCYmHDvBVKBWAQpreEq2Q1bowQsAiUFfJr 4LNusxRXsCB0johnIzgOjKwMVU3Gdbiuz6ynZn0l4AcuWrNIl+AqUIJTQ+Ev YeLyIGByH6Jlsbjj776eevMl55uvvP7ELz84etz+3jtL7/164YP3Fv/0gf2d 1xff/4353bdtb726fu3cxqUTocvHYi+/uHz+1OEHHn/3wy+Qq/Vcz6hN5k3L +UruIFS0ILR00uKAEIDWDmw0XD3ghCgiqyJOm4TWZkWxCVDVoJzhV7IdbApg FfMGwYPxYEUJ12xjADIbb5IOkS06cwlycb5wnhXBhjSyxUEiZatSPlEEQb6a nG8H1lTjFIWqktAo4lZtlsmKI4CPxrc815dnA4iDRrNkLDkoiAphFSWVuEph MsYVkTBL2LDBZwkGerzKe4ITqXBCItAKfWpKKCPECZWzZKJam4myzujP1q2q bOiM1VDVuBqXdUzI7UGgaNZfUvgKwBWUCn92ZhPoSs8Gt+FYVEDQX5zxZmd9 2zP+ktxXtFpcCeDq7ZfbDjW1/ODxiw8+MnvkmZWWPRvn98cuN4UvHg5cPLR5 7tDGucPuC4c3zxyMX2oKv3TCfu6FQw889pu/AFcphSs/JFsZXQ3RdmC2I60M mlg6tn8JM/h9AfxAWZ3dBEMfq8wCVWWgphA3semG+6eCbCaIIAEhSshXJuJK Oi8ojYgqP0cUoapECDssJOxZliDdq4oGQiAbyEXK5SDVOamKzogH03E2tDvL aeG5goLMQRKUqDVPEVx6kVtAPmWY5RyEjfWfEZ3FI+QzudmYnJMqY0MZ5kgo BSdUhZ67jLFZwkkRrc5GqRqtE6XEx3cVLMg6RHEo7WZptm1kVL00C9lpMze7 CcwUlJyr3EygqPBllMEyXJMwiUHK2kDAgCvIWjaLO/m7dwI3rrz3+C9OPvjT F+99eHLfs8vNz2+cfz586YD/3AFn8/Orp55xnt6z1rzXd2ZP6ldN0ZdfWDp7 8sj9j/0WuPKkFe78xKx7xO6ndMr3Gi1CReRkWDpaCoiDKKwP4lRVbtaUvCRD orgpgswqdHry9IJ+EGmZDVZngxVVsDRjCyo2dygTsvtApeFwkRioKQTPEvwK SvKzmB/YlEQy4YcCPxFEfmD6CopIYiWnpUZOlWcJ0UFFcQxGGFdVBgOjQvSv Ss9SqqFEwXtW6nmjMYfQCKpITSlViQQlwQClMrLLqgokZxdaOWkQjFWVnBxw dmf5I1XBUn0Q8FXhil7tGGobw/MOLFCYDWzPbBaVm9uzyFVesQnpK6MKlmc3 CqrN8uwmXN0RMMUmgAdcuVIf/G758rmO5/efeeCxU/c+NLn3mVXg6syezUuH vOcOuFr2rJ583tW8x3V6r7dlb+pXx6JXTq6cffHYfT9578MvZzcys/Br0RAY 0DsRJFwNZmw12D6qkKF80tpynOog1ZRBsCqYKlBVBYGcCmQS5RbkkwqlFIRK uSWCBIkqWJi2bEB/igAnFcaJdLhIuYUxw5CmTFJPBUhXXc0qyyqS3IwWlCbM PocnH4UkMT90xHfR9oegmhEVaWilZKJsyCpShMMZqQIwxMyuknGLkaoggVkF g1HspiISmKm+WjY2KWMcmNlYjQwdJRnzZ5E3GBOHpQj6xsXASMeYfDGkDJWV /rwyUFAFtgEeZaA0C2fiZn42UFT6sqrgjmqjqAqUZwOlGW8eqQuU4Lpls7r8 7/16/fKZ3j0Hmx/86anv/nhy/y9czc8Fzuz1X9jvO3fQfWbP6qnn3S37vS37 ts4cSF09Eb12evnsyeP3P/7+x61K4MqTm7HHelWO2ciOIkpQRSuqCF8TFV9P aWGFw1mqcpbQakQRQqKiUkkgoY8nBd5AwFRgW/yuogrkp4xuqIqzpjrbcHYo GyISD8r/g9BCZcozXNxGoYkf/jk1KY4W3uV9WLrgZT3yVQAkPKpCfRKUDcjF rfI3RoTcNIIqVlPTI6Q7VtEERWrgJI4RZUw0CV+KzEodmBPndOHIvGcVq9Gq yZWc+nJgcn5TuZFXhXcYV+pAWQksBUuzm4XZzZxyq6T0Z9VAnQ+atlVBSFPQ bXs2WFL6isvGFf2lC4FXLnTvOXDqwcdPfv9h+cHn4B4VPN/kv3jEe/Go58KR 5TOHPReaApeaYpePJF95MXzttAPPwSfe/7ht1puZhVc7M92yeWVkG4gS5PNF Zr46SkSxJSVHxRLUVk1FFKmDNTX6CAxWQ2jYFKobohXGOD8+QlVNIC/TrmtC uyrKGyrGT/2E4uRgqhSoK6PVBgykqfImNTWpIxwMtTDpi7iIGNxF56spQg2K o/pQwidTa4w6o8Mjyrp8wlgTyk3zibFxmHHRG41FNAyPeE0dr2niu2BqsBiU GFGLVuxMJevJgpoY9YztquINw4rRDKHy3PBsd8+UKrqj9OZVkYpqM6/aKmqC ZVWgpA5uqzYLymBOGSqpiCuVrwBQAWZwYirR2dZ7cytdQyuXzkSuX+jeu+8k nIP3/aT/6BHZhQvjV24Mv/Jm5/W3O1++0fPKO5Pvvq99/VX/9ebI9RdDVxhX T/7h03alLw2vnnPn+2ULs8ECWxA1mQpXr77C0mpzCba4abDkIKnDvARCNKGa OlRThZAWZixdkPQ8E84FsjLNqgbvGxzaxi3/X3ycA6lMU4qwWdU0UYENk5Jv BGja5bJG/1FZDXd2NcTS/6EV5dNQdQ7KODlR0RrnjkZoquQSV6kJH2R98EEy DkyCl5oEj2BrYneO0CKrga9OIGaqRE1F3VQJjGjQKCIGoXF2JSzx2VjFrFsa bR+dXYtq4lWlN6eOVtSBvDpU1GyV1cGSBrgKEFfhomozq46UVf6CamtbFYKb FTrQwWF1mz7829aNq9HrFzr37Dv1g8fP/uxgT/vQtG5VuRRSLoVnl0MTs0tj c6tKd0qzEHZ/2ZV8tXnr5VM24OqBJ/74eZvan1V5C5qN/PDMitybBF00IE0c FgdLVVxaZCStcSU1jKhQbW5rFxBCC9e0WBJdaBhBxiJVDeYHTHoaCQyqagPZ CfWKpoEQ1kfDsIlRf3qvBlt5k4bEJcMqaV2VkCBUalzWeE0CQ8udXU2D3HO8 lGTFCAYTvFUX29Viq9STMbY71xCUjD2oJkjwqUQNjDkaAmAuwYK7muQulehr hUFQ21CdI5BYh7kkexYdTZI/qBFB0Rm+sWpe9I1/OTDrjKr8OXiXypebi+2o gwVVpKQJlTWhkjYI5BTVwbw6DIBlNZGy2l/QbJU0gJYfqbNsZI23euaHZOG3 Xo1dP9f5/P7mHz3129ffnwGi1mIaT1LjTs2504p5/4jSARlP4y8uTZvjNy5F rpxeOHP66P0/++DTDvVmTuMrzHkLUxqPbDUIhGtwd1Q1iaq07FygeD2CAgmW eEkskVObizCrooXK+lDZEq1oQjtzjAFRAiS6zfSEenkuwtNCnQ3J4gQPvbrO A+ExR7TAfLTMEVUNo4KMVbEDJ4FBsstbUZGalqRnccSAgjomLnAV5yrrWE/q LII1iQFdEjpw0yZrUNVjsEbxmj5JHciwfwr6/B1Ml6IIK5N/n0vyZxvs79Sh NpcitPApKGvIFUW0zFLcmfdlpj5qnzCsaSNlDXGl8eXn4juaYEETKc6FtzXh 0lxoW7NVVG/lNZFtdTCrie7MbRbntkrQqg6UdFvbK/qViS+7FrT28Ns3Yjcu de49dPrRX3zeNqhcT6jWYwyqOU9GvRIZl8+rvEngyqFzbr1xNXKlefHc6WPA 1Wed8HaNvzDnyyvMoUmbdy5enUtU5yRdmIE0cVxSVmXCzQE/4V0qa1piScNx qmkjNV14Rw+T3Mjr/QVTcNsWzWs289oozxuMBABG70/LlKs6DkmVZQOOikgj WvZ2lLimFWxoeSbBWel4B4qL/dugeG0+kjMHE/pg3hjZMUar+lhNKxGVFAiR 6TkbEKwZqMoi3EkCIVU9lDxYE/0FQthh1wBQgaXQDOmaAZw0+gAJBywlWqlE ulLImDZd06VqVIUR/s7GYVVtGunSEVeMQxqnhkEqwUyRbdOAfLR7Whve1kbL mkAOOkPemEtU5raKc9ESxOfCJW1oey5U0ITyEFEHM5DN5gJFDAJ1gZJtI21u G1Ro7Yvm1cg7N+KvX+7ad/DsY890DynU60kNoAX5ypPUeVLatcS43KFY3Zrb LBgcYcdb74avnFk6e+roA0/98bNOLbzXX9ACXUuJMZNrLlmFvaBFq2qZk2BE 7fJ9LejShhssUqNcVAVytNFdSFBzC2G9K68PVxlF2jjHSRsTSMTwHDFsZqa1 LnbQSPDoJGbi7O1cVj0mihqJjj4aKoumE6andCEeqTH1dcH0nC9lCG+bohVj eNvozxuDJV2kTKiwnV7j8JBeSIUgxJjYNcYpkpDiNQOVxABPL3qhr46ewgcJ G2OqxtBChARRhtTfjeldZgbu1AyZqjFTM6XBdkVrjXUw8J41PfmMSWQVIpma Lr2rAyexY1VZxzom1GtRfbyiiwEkeZgS0KVLVrShgja2rY2g6QChSGEulEf2 gllddEdLXGnDJUgCK7oFxeis1h1bsqyG33498drFrr0Hzv5s36hmXu1KzIFt pLTA1UYaGJuec8ksrrlAwbSWcP3hT8DVwtnmIw8++cEXndpAXguv3szpXJkR 9bIuuUNbj3HF9iaXkp0OOgYV+CwvIVFVKHVRNAaPEc7xhQhG4jV9bFcXq6GB j8xUyQGuMGIKZuRmj4640iEqkCXodVTVNQADrzYIhChLMKIkfmosjYDPROcM pLgDQSNozZx4xehJ6LxpA1URA1A/VSMYasKqWILKVDLHhE4VfDOZiTODpSlF bAiEjFjdNQmjpgZCMrv6zC5QZMygj30yZNmaJVOzZGvmbM2a2WWOWTQZ8RHw ETwcBwchrjLw0qrNsjL6aZfaD6dSSp+o6OPbc1s5faY6F8zpkxV9qKiLb+sj YCXYX/owgJQH9uaAq9iONljQh7DJsRJSffSleiWg20isWJzRt9+Iv3q5fd+h 8z/fP6m1a9yJOXdC603pNlKwepq1hMoaGFXa9IGiZS3p/8MfI1daFs41H/7B Ux/cBK5y+s28PpAz+PPDs8vaaJF2YlWbqurBklVJJh13SNBkDX5ozIV2gCg9 ErWrj+4asESQjKFt3WqKpRcDUaQnSAxEDhmr1oyB5LR5wyCOFehgTPCcgDAk aO/zM2iXvZeZmAxPDnpx9AhImIO+kSUNUh98xCNVM4fyxs0c+bvm9K4ltWtN 18BsGbT5DMhas0AkU8VItjaPVoXSxixXtWdrC9manapW6oBOhsDI7AIMZoKE U0EwGDN/RzYEIcZsVfh/N7OmjAQYltjKOmQFhFlIa/QssMSxxO9ybMRkH345 YViCpDcXSBtSyJU2lINuoK8hvQMgGRLbRkjR0ZIJMnakpAvnqU8WEp0uVACo LOHi8oRmon0ELgx6b3IVuHrrzdhrL7XtPXTu6X0yrR2hcif13rR+I6XfyEC+ 0jrj4wq7LpC1uBKbf/xD9OWWhfPNh3/45J9vdumBZzgfAzljoDihXldvZXRp JMpABoDp0+DQxqeInjSCUrYYkDtjCldK7cvptsqGSM0IaMV2gRZTqKR3piWK DPG/g6+D7Jeo6unegk1ALPi+yLTBK4EhEggZzyEsz/CTxSji5EPw71CaODws S9SMIsPgUcLzBlVBXBQa5baG86ZAzor87FoJJDQiZ15UMU5Va7bK+ljAwcgu o2s+S005DLKhLGTmLBqwQWDscoqIFoaZiGArA8mYFRRlayw7gQFFxhxGDBgU raxbrl5dCOe1ncOTY2pDpAgw6wJpc6piSpT04bw5W9Vv5U2ZCjSZEttwATMC V5GiMVrURbJAmj6UNSbgh1XBGC6urGxqWns0Vo8JIPQmnZa1yBs3YtcvtD2/ 7+Iv9k3q7XOexJwnBVzpvEnMV664zpOUq5Y17vi8Kxn4wwfAleNcc9MPnvgQ uYJklTcEc4ZgHiSecYUNmOrBKga0qpElfzodaNdXWfKfXgzKVyNgqtXwjDM6 60mp4GYeKhmiVWOoqHeljYgQsmTEIwxPMWbEQ40yYdXsj8xafMaGxMLyiSkp nDQZP5t2+akESSZFGSDFjyRz/XJSo6OHbWekyMxwwrOGDi+qWrdyps2sRXSg EQi5NJ4+lkwVkpVFBGFwc7pK47ByVxoWjcQ1Z1i5S60wCEeLtZKDGYwjlyMw yKgbOqyzUeoPEbQq78nOxCwGaQQaBKiOFy1jyvFhpTaYMiRK0H9uKwWzNSWB q5wpW9Vt5YzZHUOkYEzC9bJsjIFARUMMElTOEC/rQllDErjK2/1pR8/QjMKg X4+ZiSvIV5G3Xou/cuHWc/sv/fzApH5Bu5GAE1DvS+t8QFdmbj2u20gqtC65 fcPmigU/+EP0SrPj3OmmHzz1l5udhi24xOYM8PZgQW0PTa/4jZmKMYNomdDI h/VkKpN8LBvIlwCniNwZVa9FZp3h2bXY7FpEBb47oVmPaJajBviKRNUEICFL aERLVcIG7jDmrfCsY5Oh20iRGRHaZVV+vUnvNmCDkBBIFMzwXGRKM352BQ+7 FnEwYRpBVHYZD9Zg1hzIMjDg60xkAlEOjLnRslXQSOBEaScreiIGVU5Xg/oW gZDAgFBhCKEhZibBmKAIfATJlGfBXTOLQzVf7yM9Mp/asU2qBm/2GmJFXRjz D3Cl3UrjLgOu4FdwrgrKmjMVM+SrFHC1bYqXTNGiKQ75Km9MwB0+Y0yWTVv5 datz9IO/wXXdQFwZvSkn5+pi6/MHLz4NXNnh0qX3pvT+lM4HTkbnSuo3knO2 0KR2ye6OB//4QeRai/1CC3D1cWuXAXIgoAX7dyuvcyYmbS5jZgeXGndoBWYI mxf2BS07ri3tWSxnVsIKZ2RmLaJeC886I8r1KNjcOjmL/lmLV7keVvtS2mBO Fy0hYBwqjqg5VZ3xh/rk01OGFWN8x8yZqVFrlfsiWBc6XU9QbBqWdD0joQnF CQZUnN1zLOIENBMelmDGHMiIfEXMZKsCQtaNGb4FyxyVdXKqjCIGBqhvaSgb bJc5jCuq7jJCROuuRXoqX5UeBJDIdvkIeWZVE1ihZiIHDuVlu2vk/U9nVvzQ aghngRCYp34rbclUTKmSPpqHR/ShnDlbMUeL5lSZuNpmXBkiechpunDGlNyG 65nlZs/MrNkULBrX4xZIbr7UqmV1661XI9fOte05eOnp/WPa+Tlv3ACXK/hd 4E8avBm9O2nYSFqcqenZhYWVLc/vf++91mI4exK4+vMXHcZQAYgywR0vlDd4 s+PaZXOmbMpWaA9W2Grz3UpmYkudqX7y5eiYbl3hDM2thVTOiHo9plqPatZD qvWIatGnnN9QrYeU7pjSFdF4wuqN2Fwgo4cJx7ctqYoFyamOLq3+/vfvvX7l 3RFjgGhpSBqMnHT9RiSxYW6IcFQybO9jZ0tGXJ6zqJcFr0D0wyrH2EDSYKdY AylLICtQ4d9lYWhlJasyxyo9nmMOy0VcXzMxIBFlQVTIGAxEBfNZXKoyswjj kUKtsYNFKgtV1gSlBaDKVZfdW/K/dii0i+Z40QoJLZwDcqAJuQLhUiVDLG9B 3nLWXMUaLVpSZTMkq1TJHCuaE0UjcJXahluWJVFakesUbUNGd8y0VTCux6xw T/OnFzT2hZcuL5594aNfPn/qyedbhye13rjRlwYz+BMmX8boTkFaM3vSM8pF vdKuu/bq/JkTw0ebnr//8bf+9FeYjwksBFYAXKd0q6ZU0cyIwmsqGnwFLjJM j+1r2rz7f/T0C8+duHrl3b/eHOxTmCcMa3AIatxhlSumWvSqbRvq9bDKE1O7 YzpPVO2KqtxRtTuidIc1vpQOfizAKZ8ojciVn348pguWGKvMJGAsTGspk6DK u0xoSX3JB8VxnjmMWHm8yn6pEWNVyTAIXG1l+eO5mohXpacoDnfy2jwMyMsq i1iENYJhJbPkd615IGqX05JjQdEBq7sW0VOKWwpo1ka/UHesrAmrVd4hV13c jKs+754xrhhCaUtyex64AkLS5fl8FSMw1XTJFMvP53dNoTxyFSta08DVNvBm Aa6SRRNks1TZEM6srgc1n7frFn1GfxJ/JgNX0QJwtWxc9b56NXK15dNn95x5 8vmOoUm9N2bypqHJtJmy+LNmD3CVhIhS75qbNrrefXfz5dNzZ1488OATf7nV bYTx4SAO5y2hgjVUkhtcumjanKuAWfIV/LHDjfwslwbEOnD73U9/8+4nbr/7 +XsfOvzYMy/84viv3/rTF20jw8qFKZ1DZXZrIXEBVx7kCn47gKNxR1QEmwoi kMS8caXBNqVehsukObWDx64EEmWVRrAlWtBIX6v4gW+ti96IBPmEBKvOc7qw sy2QtIay1nwVLScG5Fa14VPYBM/aWDBPI+RraLldgmTXKnCCIHSzsVZiYB4s W54Pbpk8btPGum59ZWxxRRPOwDi2/C7jBLsJhyNUJJNwaqjigMBVAeZQXQpn 1J+2jU2oQRRjJG1JbUOrMQLHetmWhx9NaWu+YsmUzHHgCn6b520wc+AqU7bE 4TQsWmIFS7JghmwGHAaSC72jQ30jVjgufUkL3KxcsXngypdyzq9F334t89qF L57be/7pPf0TSt1GBBMUcOWNmT0J43rY6Apb1sMms0vfO7n57lvxG2ftl84e +sFTf+3qsUTy3MJ5a6igsvrVvggSRWs+zyxXtcNqZ6tSEKZ66I57n/j6nY/f duezt3/n2W98Z/83791/130Hv/fjY4892/zLIzfOv/V5++iQxj6z5NM4t+Y8 cc1GnLJZCM5EtTeq9oRVGzGVeWFSZZuFhOZPzAWSukgOLpzmdBkyuaWONFIN c5gnufG/AaQ+VXk+saSLpsCm0bth8fmUa64pd0AH65ZlYOD8bUTIPI2Gji9u Ia5wBESFd+OQCEL+q9lYK+UQKG1McekRqjISbMm0Yba786+va4Y/bP3LaweP Hd3XfOn3XaNwn8FuRUFLkawgjKpWLKs4vuSLboupkn1EPvjXTmM4C63mSGY+ vW0HMqMZa2bbVqiawhmgy5ouWeJ5O2TUcM6Wr8zHCsh5ogQLZUkU5tNFcyw3 n9petyxP//kTzYpnPpI3+1MAgMkdgc7mzbRz3hl950bmtcsfP7236Qc/e+Pc VW1Pv3VwYn5kar6319bVab3VamlttX3+hev99zavXoj+6mTi1Rb7xeYDDz75 t84+GNAayVkjhfkwWFG3ElGu+edhJmDFHVuhArOy4S5jVpHKZ++49ydfv/On t93x7DfuArQO3vbtQ7d9u+nrdx36xrfB9t1xz4Hv//j4T35+7uCJV87f+Kx9 bEBplS+4Zlf8mo2YxhfTbEQ03rhKb53S2JVIWlzrjai9MTX81vAl4FezPpoz JYqwp6xZDhWJzkio0gwZ4QiMPRyUD3800f5b9dAHv3v74i8OHT509qVXP/xC 7o5JG2G+/hXVeX8Mdij6hSqhgkHqybABTat2jg30qZHxiE3wA769sEtB3odl FbLaQjJlkLd99vtLs32//9vvLj6/97nvPvToz481a7aSjBObZAXmMHiqIo7O fAms3nkxW15W6Ce/7DcuB+25HXuxag0TTsWaJZaxZcGpmMJpUA3IsSYKMIgl krUXkCtrbns+AadhcZ64skRzzq2U5VanUmsyb8Xs0ZxlMzUPx5Y7YosX5jfT Lvg9+Pq1xLUzf3nqmRP3P37mgceURw55W054zxz3txzdbD681dLkg/LcsfiZ g7FTB2Lnj0WunDSdO3Xgwac+6ejlXEXz89G8LVIwe5LTtjV7YQcmY8eVrMAk 7fkq+nmIVBaohMjD33v68q9eP3bgwM+/e98v77rnmW/c9dxt3zoAiesbdx28 7c4D37hzL1bvOvjN7xz5zn1N9z/0wiM/u7Dv+Munr/75o/ZemW5q3qlY8Srn jHKtA3DS+IGrsAYc5Cqm9cXmfHE9BP0JXTBtgJ/D8YI1VZ7P7AAhEgmoNWHj iPgne3838sWNqY6337z24sM/fezeBx/6waPP9qhW8X/jeTRSn31I1eaLW8M5 9l08yMihbiAuRBYKrJVDZcNgjQx9W+ODRakVEvu2LeA3ORfMDoNe9vlffnNh pPXtv/32/HN7nr3/x489fbRlLpRikNgFP3a0mq1UFT6hJarCqTmy5RWzbeKT W6ZAwhrIghCOUtUaydgz2/ZS1RLN2rPlhULFEkmhashVfgFYjeQgaEsU7Lmy LVGEuC2Rh9KxlV6dVk70DFpCcPwlFiB9BVJ2OLOQq7xtM+2xrMZevwJc/fmp X7Y8+OSZ7z/R+8yzgeYjEbAzx6JnjsRbjoRPN6XOH8+ca0o0H0peOB65esp4 9tTBB5/8tKNnPppDiyFX9kjBFszNGFdhcQAtmI+9iKUjDzhV0QpVB6CFyFW+ +x93Pf3oU88+/fSTDz3y6He///i3v3/g0cf3/PDh5757/7O3f2vP1+84cMfd B752R9Ntdx775t1N3/zO0du/c+yOe47c9d3Dd99/9MHHzj7XdOnwizfO/uqj D7/sGFPOLG5oPcE5IGozrvNHtP64bjNh3Ezo/AlAC0ibA2czod+M67cyRthc ieI8XA9gz+YQ8qWw3zDxkbr/PWXvb4db3zja9Ox3H/zRg4/+8ta0ec4Xtvqj 9mSR9kXVka8u5itLm7BDswv4LaAv20E1DhKpuYDVGlN5oYhNZLwPGsar+KyA AVqXt7bWNLLF6dahz9+a6Xp/8Is3zp7av3/fL1+/cvLZPc/d9+MnnjlyQRtJ i0dqwAMaDFKq2Lep/K8G8e0dmLPTbB/+419glRaKFWswAwI5SpX5SHohW1oo wc08Y8uVockCERgwU5xPFmBkK3xmsWyPF+z5bVuyaMuU7Mm8PV1wr7gnf/ue esFpi6atkfhCLAt3LVskP++JLCTy9kDGjVxdi18/++ennml54InT3//pH37y 5PrJpjCidTTWcjjW3BQ+eTBz7mj6TFPy1OHUxWPRa8gVnIOfdvXY41k7ZKpo wQZlrGCPFBXmdUsqay/CJAEq4go+gXCiSIXx9v1/vf3nd9371J3fefB/feOb /+NrP77jnqd//OiTP3nimSd/8ZN7vt/8059fP37y3J6DL/zw4cN3fu/gnffu u+3OQ9+468gd3zl4x7eb7rj72F3fA8wOff3bTd954PD9j7Q8d+TGy2/87r2/ 9k7OTZqWZlc359wRE1AE+QrpiircIaUnovPHgDR9AACL6QMpw1bKEE6bY4WF TbdN8dlo6xszXb8dbbvxwrFnvvfgD+554KHHnn7+WNPJW6/dkI8rbJltmLm3 sLNdq1Ur5eLO9moBvhHxQGaQELQGB5schZqjQH1EE3/kK1ZzkLOYzjq86w79 UPdH1+Xd73V/fK35+N67v3ffo0/+9Cc/e/q+Rx5/7sQ5fSyNwzKiSpBzKgvC wHcUK4vsFQ1xWHaXe3Pqg0/GZuYcpR2oWrfSC4WyxJWDuFrIby+UdqzRFAyy kCnaknnoPA/xUtmeyEErbq4scrUaSzt6BkYHRs2hpC2WAq4csZwN8lUka9sI OxI5ezDttq5AvopdPfPBE8+eeeDJU/f99P1Hn3KdbIq0NEXOAFdHYi1N4dOH IFmlzjSlTh1KXzwWf6XZfL75wA+e/Kyr1x7L2GPIlT2G5ogW1fMeQyi6gFyV HWg7osQvQgcx27nrX/7j+//+zYduu+NHX7v9nn/9+kP/ceez377nydu/9b1/ +9q3/u1rT957f9Mze0+3nH/xxIsHnzr42tXXf9VyoXnPvr3fe3D/PfcdhMR1 932QxA7d9q2m2+8+/M27D9/13SP3PHjwngebfvjT5p8funT87KsXXv34b23d 46rhKbVi3jnj9CrXg3p/FP8pF0gagnF9MGnYhCQW1QXiZpdTJ/u8/4tfKwY+ Hrz55tnmQ4889tP7Hnjou9+573vf++Ge/We03jgcHLBNtrZ3/vf/+5//3//+ z//8f3bX8RurjgLnCncNwQOOHb+06pBw4hJ/VW6sYgccAdUHKiAZFhas4/0f v6IZ+ONY6xvvv3Hm+oUTL507vnffnvsffeK5F84aQOg6NphzFhlRaFX0tysL kKC4g6S5N8Oqv7XOKAzWUBzii8Wd+RAMUl7crtiiGUduG4K2WMaR33aUytZY arG0Y8/m7an8EtyQY1msJoErJAp4c8SzHoNZ9vEXprVNK6Qp4CqaWIhnbVtJ OA0XvBEHdN5Ke6zO+BuQr8598ORzyNX9j/3mkadWXjgYOo1cIV0th0OnDiXP HI61HEo0H05dOh599YzxfMvBHz75RU/fQjyDSTJWBKgWkKuCcTWk9QaApUVO FFkJy4XC9iLEC2A7//3//ud//m///C//7b/f/i//9u3/+bW7/udtD3ztmz/+ j28+8O+33/2//uOR2+546ht3PfLv37jnX//j4dvvfvaRxw88t+/w4SNPP/zz V6699dqrNy6fObvvgR8e/96Dh+/9wb5v3XPwjruP3vX9Q9/67oFv3dv0nfuP 3ns/gHfkvoePPfT4iw89eamp+c0rb/7pz599emtgTGdXrXi17qDBGzY4V/UL Fo1ROaeZ7G//48fvv674/7l27+cozu3d99dtUJjYOcz0TE/OOSdplLMECggJ REYiSAIRhUg2YIONwQFsMBhwANvkjHICkVFOgAn73FP1rfs/3DXy3udU3apV b73TPT2a6ffTz/OsntGZL099vW1by/rauprikpKK8op4PHNh1Zob0FC/+dj5 9uOr9//+n//53//v//w/H//3x4HEx/kHpP8KxfuPibWeezhX/3cO27sSOpNY a5j/X4WZ4+GfCaxv95u3HXfPnvh0zZ8nd/71w7arp3deOd165cfWrY01Oocr kF/yzfU714bHOxIM/LvzQ6Jg3bvmAIN578zr9pfD7dNvEid/DqHB4YnrR479 fun6g8nX9ydeA0tAy/1Xs51zXLWPzXa9+dD9AZL5bOffCa7ujs90ffh3x+u3 HTNvE0SNve6Gdzv5puvtewCmc/bto6FnVw4cunK3+/5zEKvXDyYSXHWNv24f nuwcfw1cdQFXwzOP7/WNN64GrvYE49WmUKXB1+IMdZUXvqgueVlT+mpx8XB1 8dPKgvHa4sna4qna4um6svGG6rtLFudbw0dO/Ng1Mdsx8bYD0Jp42wk1/vbe 44m/eh51J7j62PU+Ud1zaHVDqul70jXzpmf2HRQiFEkEAolQiKUISKFEkiIS JQtE8wXSFBEukCgkmAYhjQitxWgbyqZxqgAr10gJLcpEtKawxR5weLwqY3kk WhDPjLvjK2tXVOcVZxodBVZXod6ap9Jlg10qtEUKbZlcU6IyFfGGAo2p2OCo 8sTqsgrXVtRt39hyuG3bic9bf/xix68/frGvrWn18rofjh08eXR76/amlatW LFq8aOOmpkXVizY0brn66OXtkem7I3BJzvRNve4cfNQ1OpVIJgkr/Ielf88t 5b//oyGQTCZm7/T099653Tk80Z3YCE9IkDOnJHNIJDZ+nKPiP5oD8+63b7ru /vz9p6uvnGq9cabt+pm2qz+1XTvTtmfbKsjtartX5w5Gi8vX7j5wY3QKAJir j11zAtX79/vB9ts3fzl/p/9J+xwej16+un7o8PlzFzvfvn8w8/r+JHD1b3gz D17NAl3dHwCbGQAmMZmY6YLL5MPH+4kDP3aCXs28gUn7xGw3PIQD374HYPon ph8c//bn02cAyPsvIK6/bp+YejA20QUqOpygq/PJyBxX04/vdI9vXDW5tmZ3 KF5lDi00Bht9GacWVp1eXHduyfLzS5f9snT5L0vq7tevera0ampx8eTSBeMN NbeX1OTaIkdOnuqCkzz5FqpjbuwCxl7NXnzQ1/Xu/X+h+tA9N+l/Mv7Lti9u Hfjq0VffP/rqO/H8ZMG8JOH8ZCxJQKaIJClCUaoASEOFErFAJElNYIalimVi hBYgcjGqQnAdwepQ1k1zHorVIRQvIe0UZyBZE6UIO/xhfyjujy+rW7OmHgJS SXE0Z2lm3qJIxgK9pVhnKVTqwCtLFLoiTrdAaazUWso1plKNpcziXuTxLcvK XVJQvCS3sHHlqr0t67Y0rV+9YvmSpbXNm5uX1Cxu2rzj+tBLyBJ3hieuPX11 ++Xojfaua4+Hb72avAOpdWIG1guiLGTdjjeQwT4kLObv95e7Hj148rIH8tLk fwF4/18G/jP+/wvWt/fN6+47Z77bt+ra6V13z+25da7t5tndN37ec2hfg9nl U5udMp1ZZXW70/N/73/SPXcIvFrPh//VMzfvhtP+9t2D0YmbfUODU7P3jn9/ rO0gyBfs6ph5/WBqtusjcPXxwfBMz//h6u/33R///WBipnNupR6Mz3TPcdUx A0d9AN7gYcfkbPff77smXz++++DElm1XHg1BoGp/kbC/diBtfLJzYibBFYjM k9FukLWR6aE73aPrV42vrdkVyqi0BMtt0cNtn93s6L//6OWDx686h151PHx+ /+GLrsFnT7778W1d1VSCq8W3a6vz7OEjp37snnrdNfUWCqDqnpirsbd/3Olp fzPb8x7e54f/jh8fPR693LTnzubW3p17H+76VDIvRfJJMozAlTQpJeVf8wXz kkVJKdJUoSRFAJiJU4VoqogRIYhYIhGKUImURHFEKEFTxbhQwkkJmZRUJ0yT 5BHCgDM8wlhJLqjUuRS8juHSrP6CWEZ5UVmm17cgnlWcmV0SjWUabTlWT4nV vcDiLFXqCxW6Yl5foTaWgGnyumqNscxoLzbZKm2uRb5QRTitrmhBTUHxutUb f75271L34M1nr/7ofXh74PG1qzduPB6+82rizujMvZGpeyOQXWcT49gbaKDu jcF86sLlO51T7zrfgKa9hyVLXGVzOHW//1897xNrCiTAKv+D03+oAEJez3Tc /OG7/Suvnt51+/yeG2f3Xvlpz62ze44e3GgN+JRGG63SKy12Z3rOr30P4fmJ QxL177n5f14HFvrmjbtdp38++/nxW//g9/HfHdBMzXHVC9g/H+9+OQzAd4xM 9fz9vucj6NI0KAAsU/scV93TM51jY10zU3eHx2D5Oqdme96+f/zs5Y39n/52 7vdO2AtK9XICslbnxHT7xGQ3JPnhye6J2c4noz0zbzpHpx7f7RrbsBr0qi2U scgSXhIr/OvW7a6X492j0z1j0/2jM72vxnteTvQOTzzqeTS1uXlqWflow+I7 4IO20JEf5rgCmZr8u3vybc/EG+AKxhsdj+6Nj/W8B4H90DNXve8/POp9duub H7qevegaGe8em0DnpWLzUvD5qWSSAE1KEXySlPpJEgJbkoXI/BTp/GTR/BQ0 SUCAdiWDOQrFAqEEkINRKAQPpYUS4E0sAnETkxJUS3NqKclLST3BmHBGhZBO Runn1FaM1aJ0QKkLqPVWpdqp1MU8gezM3MxIWk1hUV1BvCoarDSZVvndNU5H rc5YpjEWytU1Ck2lSlfM8qUKw1KdpVxrqXBF1sTzmhYt37Fu8+Edu77esfv7 k2fOX7v9Z+/QzaFXd1+OQ2MF460X4/eGJ+8Ow3ziwqUbD0Zfz92Hmb0/8ebB xOwDaJSmIfr+3fnmXcJ9ElHhQwKM93N4fPzYC0Ix+ur+X8e/27f8+k+tt8/t Bjf87fsdt37e+/2RTbawT2G00gqd0mSzRWLbPj94/Oq1zjd/94LKzRVABS8C Z7vz1cjFPZ/+fPh4+/B4+/BE70fY/u/OmdmO6VmY9L7/2Ds41H3j2oP+ofaH L3r+/gAbOyame4ErkKaJmb73HwYf3b958djlC0fXb99yvrena2pmYOZ175mf f/nx9L2Hz+Cluiag6ZsEf/w/XHWA3YPoPR3pBa5GJh/f7hzbsGpsbU1rMKPa GtlYtfz+0JMuYGl0smd8un8swVX38ETfyGT/89HhA1+MLVv4qmHx1aXV2Xbg 6ofu6VkQqwRUifFNz+Tr7snX9/qf33r2rO/D+95EfYCCt/qwc6jrz8t97971 zokY/g9U81OJ+akIKNW/5gv/lZSAbX4qPj+FmNslmy8iAKp5yQCYcH4KgCea lyxNSsWShYxAignFiFCMCsWESEIKxKxQiksQRCLFUYLGKEqIMCJMISF4KagZ ayMhntEWXO5nVWac1aBsVGMMGwxunTZfr9+Qn7ZpWf7SjFBFPKvIFyw0WvMM 1nyQL425Vm1cqFCXqg0r9ZZahXaxxrjUZKsy2JbZXHW+aEN6QcPCmk3rWnZv 3nmw7dOvvvju1LFTF6/dv9w1eO6Xy/dejEPDlSjom0bBL2AyAzXXQ80kSJuY SbTwsDozbztf/93z9t3N9vaOv7458emKG2d33jq3++bZ1ts/t929sOfsN1tc 0YBSb6E4lcpgtfvDVYsrChfX3hgeTZzeDx//QQsmDyenus+ePb1jz4ORid43 f3eMTAJXvR8/dk2/hur7+O8+UM6RqX6g6/Xbmw/6ACfY2znHVe/f7zpevuod ezXY8fulk7vOHduRX1x44ML57vGpoZs3z+/Z82B45MHQi66Z2c6JNx0vp7om Z7vGpzsmproSejXRMznb+SzBFcjgf7mqbQ1lLraHdzdv7wSFBJZGJ7vHpvtG p7tfjXW9muiFtzc88eqbE6PLKocbFl+rrc63B7/68Yee6dnu6TcAVaISXCXQ 6nw2fn1gCLj6p+AK6nv34WH7o86Lf/7DFWAG5BBJqcCM6JMk6b8SJfpXshRs MUFaCgl94nxBgqukBGZYUgo6L4WaB6QlSp4kUKRK0BQBChksIXepeFIqmSyU JAsh9mNCSaIEEjBNMlVEilBUghEIjooQUohSIlQpJpQIpSYYI8FoMcpEyj1y tZVkLaQ8qjUF1QYLy0dMjqjL7TOYcsz2BRm5NSULa/yR+pzCmnB8scVdZbEv 1RoW8PoahW6BylBlci03uTbaXEvNrjq7f1Mo3phZ2JBf3rps9aHN248fOvr9 1yfO/Prnr9dv/3mv687jl9d6H97sH4RT1DE21T4+C0J39xUQOA0PL1/+6+6f 3x/buwKgun9h793ze+7/srfz4v4L37b4okFebwVhVumtTn/wQNv65UurmnZ/ +s3J0zevX7099Ojeyxc9o2N9P50+sXLN/Tv3Bj587AOuRqcSLEGsmnkNKwWT AdDJken+Dx/7X/99ExLPO1ijj10T0wNv3vZ1d3Td+P3quYO3zx9oa15ev2JR TkHBofPnHg89+X1T89mfz/W+fdv++GX37Gw3OODLyTmupjomJ0CCwIZ6J6e7 no/0zMy2j04+vd0xuR76wdpd4awaT+zzzz7vfDXaOZywqu7x6d7Rya7h0e7h yZ6Rye6RiRfnfh9dXj1SX3OztrrAETv20+me6Rl4t71TgNYbaJRg0jvxpnd4 +kp7b+/7v/sSl1JCtQbevhu62XP7+A89T54NjIwOvBplYcWTUsXA0r+SMFCq fyVjn6TMOWNCx6ikVBpGEK55Sfi8ZGZ+ivyTFP4TgXqekAeokoVySFlJqUyS gAPSkgRskoCa0zQpyF2yCEsRoSlCabKASE7YqDg5EdUglUFTgAgklEDCiFFM nNA3EsEJaA0kGC8hVCilw2ktSikQAnTBQSl0GOOS8WGN0aHQhXXWwmg8MxjN sbgWZcbznL5FReWZgXC23Vvi8FZZXKudvpWeSK3D2+Ty1psdSwz2zS53k8m6 0+ba6wvsDEZ3RuM784q3l1W3lVXsrl7StmbD1we+On363IVLVy7duHtj4NG9 oadXL13svf7T5zuWXjqx/e554Grvg98+7f7z4IXvtgbTQrzRwir1aqPd6Q3t WLd0dXlOeVpoVVnpsdaWbw/u/fHwgev7dx+rWXLq8OHugb6B9+/73rztHJvq //gRqmf6dc/0G5gAV92gVwmu3t681THw7v3Ax4/dwBVM3r59ONRx+dTuOxf2 72xcml+Yk19UePTMmZ4ffjx54NDdpy9637x58PjFP1x1vZzsnuOqcwqS1VTX 6D9cDffOAlcTT2+3T2xcAVy1hbJr/Rknz5ztGhmDmuNqqndssnt4rGsYbHEC Dnzxx41Xy6uH62uu1S7KccaOnv2pd2a2Z46rvqm3/VNv+6AVnXwzMPHmevtg 92u4KN73f/gA48Ds26Gr7RfWbrvdvP15254nO3bTqSIqORX5JFn6SRL+SRL6 STI2L3UOqhSwRXxeEvVJMjMvmZqXTM5L4ealqD9JVc0TAFQykCZQMwAvKZWb D1zBFiFABUInnPefRgBPEjDJQtguB/kCJ52fDAwzKWIqVUymCOkEddBvAmxi Ugh+KsHnbJQWSWmwUbE0gZxICkKngO4AJeQoySGkCmMMlFyHszqSs7IKM6Vw yNQ6lvdpjUGd0a7Uhi2uwnheVii2KLd4+aKl5VkFdfGcVfmFm4rLmqNp2zJz t0fjTcFIkze43W7faLGt1ZnWWx31Vmezx98WjezLyT9QVLx3YennNQtaqgvO HGm8eqr1zs97Hvy2v+fPQ798ty0YDSr1VobT8Uarwx/atX5x8+LcNUXx9RWl h5savmqu/2lt7ZdVJQfXrDjYsOrg5sYLf/1xs6//7tAz8LuemZkHfQO9PT0D 794NQpwbmQQ1G/r7796BR4Pv3g+Cmk1MAVeD7989fdZ19dTuzj8OXfup7eL3 27872Lx+1crty1dcvnO/7+VIb1fH7Tv3e6ene8dnu15N9kzNJoiamuyZmOoe He+bmu5+Ptw3O9s1NvHsdvv4hpXj9Ut2hbMXB9JPnjnTPTLaM5zgqmd8qm9s IsHY8FjPSMIZgauXy2pe1ddcra3Kdca+PnMGuAI/7QOBBaLAvqdf90+97pt8 fbfv6YOx0YEP7wYSaL0bmHr9+GrH+fqtV3ftGzpy9NEXX3ICMZ0sAK6wT5KJ eSmgSCwEdYhP8yBlAWPJ8FA+P4UG+5ubsPNT4Tnk/MQu6T+aNl8AmZ8SiKUC kTgpVTI/BQpJBDMBvLI8Wcgli4BecFJ4KVA/WbIISpUi4lPFIGiipFQkRUim SogUMZMs4lIkaJIQTQbqxLARAa1LESuECAHUiaSIWIpAZypC5BKMQUgcIXAE VxC0mmA1JMuDxElpA8EZSLmakJko3i5TmWilW2GMmp0huzfd7i2L5+VH4yWx rJVVSxbFMmviOY0V1cszs1fFMla5fI12xyaXe4fbuc3rbDDoIxrN/s11l77b evXHHe2/fdr/16FfT2wPREMqvZ1RalU6i9UdWF2U31yc11yUs7mi9NM1y47V LzlaW3J43bLj2zcebVx9sL72wJZ1B7c0f3f066vtPb/9ceXE199cvXXzztNn HcMj9waH2scnBl+/7h4YTJAGejUyDj748P27J087/zrZ2n7xs3u/7r/7y97f vt8Zy8p0pWeev36jd3S8f2ribkdP56uX/eOz3ZCO5rjqmRjvevmya3SkH7h6 Mdw/O9szNvH89gPgaqxhaVskqy6Wfe7ixe7R0Z6RMdjVOz7VD1yBD46M90Hc Gh0futX+ZPWKlw0JrvJc0a/PnO6bnemfmR2Amn4zMP16IMHVLKDV8WTk9pMn /XNcDX5493B0+sn1jj/a9rc/fwofZ+DNLJIEnpXIUYpkgTIplU8CcpIRwGZ+ MjBDz09RgBwlUhY8JxUFZkDEkpLpRKRPgUXHBUJpaqpIIMQxTCwWi1JTIc8j EOmTUqkUSPViJFUoFYolqcCSUD1foJgv0CWJ1CkSBeR8YeJ2GfQCoGxsigjw UyeLVckSADKxJVksSxJpk0SGJIk2BTEJxDzAmQwlpFPFWhHKCBBSICVA3wRS VoBgIoSQoIQUoyQYLcJkYpKW0rSUZFCKRWkFQvEooyFkRpLT4KB4Cguj1FOc U6H1aU1urTHT4vKo9Gk6c6bDnW11rCzMqUwLW3nNsorio3vW/vbN5j9P7uj7 69AF0KtISG2ysWo9r7dbXf7l4ciWaHRPWmxHLLwlEl3j921PC7blZraWle5Z ULq3csGBVXUHVy8/0LDy6MHPzp86/f3nX1z8868/b9/569bdixf/+vb77y9e uXrm5I83+gfuDA3dvHa7q6+3f3Z6aOj+Hye2t//+KXB179d9f/7YlpWf5UyL /3zles/4eP/fr++2dz949rR/YmaOqxlQqt7nz9rv3+saetw/Ndn14lX/7EzP 2OTzm/fH168YW7t0dySnoaTyVn9f9+hIL6AFXE1M9o9BMzjSOzLePzLRMzr+ ZODJy5bmF/VLLtcsynHFvjrz4xxUrwengavEJDHOcdU7On2tf2Dgw98JqACt VxNPbnbdOPxlz+QobAG9Fc6bj6ekqkQSjURKJiVTScnEfOj7UvDkVPBHZapI mQzxCYiCQA5GliIG5JJhLxAlwiUSSioRCwSYFKUJUiqVoCIRkyqUCUSsBJFh GIVIBakCSUJkJCqAIVmkTBEphWJcKEJAe4QSaaqIBkMEowS7TBHDHNIamCk9 XwjhDZ5vSRZbkiXGJLE6KfFQlyK2JUusAsQkxpSpUqNAok+VqFOlbKpYmiwE zCiBVJaauIXLCFA0VQIeSosJRoLJRAgnwAghRokwSowDeJQElSE4gxA0QsoQ UomSkOtUOK3CGQVKQx+hIFib3lBZnLdmyYL9LUvOHm1+cGHvhW+2BCNhldXB ao28yWZyeqJOV4nPV+Xz14XCS2D0B1tC/h3R8LZ4fFcssicabg35P02LfJoZ ay0qaist3lpYsH/5iqObmr7auuX7HS1fNNd/u3f7kc0N3x4+eOLwoW/3tZ39 6dSlq1fvXjl/9lDzn9+0XPuxFdLdlZ/25hTmOmLpP/11uXeOq3vt3e0JrqZ7 hhPG1zM+0Ts92TM62j4w2D850fHi5cDsTN+T59APDzcsG15btyOau75s0d2B fnhOH9TYRN/4xMAomOBw78hIP6SysfEn/UMvWxqf1i+5uHhRljO699Bn/dOT A9MzgzPTgzD+Q9c0cDU7OPn6Rld//9vZwQ9/P3r39+Cz0aEbnVc+/7J7fHjw 498PP7wDB4QIxKSKHASplAjx5GQpoJWcwgvFerHEihEqREyDHKWIGIGIAAkS S2UoJG0RCVBJJJhYKBWJWJqB7C0ViQEzBkUUJMFRFEviNCYRC0WAFSpFlFKE RxD53LGwFUNxkVgCgAG6fErCMcnUxHdJTLIALFKRKgSXVIIzpiT2mgGq+UJz ksiWIrULpMpUCZ8iNqdIQhLcnBArCZYsQkHKUiVcKgAslQsBLalcIObEKCdC tUJEI0IUQpROlspTATCpSoAoBAgLW1Il9NyTGZFUJsJQoRQVScUiBBdjClau 5dWxkHdxWU7tgpwt9VV/nNj605HmUDiis7o4rUljdhidPp7XqVhexShNco1F ofNpTBGjPWa05br9+XZXhTtQEwyvioQ3REKrIpHlweAql3tLNLY3LbIR9K0g f2csdCA/q60ob09Fyf7qhftrF31Wv/Lr7ZsvHN51Ymvd2dblp7bWXTq+9cqp PfmF+a5I+ulLf/SNjQ2+nR169vjF+KsBwGN4rG96qneOK/C4u32Dg1MT3S9f DkCuHhl5cvXGk7VLh+vrdsXytpZV3Ll/r3dkOMHV+EQ/cDWW4KpvGLga60tw 9fjVljm9Wrwo2xlt3bO3/eUzgOrhXM2hBTU9MDUzOPX6bu9Q5/jIww9/D71+ /fDF8NPLdy/t2n+vu+PR2OjTsXGwPA2CESkCN8moxEIyOYVOTTWKxAFGHtMb cg3GjRGXGZcqRIhejOgxWUFmXnF+XmlWPEOvDPK0HKgjSLmMwRCUIUkSw2iK 4HAQK4TBpCyOYgiCogiOSlmKYDGUQqWYRIRhUokEBEssF4tMAqFRIJClCjmR GLTOIJY6JKhdIjUIRWxKAng9MJ8qVoFyCgAzoUYgkqeIZakiFUwEIoUYgWhH J7RODA2mSiRNJMZUiSxVbBWieiFiFiIwQjuApcIFIlUKEIMQNQlRTpDASSGQ agQSswhVi1CZGFWKUQuC8+CkElTFKXQq3qjTAlplBfHyosyd6xd9vXdtKD2q dbhkGr3a7DB5/BqlRoWzPM4qUZZDZRwmk+NyBSVXEHIVKdeQCh3FG+Uao0yt Z5UuhdatMWbYvAUuX6bZVuj0LvJ6GyOx9fH0LTlZ4J67C/JaC/P352ceLM07 UpL9RWnOvsqCk/vqzx3dVpifbwtGjp063T401Dn8oqv9QdfDvlu9g/cfP+mb nISxfehh18sXd8CeJiFovRicnQJ+nl679XjVUtCr1lju5oXV9x7c633yZGBk tP/VSO/TZ4Mjo70JrobnuBp7OvD4xdaWlw21fy2uynbHvjh2DHxzcGbqP1wl 0IKaGkxwNdv1+NW9p08efXg7NDX16NXI01+u/rSi6df1LU9273+65zNyfkqm RkMLhVaMCskVBXLSh0ocUjRTa62MR+M6Q75Oo0ZxM0HrJFITq6mrWdOwdsOX DSv3FqZvKsxQ04RKpTGZDAxFR6LpWo1KzbIGROIkMD0UL9fwcrvJaNTwTqMx bDWoUAmBSOUMIaNJk0JuonGNWKgUCnkpykukvFhqwgmdWKwTiXRCMQfYiMQG KWISSTiRhErcdxVqxGJOKFYKRQqhUC6S8hJcKZQaxKhRjDqlmBvFYC8AphMj ToSwSzGTWCqHA1MlrECsFSNQagmiEmEQyVRCqU6EGEQo0KiVSM0IZpBiZhTn MJyjWb1WC6XTacx6fcDjLM2Lr6jMAcDs4aDG4ZRpdEqTVet0K2S8jlAYgB+U NWCcjVKZCN5EKs0kb4UJwevn9qpxBU9wGkLBkxxPK9UEp8BlHMWpZWqz0ujR WnxGZ9jkynEFirzBimB4aXraulhkTSiU63Atqyr5om19Xl6OzevfumTpic0t 3+7f9+OefUd3th7f89mpk6cvXbl25MjXl69fbR/ov3X/fsdg3/Xr129du/z7 +XO3Dx9+vLL6Zf2SnWk568sq77U/6B16BDoGaPU8edr34gVw1fvoUf+Ll/3A Vf/Q8y2bntXX/rl4UZ4ndvyHk9fvtw9MjD4EtAAnGKem/svVzMDI+M3e3sfv Xz8aGX00Ovrs18unlzWeXb7+Scu259u2U/NSfYxMJhJqJVh54sa1M5MQ2Qg6 0+QsCnkdDOuhWC1CZmoMegTRMKrS4pqWNQ0X19esygh7zDqGpAOBmM/jVlBs YX5ZPOLzaFUBs6nQbc2w2xwcazcZMtLi4UAg7A7sqK2I6hiOIvQc67HYmlet WlucXewwmknMJZNbCDJNo/JSlA2FhU7okgtBXCzplNEmElNJUQ2KyiUJwBih gBMK5EKxAaWUYgRgsBOUDkHMUsQiRdViCS9BrChhlWI2CYAkVSEYI5BoxFIz ihhRqUoMDANCuFuKW1HMjKDAp1mCOTCMx1GeJTQqucmos5qNZoPebNCZEmXw ux0L8mNpkYDF79O4HJxGrzBY1BYHSXEcLpNjNCoAW8eUqJwS4ZSYMBBAGiOX kBqMNWIyDSoz07ydUhlxhZ3VmGgeHloZXk8rjazaSPFwbnW0WkertIxKw6q0 MpWWTZRBbYxGI4X5OeG0DKs72JCRuS8e35SdvTGvoLVsAdS24tJdC6t21yw5 unnzoZYtX2zd8s2+PYe3bj28a9eRnbt+27xpYFnVi3V1O9Lz6yG337vdM/Sw f3h4cGys7+XL7mdPgav+p896IO2PjDy8d//ppg1P19b8tXhRjjd2/KeTD3r6 Oh4PPZqefDg9CUQBV//Uo6npR5NTt7t7B2cnHz5/9QQaz18un2nY9PuF84+f Pn7c0UPPEzhpyAYsJ5IuCGRtqyldoMS9tCxND3JtAiuMqFV2hivPLHTJWbOM Dzj8jUUFW/LSvFYLhaN6tbG2atmCkiKelhXGc9oWFxlkjNtkbiiKLisqq7Rp 7GpVPJpVVlRo1xuKgj6LUpZmNgRVypDbt2fN2hPLF9ameX0ydmVWLKLlN5bm 5qjkaZy82Kpf6jHH5fSqwvQit8GnkvlYxkNB2EMVoD8SMY9KVAhuJWgNIITj dpLS4TgrEamkYjMKakk6CcJI4JxUrJaidpwyEgSHSJRSiUoi1UsxKBOGmXFc iyJ6yH4iRI4gPIep1aRWwxn0aqvFZLcYLQa9Ra8zGLQGPaBl9DhsAZ/X4vFp nJCvjCqTTWN1yWS8AmPVkPZFKAGpDKNpaFEluJaQKxGKFqEajGElOGwx0rwK Y2UwoZQyKaXF5WqMlSO0keV5jAUpU4Po0byeBcB4A62C0tNqFcPrjGaPP+gM Rc2eQMjiDmpsHqMr5AjEPWlxdzTTGSxwBcuDaVAV0cw1+QVbFpbtrluya2nt vrrlR5cu+6Wm6taKpduzCuvzSk59uv/6xd/a+3p6nj3pef6s69mT3uFX/a9e 9Dx6dKejo/PK5YfN65+urf2zpjrfl3H8xIm+J09vt3c8nBp/mEALcPqnJoE0 GDsGh7qeP3n44vmT8Ylnv/z12/Zddwa6nr57/ejpC9k8SZYHIpSKFYpiBmdV SUFAQeolSJ49tHVNXVDH20k6Xe9YsajGpZDbOW0sEMmzGqNWt8vlZggq6E2v X7WhrLSIZ+RZDkeeVcdTtFWr3VQUra+qqy/OtKmVboczI+CzqPiAzQJ0rVtU lW3VubT6lfG0pvzMTbVFxQ7Lid31GS5TZdifpZZXe5xfrKr8Y39DvokvCTpz 7GYHSTeHXek8q0YRuVQqk4gVUkRPsjqS0IBL0oSVxG0UrUakClSqw1EHTdsp 0s7QagwxEqSLplwMY6QxA5UQPSNGgJp5CNxOkDyGqKVSUEglgRjVpF7NGjVK h8ngc1qddpPZrLMYdHp9wg0Ner3ZZLbabEaXR+dwK/Qm3mzT2d08p5EjDI8y KoTgJLgi8XNulEcYDUbrUFIhwVQYrZQSPEKaaM5IypVSDEYecIIYhjIcQhkZ JSklwBYpKc2Tco6AkMaCBqoJpZpUcpRCqTObXAFrJGYMBD3OQLonPWAJ2nV2 j8Hl0ru9Zp/b7PZbAwFrMGQLpbmjUVcYrvGCaHZBIL08FF+Wnt2YnbshN29j TsHuykWfrVrx9eZNPxw48Mvp039d+v3mrev3Ox/cufzn4W3bzn/a1r1tw8MN S68uq6mOZH/xxRd37t37/dff+p4NPZocH5qehHo0PTE0BTUJY//LV3fuPxh6 9eLp+MTzX/+8tGv3/Uc9T99MPxp6wiRJ08I5kawwJxY6Gc7E6zwaDcTmHIOv cfXqoFlrQ7Aca6BhSa2LkzkZtspqbs6Op4cDDIWreXV6OLd26frcvDwVI1uZ Fiiz6MxKpVGlas6LNdWtXFazyKZRRnzBmrISp0GrlHEBb3BjfUO6z5Fp0H5W lre2OK8i4l0c9Hyza3XMoGwtTGsIGPJNxn1LK07t2rDAZyv22EvDfhfNtmSH gxyjQlEdgaoRCaiQkaRlGMwxIwXChTjBkDCExSXwBAcDXOEukjbjpJMGrggf wzhpzEniRhS3UiT0uXYM8xCkDsPUREK7lCRqUstMaoVRq7KZjG6n3ek0WcwJ vTIatHoYjXqb1WS32WAlNXanQmfgrVa9w6XnDayEVEopNUJyYlyBUawY12Iy FUoZEEotxTUoo0YJLUabKJmRZhUYCCmrw1kjkINSPEobaQXYqBJlGAmlwTk1 IVPgjJri9aTSQiq1lFKjtxqcfnMkYg6GIr6MyoLFMV+2jjNa4c3K9GYQV95i 5C0OvcuisnuMXuDNbwsAY4Cfx+gPOEIhSPzOSMwZzfHHC8IZVem5S3OLGsoq ti+oaK2s/nzNmhMbN369vuHX1k0dbetvH9j4c+PKxdGcLQ3rvti67chnn924 cW3w+bPB4RePxkYSgE3+F63x8WtXrg++evFkfPzZL3/8sXPXg4Hup/AE4CoF z0zL90VCMqlIg1BeczDij7mlWLbWvax6md2gDSsUaWpDzOYwEESY46pV3JJ4 TlpWhCIIt8mS649l5BZbrTY9I18dDCzPXVBeWqqWyXKd3iVlVemxqFXDZ/uj rc2N6TE/Q3HxaHplfl7ArA+r+dUZGauqFoTUfL5J37AwK02tOF6asSXujsnY Qq2muaZ8bUl2mV4RVfMBJb/UY3PThB7Dlhb40h0qA0ZoUIyEhC9FLTimx6UO HNdhuAKXmAjUw1BuGuwPd1G0X0H6ZKSfYTwywsGQVpJys5QDI8wo6iUIB0UZ KMKEYioSNWjkeo1Cr1FDUHc7bX6/02YxmPQayFd6A3iRwWYz2R1WcyCgcbg4 jUltdWjtTjWnpqW4XAp/nVFAE4HSCY8jQItIwEmFkxqcAn60BKNP/PQRVIgy 4YyJkBlwOUClwVkDKVcRLEgch9BaHLK9TAWHk3ItoTSSigRXOrvB7rdG0yzB cMCbVpFbme7J1MoNZoVRL9OblGYbZzYqzQ6N1aSwWDUOh9oKSmpT28xqh0ll c+g9Nug09G673uM0etxmb8AeDLuiuVmF2ZHcDE96TiCjIppTl1HQnFfSWlS8 v7by62WLVsdza4sr1pRWbVnTcOGn039c/P3ib7/8+duFe/du9fR1Dzx+2PNo sKev95cvv7l67UrP4ODAiZ9+3bLtTteDx8+fDz1+LEtGHDqzjlPqpdCFSX28 zmswOaRInFblhvPUck6HUmGVMc3p0KFYvlZf77RkmV1KXskx8lK/K2yADOvx eAMqWpZt86xfuX7tqjUmrUqn4EPuUO2iRQGvK9NkaVm8JB4LKBUqj8O5qHhB WXqkyKhd4PbnRyK5Gu3mrNDB9dV5Bs3e3Kzdy0pivGyxUXt43ZK1CwrWpXn9 LBVUa4usBjuGezXK1tVlOR5zWKl0cmA0iFGCQqSXIRI9hloJwoAiTgxzg16x qB5F3CQTVTAhlvTLGA9HWQjCTtOQu+w45GrMTeIekjRRpBnD1TRpBunRqYAi p9MSDbvTQh633Wgy66wmvdVicNnNHqfN5YKMFdDbPZzOpLW5tDanklXSYHMY aSZkvAQEitYgjAmTcxIwwcQPHXUYrcdAiBjQKAMuA7qMOA1cQe4CcQN10pFs 4k4FmCnGqgiZllTooU8kOC3BGQm5hlbqtHaDzW2LxsDlQt60ypzyPH+GlTPY FAaH0mBTmhwKs11p9qgsToXVpbY5VVabxubQ2KwgvaCqGqdZZbOp7Ba1y6p2 2NUOh85p17lcRp/X5HcbvF5zwGMNheyxsCMWdabDR4/5YyFX2GGPBtzpdcUL jjc3fb9t82/Hvrh4/Mjvxw9f/u7La999eeXbr64cO/zbvr3f7Wr99sBn13a2 nl218dyu/Y+OHhs8cpSdL9ThiuKMXD9DaATCkMaak55uQNEITmeqjSqM0uNU gFMtjISCciaqUuTxqjBFEhKpVqUK6FUBiyMYCuiAM1aRnVW0cPHSkqIiq1pp Uij8Lk92NBJwu/LM+oU2u1GjMvB8wGwpzc1Nt1sKTJqQjPYolOvTQj8sKzyw ZmEGz1V4XBtqyxZlBst0mq8aV9bmZbQtr/TJaDcjKzTqA5D0NOpFmSGXjKsL OfP0nAnHIYHLJVJaJIK+z4XjBhw1Eqibop0UZkaJMC2LqrmIggnIGCcL/GBm AtdThIugrDThoAk/SdkoyozgaoYy6lUGrdplM6dHPDnpwcyQ1w/RDizIZnTb YQGsQZ876PfaQ2GNw80ZLBo7BC2PhuM5KaFE8MRvfiBlSWkdwpowRgmMSQhA CHQMspYKJXUgWQRjpmUJ2AhWSwBFEPhpLXQfJKtOYMYAVwaGB7lTEwotmfii U8codTrwY4ctHHFEYdFjVTkLS0LZToXRx5vTtDYvb/Tz5pDSHFKbAipLWGML a20xvTOqd/o1Vie0rCqLgzcBbHa13ZGgzu6CD6Cze40+p8Ht1LndehdMfEYf mKbHFLLbIkZbyGQL2O3B7NzihUWVZbH81YULWmvrDq2p/3LDhp927Ti7p/XS F5/+tW/Xpd2t3zZt2te46Y/m5pM1a7+sXPFw3fqHq1YrBUSaJ5Tu84YVrEog cFOadE/ETrF+VmbCcLNMYSZIE0Zm25xBjvNrDXF/UImhJEZG3f59i4uzXI54 KJxtMysYLhbLzI9GMu3urEhYKaNcLmdmLGI3GOJWS1BGW9XauMtulCuqi4o9 Oj5o1MZ0KgfNNGWFzm6tO7F3dRrPNVeWft3WWJcTjrBsS2VRRVo422m3EWRc rcnSaiNadWPtgky3ParUbirPLXLrPArWjBAaBBo6kUYktsy1eAmDA67ABAkm zDIRBefnGDfDGDDMShI2hrAwtIsgLSRupokQSbpIwopgKoo2aDWQ0v0ua3bM X5Aezk8LRlx2j83ktpl9oGB+T1rIFwp4XOnpRo9PabJonS6D26Pn1UopCVwx EoLHIQEmtMiAMbw0Ea6M2D96BX5HGEhWjzNmcEOc1RMyI86qCQCJUhAMTwBd Mh6TqXFOCbwBTiSnA7Gi5AZGodEAWVZHKOqMZgY8aRVZC6oieVGVOcyb0tVW P6/3qcwhhTnKmwK8JaK2RDTWuNYW1zuAuqDO6tZYfGqzl7d4VRav2uJW23xq R0DriFj9Xr3TpXX4dA6f3uM1e70mn8/sd9uCFkvQZPT73NHcjKLMSGHYm5mT VpgZySuIF1XnLVxTXLW9eunXGxpPt2w+tXnTqa1bDjVsuNay6YfaVUdqVt1Y t+HOuvW8gCgMpldkZ6TJKb1YaELokNFqpmQ5St6NIV5GnqbgrLS82KiHrsqr MWZEwgR0TzK+PLvo7KZla7Mzti7IC2g1CoYNmg05dl9ubkVhYaFDrTBrdV6H Vcsr3WAmCnnA4vqsrsKjAaIMVp5L97l8Rl22Tv9jc21Dtn9p0JXOKU7tWr2z OqvcqfYzZK5BH1JyZoqMy2RZLOPGMStOWGjGhNKVdlNLobex0F6dZnSghIMg VWIxLRRqJWCCpBXFPTQDG10sAzzHWNZPUR6wHoTwymm/kgG0nAQObgjtpJ8m vDhhlOIcxB691u9ypId8henhYjibmdGwx+G1W4Iua8TnyIj4stMCGdFwKCPb 4gmoTDaD023zBtIcNh1CWRPfgmFKBDpQxsXCxQhckSoJrkcoSOwGnDZilAWV aVGYJ5IV2CKgBVypcUpJMCwYIrBE8SpcLocwD4krcSuV09ByI6uAjtRgsjoi UXssPeiJLswoqwpmx9XAlTGmAaXSexLaZUxXm4JqS4A3h1XmmMYU0dn8KqtX YwuorT61zcNb/CqLT2PzqG0hvSNkcEUcgaDR7TU4PVBGj9/o8RoBLT/Yok3v N+q8Xk80P7MwN5QXd2XkRArS3BlRd3qaPysjlJMVKyyJFy/LL99cXnO0sen4 ho0XG9efW7nmh/UbfmnbfnHfbqOUKnG50h3uap0qQuNyodTGyuwMV2wyuTAs yipLHQYHw+aqVHqc0LEyjYzGENTGK/M0ul2luVtyM76pKzEo5LxcmROKRL0B pyNckJ5R5bOqWMZuNOp43m02KeVyv8G8Ei54Xh7U69wGTdhmsmrUfoViic/x ZV3xnvxwOs2eXF/zx+drdi7PDnBkgGZ9MpmP49aG3KVaOTR3JgTTSXEbzuab 1Sui+oUBfVQvB1pccpkKkSRu7YokfiyBkI1iTQRlY0g7hYVJKkAyDpyx4ZRH Sft4cFXCg5NWHDOQuJ2GDA+rT8gJ2m42hf3ueMSXnx4qzo4VZcWgbw26LFGv Neazx8OegoxoPlyABfmWQJA3J2622/3+goDbgFN5JlWQZ5WJ4C0zgdnhjAZN 6JUOJUG7IEvoMALMEYKWFqMgNUGy0lIyDXCFUTzGkKC6tEJFcWCFQKaKlCkp uZrk1IxcK1MaoXsw2Z2hdHsoFnZFFsZLCgKZPo05oLWETB6f0RG2eGIOb5rV G7H5QnZ/hiuU6Q5meqOZ/rS8QFqhL5Ljj6b7IpmB9OxQRjwQg+0ZgVhOek5W IB73p8M8zR2OwKeyQhcZ8VtDTr3XpHeHQvHSwoWFacVxdzw3kp/hy8jwZmT5 szO92Rk+qKxMf15OtKgsq2zdgppDS1Z9v2Lt2aaNv+zadqZth1lCLwpEK/Ny PEq5AUPwVIGNZOFsmFm5haKzOOWGnJBBKjFLMZVYoiRJVCJhaFma3bHC525M 86Up2TStQidX6NWG7KyseCw9Fol4VcowcMbQJp1Bp9apeJVarTMydEytCho0 Tl5p4pVGBadh2AKLaalZs6csqyHdG+Xke5aU/XK4+bvWuhyzyoGTBpwIm3SH G8qrzTI7PEQTCuCTKzwqzqVggnp1hs3oolmwGC6RryRmicSFoq7ED5tZWEG1 VKqRSiHGB0gWuILWz06TdpaAZOXESdArLY7oE3ceMJkYlZGM22oOeh1pfmdW yF0QhZ7CH3ZbA05IIaagxxLx29OC7nDY5whF9E4Pb7TCaPH6/QaTSgr9pswn kyslkN7lQI4WZ/6RqcRvcsD1gBYc3DCRr/QoiJsSwlUiwEPrNxfpeQzaUgUP zojLIVPpwQQZpZZWahmFWsYnuDLbHJF0ZyQe86RXpBcvLalcX7dkw8qlm9Ys a2lYuW3D6sY1a1ctqWtatWLtsmXLapY2LF+xfPGSljUrT65adHVx7p7cTJ/F GfIGG5bWNtQuzgHSXIHySHpxetqieFa5J1DqCRSHokBgiSuYbwuALVr1rqx4 XvXCmvKCyrg/oyirpDiruDCjqDizMD+WlxXKzQ3kZQeys4K5WYHczHBhcby8 oaTmyKo1P21uutDaok7FcxzBnHDIzrDpBj0nlejhEkNwHtxEq8qSySuibhWK WEhaLZbKCOAK1WlMAY8326IvdBr8LB6iaRVBmzXm8oqqksI8v8UQh0wip2UY puTkWp1eJVdaLZawUe2XU2ocVeC4hlfqeKVNo8uxGItVbJHHFLdoIdGtzE0r DliXF0ZiRl6DYkYCbEtRaNJEeAgeuCoRpUgrTTsZGnK4j2OAOjNG2VDCJpF4 UKkNlVoRsELaSXPwEWRCsUqCmGALQXkouZnEoQe04rgVJU0IpUEJOYLKUZQR SykxpqBlHqs1LeDOiYLfQb4KFEd9YZfF59T7HEa/yxL0WkJeq9trh/5JbXUo DGYY1XanTqnXoKyDVnoY3oDJrKTCSnFWQmHC5VaSg6xlxuGikEG36CA5B62y UJyN5Myk3ETKjTASMgulMNNKPSlPxLNE6GJ1id+JKbSUQg2qxSih49FqjBZf 2B5JD/oi+aHMhuV1xz7fdexg6/HPWk8e2Pn1vh07WzZtaWpsa2nctblpXf26 1avXbm3c8Pm2xovrlzxbkrsnErQqzF6Hb92q5a1NDfUVFSVOz+p4bEtF8epo 2mKXt768tK1+6c666lpPoMzs9mg8doOnpqy0ZeWS9Ysrq/PzlxcULsnMWRTL ropklIUzi8JZxZG8omheUawgP1qQEynMihQXxEqr8yq316w4tblZnioxUYqg yeSRMcVBj5bFaKFEC3lDIlUjuBknQ0bewBJaguDEUjnFsDSrVqotOrWTp/1G lUfNBVUchxA8I3fwKg8nj+qUPh2nZwg5JqFxjNdqtQaDU6/2q2R2GcnjEkos 5iBF67RuvcbP0UEaD0GnRmIaKRqg6ByOjVCoCZVSAhHoFWQqD4bZMEwuEOsl uEZK6BHUKEX8KBFEca0U0SGkl6ADoGwkGSFpH0FbcSbAKgO0LECxQTBTSuag ZEFG6adYN8G4CNpNsk5S5iJltsQ/o1FahKBFCHBeEAuU56ZVFsUXwLVXnF6e H8kIWCPQIHlMYIXpIUc86IKW0BYIaewuOciUzQl9lc1gNuJMoc1c5rHChVBo MqTLFU4ISygF4UqDgepSFvgrGAn+qCUoJVy2kMwxQoeRIFM8QpkptYaQy1Ca kJIKlObwxP+SgEUmmkQa3FAO0q7ktYne0+NzB4Ihj7dhRe3xg7u+O7T7hy/2 nPhs19e7t7c2NW3e2LSpcePOlualy9bU1K3Zs23T4dZNv29Y+mJJ/p6g3wap 3u1vrF+1s2ndkbamAysrbzVVPGiq2p0bb6lZuL9p1Zfb6/fUL1vsD5aZvB61 2653r62t+Kpt45Hdjd/sbzy5b8P3O9Ycb1725ZrF+xZXtBQWro5mVQXiJf7M wmBOcTQP4tbC/IoFOeUlGeXLSmp4gRSysZEmzJzMa1bLCQmWLDBICTjbeoIy ygmeRNUEiqek0mIpyzJyTg4By0JhcSWZoaYtLGmRszRGMJQM8ky6HE/niICM cNOYCpVgiFRrslgcTrecDZGoF5caERGLShSszGIyOlRKB4raEcQmheCEalHS TTEegnITlAEFvKWwKDqcUEoQToKwCdoJ8EGgXQ2LIiUCDOehZE6K8zIKv0wZ ZhVhVhaSyyIKRZpKncYrwwouKJdH5FxYyYVUCuA/wDE+GelkKBtJmAlMi8Mf RUwSqVIkcRk0FbmhmqJ4TXFGVVG8qiSjLA+4sqV5zVGfOS1giQdtGQEncGXx BdQOl8JkVtkcOrvTqFZDfNpeGD5cm2Yh8GV+20KtKipTWHDagkFPQdkJOsSw TpyC0GX6D2AsxC0jgIfN3ewi5XIpxiV+10qqE1BRGiLRKgJ+RlIGnqjgVAq1 1uD2mYOhgrLCnZvXfndg+4Uvd/18ZPf3B9uO79/xVdu2tk3NmzdsrF+3vrmp aePGjY0b1x3a3fLVns1Xmupe1uZ+Fg64eXPMG9zevH5ny4bjB7d9v339jfVV dxvKL6yu/Lat8cSBLd8d2Hpo8/rlgXCl2e3WOOx6546Ny84daz1/vPXXY7su fLH598ObzuzbcPbTDb8d3nzlqy3n29Yf3bhix7La5WULy3OLCzOLCrMWlBZW FuWWF2SWq0VIFBxKz1nljF0tl1OoaH6yVoxBlNVRlF5GaliCECd+uM4iuFLO qSEtyWmDjDHKWSPP6jiGIlCpFCyPN2mVFl5uUMt1SpmBk/NAICszONxWj99g 1Jn1WiOEML1Kq1NptBq7zWzT630cH5QrgjByKr9Cna0z5JsNJTZTntWow3EQ ySK/Ywn0qzrOieNqKSRtwiYni8L6XL8m06oKa2UmiojqFFl6Lq6iM7Vkvoku NtPFFrbISuebqTwjU2DnCq3ybAubaePSjGxQjXsUuIFGlCCniJiSiKwSsVks dRrUpVmB6vy0qqJoeX64PDdclBGIuy0Rlyns1ke8xjSfNc1vD/k9jmBY7/Ao jRatzWXyeKJ2m41kdheH1oXNYL55Ol2ZTuuhWYhzXpK24ST4e0TOxhRyJy6z 4pSJwCHB6hN6BSFfbmJ5A85wEhSSvAwltDidKICKTPz7m4mSaWlOpdRAQLUF gp709HX1yy582frHsbZfj7b98HnrV/t2HNu37eD2lm2AUv36Des2bGlu2rtj 857tm/bv3PTV3pZrTSteLMk9lhkLqE3p/sC25nX7Wpu/PbB1V03l4bLsP9eU /1Vffmb7qpMHtn57cPvR7Y2r/JFFFrdP64D4uA24Ot7627dtv37Vev7zTZeO bL5woOn8gabfj7T8dXz7pa+3Xfpq27lDm7/cVt/WuGbN8iXlC8sLisryCksL ChdqxbidlbtBOhScSS6TCgQpnySpxbgJIXkUoyRSGkFQoViUJOCkuJLjeIWC IQkCdhEUxykNZrPGYtFZrEazVW82Gaw2g8dpdDotdpfF7TU73VZ/xB1Ks/uD jkDIGfA7Az4PrE0oGIqEY4HgitKc/fWVhxqrDzYtPry19vznDbd+3NJ+dnvf rztLM+wGmrh0uPnltU/3lwRL9bxcLC0O2srDmpX51vIMoxwR6WjMymB6ElGi Ig0pNbFSL49H9WS6iYpbqRwHXeJmK/xchV9R6pbl2ZgCK5NtpLxqUs+iKhrl ZZiSQs0SqVWCusygV5HaoviiwkhlYaQ8L1IEjZPXHHQZQi5D2AuLYskIO9PD Prc/rLO7lYl+0GnyeEMOu41i1kacS9wGkwQ8nYPeGZTKK2MKTSo/y2Sr1EGW BaLAeUG4gnKZnWQTHoGzZrnWAOTgtAolEukd2kYI/DSjp1kjAxFLlugZWZlW rdFo9fZQyJeZuX3zmus/7Lt8Ys/ZI61f799xbO+2o7u2HNrWvG3jxhUr6leu rl+/bt2OTU3bmhq3NG04snfL1eblT2tzWwN+j8oY8wa2NdYf3belbWnN+kj4 s7ry8/uaHn9a37dp8bFNq3/4fMfJXc2bY2lLrD4fXPc6R/OaJT8DwN/s/uPr 7b8dafn9cMvvn28+d3DTr19tu3h0x29Ht10Erj5v+eGz5uO7G79tamipXVpT WllcsCAvr8yEMjoUInHCXHiUoIRiJEUgF0pNUkIjQSHkUCIpkSIikwWJr+bl Ml4hk9EsjuEUSRlUunS/vygercyILk4L5HrtEas12+8vjkQWZWctzM4uysrM Ts/OiudnZhbk5xWXFi8oK6ksXVC9YGF1VeXihQuqj+9tvvxdyx/ftrStLVlT EPx0ZfGFfauvftt87cTmLBf4C7KuIuf0/pXLojYbjjESaY7X9uXGgpX5RieP cUgqhwgNpBSg4jCRlkbtPB4y0DkOebGPLwuqFgZVC0KqxNyvLHZyhW55oV2e pafDRplVQZo4wsKTZjnuEkvtEiRg0SzI9C8qiFXmRSoLohX5sbLcYEbQGveY IWJB750ZsuemubOifncoanB71Q6nDi6cUCDksnlZ+bo0/8aI04ySca0qplRY CdAl0klTOXplhoJzE+B9kCHZqFJeZNNYQa9QCvo+I8upCVKJUTT4O87KcVJJ MDwF3iczUzIDlchXOoYDqlRavSUU9GTGNzWtunhy//lje779bMc3n+44tmfr Vzs27d/SuGnD+uq61TXL1qxds65pw4bNjRsgwx/Y2Xy5se55Xc7n8VBYYw65 Aw1rVjTX1lT7Ag0luYd3bTh5aPulgy3tTbVHyvK+3bHh3L7Nn+dlr/n/eHjv p8Tyvd/351v17D0dbBOSc845ZwVBMRNUEEUySM5ZQEVBMHXbOXdPT/ekntzT k/PsyXs/YZ/z1Dnn1qlb5/wTdzn31LU+9a0lrBLEl++w1gIWH0iQTDwr7l2+ 1c7f288CugTo1b1m7MZm5LQRfbife9DOPtzPPNlPP9iJX64Eb9bCTze8+Wmz 37roNsw4dDP8EcCJcBIoRgLDCCBwbP8w7GL/0Pk+oKdTR6C0kRHgxcH09Q2/ cg56sR8FgVFpHIlKL5UpdAySGgUH/jdj06a6a3l3fblsm19Sqi1ylVOt3bQa Hjh1d+2aqIg8QWVO8ETAzHN4fhZtHo/RwZDTDNaCQJCaUW/ZdRWb1jfGXRJT lqU0u5rlMgoX+VQpaJDW38/DIKfETAkeQxgGyvvw4qj4btl6pzJt4qNwgxeg ly7AL52H9Z3HDl+kw4ascmrDM9raGG/HTAmbeFVHXdKQF5SUGQlhgoMeYyF1 dNg4FaznYtl4MB0FomPADOQI59IAvW9YQMYbZewZrXhOL1sYl59FLKNCL2Vp eTQ5n6YQ0bVSlkHB06lEPJmCwhMS2DwSj08XCTUCrgSCaI5KcyoeaxjMAsNU SKQICuPDoRwIyEQnzFGJejSSBx5hgSDiERh3CEI+O48Dp4IRLBAQukYIw2Bk /9DZyZ0hMHYIjAMBJgjFgWGEETgehiTCABckIDE4uljEVan9PsftbuV4q7C/ Wdir5raz8b1cZCsXW/d45pbXzCtrgBV6vd5sIlLPJ5q56OuRld+c4+8tjM5T mCImb844Nc4R28a09WzocCtztZW7upU9zYRqBs1159SjvPct50xFJLLRuGwC MxN03trNPmgDYpW+3YyflDdO65E7u6n7e9n7uwBsySfd5JVy4LQW6qWDd73r hRnL+uJyfsnWWrRJYDgllqok0HQU1hidzcBhhs+dR7xykQPD201zV2y6JzbF OA4C7rs4cK6PgmUY5h3Tdk98ZfXZ+twiCUmF4ExzLrMjZHYErCvBOUdw2u6f X3A4pMLmhPz2qmFnXuXWjU7POC3WVbtcGhcw4mL6FJkwyhKsOpyPjgufP6y8 vFd4cTv/4nb2uyeVX9+q//7uVsc/oR0e5AwMRhdNXz+uBM1S6MWLVBDYO6V+ tbX2zuH6ipFDAvUhLl2EnT8Hu3AON9xPhQ57DPybedv7Pe8XdzNP99fjVoFj lOYyclN2pdvE03OQehpsmo2cV9IkNAQTN8LEgWlIENAdaAMDXBJWK2KY1IJ5 nWTBILWalNZJlVHO1QjoKj599E+xmlDyDRopX6kkcnhENp8qEHIkUr1SThkE +5X8kJaL6x8cJRNkMDgDiN/9Q7iBIT0Fv8SjuQW0RTqOD4LIEVA5Bk4AIUe5 XAEOy4BAqENg9DB4BKgtZxfJA4kdjB8BSINgIHASBEVCoYlwJJVAwuFJdLFY oNIG3Cu328Vr23kgrjdziXoutl2I7pQS1pV1k23N7QluBEKBQCAaDjYL0a1c 9K7b9tvK+Hd2vYPO5OHpMipnQirPRry7tcThVhrwvuP6WWJvh92HptHTSdWj 2dEsj79AYXMIjELYea8NcJW9t5u+1ogfVCK391IPOpl7reSrgAnuxq/VwgdF /2EpXAy5HgVde+Zlj2VxZ2OtE3JqZKNatcGonwo41rKh0NrS7PClC0D7E+L5 EXfwqnX0UMueIGOh/X19fzlPQDCNFtfisvvA6bi6MO5nEg189Zw9MLcSmF8J Lq6Grc4g8HO2rWPuUeny7NQcn7kyY7nmX8pNjW3bp71qsXXcYCTilyemQjrF glz1+LDw2cPKJw/Ln94vffGg+Oub9f/4YOefH+1+cjM+T0OKh4ZTS6Yfnlab cRMBPMQBQyrrc28fhN677F+Z5JOGLwIOiOo/j+4DuOojQy/JiJBxPjm8Zi2k /QH79LyUrePRJuS8qN0UNYjnlHy3Qb7Awyyo6CoWlkeEAkPDjrAxUDoSzKWg tWLqzJhowQDkK6V1Sr0wKTMo2BoxA+BKLWLpFTyjSmSQiwVSGZHHI3C4QLji iiQmpYwxDFnj0WeoBKCxylBowQiYMDBMHQQxB0EaAtZAxJkIaBeXfHbAdgjQ f6gYQ5ITCGwYggGBMkEQoPqBLw0BK2wYhB8aIYLAeBAMDUMQoAgiCoWDI4HW A+QrilDA02q87uVrO/njem6nlGxkY1v5OABVJReftbsMi2vWVc+a25tJRt0e XzkTqaY27nsXfz/jSmdnMAR4qozEmRBIUub5qwHHs+Tam6m15znXuwXPB3nv a8uTe3L+oVYe43CmSAwOnp7yLd9oZW7uZoH1Rit1ay95by91r5W4txN/sJe8 vhndTntPquHNhKcedz8MuI6szoB58UbC8yzrV6mm9ONWj8NdioULUZ+cT730 yl8H/vIKfhBhlGpKal5eQOIODoDOnR985RxiAG40LmUda7cclqszY50JxYLC OLsSmHL651eDNmcosuTYnlDWFmdyiciSzTJOIy5Z10J2xxO3qTEuXADEzrpo ZtIWZ+31aKjlmCguGt67Xvj00ebnjyuAWP37e63//kn3f3x28K8ftJxahhAM Si5OfvukWvCO81BwFhxadC+8dzn64dWwfZJPGenD9p1DXTyHG7iABUI7ZJCF 7OcSkdZFx6rXP2XQKwkUz8oSj0WVMRgWKjk4bTpJej0y8tIYWy8mi6loERlJ x0IULCyXiBJQcWMShlkvs5oUi9OaxWntgkkxrmTrRCw1n6YS0nVyrkkr1qsl fJmcxOadHRFlcdl84bRKxoVAszqpjUbE9g0psFgGGELoB/iB8MFQPRlnphPt TLyTT2QCvF0CkwcgChzWyqdyQBA+DD6KxZDP3qk9RAQB5ggmDYLJwAqCUeBo IgyBQyDxMBSBRMBgcYD5slWqtbUlgKt2JR2LhkqZyHY5sV2OVfMxi3PdsOSc WHLO2NdC0Ugg6C+kIrVM5Elw+Ten4Vv7+DKNJcDS5GT2JIu3Mzv2mX/2G//0 N76pH4JTv0fn/y2x8F8z1hcrhn2FcE8mdNI5HBwjG3TcaqVv7qTv7GbvtlJ3 W4mbO/Grm9Er1Y3jcmQ7FdzLh7dSwcKGp7ThfRz1HS+tJuyOO1n/01wQfe4i oW+Ii8KpOTydVMqAjSDOnUO8cg5+7gKqr58IZI+hYdSlsyNIsPOXsENoj2X9 5rqjY545sU6dmBRmtREQq1lArFaCLe/6XacpMjO7EYwWstn4msMtYDbcaycr poRO07JNFqZ0Sav1ZHnGZXOWUvFeLhgzihJzunevFT57VP321dLf367/l/e3 /+uL3b+/u21TMUVwcNY++fxyamNJq6biGTBoyjHx/uXwB1dDDgOPCrqI6XsF ceEcabCPONJPhQ3y0cNGPsvjcgdCoQWTfpRC8S3OOxYtjkm9BARa4XECIk5M x/TPSmc0TCUbI6YBXEGlbByPiOLRcOMytsUgX5pWLs9p7fNjgGoZ1Ry9nK2T MHVSllHBNamFeqWIJ5URuDw89yxfMcRiLoWKOzujjSAOgZF9w3wokjoExHIw bmAE3T84RsXNskizTIJLxaCPgOH9YNwgnA9BTtFpXCiSA4FPkSgAUZCBIdKf 56AxQxAM0AdHoHQ4Ekj1OBgcD6gWgQhwReUL+Bqta3X5qJ7LRsLZZLhZigHl brea2KunXV6fadFptK2ZbC63P5BPxwDq8vHQI//yH87x7x36ZQZDiKcqSOwF zdhW2n9ajlyvRK+WNm5XIvdqG69XQ/9eWvnvactLm+7aqDgjFPBxtFzIfruV Ahrf3e34jUbs8mYMqH4nlfBOOlCKBtIhby0VyoQ9Ec96OrT+diZ82bFW9rve TXifx70yClVEIssZNAEBQ7p0kfLXV8jnLpJfuYA81ycjkE1k0igSQwGKcD8I PwCSYFnNxaWH60vhGXNrcXZHLbCoTebV8PySd2fF8Wh9HmiaFmdwNRANxZLJ VUdJzr67NLlpNS0suuwr3iOPozerScslq4uuaCTWq6afHSerVnXXO/f+tcIX D0s/Pqv9/tbm399p/PLW5pyCIYQCejV6kF1dnwZCDJaFgm0G5z+8Gv3wVnzF yGVCLlEGLqD7L5DA/UzkEAsxpCMjT/3mNxrhg+iaWchlD41MiKUph61s1OhA w+wLF8dxmPbSZHrJYNHxx3kkGQPNJEKBlUdCcaiYcSnTbJRaJmW2KfXSnHZ+ Qm6QM8fEQMOl6+VMg5xjkPH1ChFPIiMKhVS5jCGWMqQSJBoLvzQMVDwJHIXr G9YiEezhYfylIdIgiDQwhLs0xBiGAjGejUSS/jxlwxxB8WBoPgLNBMNlaAxv BMUAwwFxo4xA0SAwFgTBw2FECIwGQ1AgCCwMgYXC8cSz95yxJVLp5MSa21lI RoKBQCYR3q0kW+XETjm1U8usen0Ti6tG6+qUxeX2BYAdvF5/ciP0wLv8x5rh jCs6U8rkTsrVJr4ktbp0UE8cNVPHzdTpdvZGM/Oi5PsvBfu/FZb/7jc9n1Jk hXwBnpYP2u9tJ+41E3e3YtfrAFTxw2qkV94IuoEvV9jvTWwEon5vxO/eyoff y0WuOteqXtf9bOCNfDidSVWq9csn3VwxNqkV0PsuEs9dwJ6/QBmERx3OazZt VkhBvvLK+f/rX9DnB+bp/Ptex+H6ciwcuuKx9HQy3/xSLBZzj2mSWmUhEozl cvF8MVkpZMqFk4SnqeevT04G43F/Ju3PpuOZ9Gl8NavkrlqciUKhXi+/eLTz xb3Se9XVjmvmg2vFn9/a/sd7O//+YevX502TlM4GDYanVMFpzYpewoJDOGhk 3md5cT316b306iRbiBxgDPfhhvoo0AEWcoiLHB4nY469jtf2CldriXWDWgqG rLBZbjJOBQWrRoYVUOiyWjbJZ3pmRy0GnkFEVLHxgG+K6BgmGcWlYQ1KQK9k lkn54rTCNqOY0kv0MuaoiKER0M5yu5QxJmaNynlcmZwiktKVSoZUzpDKsGgc +tLQLBkXFTHEIxA7lZDiUScwCDUcOofDsAfAHBBCAoSlATAbhBwjkfR0KhOO HOOwdARcSsMH7uLDMFwwQoDFjLIIeAiUgkQBSkVFIilAHxyBYcEIACoiicyT y9UzMwt2O+BxwBfgg81yfH8TiN/ZcvYst09YVw1W54TVaVt1+/zBNY+/Ucq8 vuH6wznxrd3goLM0QknIveoZH+9aJu7kfdd20ld3Uje30+9m3f+IWz7JO99p xn4NTv9oV10elYrx1Fxg+e524tFO/OFu8qga3y1GarmNTDywugpULufqmsvj XY+FfCGfd38z/m5+44pjPWZfuVfYeKsUr243Ti7fePjobm2nEU/6xEgI8H/N uNDHG8HmfOHurCInpAvQaNC/vEK+ODiNwJ3MzzRisa1263Fi7YpR1VrzvJ33 Hqyau7utzpXDvdPj4xvXT26c7qQ2Xm7Ybq/Nlqr1aqdT2W9X9jvVg041H48J 6fM0btgb6/R2P368/dVrjU/vFeo2VW5e992rjX9+1P7Pl91/fLg3K2Voscj0 otGu4tlVQiEWxUMjc17zy5vpT+9nl3R0IQZEg/bhIQNM1BAXPcxBDWlJ6KrX 2+zsbXV23Lb50RGwBYeZwuM6K+Ygk7pCJhzbZ+qWcZdJsmgQTIipWh5eSEVJ mHg2BSOg44wqjnlcYpuQ26Zk1inlnEFmVHLGxawxEWNUytLLWEYl36iS8MRS mkBCk8qoAilDLJGyWaT+4TURtabl6dEoFRSWErCWiDgZGDqHxegRMPogmNYP Y4AQHBB8DImSI+D0EQgdghjF4nxivhaBniSS2GCYDInySJkyDIqDQNBGoDQo nDoCp4CgxBEEDoMH0GJJJLLJiWmbOREPA53PHw4Uc/HDnczV3YLL4zEtrUza nBOWVaNldXZ5bc3rD22EWrX0m7HVv6+Mf7+oX6Uxx0XSXMx7Wtt4Flz4LDR3 O+e+tbnxdmb9J+/Ui4jlTiP2ajX2I5C4VlRXDTLANPPB5ft7qbt76XYpnk2G MplwIRfJpsPrnvWFJceEZTm04dsI+FzrawfN5Mtc+Mm6px4L3KonbhSi5VZ7 q3u0dXBQ3GsVW83JMRntQh/t4iX2MDq67DmaU2V5ZPIwCPTXC+SBESMKvcYU lquterdzK7TyYFrzjsd8K+7ba3fefu/d0we3tk6O20fHr+/X9i36U+/STbdl r3vUvX69c/1a98aNkzs3G+VUfFQVsVkCSkUrFX/xoPH5q7XPntRe3Ewdro/V Fse/e1T754d7v7zVnBRSTHRC0TMnxqMtMqGKSRJhkEWv+ZPb2U/u58waCh87 QoYNUBDDAgJETIBw0UNqMr6ZSO+cXrm8XQsrxaKBwRW+ML1k2/evezmMgFhy bDF0J2SlxdEVk3hSQR8TUaR0rJJN5JAxQhrOIGct6MULBvHChNRsVMwZFAY5 d1zM1olZ4wr2hJIHjFYsYAklZIGIIhZRRBKGVMokkklnJyuhOhyKcGmIPjhi ANxtCMweAo8jUfQhEA5QKjBGgMSPEUk6In6GRR0jEFQEogKDlSBQKjh6ikSU IREMgCUwRIhByM+O3kBIUBh5BEYG2iIIjoJjsFgcQyyU6A3zi9Z0OrHq8Xk3 AoViotXIZdOJ6cVVndmuM6+Mm9f05hWDxQHUw1Qm0ayknoad/1gxfG/Tr1JY 4xJJsxy5d5h/Yy/xfdT6iXf2o7jjO9/U+/6ZK+Vgr5m8XQx/7zb9YNdcH5dJ cbS0z3b/pHa0Vzo+qDc3s4e9SnMzk01HVtbXTVb7lNWeBAj3eiIbnis7qS93 cu9lIgf5yEk1drOZrO73avvd6n63st8tdTtr/hVM3wXchX4xmeMyzl23aMIc goTBxAyBCJcGZwlkj0RTym1t97ovyv7P/dOXI8Fmt9u9fvu33359+v6zrYP9 N1rFDzLr7VLu9nb+inOh3NqvHJ2Uj04qh0eVw8NONdO2zlYbzUoyuDmtvZNz f/6gDqD1xZPqJzdTV/3G7trk9w8q3z+t6Hl4E4dS3QDyO3l9XKlgEsVY9Jbf /Nm94uevlpcMbCkRykAMsbBgKRUqJ8NEuBENhdhOZ65t1coTGj0KMc/j56Ym 8isu17JtBo8zoLATKJSPRY7NqbPeieSadlrDlDNwCg6BRwV8EDMmZ87phfN6 idkgsU0q5oyycTl7FOiDArpBwTKpeWNKjlzCZYmkZK6AIZFQRQBaQiaJJIHD 1rkUPRIu+JMuKQzMBUFo/SAlFIHvG6IMQVUUmhpPlCPQEgJeQcBriWQtlcqH I/lIFH8EwobAxMgzK6QOnSV2JgouxKOkFCwRMMERGAYEgUHhCASSyuPz1KMm m3kjEw0lNxK5WCIfzRcT/mjI4fdZ3W6z2231Auvast/tiwbzpXilGH+64fiH U/+jbXSdyjRKZfVq+qBTOW5XnhaCv/qm/yM484V/9jgfbtUze83czXLsO+/k Dw7NdT3AFXXDvVgrpfZa1euXO+296pP7l2uVVDq9YXasjJltFudqMhrOJUKt SuT+furrOzsfHZXeu1z86Erp46vl0hlOwPTK3YNSr7sWWMVdvIA/PzDGVZlF 8pqSs0ijCOkc/MAQ9nz/BF0YGJ9OO0KPtisfhuYP9Ypqur51ev3V15//x7/9 6wfvvb6/4b28Ym1Vas3jK3daxX37bLN71Lp+vXnt2tbVa1unV+vFjFep3Wof Nk9O9iqx5oz0yobj84f1zx+Xv3tS/ulJ/vXsXHvF+NndygSXMC3kFAI2Lhyy rpcr6AQ5FtMOLXz1sPTN06rdyFLREBwsiE+AKqhwKREuwI4oCOj87IyDx12e m7WYxhcUmtpmKWEaj1osWgxGCxppzk/cDNszjom8Z+q04rhWd3rmhBOAodGw QiZed6ZXQtuk3D6ttM1orCbVlJqnlzK1QoZezppQcMbl3FEZD/BBMgfgCnBD IZ0vUHLYRgJmb0o6i0Mwh0BzdIoCBSf3D8shcAHAydklyhAdlT7OYFKHoVwy jQxFSukcvVrDgsCnKXgrhQBwRQPBRgGLhCE4MCQPA5fjsalpuZZOIcPReAgc CUfCECgSl81UKycc1vxuPd+q53dquZ1ycbucb5YyjWJyMx+vZaKVVKycTFST qWoqU00Vq+kngA869d/bdE4aa0wqz5Zi1a1MYyt7N+f/+8b8f0taPg1Zd4ux RiO7tZW7XIp+6zb96FDfMMpFeJrbtVQoJYqlTDqfTGSjd24d1zaLyexGKBJ0 +tc3EuFSMbm9lTvtVe8c1i5v5062Mo8Oy6+flN8+rRU7vUoXmMNK96jc69m9 DvC5c/jz/eN8lVmpygro42icSqAiDQ8TLgxadJb8+uo91+LbIdupRVNTiIuJ avX48um9h5+++8Y3h+WDFfNmtVY7Oq4dnTTSEffoaKl9UD2+Ujs5rZ5cqV25 kklG5nmycqtXu3x6cq33Zi90YFFeDS+9vF389tXiv77T/P1ZseNSlWaUcjRU z2Xl3WazmL6q4QlRMBkWsR2Y//pR6avXqo5x1igdoSKPKMkQJQUiIYD5aBDp Uh9vEGRVjhbyRYtxfFasBCpJI5XIyLhAH5xCo7Zn9QWTdju8WArPBG2Km5uu J+21kndMwcQrOPgJJWvJKFueVjrmNPa50cVpzbxObFJxAX+cVvNmtOIptdCg 4AtEYgqHzxRJqUIhhccjo7EKFHSNiZvBovAXB8QwBGtoGNs3IATDmQMQyhCc MgimDo+Qh8H4/hF43xBuEMwFgjocxx6Ba5GYCQyBe3Y9PJgHBgvhEC4cPs3A 8ZEIo5gzDoCExuJhcAwShUKi6RwOW66cdNhy7a38XhOY7Nm6ldurZ3fr2Z3N XKuWbQGwAdu1zHY1s1UtNCtP454/zo5fGVZo7HG5IlPL5BulvXz8Y+/8NxHr F7m1X0Lmu8HlWi1T3SodlZPfe6d+cmpuTsiFBIrX56w08//f7PY2v/7qoytX esXNXL6WydUyxc1sfjNTrOeqW4VGM79dTW/X0rVSZLMc7Wzly92jau+4cnBc ObwMzIrXCZRB8vl+GYk3PTquxaD5YIyKK4JduIg/P+TTL72dDzxamqhb7Pf8 S9saRTld2zy+fHjY/Ww7+TS02MwXNju9WheYbi7gMgultXZ38/i4fnyyeXwC rLX0hk0qq+z2GidXrl4/+Py15vuXIztm6a7D9Ont4u9vN//9vebPTwungTEZ uF+KgOdskwGTal3LZYAG1RTMcXbl20eVP7li6jkIIxM2SoUoyVA5Bc7HjKAv nGcODG/ox/KWmQUmbZpIzE0aCypxmkM2gYaXCKg4g7it4ZeXja8eREshY8iq 3I/NHOQWtByckoszKpm2CdnitMo+p1mZ1y1Na+b0IpNGMKHiTmsFM6PiqVHR hEYsAhyQy6OKRVS+iMwToJFoxghknIA24dHk/iE9Fm2l4oiXBnGXQAwQkjwI ZgxBWMNnV8WQh2DkQagIhh4jU3R8AR+DAeK6CAQbI+BpEAgFDKFBYQIYSgpH GFjkWTWHjkCSkSguCUcn49EoNO3/56pTz+81cgBXne1Mu5lt1dOtOkBUfncz 3zqb3O5mprWZ2anntzefxDxAbv/ONrZCZekUqtRmPpXJXF2a/dg93c5tNOql t7K+H30zVyOrpUapV858uz7104r2plEhIlBdwfXiTq2wUyu3arceXPnqixe3 7t7Mb9dyW9XcViXfqOSaZUAq0/V8ppbLldOZfCyRDf85wWrvtNY73Ty8Wjs6 rR1dWXE7QK+cw52/JMYyzZpxIwqlGEFKkTj8+fPUCwMV7ej9uKvgXIwZp65b DE2NAniM08PeJ7XItdX59JojEQzGAr5kwJf2+459iyWDupKMVXOpejm3Wcw1 SrnH5Y0Dq7EZjzUyqZutwjevb//tzZ2PrsfLM6LOsumXJ/X/fLH3nx93vr6X dXIxGiQ0szx9UvKFTBI5CjpGI14rrf/wZPO7Nxquad6slLQgJs7ycFNcjJ6D EmFBYjDIxONOy9TFTGl+XG/n8Esq2RoOGRewrWTqFb/r1Lt4aBk7ipsP8o6X 93KbG8bVCVbIJldy8TNqxsok3z4pXpxULE6plmdGl2bUM+PCSa3AoOAalHxA rGa0EqMGSM8SGu8sX9FFIqpQhENhMBcHZeARExpJuTTIGAKxQSD4hX4AIdYI gtg/RBocQQ8MwYB9EJgxNMbJpK6JBWtGvVMmXDEZ/GI2YH/kIQgNAuciUEIY ij4MFeKwUxIuD40lQhFqNlUlZAF6RWZz+JrR6ZWVQm+v0N0tdPey3d38/l5+ fze73/qTsa3s3lZmr5H+czKtrfxO49WY7x8O4zc2nZ3G1ijUoUzSrplqTGh3 M8E8oGytBhB1342t/BCYPk74eqXU1+umX53aO0aFGEd1Bl2ADGa3z5Rw+3i3 c7lb7mylt6uprUp6q5JpAhvlZKMYr2Uj5USkGI3mN8K5cCh7tnZPb/au3exd v3lw8+bxnZt+/wru/AVq38is1rhqnBjHImUg6ASZgjx3nnx+OGd1PXxw+/q1 /aRttqYUb8pEV5LZT0qhp+WNbNTjD3hcLte6x+1ye7w+342Ye9tsDAc84ZA/ Ggn5/L5IMNBYs2Y0Uv/y4oZ79agW//JJ8+unDWA+uJroLKpO12d+flz/t/db 3zwouEUEIw4+y2U/akX9JpEUBTEwydfK7u9fa3z7enPdxFuQEy0yyryUNCck TLIwAszwApm4nS+6N4J6pUZOZyv7QbMDA2s0ZsrtneLwN1yB40SgPav54Gq+ Fpl/+3Lqi4eFWmDMYeQAJuidk95uuTYTCytzmuUZtX1ubGV+dGlKsWCUzowK TKOi2XHZ/ITcNK7kSoRE1tk7BylcAYUjwKAw1EuD63RCWsnhgEb4IAi1fwh1 YZAyAJaMQLlDw8SBIeSFAcYgNKEQbojYXgp2nUL2ifk+PtOpkC9TKSoojDcM k8AwBgKODQZThkBUoAnCEWwUYIIIEhxJwONQKDSRxeCq1JPLy/kOwNXZ5M/W dqHXKezvFzrt3P4ucFeus5Pt7OTau7l2q7C781oi+A/AB61nXMmZ/CnF2BRf Ggl6862twl4r197J7223tqpfpFzfhxbeTqz/4Jr8ZXX0LsAVnuoMe7N720Cg z5y5LWC+Z/uf3bLTSO5sJprVeKMUreU3yvFgMezLBnwZvzftAzQlmAmtW0PF 7W61d1QHEtHlo8XlWchfX6FcgjmsKyIqjdw3KBiG+6R8CmCOF0D2qbXdk6t7 10+izrllBHQJBjudmdgN+rZ63cbRfuOgU+3sNg669cP9Zrf9WiPVXl2u7u5W OnvFvR1Alku72/WNNadSmijlS9u1W6eNL57Uv3q6+eVr9W9erb64mWjblfVZ 9Vc3i5/cyfhFZAsVv8Smryv4izKWCDoyzWNcr3p+fNb85vW6Z4ZnU5AWFZQF GXGaTzCysUC+MlOI27l88+Bg3bHI6h/Q9A9UBIyb6/bTDd8cnbFhmrqzNtuZ 0/z0bOdex7u1MfPlw+JHV8O7ySmNAL9sEL5xHH33RjK+qncCPrgw5jTr7bNq 25TSbJCaDfIFo8xiUsxOatlS8dn77bgCMlcIcEXAERmXhsaQiA2VgAsCsSAQ wuAwfgAkhkHFI2A5DEIfAJEvgfRIdJBLc3JZ4yiECY93SUV2Id9tMni4tFki WgYBG0m43IxogoaTYeGMEaiCQlSQyBQgriPQRDwOgUaROEyuRm20L2U7u9ne Xq7bzgNrr53vnk2u28l19wu9LoDZ2S29Tq6zW95tPU0G/tU5/q15zE5hiQkM DZm9YJrK16q1rUZze7uxswXMZmvrtF78NW77Z3jql1X9ryujtwwyEYGyGvXn 9lvAzzkjFhDGbht46Ex7J7O7ldpuAlxFa7lwIRnKRQCQggm/P+HzJX3+TDCU jc5TaFNqW6Kyl28fFLo9s2WS+Mp59gBqzRUgouHsgUETGh8U0BF//Svh4rBz dr3R2K3XatHlGT1sSHDhwhiGkvTFs+liNlfKFcrFymZps1mqN8r1xuNiuO1c 3m73mr3DRu+gfja9e41kYnayvLdfPTi4c2Pvm6fNn97a+v6NxvdP6397tvnN o2LPPVY0Ki9v2BYJqCkC+nJmpWFXymBDzP7+cQ7jWtnzy+uN719vrM/wbSrq kpJikZFm+LhJBlqEBlmopL1EPB0KzDOoiv5++eCAGYPaXbRcDbmsNFJvZuxg Wltdnv78QePbZ7WST3+76f7sbuaj26lZNU3DJ5d8AGmbD7uhkGPct2x0nXE1 ujinXZzRLs+N2Wa0FpNq2qhiCYV4JpvI4pLYXBKHi0NhJWCIg4mNKNn04RHM AAh3aZg5DJohY3jgkbPzyANQGRJrpdJ8SsWyUq3F4WVorH9CHxpTVv1rRa2w MsqcwsElMKhHw53nkXwargiONAtZKgyaCoELKYRRMRuNRpO5bJZGY1hZzh7s 5456hYODXG8/3+tlD3qZ3n62182ercC33T/nDLNie/dZMviPlfGvzaPLZLYU S5cTmDqmYGfG8MH67Gde81d+20uf7UPf4ifBpV/WJ/7Vrf9ldQzg6va4XESg u2KhHMDnAYAr8ED7+e5+fr99Jont3czudrpZi1SyG/l4KBkKAtEn7vXEPd5E wAswlo9ZRiUSMEovmk+UO8BTnZ7TQ/9yjj6AXXMHGRiECYkch2P0GAjm/Cv0 vqENibxjGtsxjZZG+QE6ZoUED0uFx/71tsfVXFupO5ebjqX6kq1uNdcW5u6u zm5NaG/Gws8KqberqQ8a6Y+2sy/K/qOV2cvpjbB1KWeb77pmjgILR2Hz8Ybl ZmLp1bL7tfJqWsWYR0LHhkFKOPxWzvuo4dHg4cgLfWMsxlHWBeD39ZOKe4qz qCAvyogWEWGagx2lwtnw4VUG9Zln8fGy/rXlMQ+TGJaKr9pNGxJB3jg+DkN4 2TT/7Kx/0VYLLn7xuP7qgT+zpvvweurbpzWrkT2jZoUX1Tsxy4e38jsJy2Fl Pe2dWZ7T2mY0S7Max4LOMq0xT8pnAa74fAIDIIpP4QloIhEeh9cgER4mrqhg c4dG0H1DGjhCNgJWw+G0wWHohX4tmdpwWJ0M6hyZPk0kbSglNjpxic8t6eVF rTTOo5VUPCkMzIeMiGDwCTo+rxMayGQWFK7FoHQolIZBClvHCBgMmcXkqFST Dnvh6Dh/+bh4fJQ/PswfH+dPjrMnwPZx5rD7f6A67OUOewBylb2992Pef3OO f28bW2OyhTiahiVYnl9oelYebKy+Fl55M7T8ht/2ptf6YcD6nXvy93Xdz6u6 X5xAbpcJSNTVaCjb3c91ewCxmW4nA+jVPiCD7Wy7lW414/VipJwOZCOBRMgf 93tjHm/M60n4fZmwvxDLbm06Zse1MLSRMx3Jbk8YR/GvXGAP4twrPhoMTDjX p4YigPwM+ctfKX3g4pLrTiP/sJ79MLn85oq+p5fcMhtvrNofl1OPN5OPq7HH leiTSuL1SupZKfo063mY8DzKbzzJh57lQm/kAm/m/Efrto2JiYx5wWfQpccV rWlpZ17WnhHvmMQ70+KdWenegjw/xpmGgbUDgAUPmchEG4+hRCAYgyA1lbyT XPv+We3ju4k1A2NBgrfJ8GYRfpKNUZFhbNjQAgJeZpDv6IXHRtkCj+OZWri2 t301G17n0bkXL04Df30WMzoqq/pnyr6514/jpeD4Qdb+5eOq2cCO2rVPev5y wNiMmjsZ+3Z8uVd0+VeM9nnd4vSZXi3NjlpMasuUTiiXU/giukzOlMiYYgkK jeWMQKeIWAMZh704SB+C1HRyG4O8xmUacRjSIGhVLo9MTVroNO0IeJpIKE5o /AKGi0VtzxuPzOM7crYdh1GNgKeQcCkEwoHALQLmFIsqhiPkKISNRBBjsVNK EQGDIzFZHJXauLyUPzrKAyCdHP+f9fgkd3SQPTrIHR3mDw8B+QK4yh8d5A8P jhqNH9fn/3Dqf1oea6llYjzNBsSz/U6x1wMcs9jbLwL6024BEavU2Tmqlz4P LPzmMfyxrntnQaMn0ydm5lJAptrvAkRl9vcy7d303k5yu5FoVOLV/EYpGcpH famgJ+4FoHIDepXye7LhYD4RLKULe73czpbXPm9AYUZJslE2B/nXV7iD2GXD rIaAMcIgYRJKCx4hvnKBegnuXU8V9rv7zdqrwaWGhmMhU2KLFqdAEnRG8u3O mU52OsX9bmm/Vwae8H6r1AbC1W5lvwXkrlpnp97eqew2yzuNO3eu17dr9zqp l5fDLy9HPjreeHkUeNHzfHbo+6Tnvp+ft+Ig40NDChT8VsV9NTptpSNogwM6 LvOw5AP06sWd+LqRYZMSFmWEBQEQ2rEaCpINHdKDQNtK6alOmnM6DaNjZpM1 Xqon0tmKxWjHQgxDg2sqTT28/sGdcitjDi2rGxszvnnV3d2QeZSVcug+v597 4ziYdemCVq3brK1HzScVZ8xpmFTyJhSCCYXQoBSOKyRcgYjI4JBYPMAESRwO AonCnZU+MPT8AOR8vwAEXSYRx9BIt5BlwmM0DGbWbnXJ+fNkjBWoIVjUEo9n Z9JteGxcLipbZrNi1jIOuYRFTSFhKjhYCIULsUg5Hi2CwQRw+JkVwpAkLA4L cMVgMRRyvc2aARTpqJc9PsweHWaPj7JHRwBRZ9tHx7kjQLUO04e9PyXr8KRW +9Fp+sWu+9vy6NGoVImn2VdXc70zTQPcLXfQA6Z2eHY8PHdw0OjuPw8u/7ii /WVF+83S6CqTIxVK4zuNs9163UyvnevsZfZaqa16ol6NVfKRfCKUBsQqAMiU O+p2R73eZMCfiYby6VApl99tF3Z381tN36oNeDXmEFBFf59gAGrmKWKG0VUS 1gSHAfkBf/4iYwDhcyWLOzs3U6FHHusVkyKpGa02tzej3qBM6VuN5ACout3c fifb/lMwAcyAJ9zpAIKcPzj40/F3iwf73RvXbz+8t3XQeXar8d2T0tePSl+/ uvnDa5XvHhd+e7P6673ky+LsPYsgJ8SN4ZDNxfGKgduYENgpeCOXcaXs+fn1 +qf30+tGulVCXJQSgHWWi9FRkRzokAWP6yjFMbEsHUvphOK5salIKp8KBCN8 5gRoWA+Hj6FxsaXFr57ufPVadT83tzYtWtDwvLPqcT45s6z/4kH+8/vZO9vO QsDot2n8S6OP9kO3d1w+i3JSyTbKuEYZb1zC4/L4OAaTxDm7sIEjlmKQOMwl ELxvCNE3gr4wPIpAAXJkYZMWGGQVDO5XSo58y8258YJ1NjEzYWMxw6aJVT7L QsQZWbxyPtOzjbpEhFUWfgYNNREQagzcoeFoSFguBEIDw0gQKBECwyLRGDSG QKfTRNJRy0L6YD97eJA57KUPuuleJ9XrpLtnPvXn2k13OynAs4BXvtc9rpZ+ WDH9uqL72T52PCpX4Gim6ZlEaysNOFq3DewJqAEQ4IHaCPyxDg67HwXs39u1 P62ov15Su5lMiUAU3apmO51Mu50Cmldr+0+oyhvV3EYxFU5vALHKm/S7Ez53 zOdJhLypiC8bD5ay4Uqx0NrN7bVze3vZnWYw4DQzcPKBfsml4QmW1KtVW3AI 6TBoEoVx0rBAF3bMetrVyuOo90pg7dbiWEo9Xt7qVrrA8wuHtGr/erLUPQZC GkBRoXdYPAC2D4vds4RZ+PPXBBQ1v79fOug1Lx/Vj3tv3m1+/TB/htaTMlDN vnlU+OV28tuS9YutlW/3nLfnxPM4eEIreK8b6q2M+Xi0KQ79Vg3Qq/pHd5Jr RopNQVhUkYFWaBbgxqgwJmRQNTRkx2A6k7orgVULj+0f1edsVq9MaMYjR2GI Ba5gmU33SLlfP67/8rz13dPy5dri0oTQNi7W8ohR29h7p4mP76R/eWf7l3db J7VVIL0fld3vXMvc7/i9S2NWk2ZhQjWlk/OkUjKbxxCKJbpxrlSBQeFgfUPI S2DkpRHK4IgSg1bDEMIRMGNwRA6FlYzypy7jbf9SO+xNLpqtDFp0VJUeV5Y1 ggUGPeRwbpo0q3zCEgnhZmFDMoqBiFhX86fppEUJQwKHM2AwNhpDIeBRKDSJ SmNJZDqrJQVwdXSQOeqlAfs7OMgAc4ZZN33QBoQIuBfAJr3frh90nzaLv4Ss vwWmf3RPXDEpjUyOdX4+XCzE643E5ubW9uatVv1KOVKsZnOtnb3trQ89tu/s 6h8c6q+WNC4WU8IXhmrFdGsnubuV3KkntjajtcJGKRUsxAOZcCAZ8MQ8rrh7 Le5ZTwY9qQ1vJubLx/3FdKhayO/uAVDl2p1ie7/SapbmVSsEqHoYxIRTJrmC MIcwTWOYaDTu4LB4ELo1YezMTp963e1c8vLCaFptqGz1yt1joOtdrabShvEN b658cFw+PKkcXqkA68FJCQCsd1g6OCwcHhQPDkuHx5XD49rxceP44PmD5t9e zf/yWunH18o/PKl8exT+qrD4/XH4H88bX54E2gaug0fu+M3f3c6+l10KiGg2 AevxbvSXNxsf3U24JmlODcWhJtkVZIuQOEZFMsCDvP4BwM1Ts1O9sHuBRZsm k+oTipM59aKYpwJD/VLh7spM3CD55nH157e3fnpz87vXKlcbdrdZqhUQTTLm UW7p5a3cD0+3fn3eBorqTmbRbR3b3LC9ez0HZPhZnXhKLdGppQy+gMDmsmRS iV7PEStRKBzqEkiBQhH7h3lgaE4vFYIh1H4QsR8kQ6LXNOrGmuPAY3+Q3Tj0 LIfF3HUeN6zXZjQSK5Fg5XI9TLKPT5SMgJxc/PG82E5GyaGIaSopNipSIFFs BGKMR1+zjGFRKAqNzpMrxy2WZK8D6BUQpTLHB+nDbubgzPLSwLeAOZ4BdpA9 C/Cda6ftH+63frtS+fuNzb8d5V/sJTrR1cvVjZvtwsPLzfuXm29frn52XHje jr3aST3YL77WKXxR9X8bM38XnfsqPFeeGp9UqBZWVjfq5VizEtkshkrpYC7q y254UwFfzO+Oeddj7rXoujPmcsV97mTIl4n4C0l/ORuuluOFnWxrN9vaK+61 y61mZW7US0RPQcGkc5dGwYgCnzpPpurpVE7/sBCEve5ee8M1UZwx7xWyt5fH k2OGwtZecX+/0u1t7e/frUTLk7qoP1vaPyx1D/+8gOGofHBUPjysHh3VDo+q x8d/zlHt6GD7cP/D+5u/PSv9/Y3qP95qPi0573omf31Y+h+fHv7fH+2/n1mo yKkbOtFuwPx5L/p2yuZk4pfE7Cft+G9vN1/cTvpMjDUNZUVNXpYTF4Q4LRlO B/cbBMLGhu9xMRFYXJSj0K65uceJ9dz0+MrCggSKWFOpyuuOfffcD09qP71Z //FZ+dsnpS8e5l499FvH2RoeedEgdk/LAxZNdFEXWdZ7zBrruNQxqYysGNdt uqVp9ZxBPq6VsEUCGk/AVSn5ChVdKIGjsEIIXAGB4i8OEy8NA2WQdGkAcX5A AkUukPDxMVVkfT1hNj9yzj9am8uNyZeJRCDJu2SSVSbVrZBVxkUNq4IHHpnh Ym/41QcmgQ4GnePSI2qhGI5iwuAKBml1XofHoAl0GksuHTPPJ9p7qe5+stsG HPBPdeqk9neT+23gluT+XrKzmwJmf/fO1e2vbhVftkJfHsQ+60VeXs224o7X j1If3Cx+eLvy4n7900fNzx5tf3Cr8v7lzDsHsXeOE59dL324E3p5kPy8l3y+ m/TNzWjUo55sPF4tRssZQKnCZ0oV8cR9nuifmQr43SJuV9zjSvg86bA3Gw+U 0oFaMVQr66k6r7+c2e0U2r3qbis3LVtEgU1IrASLF/YPTsNgRhiKA0Ny+ofk INTBguV5dPWx39wwT11fGE2NTZS39/L7e4XOXqG9t7nXulMO7i4YUuE8oFq1 45Pan9JUOzs/eLl+fGXz+ErjyunW8cl273Dv+ODjh43fnpX/eFL+amf9dE33 06PN//nFyf98d/fvXf/7qZlNBd0rZjRdU0/TK29G5r1c/JKE82w/8fvb2x/d TvkmqWsa4oqKtCQnzPMxagKECro0PzaZTeTSE+Ntx4KOyynaLEeLJufU9Lxa rUEifVPT3XLh1fTqL083f3tn+9fn9b+9Ufvbs9rv77VOq1aLljE/yl01SSrB iaPi8snmykFtZTO24JxVLOikdpMm4Z7LBRfs5lGxUsYWStgSGY3Hp/IESBSW NwKh9A0BrscYGJZDoZj+flTfYGVMnBcyg2NaIFAlJbyiSlycMkQVkik4QovC +nWjXiEnoFXtzCi7Lj0PCp6hoqo6ZlPPX6TjRXCkRchW4fF0MNQooi9OyolY LIVKY0vFWvNsurOXPdxPHZyBBACW/vMIQAZIWb1OZr+T3t8DoMrs7z6+3vj2 XvGTtv+zw/CXl+Mvr6bqEeuzw+iLG/mPbpVe3C1/8mDzs0fNj24V3zuOP+8E 3+oGPjiJvbXlOcj6ruW9T7bCSxMGiUyxGvFHSpmNfGKjEAtnI/5E8OyQwllQ X/dEALTOoFpPhjypsCcf95bTgWopvFmeQWI0aL59eSPdaBY2i41ZRYqNNSFw WobQK2QYhvoEFy+Sz5+jX+wXDIG9VGZhyXHayLwWnC3L2X61obDTync7uTbg pHv5zt5me/txLdRbnIqH08V2u9rtVnvdSqdT7XRLnd1yZ6+2373caByky3sH nZf3q7/fz/604/qi7vzttco/39/9z2ebv+24fzpNfHUUbGhp8Qn5jmvqtnvh gX/GRkNP8yiPdkJ/vLP1wY2I20haVRFWlASblDTLwynxMNLwJRYUrRXKk6Hw 25W4jUMvaSSrHNqMRu9asGjRmIBl6bSQ7Nn0gF799s7Wb8/PrqL/7rXSD29s vnsleFqcy7hHfVbVtc21d64mvn6y+R8vj/795cGjo6jLPOqx6htR+5unmfsH EZ1BxRJKaAIhjcej8PkYJJYNApMAopAo2qXhURj87FMoQeCCkleSM6Makcek X5kYj4yrI6NKD5dlQcPHkYgZHn+Nxw1xWTkZOyRnC8GgGTTcRcO4eAQdEgao qxCN1hAJnBGIc0LSyjgJWByZRmVKJWPz09n9vUp3v9LbL3XbRaBodzvAC1tu 79W67c1uu77fbhy0d447z283v3tQ/uww9PlJ5OvrqY+vpRoR69Oj6ItbuY/v lD66XfrkQe3zx40XN4sfHMff2Q+81fN9cCX6fC8Yc/vmp+yRVe+MYUYqVTkC rmA+6k0HPEmvO7EO4OSKrK1FVleBNeZ2xXzrCf/ZGydyEU8x4QP0qlII1Uqh wJqJRlJDiOYJu9tmdRDxKQbBCIdO8rWbjqll5LD80kXsX88RX7kog8DdQJ2x uHLNxuVy7On6RExvyNa2sx0g+bfy7Z3s2WxXdjcfV4NHy1OxUCzfauV2t3Lt 7Xwb2GeruFevtLcvb1e3k7H6bu2TK6kfqsvf7K7/9mb978+3/7iT/Lbl+OVu 5r990v2w6wlxsVtrc5EpjYfDaFj1Rgx0Uc5+fX/jt+db717bcOnJDgVxSYoz i/FTHIwMB8EPXcKdvyhl8uZm52ZlMjFoWA0B6yjUhVGdWT8+hkQ6hZJdg3Zr RnWWr96q//zWJoDW316v/Px8+6MbkefHvk8fZBvxqYLf9OZx/NN7xZd3S98+ bf78fG8/by+GF3L+mdS66e5e1GBS0wV8Oo/HkkjYYhkBR4Be7FfTSA6tiDMM MsARgHYpkYiggBKSctxL1lxrO9/abmXjKZPBpVSsKcTzROyykOvS6eb5/LyG uzklWGfj1zjoxjzXryDNEZBGHNrCZ8ixaNbIyPKoaDOyTMTjyQw6VyGftsy/ 9tr1Zw+PHt3oXNurnABlrpwqAiridmwmPN2yfyvj2sqtdmtrn97Of/ew8tlJ 5MvT+Fc3Mi+upbbi1jeOIp/cKXxyv/LhreKnD2pfPGm8uF18/yTxbi/8zlHo xfXke/uha43IYcHfyQWWZuelMvWCY2kt7FsLe51h12rIuQZMeM0VBtByrUU9 60CySoTcmQ1XLuItpnzlbLBWDG5WHbr5kE7rYxOUQyPaYcjk0IgVAga2HTJ9 Y05bFmBVg32X/uUv0L9cUIDgDjZ3TT+fqTZ75cR7voW3PAsFmyNVq/+pVwBU W9mzc5SN2s7ms2rgYHFiI7iR2WmkdrcA5DJn1wtt5Xa3C9v1crNydTP1WXHl +6PQP99v/Y/Pev92J/PVpv3vT2v/z/fX/9dPt5/0wnMYaC/isBtlFh49bRlj DPXPK7lP25Hfnu88vxZx6gjLchygV0sy/CwXI8VCiEP9UhpdweLO6o2LJhPs 7KONLmqVY06Pf2F2RkkkVGymvJK35Zz92+v1P97d/v2d5h/vNH96o/rrO1sv b0XfPwn8+lbjq8f5/YK5Fp57ebf6zWub711PvHuaur8b2IxYX7+aS/smQvYJ pUbOEop4EjlfoeZI1Tg8Cd035NPLt1anx3CoZQqOdHFwAYtapBPHWDTHir20 vVXIZtLm+eTUpHfWnM5lpnjc2MJ0UCE20ahrHMKxWWylYc1SQt3Md4kJ8Rmx XUrvBOaMZBwHPKLjkjzzGiIOj2fQmDLJ5PzU84edH949/unF1Z8/vvXTx7d+ /uTet+/fevn08MXTo0+e7r95p/b4WvbptfRPz3t/e7P75d3y13eLX98vfXqn 9Lgb+fx+5dvHm988a33xqP7ds9Z3b7a/etL44k7+s2upz29nP7+T+6Abevso 8fI0/vHNnN9ukUiVPKGCKZBw+DKuSA4UB6FaIx/Tqycm9HOz88uWbDZQrcQy pfhG8Sxc+Sv5QK0crG1656dzSwvHUccCmzA6OKzsH2Cd7+NfGp7DYOYQ8DkM Sgg6+8wK5jBYgaIE5uZWNaNxf+y0En19zdA2Gd+I2Us2a7JUzbV3C51WvrN7 Jk27O5ut2rOK99A+E9tIZHe283tbhfZOob1b3N2u7jRvl5PvphxfHW/88Vb9 Pz/a/+ed3Jfb7n++1/7fP9/+37/e+1+/3LvXiwjAQ93Yik8vmKIQtp3jWjRo XiV43I79/f29d29EVw0kh4rgVJKscvw0FyXGjtCGL/kUsr3VuVUJW0kgwM/3 gf9yjgpBW+aXTHq9CospaeTrLErNY/n5rdYf77f+eHcHQOun1yuAJ356K/LB SfCXNxq/v90EFOxybbEcnPvwRvnnt7a+fLXy9mmyGlm4shn64G6pEJ6XK2UM ngBohVSugM4XITFYLgjq51BTOrkKhTLgMXwQ2E5EzyCgMzjcqlKVWZjNmE2x eZNnwrCm16XWfVMcrn3cuCQWzRJxkiGQFo2kDg7pSWgvnxDXcY9Cpphe1PJb 7AKWcGTEqmZXQ/MEPJ7CYjHEMs20sVkJnW6Hb+5t3O3Gnl3JvHur/PGDrc9e 3f3qje7vH9/8/eXt3z+5CyD3wwfXv3vv9McPb/ztw5s//b8lved3G+e57v0f 7L1jyxILegcGvQMkSLCCnQDYCfYGEETvvffCToqiGosKJVKiii1ZvVNUsZUo dhIncezYjpPs7H3We94PZ+0P7zrrfSAv3WvWw5kHoAj85rquezAzuHfmy3tn 393f+OLOqVefHT/4dOXZ1YWDGysHN5cPby6/BnVt/stbq4fXF57sZO6dS73c zTzfy62m7R7LlFk9pFcPjA12j/Z1DnQr+nvkXT2K7q6O3u7u8dHe9Vn3ueXQ atobdFnHjdZRe2jEER11xdemR9e1w+v64bmu8mkqUl5S3HD0WNknxRI4upVA VAuYU2V07JFPCB8dqyMLPU73tLJ1Rt53ymu+OqVwKXtX0pF911hkcCAQjkcX 50IL+cBcxptP+WYzyXz8ZtyyONpttdgDgKvZTHA+l86lLgVMO9bx40nPm73E m4u+HWvvg5T223sL//py67+/uvjfvz3/r3dbV5eMUnTRgnFky6IyNIri3dVD bGx/fdnevO13nwO9Mk21U0froOFqqqqS0inEVxJgQNCcLY3nfIZTDk0LjUz6 918h/v0/qEeKZGS2qkVej0X5Gstm+juSQeNvP5/94/25P92f/eO93FefJv9w J/d82/bwlOkPt9N/vpv9y4P5Pz6Yv7ioD+g69lddv7u7+P7z/O0tT9DYu5E1 X1i0yBorKEwOxOLQ+ULQGOIIpDI0dohG6mNCEiRKAEP00KFWArqXiB6CcP10 qhlYYSwciQedbrPJZTaa9aqmhoGa2vH66n4hp6K0hFVUzDpaLMMiVTyKWyFa mpRZm8Qj1WWtDCrjWHEFA5LXSMkkCpPLYUvLZYpWbzIQzQWjKWc4aorHdKmo Oh2emI+pF+JTC9HJxZj6eHJ6NaFZCk+uRqdPxLTrce2p2PRmxryz4NpZcl9Y tO+sOi6vOvbWPKCurPtunAl9uhF5sJO+t5O6vZ28sZ3+/GL603PJG1uJaxvR SydCmwvu9bQzHzKFXRq3dVI/M9qj6mnt6JAp2hta22qbWqT1zeLahkpFt8oU GLLFhuyxFfPYqmX8lGPi6kzb1YEyNx/XUVokPQofbVJsaTruqRsW23nC4iPs o8dkFKEnELWD/N/QsDoy8Lm+06Hoic/NLcwmrronEkP9vkDkl+u5QEQPzuXC i/nsfPLTlG15rNdt9wXnsvlsbM+r3XRMxVKR+aX03XV3ZrDmtKXnr0/W/vnm 9H9+sfVf78//1/tz//pi4+ma2SomOxSyDd+ks6s22FY+ySerGiuvLjn/cCf/ 2Sn9jIKqlkGj1dQBCUXJJZTjYcziow6F4lzEm7MaQHtOO3JUBCstI4Hoi6zC 4LnHjtWTiQNy+WLY/LvbuT8/mP3zvdwf72ZBxPrDneyzbevzTetf7s9+93Du x+fLfztY+euz5esnrSGdcv+459sn6z++2rh2wpWyqbbnTC2tdTQOj8riFriS SKgkKg+FacVh23EYZgmMdqS4CYupx8DHqPhQJd3WWqsdG55Wa0I2iy8V92QS AY9dq1J1sdhaeWt8tKcKBReUFNXCYLSSYhKslIlFVkAEGQOqoZCrcQToGIyN xhFRWDyGQKOzhNKahg65NR50Zwung7rSUU8mEsiGQ5lAMO2L5PyJrD+acUdS 9mjMFPRPhL3DAVefz9LpmGk3TbSap9rN6jbbjMIxo7RNg3G7SS23TMmdGqVn WuGfAdmyM2QeiNrHgT6HTX0hY19Q3+ud7nRMKUEAGO1p6u9o6JLLGhvrRJJy pkD0yydZEI/HLi+ji8u5jY3dZvuYz68NRvyZTDifz6ZCFzTy24NVC03sMRqq BgYf5VfEKrhe0N1T8QMknByNbqJJXJFEIBeb6G7VSyVz7VK9vCcylw8v5Bdm Y/t+dWoEhIcQMLtf1Ck8n4vMZ/Nzqc/TrpWx3jmH5ZpLve6YjmcTkYXsYjoQ 762/FBz99v7CP0Gm+nIDoPXPt5v/enfun2833qyb59v5CVXTzZx5wdzjaRGP sSkjTdLry85v7uRvnJjRKemaBtpgNbWnHGpm4YXYUnrxUXNDzdpM/1gFj11a +B6cPrGwmUYWFhdRPip8CaYEj/IpGi57J//wWfYv9+f/dDcLuAJ69c3d3Itz tpdb1u8ezP34ZPHnF6t/P1j9+eD4Ty/X7533xayqvRXf9y+3fvfw+HxgcHvR 3tnVTOPyIA6XzhOyJRUsBnO0paqFCQkRKEoxTIxE9FHQaia6l0GcqOStq7sz bqNDPTk9OKDV6S0+n81ssrS3DLGo7h5FQNHcgkPxSwpfpsktKWHBYRCslAKH iXAYAQzJg6HoRTBSKRwLR2CQWAqVLqqqaezqMMeDjnTUnklY0lFzNmrLxFyF EJv05BPeXMJVODc45E0EA2F7LKhNeMeTnsGktz/mVUV8qoh/MORXBX2qgLff 4+n1ufu8jh6Pvdtt63TbO13WLrulx2EesOgVRp18Zrptaqp1dKRxeLixTyXr 62/oUTV0DzQoVDL5gKxN1dCiqpcPNylH2ydsE2MmTb95XB1wTkc8M1FfEIhK Irhr6L40IL0/KdvtK19tZzUjS5rgaH8Vd66BX4dEAKEWFMMb6VJXLAmCt8mm aYYIIxSiWt4XArq0kI/OZ/LZ4FXfZKa/0+UGaIEeMBmcywTms/58OptL3A9o bk8p5rTj4VQsmE74Lfq5YeVedPL9jdQPT1f+8frUf749+483Gz+92fr26Ymf D0++XtWd6pNu2EZfnfHvL+rMDewmHFJVI/p0yQa4urai0bbRRuqpPRKygk+q oWN4mCJa0dHx/n67z8ahUGTSyjI6Y3J0xDI5IMXAuZ8cgT46Uo4nDkgr/QMt v7+V++7h/Hf383+6m/ndZ4k/382/PGd7sWn89l7ur0Cvni7//eD4Pw7X//nm 7M9vzjzdi8dtqvML3m8en757IRxzjMoVzUyegMYX0oR8lqScSqc3kcktZCLx aAl0pLSfSTaKyGoJtYZGquLQQoMdp43jed2Ez+e0T4+7Bnpm+vtjOk0fk9bO 4fVLa0bYlHoKCnfsaAcV1wFhRAgYtRRWTyPVkfASDI5dimCh0SQsBoPCUegM XpW0VtFuiPsduYQjn3LmUo5MwpaJg3LkQMeU8eSBXSW9uaQ3FfEngH844/6Z pGskZusP2Xq81h6fQxVwjwR84yGgZoGJkH885B4MOQfCroGQuz/s7g07+iPO kaijO2Dvdpp79IZurb5La+zVmgbUpiG1aWTKMjZpmZwCzaBdPeHQql06rceU WMx4kqlJr6vQDCZCpkR4PWC5qe06re7J+K3nbUOX+qrX2wWNGKRKJLuu7dxW 8kfZtBoMuh6JVLCrfAnQ1qZ9QWsbhygtKe2Wtrpc3oAv4A8G/aFAJuC6aujL 9crtdrsnFXOnYmDfCaTCG0Hbvnlo3za4MqRYcttcY4PjVdKkQ3NwOfrV7dm/ Pjvxw7Pj3z5a/uHgzM9f335zfeHvh6cPl3SnVfWn7OPvL6eenfMOlDPKYCWm jvq7J5x/uJ29sjihboUGpVA7j1RNx4gJSBqimFh0bGJsfHAK+A9xYlotYXOc I+OJGdBLVfGKjlZ+cqSuqLiLxXCOd/zx7uwPT5cBQn+5l/v9Z/E/3589vOD4 cscF1vzt2dLfni7//Pz43w9O/P3lOiD8hxcnX+wnk47h1Yjp158fn41M1TXW MHkiGl9E4nFpYjGJSC5HIjhFRcX/9ivoWEk3nTjMpkyI6I0EXC1w3qqayXJx YrBzVTO0NDPq00xN9amGGlvAVgEC08oXNJIJHByShELUkpHeakYbAVWPQ4rw mAoCno/A0kFgoxC4EBGNwpIZdKa4XNrSBChyzWWd8xnXbKHss2l7FmAW983n CidzzmcCC3PB2Vw4k4gmAsmQJeVRJ0B7Ze73mPvcFpXbMe5xq70ebcAzHfSq A26A1njEPRZxj8Y9QzHXYMw+lLR2Rs0dTr18RqPUaDunjP0ay8iUdVxTOLag 1ti0OqfBGXbOuI0zXos+4Egu5yOzC4ZIdCYUNMci1kTs5rRyzTgRT8aC2ZRb PWgTkZw8cgdT2FvZuNnfPF9Pk+PQjRgU95MiOYUfGRsLD/S65PXddEx5yTGX vP2UQz032ZMdUswNtKeUTfFaya2xtqUumV7WZFV2Lk5P7NunPtf37bmmd/26 Z8aeS6r6oJSv7+xJue23Vlx310PX54P3Tide7oNeZuvrZ9dvn0292Z2/7R9a 66kIdTa+OJ18sh3tENJERcdcvfLPVz3v9lLb0aEuEbaOhpIQ4WUkRBkJxcGU EoqPjQ4OSsSiekmVwWwSUSj9LW1um3VsWCXGoAckglYiuoNGcQ61fXt39qcn Sz8+BpKV++ZW4tv7s6933O8uuf5yPw988CfA1dOVvz9f/cfB2k/P1wD23z9b f3U9A96XrFtzYdnT0lLH4PLpPAGJx6OJRFw6Y7hSWI9HEYuKRSikuY43LYbU FdQmEqYRIgxUlxsaK0LdrYmOWo+81tbZplHIe8slXXhMIxpVx+KUk0l1FQJZ VXlHFW+CRzSwqAoiphKHpheViNB4KgLNIhCpBDwKiSZSqBQBv7y1wZqOO2dz zrmcZ2HWC2rxlzOEc575fGBxPrj04azOfCaQikWTsVjEHXXrwtZxj1HlMA45 LKNOx4TLo/X6jf6gKRAwhvyGkEcbdmsirsm4YzhuG4xaB2JGRVAvt2nlOrVS M9M9bR7RWSe0timtQwMESuMyWMPO2ZVFvc9h8DuMQU9yKR/OZmNLC97ZrDUZ sybiWa89DDwsndR0dc4woblKKMAl9tL5Q9V1m4qqhSr6GJlQUwrjfPRJM57s UTaHxlSJ6YHF3qoZDiHU1TvvNM9ZtfOmiWX92ImZ4cWhzl1N153Jpou9Ffuj zddHG08rqub75YujnYn6slC1ICTlrLZXJ5qrjJV8s4Sr5TM1XIZJxPHXS/zy ulhn0/KAfKGzYaun+mxvRR8bive0xgdaW5hg5y2ZaZVtxw3Xl81zxrZ+CVYu RLdy8Y08XC0Dy8fDiKXHWhsbqFhsv0I5OdjbIOYYJ/vD1knvRFtkUnbS3ZcZ lxqqWEl11zefZr67mwcFfPAPn8ZB1vryiv/9Vf8Pjxd+eLLw/YP89w+AIebB +K9Plr97svw9oOvF+sG1VNTapxvtrJPVULgciMOhsDgguNKpUJeAmVA11hCx rWTiWV1HsIGrraTXQKQqFsMwPuieUYd8zmzAngraF40TriGVpavd2CDtIeHl QoGiTFBVUSZvaeqUVXfRMW4ZvYuB5cHhhYP2CBQVjqKhsAQMHoMs3P2DwRdV tDRaUzHv3KxnNv/hHKR5//JCcGnRtzjnW5orcLW4EJydLZz5NpdL5DOpVCwR KqDlt427TSNOy4TbqfX5jL6AxR+0BoNWIDAArYhfH/fNxJwTUctg1DwQMXT4 ZuQ2jUKvUczoe2cAV5ZJrQ3U9IxDp3Mb3An32ul1c8BtCbgdYc/2ztlYPpc/ uXjh6hVXJm1OxSJz875waLS2tpMI+ZSyaSZyBI9S0gSquqZQdXmyXqBlkUA+ of7qSD9ffMGr3/VOXzOqrqvluyMNl9Ud18yqfUP3rk55WavY1Sr2tPJ9Tftd nfy3tq6vLV0PpxoXmoXZ9sp5VfNah3R/pO2JseeZoePZjOLRtOKORrE/0Xa8 o+r0QP2uTnHN2rmjb0u0styVtOVm/rJC3AvhDTyarYLdRSWI4TDbUPvDTd83 9/NXFtWTLRRVBbmTT27hELokzO56oaJOZBhROsfb12KGVf/kmrNrw9t90tq+ rJVthEacqhp9f3MqbNuY877e8Lw773173nu44To85Xy37X+96Tk46/zNTuS3 5wPvNj3vLgZ+fTnym73YV1eTv72a+s1+5qtbc7+9lX+0E7Rq24ViIZFGJzOY ZCYH4gsYDFpQ3b3iGAGq2EUkepulodbypFJoLKMYy5k5zVAoEfLNZhIul3Na a1P1mRRt1skxt8uuZDE662Xt0kqIQC4pQeBRuGoIpxKTlEwCt7SUh0KyQG6H I/kUEpdKwaAwZIjKKBPVtrW40wngdN7C5RLzhVPyFmcDS/PBhblQ4ZOdhfDS ImjJQS8WSSdj8WgyEop57SHLpNcy5ilwNe62a71eS8BvCwULFQ5Ywj5z2GMI O6fDlqGgqT9gHAjNKFyadotarpvuntEN6kzjOqtmxq7V27UGh9bsMi6spXd3 dx0Aqohndi3z+z98lVpYjC3mHj69n1hatibjNrN+QCAY4fLsM/qsR7fayIwK CO1Y4mB96ziTruPRpvk00SdHyo4e66poi+bzyWx4wTCa6ah3VvI9U/rkQjY9 n03Np1OziexsMj+XnJ9NXArrD809v3aqbo42p4cHLgcth67hHcfU6ajjTNS2 FTLesKg22isfuIffzarfZsa+TI28jY9+qm6+2C3Z6ZVc7K++2i/d6q3QSDlX MjP31q2eLomSQXCMKh5vBv7yeHFvcVIrp/dXkluZ+BoqZrqzfmfFO+cezRm6 F51DWdeErkfWJeWqBzuzmq7sQEsu6lFWl2lGehfmo7sbsT/dzX0PwtX97B8/ T35zO/nHO9kvrwSfb1i/vOz/4oLr1TlQnrcXgYJFDzddK+a+q3njvdPup+f8 r69Gbp11tjRWEGkMCp0DsXgQlyficsPT/YueSSkF7yhnD5Owlhp+vEuSaS33 1/HDfW2JqZGIZsLXpXBMjrgjAXc2YTLovOOTnUxmR5lI1y9TKSupFCyRgK9m U7rZ5GYqToRBVEEkFgLFQCDUXXUDrVI8BgvR6OyKihplmyOTBLoE7A8QBSzP vZDzLBU+aPZ+uLbLO5vxZ5PBZDwYCwfCvpDXGnLoA5Ypv1XtsU7azaMO66TL oXU7Zjwundel9bt0AZcu6JoJ2SbCpkG/achjHPBNK+zTcoOmY2a6WzfTrzcM 6syjevuMwWk0uI1Wr+nz+1fu3vrcE3T7E95nh/f+9Z//lVta9aQT12/tr53d tCdiEzxopKo6FPCH57Jpr3aSgR4iIjtY3P6KiiEmWcuiDtDJlF99RPrVJ11V HZF8fjFom9MO5wZaXDUim8Zc2DuW5sOLs6GFXGQhn5zPbifce7aBpcLtdoOb HvV6f9PmSPdJpzE1Nx9fWoovLyVXFhbmk7MTcqus8sEJ71c3M199mtlJT47X 0HoFmC4uroWGi8sEs61CU5X4y8u5r6+l77v6rBVs33jX083gd4+XdmbHNI2Q XIAXkTDjPU0e08D+RsKoklXSyM019eV8vkDAohMJOoNuyTAcGezyBTxj/d0d srqgzfDZRuLbu9kfHs3+8ABYYbZgeY8Xv7oRe3vB8dV+6N1lz9tLvi8u+b+8 Enp/I3kiMCbl0qxDytvrnqcXgq+vhJ5dDHS0VpHpbAqbV2gJ+XwJi7Gi6Y0M K7sFrLXOimgla5CMT7ZIJss4A2L23Ijy0ljT1lB9drQzHPL78+B9zwXm8vGg e1DIH+Bzrp/NfvnyRjZl7FTKauhQG4PkHapd8XSPyXj00sLV96NtNTpVOx6H h2g0QaW0ur3VkoqCWOWaS7vnM958xrOQAQ7oW5oFgDlySXsm4kqE3fGwLxr0 RwIhMPA7XNYpp3nKYQFcjdusE3brpMOudrlm3C6txzXtcYy5LACnfp+hF0Dl 1A85tB0WrUI/0zmjU+kMwzrjqNY0arBM6h06o9saTPn+8tffvXj2wh/1rW3M /z//+1//9a//zi2tBDLxvWvbWzvn7clYYKzfH48CJCILuaBt1MTCjpAwI43t jTyupAjWSyApqWTGkSP0j452V3dk09GzDu2cWZvT9BgruDatObwwG57LgQoC LGfTexHrVed4LuIK5ZPRucxG3L070nqmpy4wpY/kZ6OLc9Gl+djS7OJq9vKK 1S7nmmWVd1e9x519M+0CVTm+R4hroCNF2OLZBv6aUtSARUw3Ss+ah69b+oCn 2AYVzy/G//p05UJmSFuH7RCT+lqqljOu6xdObC1H2yo5pOJPmDh8bW29vFvJ odLGVUO+nnZDb89wn8qsngxOqnbMwy8XLd/dzfz0KP/jw9z393M/Ppr927OV P9/Jvt/zfXU9+mY3dHjB+3rH+24/dj6jrRcyICKBTiDEdMOv9jK/uZF6eSnS BbhisWkCIUsgYvIFEg4nrGxQ0il6mfTsQP2qstpUIRxgkDON/LO91WdnenaC M5eDuk3TMOgKo5OjYY3WYzAHLGZdXbWroXJzMfT+8LPDB+eddu1gZZmMgPH3 ye6tWlYdfUAAWcUwJhZPJ0FYNB4iQwKxpLq50ZoM/3K5qHc27S0ctkp5cmln LunMJ12pqD3mt/lsdq/dGfO6wh5PwOVxm50FpRp3WCZslnGLbdJqn7Tb1Tb7 pM027jCPuE3DbsOAS9fj1XU7DUMW3ZB5utM43aHXdulm+nSGQYNp3GBRA73S O/VGj3Hjwsr/+T//7+P7j2OZyLuvXvzf//v/Ab3KLy6vnVl49OjK02f3Q8CF 89nw3Gy4oDYZ3dSA+OhRyVH4RMdgOYPM/ujjBhR5UiHnwo5RPzraX98z7zUv 6ceSPldK3akr49hnzACnwvHPhdl8Lr4f0O84p9OpSHQ+n5qf3cuFHvg0K37b dsh4dqA9MGVM5vP55dn11fhnp32Pt9y31gzGOsYgh6bgEroroL4yolJIkEIo LrLYV8EIVTFqEaUNFGxKUXtuuMVZJ4ho+17vpX56uX45PeRXsK+fnfvdF/ff H1z/7PzCyYRpsIlPRx9j49EiiFhGI1QxiTVsRjWdUsumVzGheiZ1WFo2IWLf T8z87fnqzy+P//PViZ+fLv70eO6nZ8e/fzT/9Y3Ymx3/wXnfwXnvq0uBz9Yc iloBRMLjsTgsCsOFaEt+/ftbsy93I13tVaAfZPGEACqGQCBiszvK+EIEItFX cyvY/zg1sTres2Ef3A2M5CZaE051djaSysei4GWJ+dKOmaR60KMdizuN+eGO ZF/LmcXw8fnk3taqzWJUSMTtNGw/gzxaJZySCZpoZB4MQYAh0UgsHkOkQXS+ qLyqQWYK+zzZJEhZznTMkYy403FXKm5PxWzpiD0WcoT97mjYHfK6/C6H12p3 Ge12g9U+YzVNWAxjJsOI1TxusUzoDQN6vUo33auf7jJNdxg13WZ1l0nTYZrp M0wPmjRdRm2XXqea0Q/PGMb0pgmjTWNwGXUeszPsfPnqwf/+X/91/87dE6eW f/rx+//5n//55z/+tby2dnFn/dHDa3/6/fvl9TPh2Wwwnw7m0qHZtHqyl/HR R7yP4VO9Y/UiVhWsuBFDDU6OeeuZVaXFEzVtx40TScNMPJOY0/XYpDyX0Raa y0Xmssvp8E2PesOujqeioA2J51NXE647nqm5iDMyl07lk9ue6fN9snnN2K0z iYfboTun3NsRTVrbOV5ND1SzxzmkFhahmYOtZWK5JCQDXmwVUFxCCvilrSRC vFEaaygzVnLShoFfX8v+4+3mpdTg8kz/u8fXv/v6YHshmrBOJHQ96laOvotM Kf2YBSuilhyFYMfIxcewRz8mHvuYjThKKz5aD+H7GKQHOds/3p7759vt//zi 3M8vT/7t2fLPByf+8mDuN/uxV5fDX15Pvb2aeHouou5tgihEEomIweCQSAwa iSnncM9lrQeXQ11tVQwWl87mUnlcKpdbJRJY+9tq6eSbs4bXZz3vNr230prn pwI3T4YfxoYPF/UvjntuZqy7aevZkG7VNZ2a6PO111trpWF5dW6yeSs24x1W aBWNvY11AhqDBEeBWCXE4SQQoYxIZCMxTAyOgMDQsfjRRml7uYjL5FbVtMrq 2mU1zQ11LX1yhXl4cFjZ1dHcKatXVlW11Fc3avp6Jrq6mqub6qpaZdUt9RUN sor6Rkm1rKK6qqxCWiapLKsU8UUijqCMwwexoVIsqhSVVwrLK0Ti2qqahrom ibispqKyuUGm6Ojo7OtT9vQPTIyP6abGdJOhuGd7a/3T6zt3PrtyfGX+9Knj V6/uPXn0YHZ5JT6XWzyxcufuvdVTWwEAVT4bmctHF3JObW9V0RHxx0h93/h0 jbgPj66Dk4Iq1ayi3CKmTfPEJ9VDUY83novNTcrdEr7X6ozmsyej3s9swyd8 hlguFV7Ip3Lx6FDPWr8iYzX47CaHZsTY3ahpFF5zqfbH6i+pBx4suY/7h5Qi cj0D08TAjoggDZNUj4ZXkdHlEHgBkRR4ibOM7hZCFceO1iIQrVhssFYclInm tH2vLkb/8mjltL/T09Nw79LZu7sb7TUiNhEtIKMEZNisvbyBD8eVHi366Fck 2FHUsY+xx45gj30kRH/Cgh1RMIlTfOjRnOXvh2f+eXj2Hwen//Zs7W/Pj//4 7PhXN1KvL0Xe7sXfXkkeXIx4NZ1cENBIRBKBgEbj4Ag0DIFBorBSAe9UXKds q6ayODQul8bjQixWY0X5cGPdSGPF663I01Pe/aw5pelbcGrPz/qvJzT7kclz zgFbi+S0qe+qo/OKWT7bX6GvZirYlNEa9klr97nwVHi0uUvM6K0rb5JKyGgc FoFm4PAUJI6CxBKRGDqeJGZQOSRyGQVqptOb6FQ2noBDYkkovIAC1bGZjQJe l5jbXc6pZ9JoJDIOTWjicjqFfBqeRMGSSBiwb1CoOIqMz2kvE4D+AIvCY5F4 AoaERRMxaDwWDf5GMCBgkEQkEqQ4NosrQYIfsUQ8kYYmMtAkForAxlKFNE4V R1jbJu/IJLMXt/du37zz9NHDL14fvHv7/A9fvX7z6umtW1c3ts+snTqRXlgK zwOiZkEB2Uno+zoJxW1onL69c0zCm2JRlRisQyq9OdWcaeJ0EfC6ytpgIh7J RBNDra4yYcTmOhd1fGYaXPXbk9lkPBVZiLhve8bTMs64lNsrYbfxyA1MbDuz pION3M+avgirbnaJTk51pWeUrVxcHR1bR8M1cUg9bLK7klWHgokIaBEJXUPF OiRUazlVJYDUZey54dYTg7Xhev66beiLK+k/Plh9vhu+dtJ2NjuzGBjvqGWX 07HAmpoq6cHJMvcwo5KLF9LRdTyisoo+LBfM9JUHJqry5tYNf8+Ot/PVuuXH p6t/P1j/x8GJn1+s/vR87Zt7i0CpXl0Kv72SOLwUm3eOlPNZZCoZhcNhMJjS UngJDIVAYkoR6FIEUsznVErEZBqTTGfSOIWjWFVlYg4OP9XWEBzu7ZSIa5ns cibNr+2d90zGDapJZV1/c8W4vHw7OHgnN3U7N3U+0LcbG7gzP341PnjC3X8q NJ409poG6s0j7SFtfx0fNBw4iEQBxYKoNDKpvowz2Voj4/NAYhQx6E1CbpuY SyWRSSQKh8asFvIapRWVPJ5cKlRWCLg0OgFHZpGoYiadBUE0iCLiMoRsOuCN RKTQIQYVokIQmc2kiVl0Mp6ExRPA8+AIFBQaj0Dj4Wg8mcFh8qUYEg1DhjBE CI4mgJXFcOxRGLYIji/FkOBIAg5NpzPKaxuHaut62tuGOuS9xmlz3J+OBzJu Z3hs3NzeMQ5sKwqC92wmnE/OGfoXalhOIT2kbIsNK4L1AgUWZxAJF9olgWr6 KJs2WVYXDCcSufj8mDwh5e9oRvanO7O6MfvEkLajzd5U96m6I9cibKVjq+m4 ChpGBCSIipIxUH1i6qeL9t/m1b81tt4cqjADDJjYZh5Bzid3iSnGtorjasVs u8hWzTXIpWf8quVuoa9OkJjqspQJzgx3nBxvdErZJ73a958e//bxxrePzvz+ 7urB5djdM85zOfVCYHA1Onw2PX5tWXP7hObaqv7+SeM36yM/LCm/PzH6MDPx 5Tnnb845CnXJ/fWN+J8frPz5wfI3d+d/cy319mLk8Fzw6Ybn/mnXZlxnGZJL OCw6RMUSwGuOZ9HILBoJhcViCUQUBlcMh4OwQ2ayCRQGkc5kAB/kcClkMqGo tK9e3Czh8SBKQ4WwXiKo5HJENAaHBLVUihYCk7sLlmfngm+uJAC6B5fCL875 Xmy4rs9NL/mGT4THF5wDQbV80aOO6AZVzdJKIaejpVrZXDk50GqZUlrG5EMt dWIGh8tg1Ip5vS1VU52yKqGAz+Y0VIpaq8XK+gplbYWyuqJeUlYpFEJkqpDF 7G2Q9jZUyusq+1plynppb6O0qaIMT6Sy2Jw2WU17XW2DtIIO0YlEKo/DpdPZ aAIVRaShQI/CBH+UBEtko8l0TOFLXAkwLOlIMeJXRbCPi+DH4KhSJBaGxGKI ZAKVhSFAaCwJhyXjMCQCjkJAU/AoCh5Lw6IpodlMJA+gSkXyqby+J1BFNQnI 8fb2c6YxbxVXiSOOi8vO99S4ykkKOmNEVGEbUCfc1pPDsk/7q08oJGMSTruQ 1cyjTIlpPj5tiguVkdB8IkZIwVVyKJ01fIOqPu/svzJvfHM58dVe7OuLoa/P 2q+PS3xNvAvJqRvL+jsn9E9X9J87Vc/8I59rmr01/Bdrzq3hikgdNzEl7+VS bLXiSEfFGAtatk8dXIj/+mr61/uZd/vpX19Pf7mffHcVmFfs7V7s7W70zaXQ i03P8zOuR+vW32aV/0rXfJdsW++sfHc++PV+7I+3sj88Wfv5cPPvr7d+frX5 4/P15xuuw6T6S0v34/jkaf9QHRfggqWTCVwmTSLkCHhMFp1KpFBwFDKRAqHx xGIYoggGx1Eg4BaF7+vk8ylsLgGHLyfh/UPNPCJBIasbUrRAeFJpCaKkBFkK QxEwePNEx+6S7fFm8MGZwKOzgQenPJ8dd9w87txO68PaPvd4h66zobu+fFjR 0l4rbauRDiobTSPdw4rGKaVssEXWVlEhYXHJWAoJSxLRGTKRoFnAh7AkPJYg ojM5FGo5i9kg5IsZdBYJzCFiEXgiEBoCmUaESBgyCU2i4EH/ATyRjELi0Sg8 HkNCI/FIBA6NxKFAoUCAxMMRWDgcUwrDoDDgiWkYLBVNoCNw5GOlqCMlyI+K 4EdKEcUITAmwaSodTaFiKIArGp5MIVDAPgihsCQMjoTDEHFIYuHJkVh/LhnM psK5dDgXW9F1zcn4PjFNXdfoVnVGqjmjLNpYRYVLwOnGIwdrakclnBEqFKiu eDDadLKR24BHllEwlVS8VybcH2xQ8yj1bKijRmAabJhzqvbmDY9OeV9diL69 FHt9Kfr6UvzV5fir3cL47Unr51rZeXXX8zMhsPXdpv+L8OSXoamHWsX+aMNS V226juupZJ/Wd+1PtmXaatbH642VzJim/8W56BcgBRUoAhV/fTn6eid8eDH8 6mIEBKSDLc95W++GoWd1olUnYayPy06Oggdyby27XmyHXu9EgUC9B7Wfen8l 9evdyIsN528i478fk70Kj5z2Dcj4UK2QWSVm8dgMCpAsYuHdwFMoWAqFBNGw FGoRDHGspBRDpODIVBKVCXF4eDoT5JMmNs050AQ/doyKw1cJuKgPVCGAgZbA cUjUYlD3cCv26bJzN2++tea+vmi+mDMe96udo8paMds+0mJQVg80iJsk/AYQ l/l8OkTjsdlUIpmNJ+NRBIgA8VksNo1JwZMAJEQsiYLBQzgCnUQRcPk8NpfH ZFZwWHwqjU6GGBCNRgYpi04mMolEBglPIxNpFAIVgyYBhHDgCQkQnkAhgCfA UXBoIhZDwKDBehKOCOGJ4Fk/bMWRQarEgE0ECIYjlWCJRws+CNaRALAkGofI EVK4QohfuO6bXAgDfBKNRWCyyCwOicUCoogn0YK5RDATD6RjoZR/VdMcllIs fPpEXUOgpSpYxpwgYXvIhIaSEuHR4kY6oxnC+vmUW721LwZqLrXzJUXHKvC4 iEz8QNe+beo87h7azek+X7Y9XLEdrnu/ubH0eiP0ciP48mL05U4URBfA1esr yd9cy369n3m/6bozIzs7Jn9w3H+wHTjc8B2ecT9dM79a1d3R1WerqOEa7r59 4IpGHm6rzMjLTZXMvGnoxXbk1Q6o8MGF4MHF4Ivz/hfbvhfbXlAHW+6DE7YD 3+jr4NSnarmKTvCNtFn664bklY4pedYxeDI6eXvNcrDteXXB//qC/3Db/WLL /WVy6ouJxmuWPttAc7WQw6TR8SCvQwVFwgGoyFRC4ateaVQWk0BjAK6OFpeg iQA2OoXFgnhcEoNDwJI6peV+bb91ssunHTAOK9ulwu4GqUQk5vG4nS01x6OG MwmLf7zb3CHL2sYvLgQur0Q3c76FoMGr6/NOdqnqysroNAHoMVlcNofX1dIU MOl7W9rwaCIBS6gQinV9I+OKjs6GWlllZaWgDI8HJkQC/tXfO9ih6KmtlUnK a7iccjyejqcwCVQ+ARLgIT6OwsVCPAJVhIMESCy1FOgSiYYlszEUDorMQhOZ KAyF8OHO8DiIiaHxcXQhjiZCU7hILAVNIIPXAUsC0sTCkjjIwk1SsUgsGbBK IdNxVC4O4uGpIgyFhyNziBQBnszEQiwiS0zhlJEYEjxbHMrEQ6loCPwLus+M N93oFZkFxCE+L1zNX2/kjWFLhJ8c4X58VFIMl+Jw/hreXqc0wiTfaql8P1xp paMW68se6JRPlszPt4MvtgIvtwPPT9sOztheX4x+e3f1zV7y8HLy9ZX0m6vZ w93Uy0uJV3vxb25mvv0s8bv9+JvT5rsG2emhlnsr7hfnQ7fXHPeWbO8vxw6P 69c7+Mka3g3b8JZG4W+vXG4tizQIFkwDTzcCB+cCz84Fnmz7X5wPPN/yP98E XPmennU9PWl/smI5zGheJaduufvd/dWBieaMXpk2dZ2MTtxbdz3fDhxse1+e 9788H3ix6X161vP5cfeiZWSoVlLJZoNYC9SJQAHaDnZ3JonBJNHoFCYQJRaF wyIzmXgqvQSOKiqFYwrGwijkdh4fYvAYRMjYURMab1a3SVV1kpFmaU+9uKGi cL93Q09dXKOYt3StOHsypu7BprJGIWeyvcbU3WDqbLD01Ou66rqqy7hUCAUa MDyxSswp4zCoJBIRRwTNGgKJByaFRhNQCCLwL9yHxg2BJiAxRDSOjMFRUBgy GMOxJAQGAv8tYFsoPOVDQUg8GRQKR0YUigjyOJJARBIhUCBHIckQigyhSTQC hU6EGASIjoZoaIiOoYABA01lEKhMIMh4wBudRaBxCIAZKhNHZxIYLDyLiQWi xOIQWFwci0tk8slgyeESWWwCh0PiCIhsAYHLdxh1hpFBbYdc3VA92yLM1XJM fLKvRhKv4u92lk8RSyT/8R/lHx2tKIIFK4U31a1zozWTXIKXgNurYt1t483X l92Zsx1ejL28GDsAunQx9uyM/cVp87sr0e8ezh9cDD3dCr4A2fhy/HAvcXg5 8sUV/5+ux/98PfX7a/E3u4F358z3rM2nRloenfR8tmbfS+tvzVsenrSlFfyA iH5+uOO8RaWT8mYlnEgNLz7R/+ps+P2lOIAQxOAnW/4nG76nG97nG95nG75n YLkJfnQ9PuV4dMrx8LTz4SnH41POx6c8zzb8LzaDL7fCB5vB55v+u2uek0Gt fqijSiJmsEBCAWjQcBRq4UUGIYXJpPMFDL6AwuZQWEwqmw36PiqbS6azYUhM CcisxIIJkhgsikBI4fA5VLq1s2GiUULHEfForLJG4h9X+ibabANNI7IypURQ L+BV83kSMJPGJGIJ+A+tPRZ0VRiQdnAIBAb+oQqHMpCFqIOAY2EILAJFQCAJ cBQOdGRIFGAMBwdbMQAnKhaEHwyEKRQZi6EUshAOFITCQRgcDZhk4SZ/WAiL LbCHxkNYHBhTMGAmMDj8BxfFA8em4fB0Ap6GJ9AIBBqeSMeRGHgiA09ggE0E HI0IVhLASjqBwCAQmXiwlUTHkcHMwkMKMwsPoRU2kZkEIoNIZBUmgzGJSSIz DbWCCRGtl0nsouJSdSx3OXmaSTSK+T4+90lfzfFaKuPf/w36t49qSxAnhuRP 1+wvLgRWtM09n3w8+PEny1yymkm9Oe8+vBA9vBh9dTEMYs+bS8BlDM+2dPdP WTbio+ez2kuzmrtnLc92/K8u+b646vn1Jd/73fCbi5HHm/7H2/5nJ8z3TK1n Bpp3wtoLkenL8en7K9azfZKchL7fW7/a3zpMJ6pKS/sgwnR707pLezltu73i vDlvvZ4z7eeMuynDbsq4kzJcyBi304bN2PRGRL1gHQ0O9zj7O5LavtPhqc3k 9FpgLKTptQ10jMkbgW2w2RzQylE5IHjzKAAtBpsCOGGxqVw+nctnCsroHC6Z xaRxOQw+j8EV0Nl8kB9gaGwJHI0jUokARQbATwyiBZkEsXG4JhalBiIUNsMQ UgY0VM0ekXJrGFA7l14NkQmlSGQRAlYMB1VSCi8tRpQWwYtL4MXFhWVRCbyk GFFcWCJLi5EgmhUXCllSii4uRZYWCg2WsFIUrBQLg6ORMAwChoHDsIhSDLIw KIwLK0uxYD2iMAGN+DCnsBKOQ8AxgF6AKwrxS+FQCDxI1+hflqC3AIXEY4Ak AtoReBwcj0ESsCiwhohBkHCowtEtLAqoJQFd2BeAeBJ+eRQW+ctMMABRjQTk FBRQWgKatN1Xu9Is1EK4XhRyVso42UAbgxBKLMYqpPuF9ICY2owvqcfAWlC4 ixHT4cXIywuhvfjgFAOhwRbHaPAZOumzeeeLc4GXF8IgRL3ZTb7Zjb/c8d89 bX+w4b171n1/0/d4K/hkOwAoenDaC/zo1nHr52v2Gyu2q0uOKwu2y3njtnf4 Ym9lrlZgbZGZlU2p9upP2wXz5fQLnbU5IUWPgdX+x5EaBErXLouN967YRvYy umt5817aeCmtv5Az7C3Zrixary5advLGkyH1cbvK3VM3UiuK6bpurNoenHKf S2itg+0gPjGoNJDAKQwGBFhi82k8MU0sYZaXs8XlDL6QyuEx+GWMsg/3/OcJ ClAJhBxxGUMkhHg8HIMBw2BLkcBb6MAHgUdQWHwSnc1m0GQsiINFC/FYEZGA hyGRxXAuCddXRhut5nQJ6c1siIZBw4sQBZyKC2G+BOBUBCs5Bi8tggHAYEUo WBGypAh5rAhRVIQsLUKUAOqKkQAtWDEoFKwEBYOBbgAJg6HhcCy8gA0asAQv RcMKhUSUoOGlKEQJBl4KGAObwPxf5qABhzA4BvR6gC5UATAsvIAWpgAVvNC4 oTA4FAAGSUAjsJgPTSIGgcfAC9QBZj4UGOCxCDDngy+j8KCvBHMKEwoPwaIR OEBjga4CYIX5eBSxGgGrQhbXoYv7eITjrdyLcsEUHdnDJDuraBoGSk3DdROw jWhUI5K4F3O8Phd5ddp1Lzdy2dU0q+Rst/EdZYyMfmDJNbboHl92Ta66Jued kznrWNY0vOpVnwxqVgPTJwKak6GpE6HJE0HNimNi0Tm64hvN2wYShu6UuS9v 75u1qZY1yostAg+X4FfUnahmPlfyFsso2cayEANjQRyVffSx4JNjdUzmYEPl SEvZRFvFdFuNrrM1MNqd1Q+ueGbWI+a0eWK6q9093rlk7AiqGtz9rVsx05pH o1E0iCAqHoPHEUAMp1KYLAqTzeSBKCNlS6ScyhqupIojLmcKAUhclqiCXSkV VNUyBSKmQMAUixkSCUMshgQCDESDozCAK2CXILfjyQBOAUTnkgnkKojYLaZJ IDwVgeQT8Hg4ClYM4xDwA1W8iVpuO5/OxuLgBaiAHCGAKJUUIY4VwY4V/6JX QLtQYE3pL1XQq0J9UCdUKezDsrRwyKIYrIGj4L+AgcQCCSqBoUHkA2jBSwrT YDAkDIFGFDZ9EK4CVNgCh3BMKbBaYKkYHAI474frMMA0VMF2seiCFpGxaDIG TfzlQAQarPygYyg0EfSMOAwJh/5QGBIeXajCwXmQB7EkAoGCx4FNeKBpIP5h McRCgXCIJf3/eanJAw== "], {{0, 150}, {200, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag[ "Byte", ColorSpace -> "RGB", ImageSize -> All, Interleaving -> True], Selectable->False], BaseStyle->"ImageGraphics", ImageSize->Magnification[1], ImageSizeRaw->{200, 150}, PlotRange->{{0, 200}, {0, 150}}]}]], "Input", CellID->821851830], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsfQV4VcfW9lvcYkQgEIGQkIS4uxtJSAgJwd3d3Qp1akDd3fXW3d1pqdPi 7kSOJ/uftfaek51zQj96e9t+//36PJPz7LPP7Nkzs95515o1ayb9pyysntEO wNIu4qN68sq8JUsmr65xF19qFyydPXPB9GmlC5ZNnzl9SeqU9uLmDeLvQ/FH 12ioQ/0Z1NehoYGu6av8rFPTWZytR10DXdfX8/2zfCFSIz/FqbEOjfVoFNcG NBpgaICRv9Y30NfGRsqg5azn8hvoV3rEQBeGRsqjfjY0yJtq4VyaoZ4LaeQL NX+99q5G/lV9tiWpDxrRUC+/ypK1GjZqFdMuDJSzQX2FWjcumerDjxg40bNm GE0wqnf4V/F2Y4OWwZ4ajZREBSgzXzSa+FkjZzDKEoz8Cr5JrzNqd9RCWuUx cLbGlk5ubNDaVW9AvZF+bTA49sAxM146jQ+Ow/Q5Gk+xyAw4a8AuCw5YYf4R xqNaP9SZsacZ207g+p+gbIfyNTeK69NghsFMFyYzV8CEBhO1y6BrV6NJ6xYh FyFc8SKBkAaWdR2Lu06gqFHeqcfZBomxRr6v1lltKXdIA4umoVFrVAPLgsTU qPWPve0Nsr32tovHNZmqgjBQt9NTfK0KjvKbWklKE5xBQ47IYzJqmTUpGDXB GflOg1EKjn+iqpq116kNobqZWY5qCdxjRs7caIHRTPcb+Npk4reYtaIaZX6j 2s9qMlM2E3cyocgsM/CDojSTDmyayPhBI9dH/UqFm7V+UKWmDRODhh+1xwyy FXSnQZOCaE6dFd8p2LgPj30B5TWYd5EQhXCPWPC4Ac+dxi/P4/h+HDNgpwXv WfHkXox8Cbkv4edfoDwGUx2M3HDqeQt/2q8tXD1RWyv3DN+hXjLx21ms9WpN mHzU4VzP2BBgO2vkUSA5QW2ICqRGhqhB7WF1XJu0hmsgUSVraJGg2l4BchKE SQ5qVdYmrdsJG6aWjtKgxUWRLMza4KVC1IYYWwRk5IYbzLJYoxxcBo0fGkza KFNf12DUhCU6ijpQrY9ZQ4W4Q9dW7jSRzSplzaiwg4cqYKK3mEX1LFSUWpoq AnpQvaPWzcL1USvP71XLN1i0mmj5dSTQYIeWvVtM8r5FGxeie6mH1RK4maea 8FwDUrcj93W89TUO3IRv3sQHO/HaLlz/ASZ+iDVn8dgePPIlbvkYa1/H9EeR 8Rz6vINn6mH9lt9uo1o1NFHD1eZTD1gISOKnRrXHrPxVTWYNOSquGhg/dvCr qU7AyULVEz81mrXBqLEEN0obpwaNauxCtCetKxqpAg2SIamr1XFn/2rHp1kb GgajlKZZDme9oI1STDK/CphGs5Qdi0wtRJO+UROWmsdgkT+pd2z8VWUS9cLC HWjj8vna2AyjjVHNHUtl2rS3mxjG4r7Jpn0a1QvZ7ep9urBK1FllY62yySwX VXCaBC2ME1NLtRtV5Fi0Oxqi5E2DLh1RcOspxO0EHkXBT7h4PdbdiGnvYdzb GPkCwp9AtoKso8h8A6lvIPY9xOxGqrij4FkFSjMMorFNXJQiAcONEjfFp4Fh RtLhmyKzVnOGQX2jRj71Jq6YJIR6M8PJSt2rkn/LiFZVJ/e8NqyMBBiDbL7B rmpN2h2jKmi+0CjFyoKQqDDYOdYkh7mNJWLU2EDt4UY5/NXRYVIFqmbj2qrA ICqwUfkm5gQjS7xB7QSrBhK1BOo37hmtbvyUOgy1PuSnTE06tFgYFfysieup 3jGpZYpszTDbODXBzI8IERg5mfkRrWRZvsk+0ps4p00rXMumMphVu9+osp+Q jri2MZy44Y389gbOKYjlJwU3nkHuXuBb+L+LITdh6BcY/D3i9iLiCEKMiFAQ pSBSQbSCFAVpCgoVFCl4SSBKoeFDsGnmC66/oVkbU1QrzkDNb9LaS6zVpPF/ g0SFCg+VPImsrFxPq7wp1SV91UnWYG7heTNzRSMPcA0DZq0HjJYWhjfyK7QB a27pWI1C+fEGVQpmDTwGloLa53Y82OFhtmiSbWQp2KWsJnqLiZEgX6G+UQWA 2iequMVXaxPbPzatx+h1zVoGU5MEjFrzZr7Dn9odtbQmwpJJN4TVEghLCmWw S0TNr2JMxY+aGlUJWlrhyiBxqLKBPSelZtmBki5OKvjagLuPIcMIKIj4DvFb Ed6IJAVxCkIUBMtPkQbyTQGqHAUFElFETTb+VNFlv2jiC0UCjNnMpDZHkeai WdMvKjxUzDdaJI/ZpIq3yZGrIkTeN1il2aDiQTUVWIia0JtaKMWudu30YpR6 2aB2HaNdCEuTu1XKQn2wqYVSTPJXE2PDZNVkZ1JpQYUT979JqiqjCgBBIM2w SIIyNbeAx9CkKSzqLkWDmUlNzdpPGoRECSoRKVSaWc2gaF+1/Hyf0KVw4vdS hflXg4SrSYWroglIE1aTrv9t2ldDU0syqYhSKKn1b2zWyhES36Xg87P4137i HIGo9COofhB9D6G/gmTGjwqkMOaoDL6ZwSlTwfMCUWatW9RqGxUNRWpDNIKS N9XPRhWEUkE0WjRbi4hLxZJuvBhVWmiWzMy9oY0Itb0sHa358lMTqE03fCQb aBrN1kr12Ee3WZUL97xGtjat28V9i2QGDWZNGmlow7NJA6dmujRLAKhNkJRi tmkSV3vMZNONNZvWaSYVUYpGLGalFWYIKs26O6JietjI+xZOZnuSmDHJZFbH jvorI82s6CrQrA0BFdsGRbbRXltF96z6VDPOKNhhwidH8VITShhR4Tsx+Xnk /YzCvRhhwngrJiuYqmCagjkK5isYqqCM4RSj4CmBqJPMsUpLZdQLs3yjvQkO SDOwjWRSDeBmgpPK/BpmbJKipUlmYKmZpIhbhpWUuGa2SUXQYgnI8WiwSc1r 0+SrUpBRqmNxXx3j9mFLDbFKDKjSVCQemluoQC1Q42q+Y+FPIz9iadLxRrM2 7uzDTWXyFrTIa7vQ7bAxKS3Xak4VM5bmFtjoUWRp/bhFJxr1Qs1glC1qqZXi CDw9Vxh0ZRp1palfBUFtr8MPv+INBcWMqNz3sfVWXKxgsYLlCtYquEjB1cLQ UnCPgm0KNjDAhCkVoOAugaj9sBh1A8Fh1LRGkUlXW5K+SaMIdTwam1qGgEH9 2txilRkk+auWgDp4Tc3y12bduJYzAhWBJqvspeYWcrCPcW2oNmlcoeFK10ut +EQOXpWv7AAw6WCgPmKW2VrBQF+m7kGLTKbW+S12ubfuWD14LDK/TYGVk6VN glLarqr+pj4ZW381yKSXo0lXPbW0OgVfmvDFCew/i7cU5DOi5v+A/d/hmIIm tpEc0h4Fnyl4QMEwBb0UXMEc1VTfqmKW1vU0tu5Sew8IITbIaYhqhjU2yzo3 64Bn16fSujDYszW1aH+jtNDo1TaJSUWTrINcLK3xYNGNeofampzEqpeIXkCW 1nnsGkGf36iDhMVJ+vYXWVqXZpGZra2fMrV+VkWUveb2/M4FmlpXzKyrrTP2 TDpzxdQ6j1oZfQP3CQuqAd8eIvwIjspTEKTgspNQjASeZifMi2yfN+Krk3hH wSSe921SkVbv+CLn6lllahGiXfk2tVhZBifKdYClPpupueUnPfs5dFergd/s +JN+1LdSHM2OHWhuTS9mXec4FOJcrKmtmxbZIQ6FWJxK1veePoNNBxtbawi1 SVYOuGqzK+z97ExfDkDS41lcnxVTPAu2n8R+A12/zogSim9LI2VQGlqNC/Va qMh3jdjZiC8VzFLISXWJSmV1bXS+tXXvWZ060+iEhzYp14H99MhxBp5ZaaMm bRJLm91laT3MHUa3HhImXbfYM5t0gjC3RRF6trH3rcmJT6w6pFmdnrKXbNWh SE9l9p8s5yArZ3SZW49Zh5aeS7gOuBX668M67DiC44yuV1nrDWfT6IBCNOUw fAQt/GDDB0YcUvANm+gFgtAUnOLMDrJzEE2bPHAusZpbw0z/1Xk0nWsQOXx1 qJuD7rDXxKHD9fxgcZKUvlgHneWASWd8OsjXQei2tjBj1eXX/2SvksXpWl9t 535zoDvzOaptllVSP206bFt1qlZAaIcNn58gXNUrOM2IKlQwWsELCn46w1rP 1qoJh4UFZcWOOsosELWQCe1yvq8YHDvZoQecRePMG86YNOtwZeclS+uceunb mcGBnRx+1XegHQN2yVqcJGht61p/oX+LMx0548T5JzsYnEVm0d3XM1UTJ5vu WWtb2eyvdqieg7Ac4GR1yqm/sOrqaeNqiJ9+VvCFATv3EkE1KORDeEXM8hTU KGQjfXGIMivmVoX/KFSeGbsZfl8pWKCgXMFmVoWKVVOsDt1udupAB5g50M5v qC1z64mqqTXhOFCEpa2uO9d9q5Ms2gSDvml6BWRx+smmE7pNByRntFid6Mhe BxUwDrLTP6hHlE1eW1u/0f5Uk+5mm8PHTkT6mw4Vtjm9wn4t8POZDR+fIMv8 LH89yd7vXNZ6wkb67AgRl9LYUprI83UTPm4k4/wM55mnoFLBDQJpJiK0Jl2v OtTE0lb1nIeM+Rx3HCjO5jSsnGnE4U6bpOHAAw4XbX51KNMZQnog6TnHQRDO CHHIqb9jh5ZV97VZB1ebDl36wptav8XWVoUdLhyapi/E/lJ9A5ukOHYyQf1w kLBRzz4EQTsv88JKrUJrfJ8eYVOqsaVXBRF9KJitnhAoDKfPFcxWMFjBHUID Hms1MXTuebPTT3p5OTOwA5OcS406E6CldXsdwONA19bWpNTmSLQ6iczWusP1 Sd8DTa1b6owrW2sGa3IqzeG9TbrkAKdmTs5Acn6RrXX1HLrCAbrN8l16RFnb qoygo0/N+PoEDrIeOatDVAYrMmFZfbuHdJzQeuorjKzm3rISp51gdD2hYEoj LR/fqWDfy+xAaG71LudB6tyrduI1O6HIWe84o/RcesRhJNpal6AXkIMU2sSJ ra1szoBp0rH0eSLBfkcPV31me7J/tXsFm3Ql2BHlzGDOYG6TOR36RF8N++ua dDVRdBVTzaFPGvDzccJGo0SUsK4fUxCrwFfgTcGRZ/DmIeKiIzzvE6z17Fk8 2oAP2Ny6rx4LtiP9K/jsxe02fPsSTQOFKdWkq965ROM8XvRfz4Ura1tk4tBF 1tblONOFvQLOOW1OtdLzm75RzjzmwFEOLW1TZM1tYUbRAay5LUQ1tb5wyOYA 43NVwwE2Nl199A2xA0lxKlxfK/FV8NJXFvx4iDwA6sJxPVvmAja3KBjAPvPJ Yt53N665C7eYcf0e3LgLl32NWd9i8l4sP44ZH6HqM6R9gm7fUObLT2P3e6Q9 FVtLfX4DS86fDsJ1AFKbCktfgrV1Lzn0m1X39Vy93eTUt02trx360KE0xUno Do80ORWlH/52eenv2x+3F644Fdgm6hzqcC7qcxCN84P2uimtG6joPm3sUPpE GNWNOHSceKmeEVXHiBIAu1aBPyPK4wOsfwDlDyLPgMxDyDmChH0YdAzRx5B2 BNFHEd6MRAm/ixX8+jVRmdB69lo5a1tnLWDHg56FHMaOeuFsBjtDy9YaGw51 cAZDm7VqbqueTU4iU85dggN4lLaE5aC/HPIrTtJU2sKboiun2akyDiBxIDrn fmh2gvFvJPtYEOXsF9a1Bd8eJnXWyFM2Ves1sNa7UoEfg6THG1h0D0bsJ7NK DZGK4tWZcFaLgzisJYZDpDopuE6hRcDdTpDWU7EzyTvQrE0ix+p0x1mv2QnE XrgDdTu/y6b7dOhhm05SipMImlrLwlmIzqhw/ulcYjqf+/qqtplTaV235tZv dAB5kyRth1c4YPVcL3JojrC9tyv4/jRtbGlmgjrLJncDJ6ENr5KIcn8T87Zg 3F6K+81kOAkLvL+CUEZXNF9E8XU3BVuFrb4L31kd2+jQTGdGdaDlZid1b9OR kp4K9IB0HphNrRvuMDybWvehnsCb2pKOA+p+Q7gOL/0fMXMu/Pw2P5xLys6l OYPNufz/8XW/kUH0yXcKPjZj1yGipiZWdnZENUqtF8CIcnkDc7dgzI/EQiUK 4SqWQRXLgeXZTFyJjKgeCraIx/dje6MjMTpQgR5FennpDWabDjN6QbeJSZsT HdlaZ3NmjObW1ftttm9zVDpAsc0+bz6PYs+FtN+VnIHU3NYrmtt6+x9H1Cme wX3FHgPVk1PHyQFRQSqi3sLCS7DkfVoLXqxgBS+4zGMnuUgzFYxgP0M0c5TQ etb9+OxsG736G/Vpk2f0KHIAmP3T6gSwc73X5iTZc6U2e9tZNfxxDJyPEP+D 6fcy0vmnBvYm7TBg7zECjzqZsnOUOuM7wFqvHyMq8RU8sAo3n8AUBXMVPMob Xl7kcJd3+HMLrykLxefCPnPlID6uo2KdhfvbLXWmMgcU2VpLtrk1wNqkkd9+ o0M2/f02bWMH4P2RQf3Xpz+vMr8qeNeGn4/QAoqNUWRlmNUzulREHdRZ5ku/ QcML9OAn7H06zU/ZK6kq0AWsBLtxSKdyFB/XE0R/b7uaWkuquTVamp0g13QO bLQJkvPp8PNnnv89UPnba1LHIZef12Ov1HcGRoVqkKurrgYOvdss7agbDkP5 lmr+uII3pegbpKtB4PAXjhZWEXWNyHAMHxsJrr+34U2tM7epjOwoamr9oLO+ +9tl/X8hCe22Q0zxLPj1MC2+2CR+bAyMes6gruDv5riUYAbJ3aco3O5HAS0b nj9F2axSP9bJieGl7EDoztaXchyfWjQHwr+XnI3Jc9kzyjk01D/pr0nCOnpb oQWXo4wKewRIE8OjgRFllPsXNvGmvD4KnmqgZ9/nfS4vNROKrDIWV11ZPsJO g0RG1NUKBXB+qeCH3189Bwj9tpltkDX/B0t/VzKwvvusAbsNrWLOjVJABh3M 9vKGl4EKAtkIVxhRn5gJkKf5q0kiqo4nhtcxolzYSlfqCU5f/OEKn8uqaebV 7RO64CjbH37XP+n3Jivru6+bsOeAZuEYZECakWWkIsrOUSqioljxPS++HsdH wriy4D0OfVGkKFU7ai9zVKoCL9UyP0t68LM/VuHfnhvWM6jOSPNPdX2YnGjt n/TnpQM8zf/1FOk7mw45Zp3Wa5Rfxf3v2e+UwKB6yIadP+GLBnr2I/Y8KFLx 1UtfxHoFac3oKRBlhbKLjpn6+C/UR83colPcTMPf3dX/F5K6IvypEfvqCAYW nb6wSq3RKE109f7nCqazh1OAZK2RgvF+ZPB8oxBNWSUIz7IS/JJ9nv15YjiX EdVooHi8xr+2mWaeUBz5u3v7vz6Z1fmdFXsPk+2hKNr+caNO69nkV/v67E8K lsnzDdafwk4bMUA9R9+9xupG0QVTfcdmfIGC9oLZzFB+Jbx9ojg6EP6CdFjd N/FP+jPTLt7VsvuYJt8m3TY3k84yN0r1p6qz7QpW8bpwqIJFTEQCP0eZAd5g KrAynPYx9p5hjsphjprWDOUTKHuJuPb95Y099Q9H/cnJyErqIxNt6jTxHUvr /SYWSU2qTdUkfVMvKxjP52N4K6jgo1q++gbPnsRr9bjnEO7lLVcv1eGxw7hu P1Z/g6ovyR8lEFWwF8rHdPTBDt5f8xe3V5Dn8b+7z/+LUzPrIzGL331Um/Kr 3hv9diQ1SLJZGlcqooQie1JBKZtG7RT0/RAL3sKiu1H7Fmq/R/n3yPwJRUeR vR2ZXyD+ayQdRISJoqQEokp3Q3mTdoD+zET3Fzf51N+hav/vpJ1MUAcPadrH HqWm3ybZpEOUPSpJWOBPK9pRPyJ1ugkVd6DmFcQ1aOF2IRxpEMV+8jgZyjJQ RdQeRpSZpl1/0IHwb6Qz/9hRf1o6yyb0F404aCSNpuiC9k260DUVS83yph1R z3Hsk4sAyUl0fARV2zDyDYqPUiOjAnkRuR9HAocxopL5dDKBqDKh9d6mbQvH 2Tj/i32PJ//hqD8nWXj6/2kzdh3RYgDsoSB2RFl0EGqWO5uapR31FIfSUTTL PvR+EtWbMepVQlQEp4GsEMMZRYM44i5FImrIPigf0BsFpD/mz7+y4Yf/saP+ nPQNS/PIAfJdKwweRRdY64AosxOizvKqSqUacdcAz2dQey3Gv0lhdRGs6SJk JHA8s1aCjqOq9muIUp1gR//ahh/4h6P+hLSfI+J2nda8TwpDyB69ZmuNqCap 9dSvCt8RBthqnuh5CZBY0PNZjL0Ss1/CKEVLoxWM4+jNiXwQWa6CdEWb6w0T dtSHVI6Ffel7/8KGN7O77B/vwX821XN0wQcN2NXQsh6h+g3swdv6A0kcOEph bnmVV1XyT6G3AIkV/Z7CxvW48wU6yWcNh0LN5mDOaxRcz54oNSQ4ghFV8yt7 D7jwn9lb9Ze1vZmdbwf/bhH8NyUTK5rPmrDvuEb+qr5TA3QdtJ4Douy7P75j I+qyM4QTH3X69jzevIP010lpadczj6nFHmCHeZpE1PDdUD7VXrrvT3MgnCsm 4Rf1qKt/0n8ofcoxlsd3k+JT7zggqkk6oOzoUiSi7L7NZ3iit9VG/igvBsmy T3HidcqpolHd2fcJqxiF3elb5UHBInOtmOt9rhV7Qi4r/0eSTQckY1sZmpgV D/35/WyUtP/fnQSK/qVgxwnqUntQh1n32eZcT5FMpQLsOy7kHTNuYw9nL3Wb 8DcaSM7Kk1vOMPl8Jwu/m09lSbJz1Gd038T5vzqH9H9XapRNUGTT2gy0a+YQ +r9A69Xr6vPfGpol2OAtoe/q8Etji4GttEaUKgVr67OnFOnntLFSe4u3twi0 PMIH1qmIum47lJ2U57Q8Xeo0s8Fncnr4FMNPnesN36MhSg0b/kouK/+RdFJ6 If7H8Jg9f4nWM+tisZpkn/ztGPgPpjq2xr9sxJ7Dmr6zyLFjll8VqfXU1Rb7 /lxFKkEjY+k9IZSzJJRH+MhEYUddoOD2H2idrklGbNbxYsdBzqwK+k0+JD+W ETVin2ZHqarh6/+EGqo/P79WEyPqr/dHqfr9j1Px/5LUzPG6zys4uqfFfDLL EWTRfdqcOMpumdt4aN+v0Ok9Rxgw9/O/DVIRdccPtAXPIrWeGhN1kk8kUwlB IGoIu6cEokYeaOEodbq36w+3UT0x5n/MZmLL/PTfIYKz/0Xq7we2pb+Ri3dW 2bd6rWeRPzXJYANL67megWH5rCiHz6UXw/xePnraS+Wob2gLnlnul1EPtRN8 9a10DrzNiFK13qgDrThqP4eDnmdbjvJgd5aOuqvif3zcyAD+Wzyc9f8tAcn7 efHu29Mtbh8VQqbWHGWVn1YZEGU/5KSZv/7I87vPbBosj/C/58hW4KZy1Hba MGVmWdtP6TzFKuYrLuEDPgpvECNq9H6No9Sg0GO/x4FwgtNBVpTH+UX6SJv/ 8XETW+Z/PaJUjjqfGv4vTwc4SOnH09hXry12WHWIssn1X0UXXWCRiLLq3Agn +Ti7VxXsbdR2Th3i6VuOAg+OZrnzO/rHHFY5y1NBpca2fchaRkWU6o8aIzjq C3qpQW5t+Pq8e/sEF3uUUXGcPw9yM/ecx2qOSlC7FToJ7S8WhGph/v+OqEa2 nV4048ThlnUH2zk4ys5UNgkkm4yPsvGU7SEFn1pJdurNQ3wqfo4CTwXtm3HL t1BOaHFTekTV8+rhXjbRK9ltLhA1bpeGKKNuune+68VHCYcqolS+Osqg2snp mNSJbfqC9vKhfNeKSu6A8t1fKgsrDyvL3w2JP5IsTA6CoL7fr9nGdsyYJKLU ibYdYIqOl8w6vjrKh7K+yyKzSk/Lbt4klc1n3PU4ji0fQjlEJZyVgeUqogzM P5+x96CCQ6Rgw5gPeRWmSduuZWa31XnGLP26GcqdUN7QANzIKDrA9vZuhpOd uI6yEBt01ouR56fDrHjUpqn1v1Icp/5/5qgmHvVievXrfooxUHSYsTghSu/D tMiNCXZE1bHCelEY5GaSlJnFZGYtc6XUYrBizbuEqGZpltdLU6qOcfi6MN3l 1iqKZtmurRQ3SoNtt3K+O9b9R6F6Cq6dgZfX4NTVUO6Csh023hF2VPrBTjOu jkuwHZEb95oYcu/9HaswVq7Dn41hE7dd9d6c/I+W/AVPyg7vJrOhQWLM2BpR 5taIMstZnq01QX3LR/d8baVRb2GonOKiDvMh0nl8wpiwo678hLa3KPJ/MaiS Pcbt2scH6QszfqT0mc/cpyHKvjPiAFv+59M0VKB9DpCLLiUIqkLtAly3DK+t x69XMbo+1f4lluoQO8FwUlXhYdbU+3ht6I87KxRmV/Xso7rzmGaq/qg/e673 LY9c0dtP/oJVR/Gvr6DcC+UpKKf+ULG7Fdwn+u04DltbXDRWuTPOAVHNOp+5 PUrTLugzDKfHFfxkoWujPMbcyNK5l/1RLuoWvI9g/o62t/zKG7U+532g77Lm fUdYL0asP4vqUxR0JzJP3QPlqxZEmZhPvjm/1nlNQt+h6FUB7xFoV4x2w4BS tKuEdwVKZuHqjXj3EhzYCuV+1oxntRXGs1Ih/sJ+jB8YA8f5Zv2/5SYycTn3 C/q14pZD2HQMn7wF5WYo/4LyYxv5jYp2btKfB6cmntQP5QiiYZ+g3XvAZaha DuVyKE/8+8UeZg31TgN+aNAiM1VqapYbac06RClyI5Wiu2mTqFOPuH9YaD0b 6bgmnVvAxKxyO1vmnQVITPB7ANd8hFuewYVfYsk+zNlFsBn7KybuxYSdGLwT aT8g1ahZ5pMFm32t1c0sV/e2n5+ZET8FuAudLoLPFHhPRK9J8BwN13G4oAwY AtSgQzn8qzF4KjZtwKuX4KctaH4Ayivk0req/3uLHQhGORU9wWNEjZpo0BkD v50auPljFMw4gfgvgceAZUgbgb0roVxzTkT9SRuoG7khh3jwjuZtuXMNCDyA jtuQMQInr9Z8Nf9GOsk7nj6yYNdZ7eSBJulJtkpomSW0jJKjTPJrk27ni4lV w9M8U/tR+hPOSE+4met/i6JxjkCU1w2o2YYZzyJrOyINCDeQ62kgL7vEyv+r Hqtoe2Em/QLlS3qp/b8oGhhRp86jjWumY8w0RM6G3zSEjUK/yXBfDddlcJ0P zylwm4CuE+EyEijHBWPQrgpew5E6FYtW4+kN+Opy/HwH9t+OhnfpP2cp0rd/ WvLVKemUUO0u47lZpZHHmvq/mIU277AXeBBeY/DSPCiPtY2oI3+CHWXh0fE+ 64sHFNx9EGUHUHgA12zHqOsRvAU109B0IY2mf6PwE+wYf9eK4/tabBKLVHZ6 RBl1ENJrPUUuvqik8RBP8XafoJJt0uQ+wy9SOepmPhmjHVvmgXeiYAMWvIaq 02QsqZHAkRwMnMCOzSjevBDOiJrys4aoRt3/lvrx/AzmxFEIqECfLCQUoLAQ OWORNR/95iBkDdJnot8mdLwT7a6D61r0nAPXyXAbo3HXBdXoVgvfMciYggUr 8MIWHN4M630cn/xDy4Yy1duvLkoek5x8mptvbB2w8QaHFK7iY9nijej6DCKm YkktvrsHysNQHofyUyvR/8KTlHMd6/fvJSv3292s7MYrmHAIfseBZ5HxNKqW UedMHAvLJiiHf3fJJj6rUJS874gWqmHXYg3y1XZqsiPKJk8zUHVik0SUgW2h 6+XWYJPuXwupw1lF1E0cOt5egERw7G1IWYepT2HISVJtkTLOPJJTKIMqUc4N J++G8o1WB7vNtvv8gjlDc+CbiXYJ8MxCcA4ixiJkAsLKUFGJuROxcTWmXoK4 25F3PRIvQtcngYfQaQu8F8J7BjynAWOBagKY+OwzEanTMG8lHtyIr6/Awbuh PA3lHTQd1U6GPCGbfJoxdlymMwy2l/lfmq7ngFXRtM6vw3sOPGIROxyjh2HH TCgvtbLYrYzS//g5DwaOBpnBQbOLOPS627vodjM8n4TLFaiaAcvFvxtRZrYN nhL28F7Nvm2Wys4sLywSUSaJKIN0Zuq/qst5B9kgf0HBd+wyapQncNpncAZe 3FERdQEjKuAOZF2KGfeh9gBxlBoAHCYRFc5fk6SHc5pA1A7tpfZTqo4wjNts oH6K5DsIgXEIiIR/JMLSMTAfrknomIIesQgZgvTFKJmKcUOxdjyuWo1Na1B+ EUZchcqlCHgaeB7t7kXPRfAQWnIuPCeh2yhisC4j4TYMgWORMxOLV+H6DXjt cuzehrrHYHoPyj46P011xB1jr/sOnk3fzxK8kV2mw0XTvkTw7Qhfg17TEb4S P74AxeLYimPnt5z9e9N2Pp95DrPlckZX7UkkHgY+R/L12L8Ryi/nfLaZuUKv jq08sRL67qfDdIyA3Siyz+zsF3aOMkkIWXWLMkY5H6zj0feYqKdRi8A868RR Rp3W6yBA0oiAu5B5Cabdhdp9NGBjGEhhDKFoRlQ4qz81hnP6Ps1lbdSl0+wL tbVubJP0DdrPtYMfLghG1wh06w+3gfCJg288/CIRFIrASLin4IJ4dExAtyiE jcWAcUirwuxaXLwQl63ClPmonoP0qRhwGbIuQvx6dHgQ7lfDby485qPrNHSo QSdBX8PRbihp0rwFmDYP16/Ha5vx0604/TBOvYDvv8CrP+HZQ7hkN0bU46bT ePAwnXo08SCmvoSLHsD0azD/cfz6XCvBWc5j3mGRewmtvwdOTYyo2Qyka/n0 5uvYrBLQ8v0GIduwcBp+FabdlVAeoSNxHB4/wg66vbrSPmB22r2Xlu/tYT8G CSS71rNfGJw4StV39rNbv2RH01fNpKCN0mlWr1tYsXPUDXZENaD/XSi4GNNv wpTv6F+CDuM1l1IF1RxykMaWVRprB4GoOXuhfN9ST9U+r2u9FmOHUCOvUL/C rRMw9vSFtw99dvVH+764oA/QH+1C0TUYrkHwjkGfWPSNRr8E9EtFzxi4xKN9 MHzK0LUEvQoQnYZsMROciLlTsXwmJi/B5GWoXYeQ++D+JIK2IPAyuF2Nzuvg ugAXTMQFo5nExqDXGIRPQ94yTFiJ5Rux+TpcfgsW3owND+OuL3H5t5jzOSa/ iA1PYfnjuPAFHHhRG4zqova3PPCP/ObRVYe4gbu5H06f98TQyvlnsFF3PZ8R dyFH9YtZQ7eT6HAtvKMQPgR5FTiyGcqjjo+rEn+FgVTHDLxN3DmMY2Ztn5R9 r4qKKJOkWZPujlEWZZUkph70ZOEW3coG+d4Gze/UIIPozrRG1F5+tQBJR0bU gDsxfz1uu5r+i5CYvU7iTVUT2NIYw2Z5gNyoLhA1e4/mtLEjSp3ufaOL17Wf xWrgjhL9c7EVF59Fl75w6wsXgagg9PCHpw+8e8PDFy590dUXXQLQYyC69kOH IHSPg3cKYyyKFKVvNLxC0S0ELpnongmXSAwsR/JgjKjCkkWYNxcrpmH5GMy6 EAUXIW4bEtYQlXldjl5rMWAe+i5Gt4XAHFwwDV0Wo8ty9NuC+HVInoaxt2P6 rZh3GWZuwPLLsfYGbNiGnc/TwQ7N7M/Zx4j6Utpjqn/Mvl5gP4f2J/7Vwq6M 84/Ns8qDvObwGL+U/5HTZQwwjzPocCvCihGbgMIE/LROcyw7pzr1f25yvPdz B0lZqC53u7OuQc5VbTo92CAvDFx/9ThBg2Rj9fy6Fxkn758maJnluthp3Sz7 JHNFIzt2trL3gCxzI2LvxJO3ou6HFo1sj9w7wvo9hmlKRdRMyVFGiXC1e3fq POd2RNWxE+MaCx5kPu8eAFd/dPVDu/7oEIDuvnDvDRdxEUig8ugDnz5w7Yce QZTNdQBcAtGpF9oHoVsseoSjp1CUkegdDv9g9IxHN2GAhcEtDRDYS8OgDGRM RtoYVNagahwGz0TOZJSMRdkUZKxA5mZErYfHLeh+C7wvgedadLsCFyxEt2Xw XAmf+fBdhKiFqFiFEoHP6/Dec9h5Dw4+iiOv4/vt+HYnTEatdWZ5QukJeark aV79/FXHz+eZ6tgNNZ0htI0Jag0vkC0RfG4E7kbIYCSkoiodL8zhNQVd3EWz rpBnGJDf7Cc4/SCxelaaWKe4eupc1R5f1ygR1cj1f4tdrE+rkGN/xc8cTvCq PHC1UdH+X9Vp2WT7lKeBEbWNtV5HtqMG34cv/tWicw2c+YRE4xO8XqPuLCaO 0mk9FeH2f130tWyj/R9zqJHtb0s/g0s/uPRHtyB07o/OvnATiPKFayAhrWsg /dS9L7qEokcwuvdGDz8iNDcf9OwDbwFFkWcAGWA9QuA1iJSjT394hcE3Cb5x 8ImAbzK8I+EWh+5R6JMP9xz0KUJoPuJHIm0cJkzCuPGoXIzS+Ri+BKXriZl7 Poy+W9BrM3zWwXc5fOah33J0m4oOE+G/DN2nYuBqFM3F6JWYtglb78Jzd+Kb u3DsMTS+ibPf4MxPqD+KpgZaN/9Znn1kPzW0Tp4Jb5BBIM7rOOpZl7M5XcuI WqVgHf8LFQ/R209gQAni01CejkUVuPteBtXbrUow81xDSPPxPaR6vtHdt0c2 1rF/cod67ooOSOpPJ1hZX8tTlahvsVXI913NZfc6L+Gpy16nJY+dlstkp6Xp 2CA5KlkiavwT2PmqxpOn5VuOyLi792UoizrXm7mbXEB2YrTPJU+ySWCSJqIa vnWCa/WlbGbX/ugiENUPXQPQuQ9cesNVpP5MSiHwCEYPga4wUnxdAgljgs06 C4IKhvsAdA+BaxR69oOHgFkfePRHJ390GwCPIPQMQw+BRqFJo+ESAc8Q+MfD Ox694+A3CH3i4BUBj0HonQ/vYgRVIHkEKjagdikmTsTQqUiYjJRZSJuK0AWI XInU+UheQVax33Xw2ghsAdYAS4Cl6DQPLuMQOhP581G1CrXrMf8K3LAVT96B N+7Dh3fhzA6YtsO4F5YGNNu0oKM6GbxqlLrjjJxM7eA1XEFQS3nieRFrvUv4 +EFP0dtPob/Qemkoy8T6oahZhpUHcWwvBbPZEbWHH3zmJHZ/rTn27a6nOoko g1yn2ymjRIxy8ruDBSQssZVNGCvM5o+w7QGS7yuMkF+OkNKvlzOsUyzrUzq/ 3wk5Bd7Dh0ir/y8P9Vj4PI5+qtHjKbmucViGMO1gyyqaFZ9A1PxfofzcYkc1 yljiep62nJGIUoO1DrOv9X2+KWrVLgQdGS2dAtBF4KEPsVN3VnPES4K7hB0V ju5MRC6hcAumKaFrONzC6H6PKLgEESaFJS+Q1kHALBQefugpNGYA8ZtbPzLP aCLZj5SmwGQncREDt0j66pMEzwSClksUupeg2xB0zYN3KTxTMaAIERUIKUdM DbImY/AqjFqCuQtRvQ5525B3KaLWInIzQpahy1b0Xgv/xfBbAPe56LwQXVej 03r02ECzzpSrUXQdplyFZbdi88N46DG88Sw+fBWfvIHPX8eJz4nerXUkEVUX fMUT86nMUXczUWzmrdzL1G1KT6N/BXFUaR5uWIb1VyL3Nlz8Dp6+C2+8hA9P 4ptmPHwCV7+Pd77U/IENOpPbruPqpUH+A7tqVdmpHoAP+V2LFWQZ0PMsMrfj +uvR+AseOIPHbMR4dXICqzJSvdy4dEIaUUf5627JUQJR7Rtx6cswMEiOS0Qd katmx5nMF7Appc71luzWPCSNktIbZEN2yHMUm+UK4z6euWyScVYdB6KT4Bxh SvVlIPkTKQlGInoJYgCEUB6BE5cwstKF7dQtEl2j0SMS3SOJf1wZaSIJyhJF CewJvenuDzcmOpcB6BiATqF0X2DMzY8I0FUtXIBTsNkAuibSE2wmgCq4K468 Ye7h5McQM81eoeidil6Z6JeB/mlIGI3EcmQMQ/pYlM9C/kQMmYysiYidiYzZ GLYU+WtQvBWll2LQzQh6COFXI2wLvG+D223otQUuW+CxGQFXwXM9Ai9FzmZM vw6X3Iq7bsHTj+Htl/H2S3jqZWz+HFu/wENGGuZX82BfoSLqOQRXICkFQ7Jx 4QQsugOBDyD2Zoy6A9NeIzfOmO0Y9izNUteddPS+qtHXTRJR6jR8N88yFN1W kYM8ddrAlltyMwYZEXEGW6zY+Q527SD4HZF2vso2dXKRyxlRVzOiOgveMOLa 99kTqEOUeiCnGqT0KzcwVlrmi3ZroS+NEkgNMu3Wec7V9aA9XNVaBVcIYreg wyCGgaCRQHQR0h+AzsGs3QKIWOhOODqHEWAER3UdiC7h6BiBjmHoFkZGuACM exD/FEG/CrNKUJww6YUxL6jMPYw4TWQTelPA1VXARmjScLroyCWLx70C0LM/ 6dCeQaSCuw2CWwgV2Kk/wUzQl6iDQK9QrzSvDIZXAn0KnHtmE7x7ZcMrEb7p 5Pnvn4PoWiRMRNFYjJxFkTkjZmD8fIxZi9rLMW4bqrYg/04MuxGpW+F/H2IF 0q5A+3vQ/nJ0uBzd18FnE3pdgm6XoPfDmH8rXnqJ3M5Xs4hXqNu9X8SAMsSk oyQbyyZh9Y2ofQiVD2D281j2Fcb9hJJ3Meoz5P2IguOY0YCbTuGT3Wg6QDru cxZcgyQuVXeckfvE6+Wdo/y6dex0up4nBfE/o+gb7HiarCmFl4Y/lsE/JyWi 1NWHsxJR9WynXcVar4vgKAOuEc+eJlY5JhF1WMdRuxnDLYjapWm9esmcdfJf rR1hLmqSiGrgF13K0+E3WP0JuiC1FYwuEeg0CO1D0HkAeRKEcIXgBEgEfjoP YqXGqk2wTbtwtBcICSZ7vguTjLjuFMX6MYgozj0A7v0JLaQfhVkVTczTJYQ8 DCK5xdBn9whCqbDtyQwLJkZyC6XCO0doOHRTYSwUbgw6x6IdlyDsPU+BMQHs KCI0oXy949AzBL0GwTMCbuLOILjHkxIXyOyRSBX2SkGfPIQUIbwCMWORMgml s1E2FUPnYLRA2gqM34ichUi5EGnLkHAxcgSnXQzcipTHcOuzuPMg6Y7bFWxU j6R4BgPKEZuFwmyMG4nJ16LkQeQ/gdIXMeJVjHoK4/6FKZ9h2Q7Mfg8T38T0 TzH5I1z7Pd7+Gfd+j3uNZG/sZF56U1oyqh11Ugb2n2arfjnrrMv4vX2N6Pgm Hr1PW2v7gc1gMwNDRdQRvrlL2lQOiOouLEAzHvtUM/uPSnI7JBF1jOuwhbWe ul9v8S+a1mvQWVD2WOLtcjnVKv/p1Y0co6USF0lTyDEKXeKIBDoL9TSQ1JAg E6HjOkWiYyS6hROchI0kgCd4Q+CH2GYgYU+QTy/BRcwhqi5zYSJyEeCMQHeB E8FCsQSPblE06RNsQxaUMMBi4C6E3g/ugogEcQnsDSQdKl5KVQpj+0o8GAuP NLglwT2KoCjMNo8Ycly4pdJ110HoFor2oQQkMS8gHIZQ+T0GUKM8w5juxHCI I2oVrROPCNC2F5wcTwZkFzFZyEPvdPTOgG8OelfBfwzi5iJjPnImomYcVtyF y77HjQdphUgM4b481wsZioQsFGRjWAVqZqP8YhRuQ/p1iLiefD6hjyDuZWS/ gvSXkfMGat5D9aMY+QIu/Bzrn8ENL+D1HXh9J57diSs+xXUHcPV23LwP7xjx +hm8c5Qc3Wrs5WomqG0MqkgFbh/g1Ws199cuNlfOSkeBerLurzKs6LgMJfqS 1VAOR9wFKHj3J212cFS3Aeqw1HrqVqwsyVHTdtKWdkXnij8rOUo9YP+IdCCc YTDfzOsCKqK8g2i1RSgmZAJxRBGCKwRahDHTJQbIwAUJNPfvEkrgEYTTRRjk wq6OhkckcYKfsHYGkibyDYFvP7J5fKLhk4ieSQRRgZxeQfAXoBpADtLOiegQ CxdxP4KsJq+BhMyuXLIAqii5WzRVQENdBLno3ZPQIQFds+GaBa90uCfCMxm9 BO2kw0W8Io3qJiovaMo7GN6hBGY3NvncOXlGkd50ZZolky+cuJHQFUuqvDt/ 7SQGSCyRs8C8YLZ2Qjsnk5cjuRQzF2HqnaTOHvyF5NtfQYdHET4cSbnIy0Ji JqKqETkaKTOROhO5i1G4EEVrUXolSi9HwbXI3oyc25B8F6LvQuJdiLsZcZtJ RRbfg/H3YcwdGPkwpj+OUQ/SP3td8DQWCsj9hOcO4bIDmGKlyeYVHOOUKgb+ x3jhGigfaYbQF4yrQ1KFqR6AHyRa1A3FH7F5E8eIEmPhWWlpH5eIOiC3D6h7 Ve5RtOPvBKKqd2grxY3SzWUPJFbPCPpFTvdOMmVdzrMYFVHCFA/MR884IIeY yi2KXEn9UhFYgaCJHFqwDN3SyHspzNGkTHgvApYDi2kxpV0h+c+9BYTiSZo+ EegrDGlhRSejdyI8oki4AmN+QfARNJKKbkm0iCOwJNijdxC8BRlG4AIB11hS mm4J6BmN7onolIZ2AkjC+I9Hd3aWdskiFSZQKsAsUOSeDk/xxkS4xqFrMroL k14ovnB4hDKJRaK3MOwjKL/IJtAi8OkVAZ8weEfAK4boUdxUwSbYVaBIAEzA iXAVifax8E3EgAREFGHoTIyYheHXYvWHuP5nZH6FbncjdCSS81GciZhs9MxH 10x0yUT3AngWoncB/EsRMAZBYxA+CtHTCWlZi5C8FJmLKewney6KViJ6PRLE pGATsq5C9u1IvxdF/0LuE8h+HFXvYuK7mPoBat7H6J+xdj+2GZFrhs8reOxq zY46xTI9IlcKTvBs6zTbY/ul9lT/h8JqPsDHQ4yFJjz7raZbj8m9mUcYSEc4 vxpCnCv9UVN34IyMMz+j852elgth26Xr4DgT5mJezfmajXahuVxHIDAdPcuA SgpKCS1BsTAVFiFLTGQmYUAteicjoACLhuOaudj0Coqfgf+/gIuADQgT4MlD VDEChbUzGe7F6JkDlxSKjRHQ6ptNOqVXMfwLgCpaMhZs5hOOvoJqYtA1HZ2E 8kqBRxLTQiJ8EkhGHhnoGk/wI8UXhw6phLGOAgnJ6ChSKrpGod0gWvrpmAXX TPJFuAoAJxOdts9AzwT0jacyPfIJb10SaOYo6M5NaMYEeCYRDsWvXvE0jrzE W/i9XmnoLeqcQL6y0FgMykb/fETVoHAGhk3H2Isx9gPkPo+YGYioRFwu8rOQ XIj+mbQg1SsR3qnEzG4p6JFHGOuRjw4Z6JiHjsVoX4R2Zeg2FC4l6F2OoFEI nID+YxA/BhljUbQM5etRtREjLkbNpRgqDLMtKH0UCQ8i5hmMexV3vY+xn6DX g1h9Ob5/HT8ewPdn8coxChH/+SxO22g6v1sGjP3In98x5L5ivVmqwF2Bnxkv saV9jPGzm9NBXvvbL3cN3K1D1NI9OC1PTTwj7a6TkqxOSbVrZUB+zot6Gey4 W34CvlHwyUNhKQbXAGuJkWKqUT4F4cvQaw68psNvFNGL+yjMHImHL8TDr2H4 +4j6EAOvQPFIFOTDdwr1eXU+ApajzySEVcFnHLrPhP80FA+jdeTkRZi4DD7j gavgXonIbIwtRWotcD2wHpiHHkXwHQL3PIoRhRDBYLjkwF1wUTa65FL4aKdC dElBN0FHsQQeYdgLghK06ZULv2SyvXsXoW8GCdQlnZAsONOzAD1ySbidM+Aq bkajZyy6J8M1hSkuhxol0NhJ4LmQJozidT6pNGcMLKJ1lkE1CBuKkFKE1yBv BmpnIGcVmUlBkzFoCCKzkJlFHBWUgqAoGiCB8YiJRPggDExCQhwioxGYhgEp CE6AXyoC0hGQAq8cqrBHOroUoUM2OhagSwFch6FHLXoNR9/RCJqCQRMRNxXp 85E8G1EzkLsEs+/G+PuRuggjZ2DxNRj+CCY/isk3YdbTmPYiLn0P2/6F+17G Uz/gnZP4aA/eOoEn9uORXbjrR6z+iaacngp6m/ACr/yqhpP6bzv2Mq39yKAS F7fxQowazbJiN6xfaftDG2Q47kmdBvyCnzLIqd9M9uA93kDmff8sXJCHknFY PhqBW2ndKmAauazDF8OlBh1mIHkq/EpwwUqkVuPSDdh0KaJvoOm2/wZUD8ao 0XC/AmnrcOEs+MxFr62YVIvKleh7LTptQ/YyzJxAvTHuboqzEgM8uALR03Dt etywDZkvAg8gZj18hyH6asIhroH7CHiNJpj1WQm/0cSE7Waj+3Aa7ILTeiSQ +hPJNwvuwqDKR+80WtzplguXXPTMg0cevAW0WA11K4JPPtwz0CMdbum0zC2I yDMFPlnwzYBnOrzy0V1cZKBvAuFQgNCvEhHVSBiKuFpEViOiHGGDEVmB7Mko nE1BrQnjEScIPBuZOYgQ5SSQ3Shmo0Jd9mRzVBiffjHoFUmV7J2CXlFkA4Qn IywWAZkExYExCBfPJhHeIpPQP5r8Hn5JRHSiej2y0CUfnfLRvgRdR8KvBvlj UbUC8RNRNAKl05G2BPmLMWQpSlegaBUK12DYJShbjMnbMH8bZm7Bgocx4UFM +wCL38T8DzDyMJlGQSex5Qftf32qe0x2MSQO8REZ2zndxv9LXT3tZ8kessz3 ck6DtNNOynSKAbmDaeooI2oxzyvVzXexOcAMxI7AsonIvYS2e8RNwqSh8N8E 3IGoCZhci5hF6HIthQ1XTEPsQkQsARYheC5WV2DZRQi8ATELMGclGQ9x1Zg+ DbM3oPZOdNiKoK0YNxtJQjo1iJiJwkUIHQ+XGzF1Pa69AROuQ/AtqHkS/ddi 4HdIWYO4dTSdn3IjTalcDyD3YoSuRPYSeAuNvAqdyuGWTJa5v9DCiQSAXpmk qrzK0CkLnfPgno++BeiTDe8SEkqPIcRdvoLxsghgnQvgVkReLO8cAmHnQnQr JwQKK84jCz4VJL6oSiRXIW4EwkcjbDhCK8jnEF6MyMFIm4QkoaeEWV6KhFxk 5yFBvC4FAUkIEMo6ioIxvCPJqgwII0vMVSjWZIKZmE30TaY7PdKIGwW1CkoU Bl7PdPQTxBiDvlkU7hiciJBYDEhDSBIjMBH9kxCaitxiDB6GvBFILkbsEHjO hcsmBCxA6FSEzcRAQWsLMWgW4pYjZSlyV2DcZvKHTLweU6/ArM2Y+ASqf0bG Wxj5Mm46iCf34KsjOHRW25pxjO35O3k9+omfMOY4+czbK5hyANYDpDoPyOiC U9JzdVxa9e8x46krfct4uqeuJQ3Pg8sidB2FpDJkzaGop5BFuHgJilag4y2I nIlZI5AqiOJSpAilPwy9ZwL3wm0FqtJw0WgsuxJB2xA9AQOF0K8FRmP0LCxc j6mPouc98LsBw8YicDawAJnTcOEklK+A130oWYac1Qj7HIkv4uIbkfkIBr2C BIHhOzHlCTz5Agreg/s7SLyNAl2KtzFZXQaXIeiRiu5ZpOCEFeRTCJ9kitHq VQHXfLhkE1/5Z8OnGN616DkEviXwzUOfKnhVwbMK7gXwySVa8x6MXmVwKYRr EX0VDBZYioGlCKtA3FDyxguNHDkGYSMQWkmIihiM6MGIrULCSKQOR0IZeQ9y 85BcRBammHj6x8E7Cb3j0VsQVCLBwz+LLDSfJMKSqFVgAgZkERn2yYB/Gvqm 0VM+wgZLJsvNO42mJP5CP0ZRgQJ7gaIQzhySg+xClFdi8EiUj8D4UcibDv91 CJ+KyHzElyC+ANEVSBqOuBoyzOJGIm4OkhcjdhYiZiF2NhJWIPceFG5BzTpM Ehrkdsy9HZsewk3P47638OqneOczXPsa1n6OVb+g9jDRlJgblv2C17/FOwfx 8xFtxmcnqBMSWm+yxlQP2VjCLinVYTt+DPosoTW10CTkj2CmnY3ZU1F+Nbpv RLCwIuYhezUCByOhBkOXIX8SXNcjcCEKEjF5EtmTgxZhyDDUjEfqRmATYrZi 5VJM3oLYW5CyCJvmkjGAG5G+HLOGo3Irwi7EmCWYvhRhdyHiVYxYiLLHUH4b ijYSKw56COvvwLJH0OM29HoUwbOROx7+q8jGE+L2Ehb+SrSvQfd0NqTjyKHk UwKXPHQT+i4ffpmEKLdh8B6KvgJaQ+BVC8/h8BxBGOtdDM/B6FEMn6HwEIw3 mIwoF6HshlBo/UChkcspSDVjNCImIngcwoYhYghiypA4BElVpPfTqhFdiYQ8 5OYSaYgprU8s/GLJ5yaAIUAlDCox4e2TyRPeNDLM+qQhQMydc+GTDd9cwryA iqi8UNz9kuhr71T04QeDEuCfin7JGJiCcGGhZSAyhyzVyjJUjMCwMZg/AaNn IGwBQkYjOJOiOCILaadAbAnCCxAzmNAumpBci/gKxJQgrpJ096DJiJhMLYoR AFuA5IUoXI6idUi6BEWXYuJmLLgOi2/AFS9h3cdYeRRZhxD3Nha8gEtfwL9e pSMcv5WHYDTIBcGDHKn1Jk8Gf+QFhZvZUBdUVlxNM5quAxBVitxyxAxH0FCU j0OBsIWmISIDcYIKFsOVScx/GQXAD1yOwkykFFINC8fSVpqoKmxciFXXoc/9 FN5fOg9T5yNxAdwvwYqrMGUdhT8lTsWkalQvQ/dV8FuBkhsRsRXxq5C6HF6f IOBZjL0BFzwO3I8hl6PsRXg8R6TXbQtCxBRpDTrNxpRZSFqIbreix0jaK9Gl hGaIHpnok0PTdldhYBfBT8BMYKYCvYciUHCUsMpGwWsE3EbBpwY+g+FbiZ5C x5UT5Nwr4FMK91waL6Gl5LqMKScWSp1BemTABITWYtBQRA9jBhiF1HEEtvhy YqecfMQU0hTPO4rAIBjJOwt+KaQBBTUJdJGmSyUFJ2a7Qq8JRPnlUfX8eauI 0Nd+zFH0NQ1+CTRn7J9Ca5eCwfqlM9gyCSc5RRhSiapaDB2OyWNQPR/+C9B3 JAYVIbQI0aUYJARRSuIT6BL1H1RKoBKaOqwE0QJURfRrrODYYsRUIrYCsTVI m0gu3KRxGDSNhJi8nMZ7/kUovAljnsLIW5C7EJM2YOk63H4PHvocj53CPUe1 2NHXGEhvKRRft+EYucrfa8SGnRTz8yPr0PIC+OeSthJznNwM6naMRfBQ9J+B rlkIyUJ6LfwnwW0+zUH6TkXnpegv+jYCyWVIHYbwufAdipJYLJ+NuU8j8za4 Dkd0GUauRMFcZE0igkq7HGFigCRSQNTQ5UjYgP7jELQaNWswajLKn4f/T+h3 Oxbcjqz74X4/Rj+CiQ+g9mu030gGVfgIwrb7AgxdjKItKLqIfGXCrOpchR5J 5PwU2kRIp6dQZ0VkR/mUoccw+FYQ1H0noecEuI+F62h4VZDV1KccrgXwrID3 MLhVoedQ0obB5YiqQPxQZA9F7lRkLEfMUoRMJe9lzEgkjkbqWJJCmvhpEiEq LR/5BYgthGcmuSMC4sia6ptEqqpfIs0ZhY0ttFsfgSUBnnTChiAffzEvzibn vGAnofJ6M3iEBheIEspOGOchqYSogFwMSCZ0EaLykFaIknLUDEfVCEwah1EL 0F+Ma1GNIRQ0K6aiERWIHMq+1krEDCN+EHUW90MFwZYR5KKKia8IVGWILaXP 6CFI4PziQlBu/HBEDqdpZsg0hMxD5AoETULeRFTMQdVtWPoCtj6Bm17HdR/j pt24ei+uqMOGOqy2kYU2qQGXHsaoT1BwjBTfpr2oFCbofHSpQZ8RqKiiF4mZ rKsY41OIyb2EwSA6czT8qmicdp1O7s3YPFSJDlyJ7g8hcg5cxpMen1SDYVuR vRzdChE0HWXFpM0jpiNADOTVGDiCLJaKWciqRZ+L4DMEnaehdANWLsCs99D1 DDo/jGlbEbeblmJr7seEu5D3AoI3Y8AUhNciYDayRFGzyLgqWoYQYZjdgHYT 0aGYLHCXVJKIVzZho3cZPCtJ0wna8auG3yTaKC0IyrsGnrmk6QQ7eZTCuxz+ AmCVcK0mg2pAGeLLkFKFovEoXYDCVYhdheBFiJqCxDFIn4DsKcgQA2Q2sici WhjnJSgoRsJgMvLJtRVFkwXfWNJufZLJ/PZOJ44ieymb5p6+KhHloW8uegut V8CfQiGmwI91opgzCjT2F0BKRVAqAtIo9cvGwGwkFaG4FDWie0dg4jiMX4JQ QfJigI9FRA0iRxGKoqupVjG1FMqYNBYpYyhCI1Lw2DBEVtGMNUpoH1bfcRVI rELaMJrPCuCJQZRQhZQKJA9FcjWlhOEUq5Zfg9GjMWYKyuai6jIUX0FO/vm3 Y82juORV3PQ5rt+Ji05iyVmMP4y1dRj9HTKPYOEpTD+KmnwMuhyYia7l1Kui Sn5i3lqAHgvJPnHNpf0vAVNo51TBaPQcia5LUVWB21cgZxtiP4T/DcAKqlLF SFSOQpUQ+jz4rETmWJr3xY+gbhkwH2NnwW04ej6K2MnUlvAxpEknL8Tg22kt KecFLNmA+XcjpgEeVyNwLnKug+costDcCuEm+HM6sucgbwKmTaUA48xb4XEb 2eqYi6756JxK4Qd+OWRl9RlM4VW9q9GnjHanek2Exzj0qKI1u14lcBc21TCa 8XkMQWAZOXXFTz0KEVaKzFJkVCN/HorXcmD8eoSuQOwMJE1CxizkzkfGUmQv Rc48xI1GWimKByN3CHl0u1TARczpBE/GIziFkONWTLrYN4UsqL7Z6JVFS9XC dvIT6jWHNtsG5BOcBFMJ+7w3a7qgRIKQ+BqYjv68SaRfCgZkIzgbcWUoLEd1 DarGYOwYjF+GqHXwm0P8OXAMgsaSpRRdS/vBw8bShCJG8Oo4miuJTyFNwQNC a8fUIHYoab3EYUisQfpommfFjkJ8DbEB2Ye1SB+OzFpkiDQEQ8owvpoiN/IW 0hY5MZoS1yJzHQrWYtjVmHwb1j6Gi54i1lr/BdYfxLT9qD6CmXuw0Iah04nk u44BatG7EhEliBEdPoxC1xLEZzUC55EqFPIVaB9QgbAklJTgklVYcwemvIju VwG3ILEQ+VU0ex23ErWr0H48+s1HRAGZQAElGDQViwXGZiNwGk1SAkeRDyF+ LsYtw6KNyHoU2IHcB3H5DYj+GfgAuIIizDuKoTcZ3YSCWwdMAbLJRxosqG80 ih5AyPXoM5+C31zzcIGgKSG7HJrKCTj5VKL3EEp9R8BHwLgWHlXoW46AaniN RM9qmoa4VKBPCWUWFpfgqIhSklrhBJQuRflaFF9ME8+BKxEzF0kzkTkXJUsw eCWK1yBnBdUqtQLl5Rg+Cr5l8BtH7Idq9CzGANUCzyKAeaeQXusttF4uUxPz lYC9j0pWQtPlUgafBNJxIXHkCO2bSlPFgESCkyCuoBwMykNSOYorMUxMi8Zj TC2tCkWsQr/ZhJwoYQhNQvQoRExC2HRETiHLJHoqIuYiSqQFiFqK8HlkE0bN odlftPicj/iZSJ+HjCWIE7buTMTNpPsJk5E2FuljkDwOiZUoKcPkURi5CDkr UbKQ4tCIn6chcyZS5iFlMbI2oexKTLsTlzyDax7GpZ9hwR4sO0Yx+WUjEHwF Bdl2LKFB1D8LwfkILaPVq/yJ6DyDpm/exWS+dksmBogNRVYGucGDn0T0g0hc RO5lMb2tHIHExYjcgKR15C2MrkJUEQYWkaEYno/YSqTNhUctnasQUkWKLKEY /Qsw+m1k3Ymewhq/AU99gUV70f5H4El0mY2BtZg3EUFLKMjtglm0hNG/mBw4 A0QXbUTEUtoSiFHoXkV1IydPGlnmXsXoVQmPEvQUzRGUVQpPMd2rJsNJqPU+ w8nV4CGaM4Scn73y0L2QDLCkPBSWIW8ahRYXraLzAVLWIXIhYqcjeTrSZ5BT UYCqVKRZSBuKjCIMHozBo9BvGC0cx1TQLFIYojTLYw+8AJJPCs3saEKaRbwk 7nhnE5bofgHhn5xp2eQACUwj/wMZ6ikEqsAMssz9BVllI6oQKaUoqUS1mOtN wMhRGDcHpWsQvRlh9yHiIcQ8hsinEPkoUh9F0j20dpNzL3LuQeljGPookt+A 6+u44AnEb8Gi2Zi0BOF3IPo2VKxGlWjLWmRvQOqFyBYgESy0BPHCiBKAHImK 4dT5U8QIuhDF61G9CEXLUbKaFiXzlqNgEXJnIHMBxf+UX42x12DNfbj0DVy2 ExvPYtIUDJyD3nOBYcA4Glk9EhFcSUohcxG856LdZHIGXlCE7kkYmElOg8px SJ2DXqvJs91uHZkikwoxZSYir0H/BSRQTIVnGZJyyC0cV0VuOrcydFtAKkZM XgZkof8QJFYTUcdvQNr18NuM1AWY8TRWH8HQbegyFz1GEPCGLsDgtWSWu44k z2T/HPIvCdrxmo3+S9FnHLoPhUcZ+ca7Z6KHMNFLiXZ6lqNDIelrbzF/L6Sl NFEZ1yp4V5EzQYwOj0K4l7C1k0p+yD6pSMpGQQVyp1M10tZSJ4euITCHzkDM VMRPQ8JMihEVAEuZQFP11DwUFCC9CEGl8MpE8HB4VMO3lN0CheS+6FNMtlPf IjKZhAEpYCaSQF3fwfSTmD4E5pEnVgxhv3yaAAoDXrXqg9LprIDgdARlktaL zCEfRXExRlaidjiGj8aKVbjpZlzyGs2zLjmFi45gzUGs/RGXfYGNn2Lpu1j5 ATa9imvfwpW/YOVpRHxPW7/jLsSmebjmIgy/FwMeRvztqFqLrC2IuBWlGzF6 DcU2+z2BvneRjRo7BhPGYsU8TLgJabcg6wYM3oqiq1B+Cco2oGQ5ypejVFgs y1C0mMyA3MUYcjEm3YkLX8aNXyFvOGLFRGwM3IYAE4mK3aJIVYWnIVaorYXo UEmWhkcW2ZCh6UhNR3IJgkeh7wJ0n4x2Y+FTi+IhGDcFpWISJBhATN6r0SMH EemIi0NcMalyQRddyukEITE5ikxFQiFCh9CMz2UUPFfBZSb6ViBiGoIugssG iqvpnUOD1DMfAfNpXa/HEI5ITyGhBFTCt5hmav5V6JdJy9BepWRyC0XmMgx9 a0my3cvJH961lJyivqPQs5JWw90EUw2FZwkRlFB2Qvd1zUMndiTmZ6J0HLIv RPplyLwW6Vsw4Er4bcTABYichTiRBDHOR/Rs8iIKQzcxD1k5SCmAXyH6lZDP CvPhPRMBpeg2ifhQYCkgC4FZ6JdFbRFsTGvK+QjOIArqm09Tv4BshGYhjL2y funoF4/ACKKpAHUdUJCVAFUGLWpk5mBICapLUVqMRavw4N144AfcZsSNNmy2 Ye1JrN6FDR/iyq+w5D0seB03vIRrXsZFezHbjC719A9Afa/C8lnYdgs2fYDS x5H9JTJ/hsfPCH4flY9i9peYvRNpbyP4EQQsQ+R0zJ2G69ZhxVMY+xGGvIPc rxH/GQa9j5A3EPwMwu9D/FbkXYwhKzFsMarENHwuMVjF3VjwIvwGo58w7fLQ bww6FFEAgGckXNOIrDoWEHd1EjM+oeIHISSNWD0kB2GppFx6zCDjSlCEVz6t ZAWWwnUILfK61fLZU9mEyewkhAsDZix6lqLjEFpA7JmC6EzE5PPScAU6V9Ah CWJ62CUBvpPpwL3OwqIr4AXfOFrJ7V6Kzvm8BhdN6y9iVu6dC//B5JZ0H03a re9QQpHfRPiOp1mq/xi67jsR/qPRv5ZQFzCafvIZx65OYUrx8WvEJ/lkNrvF Y2AahpWSo7VyG8pvRcUtKLmOeizsYkQvRMI8coKlLSXHYOo8ZI5BYimSC5BT iMwSBGWjShg5vCLZ6/8xdR5QVV7N1/+9RmPvvWOvsfdKEUFAEEFBBFQEpUiX XkWkKSiCBVERFBR779hirNHEGBWxYzfR2GOq35lD/K9vrbvuul6ucJ/nzJnZ M7Nnn3VSEa3qRxUHalpI47u+wlQmsh9rWVB3tHQeJSEdQn0TaUw3GCaRTvlJ 5X4b9v6vWNpM5a0DJUq2HCk/VXbVbQSDVWgwZbKKBfa4LcX3sdD/oj8T8y8x f+D3Cs+b+Hwn9cmgo3geJOqkEPyifsHpk5bReEnLbGJ9WbySxXeZd5vQN3Kg nv0brG8x4wlz/8XzE31uU38XTWLo5E2IB0XZLHoodN8ETdOK/JPgjwQ9x/0x Rg/ocJs252m/l94FGKVjP49podiFYJ4s9bfq0wUAN3QRM2ioUuBuuk4ygjqj qKlC2CAh3LbsQufhYm/iPdTGNKeNijim1DGTasw339BeARgrqby1cpC6UL3R ggFMxwqw7DBB6opqQevrimJFGUQhEGVRNSdT04U6TrRQUcOOBv5UCZZgikp+ jeg6CvwhEWzkFzYZRgcjQUH/C+SrEMF4BnYi99HAjXrKvNXDmwazaaxAlxc1 9ev63uIA1Yt6HlSfSVVnqWJVMafqKOmyNR0mTAaVjdrY4RSC1WJMcxmzEsPF 9FtI1yixqH4KviqY4cdAXwbNFlJxH5WDmEopW1mUyh+t/XBMoto6+oRKeb+Z B3U95FY0MpPaVwcV5uyk8KWyA7UNJWqPorGJ3F7ltVoNFpZFw+HS3WvTT6Mp XchqpTG88nLKCStwPtJY7DbMm02ZLD8jxM4UPZca9wehr5nzHJ+rBJwi4igJ Zwk9ReQFUm6z4Bec31FDWdRvNF1PfCgr15J2k4C3OD8n4KmwBWy0GE7KX0T+ y9ByOXm2cTTtfYjwZV8++e+F5V4x5xKix83iNVc5Q7/j+xcTnmN0jSGHGbgd kzVMSGZimLQ2uqptbkvtiVQaRKs2tO0k26eBiYR45a9q9aRxVzp1k1a7SmZb DRT/rGJ9TxuJZc11GtVxHF0t6Wwvlah2HnRU8HsafaZiNo3R9tKGVo60RxC9 AjQUcRfSo/EsRvvRdSVND9DsEN2PSC2i8yPa/glP4SbuqSyeC8/glSQOHVyk Zd9pPp3iqRJJs0A6DaOlmdiqSgA7q2xiopDc1N81mEUbb1r70iqAFhE0jKZ+ DI1DqOdN1dkSppW3rDaaqiOkd6Oic2tDxrtiF8XoZQxfw7BlDFxKtyTahdHV n54+YlT9fQW4qtRDffkBGpmPMcPSnk4WmM5kZKSIIOHBADequ1DfU4Co2owN vWisQq2HZJ1qDzYZL2Seeir0mwqCMjCRRrbKTxsphzxQdrG6txVFdeU8W2qj 6mBMjzEYmeFoR3ooR9UqP5Oh1BA9lxrxkYBf8XzAtB/xO0XsHhYdE36LioBL Skl7wNQPeljvNR2Uj5pLwSb8y7B8yKSd+BzCTdOADfVvm/cbQx9RYz+10zEI JsCTPYWsfSOUp1BNLQjW41ehmh0dq01LfY2oz8x9h+cjrM4xah9mq6V41Upd rKXEdIWUqvSWqbo2PaRqp254rSFCZqvZhSYdaNddooNwkPoIRa3DUEaaCdFi ZAB9A2Xst3UEffykCWjsz/AIhi5gaDgWUVgGMN6fCZFYJWKdim0adqlMXEzM GhbvJ+IPGXKc8pmcO3x/lR8/ypSH6R9UOUXCYu7sZOkV2h+ghifjphA4lUHJ 8IMUzGuYSanq6/5UGcXXhlRXXtGBRrNopHLAeBospMkimmXQbjFt0mieSKsE mYKv50+tmdR0opGV8BNU9FEuopUllrOxj2ZsFsarMc5m5BK6pdI2jk5B9Ahg YABDghkSwcBgsaj+dgwZJ7mh6UQ6ONBXAbAkyBVqWTs7vppFLVc6TaKPrfSa 67hJz6jZRCl0dLOjliPVZwg47zRK91+MBFEop2TQVwhUCpm30wlIm9EC7FUs 6GjENyZCP3CcRNpcSorIfy3rqMwp8m+C3hL4As87OH+H537Ci4ndSeQJQs8Q c5WEJ7i+hH9F9KDWOuZGkLWZySU4bsEjhaCL4uj89PiVp3I7t7B5wNcnqLyW VpH4zGb7Bla+1iQ6bU4h2q7ivoztR+p/VkhsqS9j+Qibc0zKx3KltCFq2VNt grDdKo2Smbs2fYQvpFLyWoZ8NQKGCD27XU/6D5M2TU8zWbhaPnScg5sfof64 rGP4dtoU0z0fi1Tck5iWw+jd1N9H42JMI3FSWUMUMxOwjccmGe8gQmeRsZDV B8i6z8yfGLaffsVYHsTnAr5XMfqWWjMEh3usxHIt/5sFM6T+kL4I211QBuek r1dnmJBF66vgNVw6C8bOdF9M0++odomvfhQH3nINLVfRVLnBdFom0iKa5pHU VkblSXN7idrNzCVDNLAWP2Mdztg0TLIYuxyTbHpl0iWV7sGyX5Q5jQhjZJS0 IIf4MGQKo60xmyBkgG5TRMJIgQfW878EutgJTaLaJGpMoKuPQDj15/ChihMt J9LemTYOtBkrfQSV7qmwWG+EDr4jpYbQZLiUp9oqc9KNGLXHFZ4XHzWWUWZM tiV2Dns2kKNrPipUhX8g4lcCH+J8m8kX8SokJp/QDQKiEk4R+iPzVNR7Q3N9 7DUHmBSHexoTM5gVjdcOIQzH6eOJe2o3FflIqpTVvoezVE/BI5rN+WS9kz8U qCf0leWEaZpxlP7rFWP7FRaljM2yDLMruB3AeaPEpn4z6DVdE96myH7v0gOz 4ULuarpW6CUsATOhJjqPxG8Gc3LwLOR/q2Aj0yJZGcyKXWQfI3Yzc9YyoxDH 3QSdY94OLLfSvJiuao1iGZpGj1yaRAixqkoQY90J8GH6OVHBavqZ6p+p+pf2 z//3yKWTEbN94AL8CmlMsmBZEkv/pMkfcFF+T9Vh1Bwihqfy7onOpCSTel68 sd1n6nym0ns672PIagwKZBC46jpaxtIhWoJgtRABjc0nSRiqaUjLCYxwk+aO yQIM0zFdxtiVDFxG1xS6R9IvlCFzGRbFiHkMiZRC3DBncVDmttg709GBsWE4 hMsX/jqSjhOp7kVDlRGYSeV5zHR6hQtVgwhqeAj5odpMWk+SylX1WdS3F0pn 4+GS37XrQytlSIMk6WsxkHZGtDOkvSmdx9J9LMMssZ9MpBdb1Co/lBX0Vwjq FRGPCH2KfSkOFwjOJX4VAVvFRyV/x/wfiHyG+3vhmcv9/I6BEdjNwtOXgFXE vxY4FP8PoZ+w+1NWQRmV9wu6H6TxaRonERjL1vVkfhQTCtJOLFTbUog2J/Xa V7+pXJzre0J+x6KMb+7gr+DcfoaHYzMf28V0LRQCJ/PoM4BkK3LXMOs+Bjv5 3zwBxr2GEW3MCh/y95B+nO67qZeLaQw+a/Dch89BfEvwOyCDkN8U881+Bn8n p/5FbcP0CJa3MCyi3yZ6rmNQPsahDNxP4Q+U3peRnI1aAPCo1kU/p6fG5A6U YptJ2S7ib8B9KctPdWDlCpm56KR/ShA1hgkXvc5gKR72d2B6CsUlnLvEpr+Z +YgxezBfxZx1OG2gy3aZRmmeQfONtEunXjhN3EVtu5mNEMIbOkjFyThQmu+G SxizTMD5wBV0TaJHNP0iGBkqc8qjEhgaJ4W4oQ4YWmNpxxRn2k+isycD4mEF LQNobyZ2UsOaumYS5gbMZkAcI+ZTz4tavrS3p7MVg6fQ2UVsr6WF9INqG0tB rFlvWhj+1zhuOUyKzAqydjQRENXLnOHmUi2P8aR4LSsfEPYXc18T9ki4uyHP mXQLp6NE5grTbOEWAnYQ/yOJFwhXedzL/6al+Fn6y2az8Yll8RayHxL+UbQd vDShd9BL4aJ3+Ytmx6l0iFrLmJXA9iKyfxXIFK6Nau7/56MCNQdYvenxmmnK op5h85CBtwm7R8RpwtJJKWD+eWyuU3cDdUfRvQc+lmRGyIpwRnqyCscadMZz FGtnk76K8VvpWc7XZzEvInkF0cuIXipNmTnFTN/IlEUCbmudZ/BFIvcT+COW p+l6gPEJ9FjF4LPMXYvVekyfCTtij2aTJur0Yblm2i+p0I38lRHZHNktFyJO OxpPH7ZsEHmiduqde1L/Ud+q3gDqDxBwW3cY9R0Yl8KsPMxLafszQ7LpFEbn 80xdy7SFhGZLkb96GQZ51F1A00CauArLqPl4mqp195bCnfl8THMwXS1oqv9K uiykRwS9QgQQGkcxMoYB8+gfII2w0ZZYjMfJkW4uUq3qECj0ZuV/DMZR2UFq vC1N6WhBTwWZQmmVCQvkCzeyleZs33GC1at4SZm3hiVV7f+rGDTTLJeWGkQp B9XGWNJnle32HMdgcyZZi6rzphUCuWf/IfFu/s9E3yPoCY63sN2HZwYhmaQX Eb2B2JPSbou+LzldxSQCd6W/PNqV6XHE7MO1XI6AUc7cUQ8dTFSR4r18rJIC XUegAOcUNhaR+kZMKEIbVah+DtGmFaATvYDfmf6KgF+IvonrbQY/J/QZCx4T YEWKPRn+mPtRxws6Ur1V1Za9GW1HP2tJyau4UXkojToxy5DcEKYXYvkDRk9p 9AMTDxCfI4phiasI3MyIXVhtZ9453MsY+AMjimU1rV4y+AfGnGDY90w+Qo/V hDwg4xy9v5Mr2vSWQ5/ELy3Rg2k52q5k0PIJJqkU7ZPr/eqjeKTJQWzbIZ9s q356W6TMqoymwVApcDXVWXxHR+z9CV6N1SGabsIilwlhfLMUNtF+J77ZuK/D eBmdtlFvJY2jaOQpDccuU+jkJu2q8aFYLcJiNePWYpzPgFyhvn8TzTfh9Fch L57hcdJgGujH4MmMtMBEBbUpdJ0uBjZqhvTTu5liMEb4oiqDa20kbB9DZ+nB 9ZrH10nC2WhqTHcTjFxoP5mmM+nnQiNLKZ60HiEsOxX12g6UtmAHE9obyW/o MFbYdL3GMsSMiTaEe7I+hwVXJDxFXRfKpQp54a+YehfLY8xYJqI0cctJ3y4b OewG8feZ9eg/rRW1BztGyjRBWDgJB/H+XQSy3LSD8tJGYqeVZwR4qOS6GKdV FG9i4Wsxp9AvqeVc/XmPf/B+RfgLfErxfsKcn1hcist1Rn8k8J2wERgtQQ0v qs0WvU2ZE+9ctXHnKnV7g4veXD5CZus+lLmTZNzAfKccizy6jNa3mLRd+JYJ +SzYjNNexm8h8ChJD0i8j3WJEJ9mljCkAPdzzL6DzRUs7mO+luzt5H1P2GVh kvfX3mmjDnYVopdJn/VhN0+ko5RayNTfqXtJ0ihnXwq2ScGtdYWP8pF6aV1D GeRpbIGBA87++KRg95R296i+nhFzWLYUr/nUypAZnHaBeC1gSCodfqb5VhrH 0tBXOtfKnNq4ykiCVSAW6fL1rHPFTQ1YxTepoiw6KFz6MsPiGBkvrwd5MdoB E1uM7aWw1tyRyl0FkuEk4xVNzKlsL3W8esOE/d59ijBDBsyhc5DEuBajBZB3 cqDDbGlbd55CMxcptzYcI+XQpqOFq9DKmDamwhVsZSLjXV1GCVNuxFim2BHu x9JVxJwn4haJ37PgJrEvmf9K1MMcTuC5kqAU4heyaAvRB0g+ycILeJZ/iXpl Er4N/fFdweptJL0XWcjZWnit4tlej0c1+AK6nNawaSupb8WK/DUI99MPx3dM e0rQJYLP4fcDnt8LZk67jeMzTP4h6j0xvzLhMB1PwSVpyDJLJuMaDcXVghkz qbod1olGU/v+jO9P0iQi12Lyoxw52uMZTR9gdxLnfbgcJiaJ4KV43pV8IUTt nTKGX6LtWdxP4rcb5x+JeYXPQzr+RIdyAneSe1oOW4l9LXLHPXRo3qlD3gIN /Kqpi3ok2bp7JrZl1FpJjQi8ZrF7h8xrtNP2pr7VVxaS/rc0l5pYTxcSU9lW TNYrBt0Vnl61aMwzGZQpDZSqfejkQd90xn+L03q6FdE8iabBtJ1Fp+m0c5HZ TPNgxmQwJpcxq6V53SeLHgv4JpK+yooixTsNiRENq2E+mLtgrSKsJiYps2k3 UtwUM2kQSSeV3XgKb7n2dBgjLdF69kLqaBpEe00TrW9Ha2fhs3UIkTxIZT2N ptJ2rMxIqnS7tpNgcgNj6eY0M5OuTdeRDDDDxAI3Z8KDSF4qPbugk6RcIqWU uJf4v8H5BVOP4L2YgAVEppCQQ8hmSfcSzzH17X86BgqLOqVgrgDhcYIVaH/w XyCrqAk46fDnpFXN5cPlmB5g03YWvpG6gbdW0wrUxQrnO7icx/MI/ruJOC7g ecElsm/g8p7hf4oczYInIhy0S8XKv6i3T2d2tsJJi5lFTgajftAjdbqzNnAk UbOZv4S4cuZ+ZOhffPMb/g+wVxFtu9iVj7aHzN+l7KbgnNU5Op/E428x8qR3 Ip4z/zW9/qBBORH7OJIpM/67dem1h57C3qqReY4Wa6qpLuo5A8MZkUXvK1Sd T9VQKUHsPyAfkKj3VHxU1YmyoM2tpLHYcSr+wWzcJWOMTv9S6XvqZ9HFnaH+ fKVSrUMMyaVHPM3v0egqBmtpmSpM4zYKzMyk/SyGu2MRJs0XhckViBq5SoRD Va7XI4ZeUQyIEXbQgGgZBBsSLKqP1o5S3hzjIO5lkLMcxFB7nogk26UIRaT+ fHqFYWBP7anCSW5pRgdreigQNZnW9kJBGeXEtNmiotY2ivqOtPDCxINmk6np T1NlcmMxGCud5ZZjBJ/3N5Nqqrszc31ITSNiE54nSDxD1g3SfsXlVxwe4rEe rxR8EwiYLxYVm8+SEjKu4vbui0Wpnb6GJVk4ncdcFwCDdE3JX78e/0ki4Ayt Z15TBz7Lw+Kj0t6Kd1IWFfqO8EciUza1DOuTuBQTnU90MR5HyLhAbhlTPzHo A37/EvIHR96If8h7x6gDUhBQ8UV53eApLE6j8wXNVoql7ZDa/b5pYD6dlEK2 nRd4bPcGk094/kPCL2wvk7C1Tgu2H1cO53cC3+N9jqBf2fyPnHG57V92fCT5 F4w/0vAYfUuIusqZg2LJ6VquVl1yez0lfVkT4BtpL2QdSt8cepyirx81A5ka yZ49YlHNK3yUj5wt0spGRqIaTJXZ5yA/NhQJGFN3jLO0CsLcXZxkjx/odZaZ W5lxiaGHGfQtLXbTZgmtYmmnsjNPOs1mxEwswxi7CMMV2k3lMHiJaBT007Y0 OF6mgQYnMTgKQ09MJjHODjMbTF1pYy7ESEt3es2liROGM+gUSpNgernQagbV p9LOVBoK7a3FwFr4UNdPamstvGnuTu/5fONB86nU9xBG0wg3+pvSdAL1baRm 1dJQGsrtRglj1tAIp8kE+rA4lcj1BB0n5TBLrpHwK673mHYCjyX4zycgDv8E ItLJyiNrC+n3mfn6v5OslY+KyGPfEearOKJH1ydqE7L9jOGvTNZxzUfLkdXQ qZDxCXbsIONXcWKeOjJ6vmX677iWMXk/01RemU9IIT7HSD3Dmud4/StDNOqT sZ/IeULuB7KfE1CqqwfpdDbE2Y4FhVK05CjEy4B5H5M6g80I2UnBNdZ/xPad HPrg/JnVWh7tgu40LdUW4vxMTpA006F5978cfcOR3yh5Q/ELaWjanGHSMQw/ EfAnu1+KHSoo7q6tqL/+DTsqovldpsTScwVtDkjtulYqbhHs3ieqO60qLCqC eq60s8dA4Vs36bzERrJjnwTNPtfpGCxoZ8oOXEsYd5tWmxmazrRtuOQxeROj dlFrN1U20Saa9l7SNho8k3EhGKUyajnGOdKO6ZfFNyn0jpJgN0rFu1j6xktt apA7RlNkVtrYjmETpNvSyJBKM3XVbpYe8w8WQmxDJ6pZU9NNxge6WNDeWyoG g+fQP5gB7hJnGzrSWhmYwvMeQg6sYk5TT1o4CiWjrQW1FRizkbJ5i1F01twD JxtCZpEVT/IGQk4SdpqE66Ip5H4N++1aXXkpbouZqaBjNrG7iPmO1Me4vfrv nBcVyKI3s/M4q/8SpOqq952pig5/StLnrSuWvloysbr68D+MOML6Hax9KuMJ aXqV572Xj037kUl78F3OgmwSthF1lnnXKfhbcMtkjceU01tXTv5TeZ73kMpF QvFVmYWtBXM20mEZ9XZRN5q642Uiw3Uic9aw8wkFdxnzHptX0kk8rgVkruti hYrLqafJucySv8X+Z+hULv831rwm91eWfML+KZGX+fY7AsvkdIxpn9n+txSj sjTqa6NrTQm6PMJ1mWQcsIPe6xnqRZOFuIex66hYoOCoX/hfFA1nCie2nTvN Z9PeHe8Ioar6bGXcNFqswHkVs3Yy+hndimWbdJkjTBUFUNWenXUXu1PUvCiu rEoWzfwZ4CHc8jGLMFqO0WpGK2S+QmrmXeLoE8PQeAbGycBFn1AGKB81FbOJ GE1ijL0QbscGyFQF6+VPtB7D14HS+G5qSlVHYfoNsGCYjXDd23jS3lZiopGD hLnmUbRREMuVKhG0dRajqmFPYwXa3TF2o8lUmd+vOUVogW1GCtPMdhx+ruTE iqRVzHXirjPvDmF3CCrD+4yMDwceJuAgcw8QUULMSZJ+JvU+01/+dza6sqiI QlEYWPKapL8k/bfUsi29dMYXp5CJClh/ifh5Te2jBpWwdDWZ5ST/xrKXHH/J mnIC/mLGz0zajft2wjeRfInke4K1MnVWlaMNT235gvusL6egnNBbVNst/Nsx I3E0xyyV6mupV0CLAKFKmhkT7sTMIwQpw7hLhyuMe0rucxFt+E3P1Cj7nPQz 4SX/qVY6fSTiDmdvcPAF+5+y96k0XEZdIPA8Zy6y/wWB5ZK1GeqvsVmLKofp 2cOOygt9wGA+PhEY59FgtSCixvF4erP3mOg4tdcWVTVWTj5SttTcS7pCdVzp 7ozDdBnJGbaGdj+QsZNlGxmljPM0X/vhlIxnPnOu4l3KxH/I+JeUo/S8KsXS ygUyCGYWi3kGZmsZm49ZESPW0nsxPZPpM48hCxi4kP5p9IlioJf4KDN7DB0Y 5SjDfQpEDYilUhAGgXSeKNi700RhNTS1l9ZhBwsZeO9gLFV0g3Eylz1kCgOm Mlj9XzdaT6axs2hrtBtPW5VfTJYmztgFQjXs5kYzV+EadTAUcSErK3xnsCWN 3YfIvceqh6x8yKonLH8oLdGcG6y4xopSsn8m67oIoGXcI+MpHm+/RL0nzM1n 7UESXxD9AY83TNA+qofG5PN/I+0FkR8E0NbQB10NOcaaNaR8T/AtQVAb34rQ nwqUgX8y9xIx55h/gUX3WPaMVW9IeyM2GaTbx9mfKSpno36E3OSrPWJRfUbK ZLqRN/UzhWPZxkXy4hlmFPoR9APD3zC9jO7X6PeG3AfsVTjqX7Eix1/xO0HG nwKH5j+j/yW8vuPQGTa9oPAxG5+Qdo+Bp5m6h2Pfc/CDKN/O/FtKtYO0KsgR jcRm/F8XJp9p4fisFP2EqkXUjsbHg60XJERW+Kg6qTQIopE/zb0FhzBZeHqW 3kxLxKJEmi/Tk0jfj/lK6uVQOZTeoYzZxKRzUj8Z/Z3cSYUQYi9icIIauxkw F8s4LDOwzMeqEPP1jFrHwOViSMNSRKtz9EKGL6RfPH0DhCI1ZjKjbYWTryzB wJSe84SBU9uNtip9my5IqY0JzcfIxE39oVQ3FzbgVwNoZSFNlnbKZakv7CDz IJ3cZRitur0w/Fs6yJBmTwcZmWyzgtqR0tFrP1Yy2b5W2Fjj70ZxkoxkLr/N CmVFd1n+gGX3WXFX/rniHivvyevl98lWa63efIrXqy/I/AHRBWw4QuKvxDzA 8ZTc6mh9fsfwz3j9zuJy4n+TY7LrfJbm8qjjFOex5gcyn7DllYx/ntCUg0SV fD0gs0xzG+4w/z4Jj4h/JgV8/7v4l+P/mC2P5LH5KeF3qLpPiMG9vmGqIz1c +F8KtebKEXtVRzPZinXJeB9gxG3c/mHkLSaVUfyE9X/g+YFxz5lxg7n3WfaG VZdIP4xRoSSqK++z7gprrrD6ukiFjD/K4PPSf9x6h5OvxTVZ6+vtoU/QPqnB uesXJDlK5ZVr6LxDOgiVU0Vg4eAP4srER72l0XKaJtFoAY3iqB5GZU8Zfhk2 g6BlOC6n+mYhD/TIo8NyavsxaCVDUmjxiRYvxJeqOzPgsgAGEbcppsMiBkcw aClDCxhTgFWBtKdH5ErZfMAi+Y+GyRilMDKFAYlCaBnpJFneqMky4tfQRFD0 NzOo7EH9mTLZ19xMRtQ7jqCusUwONhkucw3djYWu2W2qjGsNUfgwgdYqy4vV yXU8LcbLLJiBg2Dy3nMY7SaDmXV8hDXdfzxNnWV0yG48/jMpzmBPCSvvivHk 3BfvtOyOGE/2HZmkW15G9i2W3ZIXy0vlM14vvkS924SvJ/UA4d8SuwS3Eika zNd1SzP9mPuK2HKxqFr688OPsXUd6y6TXc6WN5z8JPpmOb+y9D6Zd1l6myW3 WHSH5JsC5+J+IvwHgq9KfyTwgkCdTe8ofsecZ3Bc4OWwoTi40HmJYJXmLtRQ +8661RzD2lvnMO+eJO9NVQj+mSmnyX9Dxl+Mv4jhA8yf4VqKz168VYQ9xoQ9 EosT7hJ3mJj9UkVZ+h0ep7ApZPFpVqpEr0wsaqXWmK2p89YKTWzlhRrrPdVj McWHRdRFZb71EolP5OhN8WMCNT/RYbUwDTotpfVC6kXTMVwqNhM8RLHZ+Bpj 5jM4RIZPJwbTXqHxRxQckoKYwg/WrySJSH1N+9/k1v3vhtDj56RhtI0GT+h2 hjEbMM9nZD4DVtMnmz7pDFvEqEUMXUyvZCmhj3CWXG+stZAJm42QuYyeUyUj JooqFrIla5vJgHljY6qN5Wsj4TabWEj/pWkWHZeJFLZtDpaZMt7YOoyGoVJh 6GIrTKrqDjS2lvGWoR6aa+cgR44OGie09om2BLuxM4OSo+TfZ+0D8h+Sf5e8 B6wtZ/U9VpeLpSmvpXbxqtvk3JII4v3svzM91f2cuI7AFOZ64p8o3kmFlSVP 5aGMaqyumc94LaKdFYcaDzvO9jwKzrH0DkvLyLonhb75D6WsmlEmRfJF11h4 g6Qfxc+HnyH0NCHfSr4QeZobuznxgJJnRN+l+l7xxl6jcHCm41qhWZo48D9H CPh6mhUXM0XtKuIzre/R7BSuW1l+iKUKBN6QxNP9b3ye430L70eE/47Zn5i+ Iu4JvuXMvovPLab8TLv7DDpD+CEiy6VIvljnEUt1ba2+NpW1utNnoC7qDjUS sD+I3QHaJ9ImjJh4Dj0Q4NdFn3LSZi0dMzFYRtsM6sTKDE5qAnsKRF5V5YlE ClV7UDz9j9LoF3peIe0M1pcF9s/5R3aiirML3glmUx6+yWlpf6++yKC/afU7 o/ZiuRHzYow2iADd8GyZTDTJxmQ5vVPoGSFlcENbRtvQ31KgeJ/xokXQOoBq 82Qgot54rbViLDOn1S2obi2sPEtHGbHpNp/O6Qyfz/A0Bi6m/zIqZYuPauKN iauwEUgVqn/9iXR0FWpxHVsZi25rTxcTbCzxncamVA4eZN1t1t1l3R15FNyT REmZ1vp78qzws9jYHdbcY+19vJ9+KVreonsCrt74O5N8SoZ/V36Q+LhU4a63 gmDHf4FVFRY18gR78tl0UWLrittipcuekP2IlcollrH0BguvseAq884Tpczp W4KPE3yM0GPCfNibyNlVbLrO7BtyoIAC4bMsxLH/b4XMIAx01xqJs6s7D2F7 PDteSmuyaqEoErRJImwRqzZKBanoD/Y8ZP9dDjxm/2P2PBJuofKr2z6w+R1F 71j/khUvGHqLCa/Jv8eOv6S8uUY73gVa3tlJi8zU1qUPy1v8bzuO8+kaqu/G RnpOIjmKk3cFxnfSyUj7dXRcQZtsWiyiRiydggmMkAjrcpuWSTLm2WMqYRks 28WoG8KFcNmA0WlJqLfrQ+Vc9KGxMRWdrCeEHuTqYxIfigfu/ByTvZjsxHQj pgWMXYPJaun0Ga+h7yL6BDPcDhNLjLW8RpcxMm3XL1Iz7qJlEqelsYyV1Tel xmyZc+xqzqDxMm45KINqCtFlMiIF4xTM9jPiAPVO6P+YKacWGofSJ5UqvrRO kkMz6/nS2Vbayo0cRL7SZjyBM9iWxKED4qPy7rHuAQW3yb8tBqaeN9yl8A4b VJ6lDUy9qfyY1/MvFnWTDiqZ9ZVq1fqjJN/CT23/X5n9DJ97cs9NNaDtWYHM FR44xcF8dnzPOvWH7suSqb+orFR5vxVl4rWSlTn9QORZGb0JP8ncEsKOEXWE hBNYraPEn8sZeJ+XQTkmMldlFj7UXESzcVJSrh4sb1paE5cgPm3qPpot0Dqc UYw5gv113F/hdZHAs3q05wxhJ0k5huMJpj8n7yXZL0j/RMoncbNmr8Sion9n 0VM2lbHhL/E5K3W6t03lsG9oVi7Eg4anpXqZuJqMtQKiOE/TaSSHioBzXoVF /Y7BOjnPse1SmiVRK5JefgTE4nmWfjeF+qLWqF0E9Y9Kya7XPvoqnD8P983M eShiRwqCdtJoanOFP3zC8GUkPhVjc7sphZoRV+hSKvRpiw1Y5zEuX0zLJJdv FtI1QOZ9DMcJ/UBkKybIlPeQKCpliWNsPVGIEK1cpW5Q3UaGxO2tMfCn5kEG rsJkMU39aV3EhALsNwslw3QrdVdQKYUOPoLWJs2jbRgN0mVys6u9VBWs5ugT yedhPUGi3u4UTh2i+JFYTtFDiu5ReI8NKlW/I4tecIv1d+ShfqosKu8J7i/0 7dI4qlM05k54LiToAjOvy4+m/YLLS6Y/YfJDKeZ00/e2wqKMT3O4gL0XRdJW mWjFr82/RV4Zq7SPSvmJeReI+I6w42JOgUcJKSGyhHnHBTsN38O+UBbH8PUS 6Rp7jMc6Sk7B6DaKjmO0j5rc2mtE3TQvplygz6/U+QVu0LIUy/PS/va7wqQn jH8sBOZx5RjdY/Qj+r1k9N+6gP+BuA/M/x2/F9j/wpTLeByVFv+IAvqcpetD ujym7wMM1dX9zcDjQqVglzSpVZKVfEJUVRu40t6FiAhOXhKU1Vr3aAxW0j6L 5kuol0DVMDoFYhdLWIm0nNqtZcIu8oqYvV1ySWmmBzB8HmM3YFtM2B/SHLQ5 KW5K2aeKgI3eMT2LAWekgOz/iZD7BDzB7Dy9rjJqO+MKsMjDZK0w8/supHso IxylEmU8lT6TRJNzsBUjQmiUKmRgW1vpCFdawlexwpfo54evL8aLZRSlTTIT 50ujsHEuE7dKKdXgRyiRdmqdOOn9NYxlZAQmEVSZrcmBXtJHtlnIEC+ZYraZ SNAM9qZw9oCoihXfpfg+mx9Q/IDN99h0m41q6ZWnusPGO/J6w2OWqRv+/Asy vyO976RA6emrDRWliQR+ulQeqBP/Kfokvu4VuZ66yT+yt5Bvt7LhKutusfYm a26Qe52V18j+SXrQieeIPCl+KfgIwcqcjhCuAPMJEk5itFnaXp2P4hZIV1MZ aJo2BttwAVT13UVJTDnzqhMqhdhwcgF7/5EQPPkzfd5Kv9K7iOTnHNvPIXUJ f0t9tVgTCVb+KauWrDFShcZ7jC7MTv5TmtfmfzHoT4z0xRpoC2ms6+QNvpyJ o5wSvrXVwvVaqmnSW2kyk3n+7P9ZQHUTbSQt1tB6uVhUwwVUU+B2etPBThgX ya1oeYO+V1h6mAPPmHqVShfEa7VNwiWRoO18c02EASd8ZtweqZupXdD/ARtO ElkqX6bfZ0wuMv8WIScwPEeLq1JlHb8Ey1Ss0zCZxzAvxjgy3gYLG6leKrTW ariMATbxkvllWydR/JiwgL5hcvaWk5+od3Y6L73FGtH0TGJMNt0yhOHgXYjF UdhHtb1Uiqeqr5xZ38KVXnHSo2k2md7KNU2ls5doTnY3wcoGv+nsSuDbfWy+ RfEtNt9hy22KlS2ViUWpNzfdokhblPL/Wx+TXi56Kd0ripZqy+9gdybHz7Ll F8Gr2bqwvFAvU6auJJjpy/+vxn6e3GJOZbP+R/JuseYWq65LsSv9ijSp4y8Q qYNR0BECDhF4hDBlTiUsOEWaSrsuYVGkJ8EPgKkImA+0w0ultJ7UWELtYGFl 17HE35S9yax7L8i2o/JRj+nzPcan+PofoTGoFVH7Ysk/Ujut4KVkfnnO+vzf 0SpLNXQp0bFmtw5zmfqKMjSaStFWN6ki0ftJbrXTaeK34XBaBBvJJnA1x6/J L5HDWd7Qeg0dl9Myk/oL+TpUmmjmc+ibx8RbGP7IwKvMTyfrGA4PqHtIrqJH AP5ruH6aTX9I/aHuZ6pfwfEo436QCY6tJaKDNFbX7ev9Rt+fSHqC/ymaK5B/ WfjqvRLoE0uPKLrOFGmyMeMYaSVjC3WNqNaTr0fLtGkro+p9lIHFUC2XuukM XohvBOM3Snu0ySZBg602SkGDYhotwjcf52JNT70kgLxWEjUCRBe3QQAkU82Z 5pY0n0I9S7o4yaSPqSU+U9kezcndFN6ksEw/36BIPzaWUqyer7OhlKJS+aey rvl3pcnSueI0tD/ou4utyzm5l8Jr5N/UDu0BeXfZUMaOeyx5zhhtTp2/WNSC PI4WUHiFdaXy+dyrLL9KxiVSL5JwjigFn1S8O0rwYXFQkUeJP0HqcTkrpPA+ K37AeitVzmpkPkmmh3wTRCusShyNF1DfR0p2YyI5kE7xBdx+wuwlbd7KFOqp UvzP0/Ulk18JkDu4j/w7kmjkl7NewbkH8qLgEXkPWfuQdY8E2B96yqE/2P2n WFe63iALtDmlat87S3cba/4hQ4vNjxOzlxFXpc309WbpdB8pFfNroRmerXPp kEOrFdRbyFeRtPJkhAuTE5l2WAgzXffhloL7HgYsp04gjfzkWPYeRay/LOcF RH/+klOfp9NhBmSz6qCQHxZr+lkF8Jj+mdzf8XpDg6fULqX7GjlEpvMCOgdK 0dt2MlYu9HITpl+DvqLwox69h4kcTY8IOs6m92w5MdB3CbOvY3MTq7t0v8ro 01ivpGc+rMLyAnEldN9Pw0M0z6JVGv9bSI819AilfazQ1VR0UD6qiaV0w7tr KZjZjmyO59Q+sRllBuvVQt+g4DoFN8i7wTr1fFWKfuuu/2dRUeVSk+msTxpS V9RmL6n5bCwh/yzrr4jtpdxk7kPSb7KllFV3sa7QgP2Cu0LVFi6m4Dw5P7Hi Cku+J+17Ek8z7xRRx5h7WPo+cw9J5h59kLijzD9G0knSv2VtmWC8NTexVBjm ijSLv56DpS8WIXwVSq1MGVNq6oWHI/NXMl9he5WFfaTtH8wq5fADdj4n6Ap9 3zH1IweKKTlFcTmby9n0SOrwAiDvSxqiXmzQ0E5s7B1bPgqGSfz8H+nUX/f4 vHVwd/xMM31Rg3ZKBc++4obcI2QvB8rlvwgz4Tda59G+AIPV1E+nUgxVHKs0 M2fKQnw2M/JH4XA6p+CcRJUkOeHFYDmO8XTMIuK9VCdWaX84/EtabaAAxg4O vRK3uU0XxMbqZpACG4c/MqOUzq8ZthfzhdLgGxqI+SScHLCdSW+FwE1F3KPu AJE7MzTiq/E6d3PSzZQZRC0n7qoMQLm8oHU5tUsw341NHq020H2DKDL1Thb9 286rGL+A2qvEMw/Nwi5Q+FTV4vhmCkZ2VPWgdjzjLJjtTPECTu9nU6lEuqLb FKnwV8bGm/KiUMHym2y4JS5l+0MOPGXBa+mbmOiaQGWNLqY+Jf4Pop7Js0Ij /r/j+jd+fxPzmhiFez9JYvjfXnvH2GPs2sWWjWSdJ/2cTEMo1B19TOZMQ/cR tA//Q/gfJPQA0XuZd1CkGJKPiUUVXZFvUvRA2o4tv9OJkicGAUz0oU0ArdKp 7ivVXU9v4UsMuIfzXdF1af+SKTfZfZfND9nziogbDHmN0+/s2c6xE2y7zZZ7 bLwnDnDjQwrL5XnTAzap9OSxHD+354OAruQvJ0pP/nJkeaDuYDb8TLU3mJ8k 6xdxSsqiatwidqv0K5Mr7O0t7YrotF6MocFiKkXS1gkbC2xX0etviWg9lhCQ yNDLtPqZRnn03ETEYjkvI/WlFOeTdRSO03+LvyXujCoSgs3CcoreC7dn4VUc 8rE9QOgd/H/EehNDcwXUdUnkG4W0J2GjsrBZ0iZuP064AXVMaTUWyynCCW85 QZpx3ccyeJZQAqbfFNKa7wsG/kSl3fTaI8qE3YpolinjNm3WSov5q+24r2LA bklJqu1n6DzpjFeNo/9MPEPk4IaOwYyzwsuVTfM5tZtNP+tI97PEr/U35KHi XdF1CkslDhb+zOFyjryWWxqjL1Ph2KmaDbXhd9lNy3RXN0v/aK4umyvUkfZJ 3PIEDTyMPlNJRYqnpB6jcCkZyv+cJvYUoSeESBN8jMC9Ap+URQXuJ2Q/kfuI O8CCoyw8wZLvuDKPPcfIK8X7JtXOwFoqz6aqG5386ORJm2Baegm9P8iXlUWY 35J8XFn+gAO4XWGrygLuyf/d9pK51xnxVoB38S4OfEvhAwofymPjE2nWqMfW J2x+wvoXFL5gz0cK9MoG6u8/R0e9CjKzkz4jQGVzJt+Selv4DFXfwzVC93L8 g4TI5hpHGWykXb6M4wnpN5TRPuQESbk18BEDttLrCKEqPb+EeTntNgsdJTaT +KdSyivScTZS38ZUPVSroqpKeLuuo/dWuhyn8V0a/0v1JzLDVfcsxpexymd8 Dj130nQb3RIwnC40TrOponLZ3YKm/TCYQI3hVDWj2gxh/oyZKGmgQYGUSW2P YHWcKWcwLaFeoTS+rZIwnkenTdhuw+qI7lNsxm6JcCPrFlJ5NUPS6BtKpWBh DFr5SpOo4WxMrJnpwoYESraT9xOry8QXrVeJ2E+svcaaa6y9zuqr5P7M6mvs vk/hO0nlJukN665T2jmae5b++T+sm6nvQ5geQwj4Mn/nqG1MgXaFqTpcIjSP vBUs2keiclDfEvWtrhUcIuAAAUcIOsjcg0QcIvag9ERSSuQIv2wFzuO4HMHe 3fhepsYeKKT2chkqZ7aEe+WvGjrQdHBtMwdSV7P6DC73BWk0uiG/effPgppW lZJzjcLXUkkw+pMpHyRYHzxD8R1tUVr/X0XALerxnJxfpHJy5KVEvbnafmbo NDZIo6lwPbZT0SweeQnne7Jxqv8mI58J2zjzyxcWuop6hbTNp1UOdRYJJamD p4zB5geSu50q5zG4ybjlGO9losqtsumXyuo85j2W23hU39IF2j0u0ftU7ZH6 5TQpw/En5pXKjk7S362ia9/kI1OPseAMM6/x9TOqn2WIJ8Yqp5sopYN2o+U4 mw5TqDOWNnYiEVPFEQdfJvjSP5/R+xlbTO9UGUZrd0UYWcTwTQbG8Qxfgul2 DA/S9BD159E7iJEbaVYsH+joR+8I0QkZ4cNMP+qsEwllExuxqE0JHN/F+jLy brPmji5j3pTCY/5tqXaqd1bfYc19tv0qtzdEE9j8NJww1rgiU5OFYjTeSNPX HqCx6wxNt5ul5fFN1Qfe4nGGfkUi+JyTS+JuIk5KrSnskAS7gL3yCN5HyD6p DEcdEZGfhCMsOMaib2VTUyKE//W++OcxdAV11OqsZE68DLVJachbNl2zAc16 jcJivsy5LPtL2iu1XsvxEJtvCzRaUyqp5UqVaPxG1G8Y/4HdW3JL2HxMgKLa QTk/s/ymcC3y7xN3g/i7bH0j/sFTX3Wcvup4vV9idTsATf0ds5+RL3H7kY57 qbaH6Dz2fhRsU1dzD1pvoO06Wi+jbopW29CBJmA2oYuwOsjQCIa6SjZhky3N uCFJxBQwZxuLbkrUS9PWG/tlmHGaLqH3/UtyZxV5D2qa9BnNR3XU580pRxf8 Qer8LnvpUEJ/b4wdMJwoupeNTOhixNDRgqUrzxfBz9bT/zd2nIwnD12P5za8 9sm8hsE7Gj0R4t//llBvsYiZdEqlz1ZRFat0XqjXLZNkRpWzItMtxfYIcbyG 3izMlANGGy2RWQkPDw6lc/yUGLy6afP+IPkJCfeYf43l51hXwqLvSS4l6yrb FGT9S+6nu96q/royMF1fXaLGhwn6JsR/OSHIo2JgSgPIgR/p/wqDT9Q9yaQs kXOZv0mYlgF75Ggt3x34qmdlVNqiBJYfJu4QicdIO07GCTJPCENS+SKDdJFu 62JP5WAGJYqY4bBi3RmPo9J4ug6rbGwq50qn7mXzNVmIQR/p+0mGUrcfZt0l Vpay/AaZV8h7LTSbkX9g84asQxSUsFJlndekGbTihjjk1MtEvZB4F64fYTq9 ctNXXSEDYq8tqucn6Xo0+VHKQWyj/jayFnPirdwKaTy9oM06Wq2mUQ5Vk8Wi GllK82ukH+ZeMvmi3hnojIsbVll0UF4iEuOFDLxI/PdSLkvUIS9OvwjR93OJ vs+9NFzP+Pyf/6ww8gl/4/OaQZeFYjqwVBzOSDfGOmE+Q3or9U0wt8d1mqQw X+VJV65ptMhJdU9hwgZZ5WKVTL3H5yfsduO6g07b6fwTRitpWkTfDdhsp8Ne kUe2W0XnTXQroZH6nlupugC20NabWakMyRGFGfOJzJnJT2t4ck1qLyu0Iw3V NjNOPxw1xddK38BYvWXCdCCbq43KSTv/+dqWYvV9TtGvg7VFeWrTqphQkHnh 9/T/QK0boigyO5XQeCICiQohKpzoGGmdzEtjwRKyc0ndJEMxgT8Qc4Hkb1l8 iqzTTMjSjNYjOswZUTVA9BsNQ7BZTr3pEvUqWwtDw2ISprGCnYqOip9RXnT8 M4lKQQ/YskfqYDm645N1jfy3MvQ6/C9hDmedoOhbcm7Kj1bcZulNFv9C+D+i AlGhIZOgLzxeO+RFWiJ7jraovo+wW0vti8IqqbtSajiJ+Zz6IJ+vWWFRyket pUUu1ZP4nz/DVbZuS5dVND9JDTfhSnWyJXIWCX4MX8r4dIxjcTgmZZyD2mZS 9F+vsChXHQQL9V1Vbn+Y3svb9Bdz1WambnvGQ4aWyReruUFI6eZTsHFimJVo Dam19kxgyHI6JNBwBl38pdbdKEmq4qHbSNuLVy7jV8u5EsEnmFQo2GniCplb rB5Fv+XCbBkQwbgkxhRhv1Mc8ngFBfeI2EuLIBwiqVMIi0TmdLorRQu5+OA/ Pv9ZfZjLT/oYqROatrFXUyiXaiC0Trfdl+iUJ03f24qbvFQ/Z+uEd5X+Z0UB Z77eU8HaUNO10+75mub7aFNIo1XUX0bzdNovosdCBmRgtIRJ2aRtY8kJ5r6U GovvTaltrt7NugNMe8awW3BMoyY/YY5VmVqphZNIs0rqnSVCKIaDSLLFLQ3D W2SdlTJRu/uy9O73xLQCHrLlkBRGVj1kxS3xugUfBPqqHzn+Se4JNp5htcLw d4XNHv8bYXdZ+atc5kz9/Tfo1KOCYb5Newy1cAY/ErGfGsdoeZ3Wx6i1hLQt nHonZlCB29tukNaeQuZVU6TfYePPinhRXZALOQgj5dAfk4l4OTPUkX7RIiZp tVucz05tUclftmqQvnvxur24XLvNvhpBzdPnnqzVW75dhUO7Tfc7MmTdyw1D C4wsRQ+2hyV9Rwm9qnW2pDM9A0TrplE0LeeLyLZjKrHzmZ0vgwCjr2FxBaNL tMnEuICO6ZrA769bEp509mXcKskuDa/R6wxjzwkzrUcgnjGMi6HfTEytmepM WiArD+P9p9y6OdoAYrXNKAtZr+vGJzTNbI9+vVUXk3doSzuhn1U0L9AXteIL iTdfv1OkVyFXI/ZV+j4s1wbm+zezVQ74i4zATLyK3Vn5hlbbsS1g2hIR7sjd RdEmVmWROY+N8axPYlkxs8rFc7a6ASe1p4oVWo7tHDodEVcgC5Qq0/pJM1m2 kmHf4XaP2ON0/xnXj2IAbjpGBz5j2xE2XvmPA5at0ti/vhjV3+SeouhHlr4k 5jn+l4m5IVfkqh117lvZMsn6YndpR+Fbgcy/J/MxlvvofoMeV6mfQ8ZeTr6V gFsR9VoUSlWneS41k6jsy0QP1iwk4w0NboluRu3RclBLPRMGRNLTUihGHnFk rubcW5kTzPzSfUjTTt5DJ305Oq0u0q+HaysK02folHzGQqMpFZf7XqbWATq7 M9RaLKq/LZ3N6TYGg9nUnCdlqH4eot3dK0JkPFskMVDd3ossv0W+HmqLvIPL I1pskfMZJyuwsVQgd53ZVDan+TSGBTAxiRlZcqxt3wz+N5Xqk+g4jYGRdBsu ctAzHMmKo3gP6S+Ie0foewI/MOsj0//A5Q+cPmD/B9Z/Yv0H5m8w+42xT0QK wKQcs/s43sajFK8yfO7gU86c+xJcQu/JiZBxT2SMNPV3Mt6R+Zr0D+LAs9Td eM/aR6wpE5CcdooFB4gvJixPBF4cQ7F2F2WwIbPo5ima8wO8CAsgJ5SsNbLu 3hoPN3+skeE6+i0lZrmUGmwO06+AurOk3xQbxP4dWB+i/3UZUzLfR+Q5tt+S Xe/+p5TRPH9j03E2XdHMnNvkXBfEEq9DvDKeJQqQl+J3kcib4pe8NB5OfCI+ IVPvpkJN4yzUSyydO5W6/sK4x9T5nVrltNzE4oOc+iQbp55G5q020iaf5tnU TJDW6rgZpC1i0nVqXxA+Z/cJdJ4gL9QqV58ox75PDCeiSOZxdn6JevO1UQVr i1qosVPFzi3SW95cV5vD9MFzJ7SNOXym3zu+OkHnOYywZuwEGeQ3GidnysgR S3OFYd7GQqrBtWLpmSX8GadibB7h+ICQ06w9zJpv8T8j5XdjLWLTVIezOm6i pljTVCvrThP9q+ozhTlfd4LIYjcwwcBGRK3HW+Ixhew4Nu9mWakmwj1g2XNW vCTrJUs/kfkPCz+R/CeJHwh7i9dvTHmJ1TMhQ/Yvo2eZONged+l5j9536F5K tzK6XpdH92t0u0oPBRFLGV4q55wO+5nBF0ShYtBJBh1m4Db6bZSzBXvl0GMp XdJoG0nLENoGy6S28v/94+mdyZQNxG8kbYe4zcnamXRQK/VRe6pCoYf1jtMu 6xqNfBkzgaWzOH6YiLM02U6Ts4zbQGIB20vJecCqf5j1j5SV3J+zfr9MoK+4 S06ZeCplJNH/CmK0/hvvk8y7KQYcrfb7MWkxx2uve1R77DxNl9qgna3yD63+ JOZPyQErRP/ar5dq2Hevxd7ERz2lVZG09pqmUDOCygqB21ZZEIDBIWEc1RqN WbRocVdaKzJBaqXqjcV2FpFLOHf1P/mXiupBsgaubtrA8rSrX/1lkiJP0xp7 6CSoTAOS0Togti2Q87yGW0udc5QdFh6MsheKeE1vkSDra027ZKosoPUiAndL BhRyHZcS7M9g94CZBwgtoGsm9XczeZkMShAg8LWZD01ttWa7I+0m0MKar135 2kXOLGhiJhKU3UdhPpYZriyLYUcxKy6y9CoZP7P4usyBLi+T0LDyvoyuLHnK osekviDhBeFvmPMW99eyLh73xS/53ybgLn7leD/E8zEzy2Xcz/kOjneYdJ8J d7G/LYIqJmWMus6IS4w6g+FxjI4y5ihjD2G9j4l7cdyDyxbcivHaQuAOMktY 9h3RV1h8kdUl8k+3uzicYuoNIVy1186hZg4uMXQ/LqPibJYzE1v5ExXB/qNk 3KX1JgGNvZexIJM951h1kezL5Lxh1m8YvmPGfXIPsu6M5HfZPwu/XS3WpH8Z /l4WyOM9Dm9kBqp4s6zReh3lV+sXu7RnWKubMm01Qq4ANtU006B3usSsnbrO IO88pEkBTReLaGRdFXEmMcWWhBB6nsKymP5TmbyP7DydrhZKhafBeDnkwjmM nWUCJ5b8fxZVEfUWaAeVoeFcjrbtLdq8XTSmctfFhNlPpaVYay/9XMVHGdsJ UarLWClGYSbjVKPGMNKZfkk0zKTWQowX4L6VyO9I3IL/dziflkWxPyxM4zqR cs7X4DBqhVBvmqjkGXpQf7bmc06j83TRBWplRwcbmYxoOp5u5owxxdmJVWHs WS+NtlVlEgVUHp39E9lXyb0htc2Vt8lVpnVLTCv1EbG/4Psa1zdM/hX7Jzjd Y+ZdmQsOfkjIU+Y+IeAx3o/xesysp0K9m/mEmQ9xe8CUcibfwv4nXM7gUYL/ SYKOCe83/Fvizkm1c5F6vkjiNTIvsvMGe+8I/zxDBaYfyD3DtOP43vvvnNlO f9OshH4riCpm0nfUekqVDTTVR4LG+LPqMOHnGJkru2lgBAEZeJXiUMpM/Uvc b+F4mbFnGfWQwEPiUpYdJPo6067j/KvUzdTSGPzFgI3MWiJ81Hy9ZFv0oVr7 9SxMjraoeM2pMPhXIOKeCqbBfUYvYl2OfGyOblFxhVZJYuctZlPblcp2Ig7m FsC4jXg7YJQgdrV2ISF5VFstkbHuZDnZzTqRw6dlFj5bg6WKSma4Rm5pOjla oW14xZcX67Spz9Q9vqmfJawMP8/X5+mmcdRoW4aNZ4gpVSwlealkLwdadfKj 3ja+3kCNZHq7MyKckXuEHmP3E47bcdrI0NW0Xytk/iZ+tJkp/YgOgTIj1nel LobE8b8gqZCrzKiFKW0d6D6RdpYicmtoiJMtq0M4vIGCq9IjzrtG7k1JeVaU io9aq8ueefeFDJxzj+z7MnwU+gLPX3F5grMylRt4XsOvlLllhN4Wuwp4IrLD Ps+Ezu31i7iyGeVMLWfCQ6zKsPpBdC1cj+J9DJ+TBJwksEQYLAknyL1E7PdS 0E7+jnUXpSutQlXGD6TcJf26CJQpSGP1j5yjUTVPFqtDFh6r6PutUEmFjTCH Dk44ejF3Nfbr5DhmVtB6nxyBF30Zp8uM/0Eof92PYPhKDnZp9Zw21+h3gRF3 sbuIx0nsfpE/YXkOm7P02UiP47IRQssIUAndT/I1Vj9lm8L571lwR7C3Zakg 84n/svQJY29JajAyhNw8iv8RfyI+aidfJVIlnJohVPOm8hSZHDeZzpQUZpow YT3D/fBfweQf5UTIAfnU2y2klA4XpWF9VCPwRdovpX5RDkz58mb6l+R6mX7k aVg1XQ8yD/3MwMv0SxD59yHWwuE0Hs8ERxxd5Twvcpjmx4BUOZHkq2IaJIrQ 9+wkJu5m6nWMyhn0js6P6XqUjgWSQVdNo2cwnWMwS8culN4JjNomCg8sp7qn BL56VkIy72BBu3Gi0DLCCHsbVs7lyEbyrggLTjp6d6Rzmq9p5+vvy+hl/l0B sStLZdYg7RFRz/FRmdpzHB8z7TY+1wi+TngpkbeIuiuwPPQhwY/wfyI+atoL SRwm38HyPuZ3sboiB1K7nRTN2MDjwiQPKyH6KGkn2VFK2jUiX5NygW1XyC0V JL/7CQvvEvO37D6ThziphMJbqmoGORgl4pwu0q91zsncHFF8Y1E5YBqzDwmW UJC1+xPhZli+l2TN4h8s/2bCP1h8YPRv0mo006065ZHqfKLxL/S5Rbc7NPuR hrelgVJLAaH3QikUalC53H+RQCyVgoCguCt0/5HOJyTHrH6M3vtouF+KAyM8 yVnF4n91G057rYYrJEPvHiMHbzUJEkb6iGxRwBixldHP6XhIeKRmr3Aqk4aa 6yeZgQ0/LGh8lfZIifqRrjF5tH6xUj8v+tL2qiCkLdfJwlZdA2yh/3SldMFL Q80YacrwsbhMEEk3DtHwMJ4RuG9g+D5qHhG0oBxm5A5SrsufUwg/6k+8rol8 fWABHbeIXqhxGq3jGJDMBGemGGMxnXapojFYL0COmGk+QfQ02puJAHt7cwyN cZxMbhhHN7NO8yrX3xbu0PoKtvk9IQYX3BNaeO598Rgya1BOikoKHuJVzqyb eFzF7yoRV4m7RvxNYm8TdYfwe4TcI7gcn/vMuIeLgkC3sLqN5U0mfI/Td8xW 3um4eKfgUzIdH3GSFd9y8CYJr/H9R8h1Zb+w/J24+jt69lPBYIuDTHUVLa+a JbpccJp2CplH0GcX7XcLYZs4BjmxLoI9F2RFlAVafWT2ZTaeYPlzwn4n6C8C /tFqjf8KB95Vt5JHajhk+hHzvyX1Ntb12ArxPRsdvJJfCrIaqR9D9HRV72f/ r6nzgK6qzL74zxlGZGjSe0jvvb2XhPSQTghVAgFCSaEbqSlAqKEI0oUAI30Y FB0cBRtFcQDpTRRBsaGjg+Mw6qB/C/9vf4+sNWvd9dZ9992X9/Luuefsc75z 9pZza3mLZt8JjQcZNHjA2s9XBO1g7xGB6hq7rvfQF3R8hi71ZC2kZhEFB1SO q/ieCW8zzYCHL6WauutZJp3RWGLyCbLvsfZNdeDvtXZSYd1OiQVIY21iMsmW Ossaq8cu8sl+9uN2WVj1jGvB8WfhzB6jiUsnPksTMXMmsHQlnufV0952otBs 9h4STuLzCmkGhxu8cUFXcPxhpv+Fir+Rc0uM0L2O4vs8/VaomUr69Y9Lo7Db ENzW0mSOpWcfIEqEtP44Bun3bzOJlN5Sa906m6PPsfNdrejtsIt6xrS2XVe8 2/EB29/X04b3Wf8eK99lsXEjV5l0ibFXGXuFUZepuMLUc1RfovaysHTNVaqu MuMaU94XidzQ9yRqNug6udfIu0y/M6IgLnuLiUfUclB1RPQ+tX/njQ8497V+ GXNBT3wmJdkdNn+5ep+372kZZdQoOeeyL1R1aX8Zz0XELyR8Lt2WS1BYNZNK 6TTtKlXfqfnN476lxWcEfM68GwLVqy3QXWO3VRbojrCfNdxmRrm2Kr7yB7V3 PmmR8Gw7d+lhMcwr9tWBtp3AHEk7S+aLTPkrY18UTejqj3nlX7rcxqi6vK/f 7Yj9y+oc/oDWq1RXLJ7DpttU2mHYqmNU1zFmM1HT1BxVu5OUbxj8HQM/IeQ9 Zl7gzDnVmf9sPY+r0XSVxefjG/m6x1vTmtbYTdrcdl/v+7vc2nz75eWmLmg8 MymbhDyNq0+r0AJ9wA0c22k3Vzy0gSY/OqD1lKLnRMWWfBvHEfKfZdrfeeo2 a26rBSLohpj35u/S+nX3Wxo/5CBdlpA+S/3wYsg5qHLEsLFUPo7bbDrNlk7K 8CIaZnP4WbZfUZvuVoOj3tWi6tb32PS+HXp6VzngqnOsOEf9eRnzzMuU3mDM DcZfoeICFecYf5pJp5hykilnRCk24Txllxl7gZLzovkafoWiSxRcpuACg08x 8i3GHqHsMJOPMuN1NUctO87XdyUp66K5+MVqE++1t9vB7/XzzvqR0oMaVDEO P8DWBtvtw20R3XeKli1gkh1sHC3WiC1TefYq5Tfpd5meN9Va2XCcv9ym4Uux uzT8QwWxuT/LMsve00WZa2tcBtMm3aHmzoOsvME+mnDD92pz2ma/jHFZvt9o nUW9ahsJ2E/QXmVzOd9w6XNO3iPyPSKusf8qf7cuxcVT2mUpZRuYf1AAO8im qM2qRc3kKBdtS8pO6jdQ+hpDTKr1CQMXM+K8llb/ZOsVrt5RV0fWUmtL0xqJ cKut8UywDfCPfIJHNcte5OKbquXWuSzquthUUvLo1Z+UQUycQtZqCt5h+AzS j2rZ/dFLBBzS9E3wNfrd5TGTAv+E82cqfmH1+2w5zaaDlLyCz7MsvajL8ZX1 lp3u8cfdFO5h518ZecTCgN2aqRkyl4zhxCZJBnTYYDbO4pXdbL4oNL7xqnyR Sfr+dI2tV3j6IisusviCZgqWHxdtcv27zL/KE1cU78ouUH6O8jNMeIeJdpt0 jolnqDjDqFMMPcXg0zx2luILFJ2h/zkGnmXYCcYcFVfVhGNK96YeU8jbdZ77 v0r/utaW5e/bbZu9E1/+ThnxEzav2Wd+zNu4nxeHifllkstosoH2o6QJ22yW SjqZfdlaqdxw4gVGXcfrC1JO8/QbalNRuvoZa+6K0LjyGjNvKDI+ZV3Q8F/J v0uYhVXrP+f5U2z5go3fyzP0/UmdvX8wwe4ivffgs46mC2m2iCZVpM4WRwrP qWz42GFGH6XbWbyvyHTfsPfCQ/eJ/pg5h/VfuHhrHeZCv6gEKrBEimb5w+ld qKJ0vvlfZlOyhcpqqmaL2uXyDWWXq6whLbLfc439cVw079X2Dz5ha5tNfqWt cRcROMt54RCfX9RQRnfbTeo/UYleSn9S+0tLzqeGwt2UVVP0hXoFm/6DhHuy vZS7LPlaHzTHer+R9+hzi35vMeU1Sl7VCGHxeZUyrpnvcI/cT+m2gZBVqtqt OkvfpzQWSrY0u92HSYshJUvCVauqOLiLrefYcJWnL2vbeIm1F7WtuciTp1l2 kvlvU3OB2eepPU3VGSrfZtwJys5SfpLxJ5l0ggrz9CSlxzSrPvqI6KeGH2PY WxSfpOQExccZfIIhpxhxnLHGnAyIOqY5jqrjzDvJBRvmvrRY9P1Gi9pib7fj 97lrs/Vtv7L1cyZeFCynjvzHSZ/CQyv5/VCKq0isFzjv8SSL5jHPgDRLK+r5 jcil176t5kwTdFb9R9S1ky9Sc0NJ0wYbCqcbiHWTZb/IPSbcp+A3Gq5ooXae tWdz0HFNUukapHqeZqvoOpeONVJDdo4WY7Pcfj0588ncje81er/F/ltiqSqz 8XGT/UfO2OzemEf2FVpuVPsHtaKG8+7Lo14imW+dKm2Flr3wK1TSNHuPGDxe su/a/D9TFbMbF8iqrH06bQdjx23qoBMLsY80I44e49I1vcQn0kBMziexgPRC +uTSvlpYdNHflDP2tV50vMVmGdZLD7TIc7QFA4P/Q9In5F5m0quMWMfky0oZ zD1ifEjqPOkGdh2oYc+wVXgslHybhCHypIiRli4pWI8FDJ/HluVsWsaGpWxZ xvbValqb/Tz1m1m5ijX17FrO+hVM3Uf1LhbVU1dPzZNUrWTaSiatZMoqpi0T a9n4hYyrpWIW5bWUzmesyZGXMPEppq6kbCWlm5i+kpo11G5i1g7q9lC/m7oX 2XCECx9yz/74Bl4+32hRJ6zbf8Puv3tfY8gbP2LyB/YizqBvCaMW0GqDFjFL lmgpp81mOjdQtk8KEbUfMf03gj4l/TAN77D9GzG9GP82ydwOtgncXJq5/6ce rcrXmWhc/c9Mu66e0gFvCYev+1ZMd5rK/JaMnfQyWeQyFQM7LJXwbrtJIhlL KiJqpjXvNUSNY0A9KTuIO8eWu1per7AzZQYq/2AvnMkoc1eTN4MZMyU+yzpN XrROoHmEhnqIpHmqdky65D+aJ7Yobh61BYFt1iyftnWDWheBkg3Hgyzy7/qa 1NM6pUu5rEcY7T0ZWssrR5lwgEdexrdcM3rmEuc9xuhSCurYvF9D07Pt16ux RbY/W5gx294CS+6w5hBjP9JIdbdrtH0Bx3pK1lP2tlq7OUXXg6IjEy3naPF2 ti2ma6kKCN59CM7GJ0dUxvkl6jl3G4BvGcGZIrFMziO7hJxykkvF1NdxBD36 kj1YAtl+xSLUCs2T2nWkeXshUYNEBN16om4331xx7/fMxS1PdI7+hRIG8i0g ZrA4ZwIG6yOcQ8gopv9IhhVRPpyZpcwx6XYVxxfw0Wtcsv/jhsbf8CkbOybY H9OAigbrZ2Z/SZsjSitSJlLSQMBaWkzE8RTVfyXUWNpbpL7G2u1sM7D/nlaC sl6n4T0tJE3+hAlnpShRZ5FJ+k26HiN0GxmHtUidNYugocxdqQatTpbFruBb mp21QWq+Vi4ClskBYpscuowRyZuzRJSqTfbwu5V0mYXfAeV6zk/Y/I2y+KnW isKtK/D6VFUg9QROIvRZnC/Zzqg5NB0phce2o9Qhr6mljQKHHU+raXldY5Xe 5UhXNKqczLN+e4Rtce9wntajJC/lGY97FD6BdPeWp3psIaM2qCAfOoReeSTk kDsAx0AqNrCgThRMld8w/kXmb1Uf44QfyPmOPv9H+hFGm/hyQ/7KAAC3f/Po Na0CPGKTXGPAXc/j/iaxB1SXYKkles0WI1CXfPwGiYaxW7mm+YJmET4Oz/48 PEBMel2S8c8Qt6d/JQEzJNzZrJiH+omLOKK/FOIezZIqd9tEHs6m80Bp2YSl idq6Q5oUCZtl0iJTCqSdzO2WTLs42kdK7c6RKu7r9r0lLGLe2y6BtuG0DpSu VmAUEXGMHMOWKq4v4d+7+M+r3D/I/Xe4f4P/XuHqx2oV2HidLbZ8Mf8LQi6q xa7bM+Q/h8ez6nMzrmn8fhyv0eJlOmxUs/rm00z/Au+rxL1L1T8pNaD3JCPM j/kjGy+rWbTHIVrNosNMcRE8PFzaea3KmbqeP/1DFUIax09az6XHE3SbStgi 8nbT6lkZbZO9ONfSdYPqVD5XcXuZfh8x+nlCPqfv1+z/VpRTey0EGm6vhaed 7GtzFd+rhN5SxOnxIx636fCV0rQWdvoj11YqyizqnmStaKs1J5ek10rrmqrs S6Ms3gt/ie7lku0L6CVp11apdE6lZyRtAmkeTFIl3lmEWmW9uFxi8nX1C8tw 9MdzNy0Wipes1ToSdzF8NUWzxH094CVRRJZbjzra3gguKagi69BMQEz5nsIb lF+XJGLbNQRWSlEluJrwKgI3EnQA722S0DVOI7WctMV0Xih4EFmsW89RS0Q1 kfWEryK4ThS13gVqVw6pFGF7aI3YQQOm02GsvljPGST2oVcRYY/TfZzklaOz CUvFw7jBFAKc0v3JzJS+Q2iyWnT8HfhF4OZLJ0+6d8KtIx078HAbsW0/4qBp ggR5W2fSsy/pFYwoZ+IoyvvyWIbIrNbfYs7HpHzOowfJ2E/1EZxvqGrtuZbC 9XR/R5fYaz3jtrP7NEveJvU0nlfxu4vjVTJ2k72XpGVyaJ3n0G0+f5xK2xnS aAt8QjNuzlcZ+N2DJN3ZaFRt3iR+H12/FCjytNWqwJ9p+asE4yoOaX4q5Q7h r5N2hpJDhBqseIlX/sFrjV0KO21Be2UjlnYVJVxtQq4luQYLvItsrL9g37LD uugGW8lcam2syF7QUdY1mZy062f4z6V7mdCLcQUeRRJTDsogIkUU0N3j6RhE iPnZkwhLEsF4fL4W9fzzSM+k9Xg67iN+NG0WSx/Qc4BUPNyGUDuHk9t44wvd CA02QDxpt2qLuPqZj/43hVbI7PGdjDtAvzmMXEz+eh7bz4S9lP+JYUtJqSLY isoNGMrQKpJqxRravy95fSgo1VqG8WOOSslAhxUSn0x+AUUmWg2jpJiyIm1D B5MeT1I6uSZhKWBYHgVp4nSKM/9IEs4YIqMIjyImjDQHiQ4iI4ly4BuNVwTe 3ni44dEDd3eCAvHzsdK3kXhEym+3CAVfCIIQCAbz1E+tles/lOJD8CWVrzuf ZuxZBhyj/d9o8zSZz9HjJQL2iRjQ/c+MOEL9VrKe06JGi6N0Woj3cqIXae2A bTR/mg6b6LaJoJeIvKka0TDrARbba7rKxtlKO2IZbZOCE/a4y0UUWhqfJNvX 6jxJ9hkxD/A6j/5XnJxe77H1a+GfOgt7FjSOwG+0tcdd1u1MbhSAG+ISg/tJ E7IzrRE22Pj+F2tsz9nzF9oF4nhLSBLrGo1/S5W3pqXSeYkdRGKGWJvCcwnL IDxJ+rCdYwkKwRlFdIIkFE3UC8kmOYcxQ+hUje8O1c+NmbXrR4swmofSJpSp Q/jLnge6PHU2nSy3kMPA9dgfGXaK/g10OUTbHfhsIbCeqHotXoybQvFECsYI Jpl00q+/mMp6GM9ToC8WPFBUQgGZBPTFu4SQcVIe7D6Crv3okSct7y4puPWj U1+p+HXI54+ZmiXsnkm3CLpHSSukZZJq8u3j6GIMI56esfSMVnw3j95OSUp5 RxISjm8wPULpHkq3ANlSqD+xCfRKID5VYnBROdJrjkwjKE3xNziVgERJRbin svomT92g5hNCrtH8Hdz3kPECCZf43Qu0aqD7XFotJ2CFBFUds0hZTspx/mDp K03E8Z3L4LVkHdeiTPB19cOE25C0zvqE3bZvcF/jvTnfWsJy6+3d7DLZKnvC ChsLBtkI9SAsfkXmTWXx3h+Q8W/CL2qqZbvVkZnfqBg4x3onl4+qaSzFO1wr y7/Q4gfC31fJK/YzmfE6i53WN7K6VdpywRhLwuxjv7PbL3ReS+gEtaY40zXD 65NNYAahvYnsTUimNDU6OggMxhmBIwFnGtF9CMwiM4fSYWqJb7LajrqYe20B TUZKIyZwMLNma2pjlrXe+rtsuy33ONamge2+ovNndDonWB44l+QKoor16Zmj tMos0uZZuPchbQgxE+i4lDazxHrXZIxaFAKzGZBHnxLNOPvPJ3A67mM1Lppg Ylaa9LgdmdLLjk3TFtxbUuPBveR2YuNE6RmZTFgvbSFxUuE0Tjg+RW80IMpY SEg8gQY1xRPmJNIpt+wdRVgscZEkxJGUKZ+ck0l2b+1kZZOWTK80MtLJTCXF pMDZGg9ZcpNpNwm/oEhnQE7SX9W2qkGYfZaIfpBQX0wVvRfQ4VVxpRZ/rJ43 bpOzX40HY+49UEFaZiPLjvsP5nbrXCMbdqfOhiFXk3O9baRvZ3HOVHv+VHuJ F1nM49JEy7yjhUv3+xqH97guZZm1/1JEcwHp2vsP9EpmNr53it2G2oS92X1a fo7zY2I+xvucOuWyrbkWN1KRuM4fYb2T5y/Ef0nWDoJzCe6jVr3AXA1yGrBk bCkqXyRRUblSTuwcaS0qGmeiFvUS84m0EudjZzDmSx47RN1WHl9H3mIK5lBc yYhFDNvJtDv0/YpW79LyQ0ov89SbWh+pv6x+xYE7xKfnVq081JFL5CCxW4+u Ye5oRoST6CQ6XSsvM4dSXUh5JkPNhXMQ5yAmnf5DmVDMpGyGp1GYRmIi0fFE JRPTi9h4edFoYz9OHE5inARGSFo6IkHnxDj0GO4kPF72E5FGTIYWlXolE9+L mDg55NBUwfjoDJlZXAJhDoLM29OJTCIy3RpqIjGpxKTJjZtH48ZjsknKIS2T lAzJV017mZrnxf7d7hU83yB0LwnHVD/nJXEiGYsKHk7JUhwvqDTd7TvS7xD/ FT0/YMJ1Nn0qPLO0caJwhr3oG6w3cLXBu2g0FlvTWmbPXGg9zEhLmtHFnvak dVwz7cnxthyU8xnjP6Xn93j8QuRh0k+x/V+KVjPs+S5Zrmr7ONM6qEob8obZ kJdlxw362AA6orET21Unr2nEw0JQZ9R83m6W3Msjj9O5jwwpOoe4fDE/RPXB 0UdRzJmvfa8MKUwFhZMQg8NYVI5azeNzGTWMwcYkDuKzmKKJlE8WnX7A6/i/ RsZzFK+hcg8Tn6HvdEKGa6ghZIqq+kljhWYTBuovd0+mU5xo9p3Jiiyd/Gif wR/jaBuEWzAdvKRKiYHB8VJ1lJKjEz8n3YLpkkjzaLEumOBlIpdXFMHRBEXj H45/hH0Mxj8M/0j8owiJJiKGsChCowmLJtJgp1iik2QPkYlyX5H2hEhjrvHE J+JMUqHe7MQ7iDc+2cS7RGKTdb6BavGxgmHGZfWKJiGJhBSdk5isu8DsRC3C bxoZtfSo5eEr9DyOczvDj9LxlKUNMbgok8kTWbGcMbceUOoZB5X9mWialt3i wG8KXosbhynGWQ8/rfG6L7TW4iqhz20cFphvz1xsfYWf3UwAqvuvMEaVqwB+ H/fbZHxHy69pcxqvzWJb3XJRif8z9g+6ZChdzqquMZ66ZHNdQrrmE1/9gePf C5mvs+eYgwt+pfaO+nKL1hM9Vb2pTSsktOFepHmoGGNLeSQWktyfuH6ypYR8 4voT3w9HnniQepgQEEFCLI4kiXKm5oiHM3EAhU8QWiGK4Bbj1YA9t4rKxerR il5I5xmqZjw0XXzmbVJpEULzBB5K1KgOafwujUeSpL3V1Z9u/oIxXcwWhnso PsH4+OMbgn+QdryD8Q0jOJywCPHuhph9u5mdsDDCzZFQwkMJCyU0XAfNU/MY al4Ktwcj9M212b8QESnsrZciFc5MdAt3EBVDhIluMfa4+ZRYQk0aYswsnNAY uakHZ8YKw4e7LNO8PVxHjH0aK41wCOGbfS2obRKzrt8aNR5wmKgGMrYT/6GN 5ov5/QQm17LrkDxPme3R1WD1y2o4GXZLfmOptZNFjZl4qd1GWC9RaGHVOHuh qxoNoKZxyWO+RaqBlr0h8SfGXVA/T9UPeB0i8IbKTQ99o7KVuSgxyyl5Rj2H 1XaVpPx/mgdG2qxtoCUxyLbL0+53SD1ByZv0/U0VsJ4mtfwvbofxXiIt7Jbl MqQupQQNkMHEDRTcjR6opDu9DxkDSBpE1GCclmkzyZwwSL2+vln0iNFFccTo Pk02FtWbuBQB2vbjxAvRMZs/RNO0j0JYYgVBk2i/QOtKjIGB/CGBR8NpG0Dn IDr70dGPrgF0CRDodfOnewA9/Ojpq627n/bdfehpjgTg7qfNLRD3ADz98Aig Z6A9bnfczGOQPScQD18dNDs9/e0J5niw1KXNWzyC8AzBMxSvUBmnt93xNDth eIcLh3tF4h1hXwqzp4XjE4VvBL7hOsHsu07zjcQn1J4ZrkevMG0+5oQQe455 NQK/SHKeIK6cjDrijln930N4GNNaSNML6jlvspQeFSybz+FLQkETrAGIyfAj NQCE/PNBy8EKi5HWNpK1rm1sN9pkXYTLiVVb3zXdlhFKXc0tPzH+R/p/T5fv JJje/CJ+h3AYiz2u9tFOH1r8P1fNHoG1jKilfIuWNadeZc55llwR4X/9f2TP s2ypZ8a3zD1H+mXcz9DvpPpdjckN/03RvHeZ9BPb59NxiDTIHIWkDCR9qLgL sopJHSJK3tSBZBWQN5TUoTiHCSRnDCJtsFg3TVZugLp7hO5fR7RY7o2f75Uu fJVYICjSaTQP19BlAO0jaJ5F6EjxkKSOkw03ncfDRXRMxC1EmzGAHr6yIl13 PzyDrJ0EPniqx0BZhbu/zED2ECiFaPPoFWiveJCuqaf1Y8ZmPEL0qowtSOd7 hdiXwqVRa14yT3XRQ/ANVeLmFSENMllLGH4uY4ghIFqlSz+T5Zm4GS0Q7hWD T7SOmJeMCfk67RaLb7yirXnJ7JtX/W1i6J6AVzzeMfjF4WeP+8X+Pz4dIog= "], {{0, 148}, {198, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{198, 148}, PlotRange->{{0, 198}, {0, 148}}]], "Output", ImageSize->{202, 148}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->262546522] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Pooling Layer", "Subsection", CellChangeTimes->{{3.6883813314319687`*^9, 3.6883813431243687`*^9}, { 3.688381641695394*^9, 3.688381647130719*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"pool", "=", RowBox[{"PoolingLayer", "[", RowBox[{"4", ",", RowBox[{"\"\\"", "\[Rule]", " ", RowBox[{"NetEncoder", "[", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"200", ",", "150"}], "}"}]}], "}"}], "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", " ", RowBox[{"NetDecoder", "[", "\"\\"", "]"}]}]}], "]"}]}]], "Input",\ CellID->607411031], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["PoolingLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"KernelSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Stride\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"PaddingSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Function\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["Max", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Channels\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"KernelSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Stride\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"PaddingSize\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Function\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["Max", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Channels\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["3", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"encoded\"","\" \"",TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"3\"", "\"150\"", "\"200\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"decoded\"","\" \"",TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"3\"", "\"147\"", "\"197\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{284, 107}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->969336104] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"pool", "@", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJx0uHdw48eV77tV79/77tbeu3vXK1uWJVuSbQXbsiTLCpZthcnDSdLMkJNH 1gRJo2jZlmXLliVbcTjMORMkCCIQGSBAMIEEQAAEiJwTQQB07at6dave/++c 090/QN66VYddp0/3r3/96++nTzd456XXj136v/7pn/6pG/7c8If+TX38S0MM ylZDotUQv2mM3cIyDmVr3RJthnibEf1bxvhN6GBIQJ9WspsmtC9NsZumxC1j 8pYp0WpKfGkGi7Wa41BldtOcaDUnbpmTrWDYB3qCkySH9UneMqaoD/ZsYz3N KezGfXqEBrllTrWZoCnVbkrBCDfNaGxwcFotrE+yzYQ+joad4fEUBNtN1MRf lGQTQ8Oe9CILi3C/DeZgTrVakmxMNOhgid/EEnywFJTQjfpzk+LYxC2FZuVB /hSW6VvYlLzFOphTFEzht/OeSWkcGPmmNc4m/CU4lngrTQaX2gxTAovdtESh epPWn/W8ZQKlIhCBdW4z0YdjGW+jEehDEnye5lT3XKizdapN54fPbOPvxZm0 WhP44fhIsh3jiVu8TLRjH5KMB5PAD1ibIXHLkGw1AhjgCKMqwcN9YUhXqymO szXHOTxIAo5MkvH1bxM+h8EkScN1h6VjfdrNfJHbaM74lPgi8hNMOFKHzTzF lTJzTUkmVKSVSwYK1hVheLSbmWrwOr6GbXXV2ARY5zoMt6xouLDWZOt8Eqho ZyPPUxwgsVLVKmFDc7NyhKgJynSHJd1uSbeB0SPt1jQNwvpgtR1HS7ZDKwXb LXxkapUGRHFRX/o08uNMWWat3OJi5Xm8U+W/1aNtN8X4prDG2xCGRKcNhuIG E2ifT3ZYkqMznvGPOzp0njYKihnymUAfmBubLcyww0JBWFKafJvoD1mo3Zhs N5LozIzJNoQHSqgiPG0IOZRx6pCgrVEHqR1KC82NFEftQERrQtpi7WbJSdGO 44S3M+1wnetEMdXaaOn4ekqzlfSCNZ9nH5XGb2QLDnLMSyokxQc26EJV9gr+ FD3IFoQ91Q7vnQfjT93irckONFhSbvAiKDsABvSxCpNp5fG01K2DWxp6gnWC g63pdivrk2bG+oBebNh2MXjbfPoWjc9faqUXCWMwMyTa5tHa6evaBCd8h1qR n7HJ5b4/3WzXB9osLI4CtRsirT2zfbPLHchPogPXM9GtDc61jn9x6vKfOsbb LHH2jTDDTkBuPtlpZbNlX8fmyVrpSzl48LEpTIzmZIcJTwewNuEgNujEWYSy BOLEEKLpJYiKBJOGScaUahP03uJicXhAyo46Nok2vkOZrFxcgp9U5gpy/5aN dvc8dZM+zcrFJVGYxKggZgMKdsyzMVG+Nhv/dlJZiGVLtNuwG2maBL/NlqT3 psmom43WzSYW0JbCPvCUDcfkb8cg9gRCOm3pDjTs2Q6OPd1uy7TXIxhst1Np y7TZ6SnR1EGYtfNuLJ5ut0lI43vpYxMdtBSMKDb5Noq3s4gt0SYivbrg7J/b f/Pixb+NGdsMwQ5TuMMS67BEOyfW+1tumNsG+rT+3jnvwOzaVOeU+o+fWa6/ 0rX/xPVLb7aZQp3iczphnvZkh5gqWCdZF3SYz7BunSw+j18K2aYdcw4mkw5K PsiYOJ4ogrmR8k+cJSKBQaK9AYx6AmTpVHwp230sf3ZQU3t93+EeqfehLcy2 P+Ixn+kQsnLVpH1BGx+1Y5+AKtP2t9H2J4rabbwnocJHEBsNniKE7PQg+Nxh bCQZDySrIMQOJi0vr7bZ06wbPm7ntFD/TKc902UnohZSHQusf4qWndafNdmZ kxJGVaEXjQkzQcPB7QkgsI1PO8Ed3BG01LA72Bra+O5gcVqB5NCsS/7ym394 cn/Lvhe7X3l79s+fzHzWJv/wC/W7f1o4d9Fy4aLu5deMl6/azl1aO35s49jh tYst6pMnPnz9dx3zUZhS50KKyiR8exfMDT7EDn4aPrCbIrQsYBkqUwRYugNA stD5SFcOOibwkOq0AE5AWgodK+4C4KfTwohCYDp4HmDfUt9QyIxNZA9JdFuS Hwro0PHBtjwHQ9rI9X1KWQLPjnYmpdi8tNTUwd6oO3PS7BHc44RKh9C63Z5p t6elSJvAo52nC74gHSLYtoDdaKHYwqLfscAshaU900FUdBI8wqgDPpLBDgvo 0IJnuqmEYCcG0+2ONLWm2h1Jzh5ZJ4ctLcnHfIYZyxg082QH/0AGXqKD7Q57 An3+FUmCOTk1YtadPT999GjTdx55/+GnHC8e3Tj9gvfIIf+hvYGD+zYP7t08 tD9w+EDw6KGto4fCp495Lp1ZudB864NPu+0J9u2AUNcClDRDNKgCVCwIgCFR 3RTsovVpX5AuG/ziQRcJhKoT/VSnlSJIfoKlC56LeIpgh0KKJXmx05lYeEbc 4kcGNfF1YKkg3ciPxANDvZNtChvb43xr45gwWxQXW0lT3tTRUJV2jWBDdFtA YzmBtUowdNDW66R1Q9FF/y7GgCPFSGDWwZ2MYIwH0agn7wDYODLtjgw5aF0L mS4HGMYRNrKO+pgpPix2ANhSHY4kGWOYAyxSX7KDsgeChA4aC6KhA99C8YVk vzUy88X4ypVrpuPHm+965JMHn5p84ufuQ/v8hw9sHjoQOATlwc2mQ/6mfZtN B/1NB4MXzngvnvZfPdvxly+7YHAHrYAjhQgRNlRNdkEEPgq+iD6ENUGke0Fs HMEPgIQlcgUSM59nmM55vi+42Xmu7rR95cDtqN8H0nzXs9Wwi9WwpQUAXwGD MgPb19IaorXjaicZRQQG051tGZYoSJT6HqdBhEwdTDjKM9CzzZFkwU57RkIC V8PeCAx7ViCxmAKjBUQ2xCLTrkTpoQrdEJjORdZKRC1CFa2DxRdxnE4aBIya 0t3EGOpF47QvsvEzzKHBUU2GVjsaSJxkCa2e3BakBJLkHLIgSY8JxJEaky/L OpW+d961v/jChXsfmXtu7+xTz2l++az38P5A04FNoAucw4AWVoPHjwYunA2e ORoErj78vNuR6HakumHasAi4Dpku/Byccw8ghHFWRcB6GFfkA12Yi9ivFWu6 ixFFV8fOxhsavxuwtJzsFLo3MiBdEhhCLELZgL4URU928WNF2qGcLorU0wJL FFRmWIlg0PJ21rcMOZQZaMuwpJHpYPvFwaFi6oO+OMIikUCtnbTmtMuyggeW T0B0YCndQfpKy9glEOpg/CwyYzjBU1kWAadrESyDaC1RBI1hhnFhuP7s8S4B Hn/FoqROmoHH2O5YTDLSWArtQMyIKOrAJilmlaIZ4oAD8/GxduXYxOLmb37n OHXi4t0P65/d6z90QP2zZ7XPPOc5csB9ZP/6oQOrhw4uHjywBIydb3E1nwqd Oxa8cu7m+x/2LMQ4PEupHpjzUrprKd3D5k8z76YgGvk9aKluNhm6UQNLAFU3 oDWf6qaTCO75YN02cbzyu0eG3wEIA+jZZWPJnA4Ru7Tfk/yT6SrCgh0LDVSw R76aJXhCwD6pbjvIncWzgx0Ni1I2TrMgMZDtEkh08vTCFEx1Lgo5GAMsOXD5 2Karg0QwiMSylII17OQw0OotpWhh0511QjK8P6wzo2Up27kEZaZ7ESwLDnaG 1mUqsSmLtsi7YU/hiDFTXUsc1y4BGy8pXXRyeCgbsMgSCwp9aUdAWVd8MT2u dA31GcaVvs133wOuzt79cM/Te/v2vvjZkZc+OHjtk9PvfHLh/U+vfPTZqzc/ fau37fdDmrc/sZy7Fj5/avPl8x+99k6XLQQUATY9SxlmzIdv5HEAaYkbfilD jjDrms90ibtNty0D1oMO+l1IVIodE531VMOOWpQYenKJ6YTtttdvCPwQQRLE wcSpwETRyQ+RNMsMjJbOhtNEkCPxk2FIIAw0eXZX6eaQUDd29Czh5upkMODO ZRgwgTg83YtCTbYatOM6mS2nqEodluhBgGSZrRjrj0hwKpZZNcuw6Wb+crZz OQsr340RqGaYdS/DOJlGrrqXBHXA2yKL04soju+lb6EzKC0ZR50bdaCZ47QX MyA3qY/loD0+2q0YUHvHNX7fu7+xnXrx5A9/+f6v22+OrHZoQ53GaJcl0WVL oo4ISXbUnpR3KRUdGu/V6/4r539/7qV20wYA072c7sH5g4Nf0YOflhGkpSku wFvM9IoJsHtyz3yafjkCVPDLBW9fWNrTPXa6+ZOxA5QdQFKwu+FUFfcH5Krh 5GXnCLtgsDyf6RLXki5CopuMt4q0IKRHp4d1EEj0oBBZVu0kUTp5WuBO51Kj OkygtJQfuhfrPXsQD1A8y7MNr9LK1LHJSMbXdjkL1o2WaeSnZ5mj1b2U61nK sc5dK1CCn2V09SyJB1kr6MJeQQJxaElEhh8dQBmJf0qDKTLsT48LdJfYsIhB 71JmUu3q71b1W2LjGt/GO+9aT7/w8vMnvpRZe5Y5KsKyPSvoyPT+sQHt5KzH /es/bF298Jfml1o1KzAO77bCZovzhxEg3ktvwU9eSfcuZ3uXyFjnpVwX/gRG fnrop2KPHS9gvYKcngXQFMtuSg7dPAnTxmG+g/n/kL1Tkt+NBy6npXuRc4Xb mQjpdmRhnB403ONdi7zs4tuZpQKxwWmn0EGDBwobgW9zWs8uIVN3/SmmQlqk lzRPR8uQmjJddUOtYcWAga5llnPqTUQCw4PhhJD0Ehu42ihKtnsF44K3XC8a BdGgD8VFZ+YzQUEUeilhtgJyp0USYKohAF2CwJ4VkR+oA5MbxuliI+NbKLKS GXYkJwd0/aq1/vnExJzP++t3zS2n3n/5vc8GjX3LGTAAoH85B9a7kgUbWMrM jpoH5AujuoDzj58Hr1++dfV3N+ULCA8NiA4jkN7YR9Yr1qFvKdO/lOujr2bW Y88iWguZXnumFynCstfBUwQpnu51ZEn3DF3M+BWC7hJpnoR59qYTShwuLJ/0 LPLM2d14gvAjI80SC++zWO+Dm4KMVOb7l0nPzp1OokjsbraJcqQ+j1PaEXuZ kKCMkW1IODnOw0o9/3StsI0JDjEmsbSaAWPdQL5eJgf5PSu5bpQmR8aquR6K 9JHDfIRqNcueom6ZHj4COGky/moO2ApPBcyhPEBcraal/jQm6k6W5UZvkSlW B/pV/fMh4GoSuHrnHf3ZM5/8qeuTDk3fcqpvJcusn0roP7EQn+1RDer8w8at xY87/Ncvdr354ZfDxj7IRTD4qvQK7gCQ7ME+Woq+lQwfc5kHCaQslmjZXk4C HJTg8+tZr2CDnZ4MrR5xiLAMQJkhTVKmpUzODmJK/mS4B9mpke6SzuulhjOF RzhCFKdkssRVBhh6l3J8hy7/YxKgFEHdOBXp7hVGEarQS9kDgXFmelbTAgwu PTosjQhUmBEV2Z5VMNFzlRBazTERoYmAwUjfarZvNdftzPY4s1jFIPVfZYPA e7FnD/NpZCSWiYWtmV4udIY6pznPkrIw7VVUkKo0FIzvzPQ64b3Z/tVc/ypO aWQxOdWj7Fev9dsiA7aEbM7ne+cd88Vz7W2yz1qVfY4om2cvPoIODDg755aN mgYt0RFjCLm6dqn795/c7NcBV32rmX7ABt4LgztxJvDUwEoOmcTXZWg0HKcf QYWSkHNk+hayfURUvyPbh8BkCaoMnZjEGDtG+dFJ93+mI88qGEcRxeHeU+/P he4Wpzk+spyRYOhd5niwIN+2lC7o7MjVj4xlrnIPT7a5nmWWH7L13cpOFhKC ZR4hEO3rVYEBLg5DhUcEORyPXrbslIJYH2E5jDux7HOyxcz3OCGSh2Dvah71 dYK41I1UZg5/nHhjKvAq6YI4EXJACMmXkYLwLCdHzF/6CmIJXpTv50Tl+p1k q9lp5erokH7QFh2wRYdsSeBqA7g633KrQ3azS99l9uMcnNl+Z3aQJjmyklEN aodnVwes8TFjePmjjs3rl/o/vPlxm6J/JU3jA7qZPm7Z+htpK9FX8w/vZ6yu IEJ9aDlGUT+vot9HEYj3LTEpeTbuxTyQ7q7nZyrZycszvDju6xeMjJT5GQN0 ZLMMwDdsz4rUlMOMAQCwsnGPc7l5sqXrQY6C1K0uE1ZJDoSBZw+nUJmqEiqM FrbjmOK09fIMIUYR6NW7BuOgjn1ORheTBliCSL4fS+zTt8bExSo4fQw5dLI4 CKlJcXo1pZoeEgtn5ST5Vpl2TLJMH1eNW78kIi9zA2Q4h7XCoDM/tpgYb5MN 6Db6F6KQrwaBK53P887bpnPNN7tkncOOdrVzwJllRo9n5baIvEcxZN4anI+P mUNLH7f7r18a/LTzk1ZF/3JCmnA/758DGvGlq2j90hyAcOYTb+waDwj1L+b6 oRQGByXdxNgNLUeXPUQLqyI/UBOmZQ4VpgWx/SnD11FZ5acAE53J18PSeMNO 7OO3lHzvap2iHmdjbpGo4AZa9whORGtWahIMkONkWpNkxANjA2DoRQy4Xqxn v0CFnsoP8Go90o9BtqqF/rV83xrIilCBQ0LzEaiJY9nPBqdI3xq9bo1zwrUT cZ55RIQ9C2OyKowJ/AxSdQB8KvvX0QadOYViZaRPPbgQG1xIDGCZnAKu3n7b eK6ltXe6V+75YtzWv5ZlNMKch1Zz6pnFiUnr8Hx8yBYfM4WWPmrzXbs49EXP Z1+qeu3hfv5SZvAuoohNaa3B2CqtCcY4PwBVfmApN4BOjv1SwCZxXEpGF4Ac j69m+X1AsNSz+hWJxSmQqyd/ysC0N3PSsdIrMgBjBnPCKkMiyzvw/CA6k/UL YHrZSbT6lSaeTNbqRIEKvVx6IS5KLyJOBgaSAA6UJFaun0cwGwwAQhTp4/EC BqFcL/StQxAegYxRGFjjTw2IAQfwET5sPyeQQUIC8dFyKPdabpBM6FWfwwCj l/GD780PrOcG4aXsvRjMT9qjE92KIb1vaDEx6EgMOOKDjqRc6/O9/Y7h/JnW vulhffiTXu3AWnqQgASTLaWUXfJhrWfYHh+2xSdNoZUPv/S9crH7bzdbu+a6 LD42E+xMr0Bbp2fZ24HMtfyQE6dHlhtyguWRnxXkCm9i5IODdC3npWsYOAMr OXE9y0gHaz+jhfHjrJ+zAg86QVbFEbDGskG97Hfyvdzv5NcDKV2Q0KyJ5Yoc Sxd46LDl5Rjg1qgnmbV8Pb2wI4m+dECwwbFZz7NIn4TNOgtSf+aTdlw1jBQG yMBBlsgfXCsNrRWx1SUeWS9AZBBfirwNuPLYk4/PWW2o8mwjEk4OOGHSwAhD hE0/nwC+bggHx1cMuvLgD/JIkU9mvTDiLMxOzPePGgft0cGlxOBSctARH3Kk FHOurXffMp1r+dutwRFr/NN2df9yHF46tJ4bXstpDL6pvtkRa2TUGp4w+nXD mqXrv/K/cuHXLZdvdag6tGuMXjR8b36IldwKvORgFxh4OPmVfD8RNbgCPpS5 weU8+XnMZisMjAb1KS1It0TM0ngS4Y2in50y4l4h5M72MzDWWOLNShmjX4Jk jTPW95W9nO+rpxey9VyfkIOfL9SfadHfAMkQk0mIiNJjbhFECQYYPJJwAwSJ pBqjgroVB1zgFMH6XUxE6InVIWriRKEVB+kRWmFyYHBXXuITzZXjpQv1GiIV Btf/gWf2XpwD6QhvwXcNwytgJsKGcQIliEMQ3j5tC090KQat4aGFyPBScmgp NeSIjS6kzGPa9NuX9adPXHrh7MSoavzL4QmldUa3rFDbVUqLpWNw5st2VfeI +fOby3/4beC1ywsvHp050nTt8Mlb/dpWhYOmitOAtw/Di9y5ITYrHsQSZjvM V6AwvAYGvyaQqKHlApYrBbDB1TxczAbFhbDR+IXNmW8s+/lBL86ONX7uD9Ad YMDJgsjDoOhQL515KeGLrJKTpOepdZ0/SLu7ICTI9bvoKdSUNri0a0jfIUaO i23wOiRMay7NuuhPqg2ulxASbCoOMofIYdUh7tPaUoSsSM+i3EMk9DDrIxyg lG9z2tqDbD4CDyzX8/VZ8Xie4jgBGHyYrO64QdnCMBj6ECmNYLww5sxODc4N za4ML6WHHNHhpRTY0GJ8zJG2D6ozr13Qnmg6ePdDnzy/x3XxRe+1s5vXzweu nQm/ccn50pmVc0edLYc3LxwNnj8UOLs/dPmY4vDhC/uOd46YW8ctCJI7T19d GEGu8mi0DsMCNmYj+OEcMKCIcCoOgbNaGHIWwAEehp14aDIb5EZoMaIEORwe cdwMsO1PyVCQIHYi3kNyuHROzgaVBZE8C9RTAMAJyUvLPrBeqB804hTgirhY ThB7mb56iNPF5RsWe3yIay35AACTpsiWDoUTUoJwwi+NQLd13m3QXRwkfUlZ ZqWhOgYMM0wj2I0teIMxAplAjKJ63FUc4fwUiZ9ig20Pu0vDHvRHwOCN5IxC f3dBYfINtE4MLyZGFtPDjtjQSmp4GdCKjy2mFoeRK/WJpr13/eitR37qO9cU e6kp/tLx2K+ORV47s9RyeOHU86un922ePexrPhBo3ht96cj6hZPXD7/QK3d8 0a8bdmdH4RPwXYVRNzjwOfBSYpt8jLjzI2LmsEpgyNJqYdhZGEaoECdGFERg +6NhFYUeossA8+kykKf8gH2Y6JjSiQQWJ0ikFAFPFesJhO9fbhwSBoOU4b+S 7cUpgxgUhWrM4ellSNgwU9MtbXDBBgUHaacDBrQCQFSJZEKHlg5Vw2fd2IH7 1GdYavXQmKCvpzTEVMbRqA9JPMIxwGVn6WXExYxW3s3pHfTkWeYZ8hSGPQUa hx70gHw0JRofHfKhHJUcjwQYVmXOjGJAM6x0jqxmR5bTI0vRkdX0yEoauBpf Si8OK1OvntOcaNp31w/f+PFP1poPxi4eTfzqWOzKC+5fnXac2rtw/Dnnqb2+ lgO+U8+HWvYkXz7mu3z6tcMnB1SrN9vVI640fhF+b3EU51AccxfGgGeGN+eN rR4u4yj7TCDKWRxxgkO2Bj6ej0Nr7KBkJyZnZrgepCo24SMD4jI5zIAhGAZd EgwMGHEbEbmCHRbsejBMwLD7AxfIVeAblnyxkQvDjUcD37mME84G05Q7IpkI Wook7vaoaxvVAQeVQkKGSaBhUg2MsCmyyDAroYqRbSlvjDBx2eOeElXxRaOC wBHGZ339uWEH/mCRk0mD8/hGcZRGG/Vsg42RjWywCDesbuAEwEBipXxhZFg/ 7EiOrOZGVjKjSzHgahSc5cT4ctoxrMzcuKg5ceT5u3509UePLpzev3XucPjS kdgbF5bPn3Ce3u84sWf55D5IVqGW/bFz+9JXj28AV0dP9xlcbb3GIWeCLdGo B4gqjnnI3CUoR7khZmy5AKoxYgy4AqhGAa21ApXMCmSY0EapCsCM0NEJ5Sgl OjxPoXVdSiD/Jc8zTddLdZ/lSaE1bXMRl5bdVZSSw1eNJWECo55VinwXuzkY YGO0pwRgjJa69GzLY7lR3/tMQeGUoWSSCdtG29ge3WBPlTEIsrIRGG/UJN5C VSJ2lPAb4ahgOUozFE9h65j0oo3SKL4FXzSGRlCRP9rQxBwIjnuwOrOcnGid GLIGhhdTY878KKas2ChwtQpcJSeW00vD6uyNy3Mnjuy980cv/+gx2+km95kj Gy+d8P72NdvZE/aWo4YXm4wnjzrOn/BePB65fDR+5YT78ulXjjf3mdztA5Z+ x9YozB+nURzH2TK04O0c8nFaujEPW3lB/loJyBklWsbWwEpj61SuFdmNAnwG ElLkqhsjZPQrl0mUkqdBNzt2GYFikwrje5nyP8/zbrZhOSQjPCFgRIJnFAfh x8EoF5SfEaNc/ZL4wO1RCSEOTFHs921pyzNOxnhO4PKNMcZQOBYvC7/ujHB9 SyRuifXnOYQkQPMwGFACGpa/cZRhJsgZR0MHxhzxbo95y2PebRYHn8rS+EY9 MupFrsZZdWN7ApLVlHV0wjy+BmkqPbaWG1vNjgJXzvTYamZkNTm+ml4cUgJX 2heP7f32D889/HRby+UvL70z+Ppvp97/a9+HfX2fjPZ+MTV4Szlyc0b9+5ux 65eTV15Yv9T82rHTA2Z3z6ij1+wBomAabCbj0sw9aIx8ipcZ52NsDdcBodL4 OuI0jlABRbxK/BQQM0HUGNm4qzQmoBql3yPsGsnwGOUMlKTjGM/cBjAkckZ4 apXSe5E5wyLDS0qN8HMB1Rn9im0LsRgMtOYECW5qDxeXMTMCingpCXhxEQAP 8EdJxLrDmrxMOHRGSVwm4pgEGzShbTeaRNoYSS8Fx6S4SDsoBGgEbyGbwBKA KY/6ymO+7XFfeQLoohJsnAx5Y00+Hhn34YNK48Zwl2x8MTLuyo4uZSbW8+PO 7PhKbMyZgV+IY6sp2Up6aUiZefXi3Ilj++/5yRuvfTBk8E9qvIrP+kdkxomV 9ORKZmI1PbGcmlxJKuYj/j9/mrhyeu3i6VePNg+aPcPy9S7NMs22NMGnCn5R sCTw3tiWPmec+eulCQCJUBlf3x53QWR7AoNFpMuFyQ3NxS5sDRE3e6qe+jgb bpbqt0dFepdaiQqRHHiSoR1d391ig3sY9lwOLopXcMKbOA9ES/0z2fYXsjZI 76W9T6KgZBQZJU1xr4l4fX24pjvUylaMJZDtMQEhvZ1Vmfol3gqOj3wfx6Zh 2TlUQM64b4dKeO8O8yfQtif8ZYbQpG9nAk3EuVNmQbkrp+iaHlKvTDpTk67c 2DJwVZhw5sZX4uNr2QkwiK9mVoYVuRuX5o4dOfbjZ9omjBPOtHY+qLzZN2Hb HHemoQNEJpfTE6vJyeXEcvto9EqzG7hqOtVvXh/T+DvkdvgWwLj+CVStf5dv m3E+SeDx7UAUjbmgLANUE67SJJaQYEtQTjKHjMEw7sFDdpzIGacgOztYlqDk g86Em/Mz7i6PeaR7Anab4OeLlNt5qh/d4Hphgt2glff+AxJcUy6l2MX41V4c doIyzBhPBeUGNSkF4bczEcuTXlKHJQHvTqOs43xMIqqeNGj1KGNAOeZni7k9 5uOrKhILLjgPkiMhwfqzl06wafg5OeN+sDKVOxj07yBO/vIkOmVqQptgtrkz id2gaVutXhkfUE6sJSfWUpPu/PhKZtxVwJS1mhhfz4FNrGWmnJm1vsnCW5e1 J46fffbYkMklc6ZNk8b29z8fc2yNr6UnnWmZMytbTssgua2m7H2KyJUWz8Xm Nw6fGjStjZvCraPmcX9xAj7ZXyK2wdCZZMtFkUn8EFxVWlgArCxbL8tc5Qkw 9zazSeZ4SpPkT3p4iThRkgckJjzlcSkCgiIJWE5yB7JBGfsgJPwcIekxS0i3 BRZBWTFebjgX6mcE2/JjdQW3+bdIUtJ3MXhY0zg/L7im4372CM8AXCCx8VEy H/IzxsTyY36AJZJ5dya9Ow354SswjPMHcXA2PrMxCgJ1SAXDiXzxXhi/TMCU JwVCMnA2uU0y8wtHQkhEJjbLrBs8pV4Ij7eNyxxbk67MhCs16clPrGYnXUWZ CxzkaoK4ml7LOLvH8m+/rD354tXjF0cdAdVyVNU63HNzasTixUy1lpatZ6dW gK4UmHXSHL52wX3x1I3DJwfM61P2xK0hw4Q3B7OV+bdlmEvp6/zbk/xDypOb vCpjS8cYcwNR5TpRgiIZGUJFp+fkRmmibtvCpCqjojTB7m88H9azIuZMn3TK 4LmDLHn55p1gGYPywzjjwbs94ZNSBBNuZ1LIx3YxY2ZcUtzLj4xJ2vt8B/l2 JqSdzk0ohU1CTQxW6iKS3JM+YYSBzF/mY2KHbZAY1lMadrLBWBUZYBLg+BUZ dzghss06PDK0ymRgRxZgVfTRWJAizCa5s6PwlpQD6oFJs8ydQXOlZRuF8dXM pKcAXE06k1Cis56Rr2XWu8dyb/1KffLF1y++LluJmrSrsu7pydm1Ye36JHKV mlrPAVHw1JQzNS+zhK5ddl86/fqRU0MWl3wp3d6nH3UlJzeBnO0ppIt9Bf9Y 2ea2DINlsUo7PO4py9xknvIU+Bt1nAgtimzg0TnpLan8JaU/J9vITXjyk57i BL/L8ZOFp8HGKqVEBs9ko3k5JI2o1Dc45lWRK/xEFDsUmLLc32H7gu2dCZ4B GsDw4TfKRJUY2CEY2MYHilAmSdYJppq/IhOiy3hPkLhcJ0FQR91oNGqdoib2 7JQfquUp6j/VYPAWLAMVsh1ZEEECfypQmQwyByNTmxihJrRpmFWgOr3JW8GR b5bnDK7xzhnZckLmyaK5MlPe4iQcZ57ilLuAqLgRsAlXdmo97e6dyL37iuZ0 y1svv6laDM4NKWSalSm9v2fCBGeiDHKaKze1lpKtJaed6XnMV5c8l5rfOto8 ZHXJV1IDw7axlQj7XllgeyoAZRm+GqtofClklEXpq8nfAHKAqB2CCtGaIpDA pqAqTOYtT/lKc66Qwu6ZdISnlpPTiwn5SmJqPUPUYfYjoTFVsnMEzbfDciOl x4pQuSzjVq/yLMrygH+bZwmfdBDU5z/JjBKIjEtc/sre93Nxp7maO2KzUwee AajPZnWKtj8tFNcUygnusz5cX5B1WgSlnqwDYAByTwfIQHd0qHMQmspTAh4Z 6xCsTAWrU4GqjByq1g2C0wFopf4AG1ZFKz0Og6uXI3ACTtlC05BnNrJTYO70 lK8gW8tOAVceuGKlZJ4c3LjgMj+9nlnvHUv/+qqqpeWdq2+bVfaRtsFpe2jG Fukc0E5BjlrPyl0F+Xpmej01s5Yyjeo81y8vXWp57fhpOAenV9OD0ytDdj98 Jq6nWAdcgSACNk2RKb4m2Id1m/agTVE57d2ZAkK820iRtzy9geUUMTPF2PAi bDLOCfBWnHZlZ5ZjU66sDG6AG3TIArQ+NBmXnp8XvOprYNu/I8AAvyITGExK zIsTQUa7VUBCEZET4EF6tkLSl9lmR9ssT9eR4LIyZafEUvCeEgaiypJJfQ2D Zf6IFAzuzASREHlwR45ldSZQhVK+taMIVkQTwiAXwEyjEUVbaFjdwkcgyErs g0071K0qdZ7e4uU0NlVm/duqYU3/mH7GA4ufm95Ak7sz08hVDhXx5GXrySlP fsqdl7lzM8609bNu56Xm8RdOvHH+mqqtf3zGIndElYvxnl7t5OIWgCd356ed Sfl6UrEam/uiz3q+WXPq5OlfHLw5o592pkZUnj69a5q+epp/flnycU3IJ+Z3 5Ax+2GUbO8APlRW5dwdtAwGbZj6QhlAxZ0dWTzXlKZEx4FsUixGZ1j3tKXFI 2Fngr0zzxMhPBBnq3pgxKuKAEIcF7W7c+7wqicuygSBnsyKJzrYwHhAgIpwX wqY4QsIJsgyA2YBJNo0kVOTMD7Ikg31gEDLOhnyrSoLuTHM2MDiDMCBCii3q g92wxJ5bOzxCnacwXqVH0NiAM0CUsCkcvzodgrJCERqKt9bw7aE6XfJgWWdy j3fIplYTckDIDVBlpzfycnda7itA+pJ7i9MbhSlXGkSBG9eUJ6dYz9g+69l8 +ezcpZY/t7RMdPRNLQRmFqOzy8nB0YVho2t6PQ1cTbmSclcKrvS2frn/lYtr l5ov/OLgZxMa+Xpq0rTVrViE7DS1VaZ9JBl8IIL0D0FanApSRORMewVXAJWv Mg0RYXIyBokMs8T2FM82ZXaXkHtyE9oN+cY28YC607kg8BYY/BcrT/FUwBIF 54QfBEGpyk1Ou2M6+FWVA3W5pZ0uD9RQTfzkKp41WyxjUErhxjBAXwHZJoha z2DPKoNkpoGE6S2OzQzjZ4s5O2AzXyWB94QODJ5QBYCZITwIp9oMVMk4OeCE sZwJYZOc4gr+LDcWB7pmtnbUS8HxjvEp+9aMpwBX9xlPXu7NyX15uSc74y/K 4ezwFuVewCkz7S0BWnAmKl1wbx/JvvWS5ewLQ5cuDI7NTi9FgCvFSnJidm1w 1g5MKjbyCnd6xp3WrEYd3SPh1y/6rp679OzBNoUJqJtZSPRM2OTB7WniSloE sh2+DkGc3syW2DtgjBx/GZwZXwUM+JGjVajcmRHVaXFjgVK+ybMKM4WvNKn3 yb1l+SblwK8cLg14EOGUQhkPOxIYct4BmZ/me6EqNj6llAatMSdwKfkGYdaA DVRrRAvTtDLDtMbgLhNuRuQN3oQ9OQ+YhUJ1QkhrNkIFhd6qNHaQh3ZAdKrS mJycSh0hjg2DqjYTrirqceSKBcFXhGpoYaiiA6XUBJ3VgW1l7/TAhH7GV5z2 FhS+4gzw4M3P+POKjbRiE9JXFppmIHF5MnJvCXIX5DT94tbWxx8Vf/uy/62r XWcv9AzPKOybSqtPtbClNPhHJo1KZ1i5lphzBLRqq2NM5n3neuzVZtfLZ478 8PF3P/4SYFOsZnrGbdOBgthKFfq6imKLzZ+quDg7ClyZKtt3SBHhpPBViKIK MwWWVTAFogLwQGIp4wEq3UtFRgIMFPAzwRLEtEbAzFA5Vc8qO/xMCdbPCAVr kvKAdJowVOpnAYOkynSs7wghNKkMuteIh6qCo0IRrmaFq0zpgrST1Gc961Vc mVB1lmCTczwqM2EIVhqfmt2q4btCYmHDvBVKBWAQpreEq2Q1bowQsAiUFfJr 4LNusxRXsCB0johnIzgOjKwMVU3Gdbiuz6ynZn0l4AcuWrNIl+AqUIJTQ+Ev YeLyIGByH6Jlsbjj776eevMl55uvvP7ELz84etz+3jtL7/164YP3Fv/0gf2d 1xff/4353bdtb726fu3cxqUTocvHYi+/uHz+1OEHHn/3wy+Qq/Vcz6hN5k3L +UruIFS0ILR00uKAEIDWDmw0XD3ghCgiqyJOm4TWZkWxCVDVoJzhV7IdbApg FfMGwYPxYEUJ12xjADIbb5IOkS06cwlycb5wnhXBhjSyxUEiZatSPlEEQb6a nG8H1lTjFIWqktAo4lZtlsmKI4CPxrc815dnA4iDRrNkLDkoiAphFSWVuEph MsYVkTBL2LDBZwkGerzKe4ITqXBCItAKfWpKKCPECZWzZKJam4myzujP1q2q bOiM1VDVuBqXdUzI7UGgaNZfUvgKwBWUCn92ZhPoSs8Gt+FYVEDQX5zxZmd9 2zP+ktxXtFpcCeDq7ZfbDjW1/ODxiw8+MnvkmZWWPRvn98cuN4UvHg5cPLR5 7tDGucPuC4c3zxyMX2oKv3TCfu6FQw889pu/AFcphSs/JFsZXQ3RdmC2I60M mlg6tn8JM/h9AfxAWZ3dBEMfq8wCVWWgphA3semG+6eCbCaIIAEhSshXJuJK Oi8ojYgqP0cUoapECDssJOxZliDdq4oGQiAbyEXK5SDVOamKzogH03E2tDvL aeG5goLMQRKUqDVPEVx6kVtAPmWY5RyEjfWfEZ3FI+QzudmYnJMqY0MZ5kgo BSdUhZ67jLFZwkkRrc5GqRqtE6XEx3cVLMg6RHEo7WZptm1kVL00C9lpMze7 CcwUlJyr3EygqPBllMEyXJMwiUHK2kDAgCvIWjaLO/m7dwI3rrz3+C9OPvjT F+99eHLfs8vNz2+cfz586YD/3AFn8/Orp55xnt6z1rzXd2ZP6ldN0ZdfWDp7 8sj9j/0WuPKkFe78xKx7xO6ndMr3Gi1CReRkWDpaCoiDKKwP4lRVbtaUvCRD orgpgswqdHry9IJ+EGmZDVZngxVVsDRjCyo2dygTsvtApeFwkRioKQTPEvwK SvKzmB/YlEQy4YcCPxFEfmD6CopIYiWnpUZOlWcJ0UFFcQxGGFdVBgOjQvSv Ss9SqqFEwXtW6nmjMYfQCKpITSlViQQlwQClMrLLqgokZxdaOWkQjFWVnBxw dmf5I1XBUn0Q8FXhil7tGGobw/MOLFCYDWzPbBaVm9uzyFVesQnpK6MKlmc3 CqrN8uwmXN0RMMUmgAdcuVIf/G758rmO5/efeeCxU/c+NLn3mVXg6syezUuH vOcOuFr2rJ583tW8x3V6r7dlb+pXx6JXTq6cffHYfT9578MvZzcys/Br0RAY 0DsRJFwNZmw12D6qkKF80tpynOog1ZRBsCqYKlBVBYGcCmQS5RbkkwqlFIRK uSWCBIkqWJi2bEB/igAnFcaJdLhIuYUxw5CmTFJPBUhXXc0qyyqS3IwWlCbM PocnH4UkMT90xHfR9oegmhEVaWilZKJsyCpShMMZqQIwxMyuknGLkaoggVkF g1HspiISmKm+WjY2KWMcmNlYjQwdJRnzZ5E3GBOHpQj6xsXASMeYfDGkDJWV /rwyUFAFtgEeZaA0C2fiZn42UFT6sqrgjmqjqAqUZwOlGW8eqQuU4Lpls7r8 7/16/fKZ3j0Hmx/86anv/nhy/y9czc8Fzuz1X9jvO3fQfWbP6qnn3S37vS37 ts4cSF09Eb12evnsyeP3P/7+x61K4MqTm7HHelWO2ciOIkpQRSuqCF8TFV9P aWGFw1mqcpbQakQRQqKiUkkgoY8nBd5AwFRgW/yuogrkp4xuqIqzpjrbcHYo GyISD8r/g9BCZcozXNxGoYkf/jk1KY4W3uV9WLrgZT3yVQAkPKpCfRKUDcjF rfI3RoTcNIIqVlPTI6Q7VtEERWrgJI4RZUw0CV+KzEodmBPndOHIvGcVq9Gq yZWc+nJgcn5TuZFXhXcYV+pAWQksBUuzm4XZzZxyq6T0Z9VAnQ+atlVBSFPQ bXs2WFL6isvGFf2lC4FXLnTvOXDqwcdPfv9h+cHn4B4VPN/kv3jEe/Go58KR 5TOHPReaApeaYpePJF95MXzttAPPwSfe/7ht1puZhVc7M92yeWVkG4gS5PNF Zr46SkSxJSVHxRLUVk1FFKmDNTX6CAxWQ2jYFKobohXGOD8+QlVNIC/TrmtC uyrKGyrGT/2E4uRgqhSoK6PVBgykqfImNTWpIxwMtTDpi7iIGNxF56spQg2K o/pQwidTa4w6o8Mjyrp8wlgTyk3zibFxmHHRG41FNAyPeE0dr2niu2BqsBiU GFGLVuxMJevJgpoY9YztquINw4rRDKHy3PBsd8+UKrqj9OZVkYpqM6/aKmqC ZVWgpA5uqzYLymBOGSqpiCuVrwBQAWZwYirR2dZ7cytdQyuXzkSuX+jeu+8k nIP3/aT/6BHZhQvjV24Mv/Jm5/W3O1++0fPKO5Pvvq99/VX/9ebI9RdDVxhX T/7h03alLw2vnnPn+2ULs8ECWxA1mQpXr77C0mpzCba4abDkIKnDvARCNKGa OlRThZAWZixdkPQ8E84FsjLNqgbvGxzaxi3/X3ycA6lMU4qwWdU0UYENk5Jv BGja5bJG/1FZDXd2NcTS/6EV5dNQdQ7KODlR0RrnjkZoquQSV6kJH2R98EEy DkyCl5oEj2BrYneO0CKrga9OIGaqRE1F3VQJjGjQKCIGoXF2JSzx2VjFrFsa bR+dXYtq4lWlN6eOVtSBvDpU1GyV1cGSBrgKEFfhomozq46UVf6CamtbFYKb FTrQwWF1mz7829aNq9HrFzr37Dv1g8fP/uxgT/vQtG5VuRRSLoVnl0MTs0tj c6tKd0qzEHZ/2ZV8tXnr5VM24OqBJ/74eZvan1V5C5qN/PDMitybBF00IE0c FgdLVVxaZCStcSU1jKhQbW5rFxBCC9e0WBJdaBhBxiJVDeYHTHoaCQyqagPZ CfWKpoEQ1kfDsIlRf3qvBlt5k4bEJcMqaV2VkCBUalzWeE0CQ8udXU2D3HO8 lGTFCAYTvFUX29Viq9STMbY71xCUjD2oJkjwqUQNjDkaAmAuwYK7muQulehr hUFQ21CdI5BYh7kkexYdTZI/qBFB0Rm+sWpe9I1/OTDrjKr8OXiXypebi+2o gwVVpKQJlTWhkjYI5BTVwbw6DIBlNZGy2l/QbJU0gJYfqbNsZI23euaHZOG3 Xo1dP9f5/P7mHz3129ffnwGi1mIaT1LjTs2504p5/4jSARlP4y8uTZvjNy5F rpxeOHP66P0/++DTDvVmTuMrzHkLUxqPbDUIhGtwd1Q1iaq07FygeD2CAgmW eEkskVObizCrooXK+lDZEq1oQjtzjAFRAiS6zfSEenkuwtNCnQ3J4gQPvbrO A+ExR7TAfLTMEVUNo4KMVbEDJ4FBsstbUZGalqRnccSAgjomLnAV5yrrWE/q LII1iQFdEjpw0yZrUNVjsEbxmj5JHciwfwr6/B1Ml6IIK5N/n0vyZxvs79Sh NpcitPApKGvIFUW0zFLcmfdlpj5qnzCsaSNlDXGl8eXn4juaYEETKc6FtzXh 0lxoW7NVVG/lNZFtdTCrie7MbRbntkrQqg6UdFvbK/qViS+7FrT28Ns3Yjcu de49dPrRX3zeNqhcT6jWYwyqOU9GvRIZl8+rvEngyqFzbr1xNXKlefHc6WPA 1Wed8HaNvzDnyyvMoUmbdy5enUtU5yRdmIE0cVxSVmXCzQE/4V0qa1piScNx qmkjNV14Rw+T3Mjr/QVTcNsWzWs289oozxuMBABG70/LlKs6DkmVZQOOikgj WvZ2lLimFWxoeSbBWel4B4qL/dugeG0+kjMHE/pg3hjZMUar+lhNKxGVFAiR 6TkbEKwZqMoi3EkCIVU9lDxYE/0FQthh1wBQgaXQDOmaAZw0+gAJBywlWqlE ulLImDZd06VqVIUR/s7GYVVtGunSEVeMQxqnhkEqwUyRbdOAfLR7Whve1kbL mkAOOkPemEtU5raKc9ESxOfCJW1oey5U0ITyEFEHM5DN5gJFDAJ1gZJtI21u G1Ro7Yvm1cg7N+KvX+7ad/DsY890DynU60kNoAX5ypPUeVLatcS43KFY3Zrb LBgcYcdb74avnFk6e+roA0/98bNOLbzXX9ACXUuJMZNrLlmFvaBFq2qZk2BE 7fJ9LejShhssUqNcVAVytNFdSFBzC2G9K68PVxlF2jjHSRsTSMTwHDFsZqa1 LnbQSPDoJGbi7O1cVj0mihqJjj4aKoumE6andCEeqTH1dcH0nC9lCG+bohVj eNvozxuDJV2kTKiwnV7j8JBeSIUgxJjYNcYpkpDiNQOVxABPL3qhr46ewgcJ G2OqxtBChARRhtTfjeldZgbu1AyZqjFTM6XBdkVrjXUw8J41PfmMSWQVIpma Lr2rAyexY1VZxzom1GtRfbyiiwEkeZgS0KVLVrShgja2rY2g6QChSGEulEf2 gllddEdLXGnDJUgCK7oFxeis1h1bsqyG33498drFrr0Hzv5s36hmXu1KzIFt pLTA1UYaGJuec8ksrrlAwbSWcP3hT8DVwtnmIw8++cEXndpAXguv3szpXJkR 9bIuuUNbj3HF9iaXkp0OOgYV+CwvIVFVKHVRNAaPEc7xhQhG4jV9bFcXq6GB j8xUyQGuMGIKZuRmj4640iEqkCXodVTVNQADrzYIhChLMKIkfmosjYDPROcM pLgDQSNozZx4xehJ6LxpA1URA1A/VSMYasKqWILKVDLHhE4VfDOZiTODpSlF bAiEjFjdNQmjpgZCMrv6zC5QZMygj30yZNmaJVOzZGvmbM2a2WWOWTQZ8RHw ETwcBwchrjLw0qrNsjL6aZfaD6dSSp+o6OPbc1s5faY6F8zpkxV9qKiLb+sj YCXYX/owgJQH9uaAq9iONljQh7DJsRJSffSleiWg20isWJzRt9+Iv3q5fd+h 8z/fP6m1a9yJOXdC603pNlKwepq1hMoaGFXa9IGiZS3p/8MfI1daFs41H/7B Ux/cBK5y+s28PpAz+PPDs8vaaJF2YlWbqurBklVJJh13SNBkDX5ozIV2gCg9 ErWrj+4asESQjKFt3WqKpRcDUaQnSAxEDhmr1oyB5LR5wyCOFehgTPCcgDAk aO/zM2iXvZeZmAxPDnpx9AhImIO+kSUNUh98xCNVM4fyxs0c+bvm9K4ltWtN 18BsGbT5DMhas0AkU8VItjaPVoXSxixXtWdrC9manapW6oBOhsDI7AIMZoKE U0EwGDN/RzYEIcZsVfh/N7OmjAQYltjKOmQFhFlIa/QssMSxxO9ybMRkH345 YViCpDcXSBtSyJU2lINuoK8hvQMgGRLbRkjR0ZIJMnakpAvnqU8WEp0uVACo LOHi8oRmon0ELgx6b3IVuHrrzdhrL7XtPXTu6X0yrR2hcif13rR+I6XfyEC+ 0jrj4wq7LpC1uBKbf/xD9OWWhfPNh3/45J9vdumBZzgfAzljoDihXldvZXRp JMpABoDp0+DQxqeInjSCUrYYkDtjCldK7cvptsqGSM0IaMV2gRZTqKR3piWK DPG/g6+D7Jeo6unegk1ALPi+yLTBK4EhEggZzyEsz/CTxSji5EPw71CaODws S9SMIsPgUcLzBlVBXBQa5baG86ZAzor87FoJJDQiZ15UMU5Va7bK+ljAwcgu o2s+S005DLKhLGTmLBqwQWDscoqIFoaZiGArA8mYFRRlayw7gQFFxhxGDBgU raxbrl5dCOe1ncOTY2pDpAgw6wJpc6piSpT04bw5W9Vv5U2ZCjSZEttwATMC V5GiMVrURbJAmj6UNSbgh1XBGC6urGxqWns0Vo8JIPQmnZa1yBs3YtcvtD2/ 7+Iv9k3q7XOexJwnBVzpvEnMV664zpOUq5Y17vi8Kxn4wwfAleNcc9MPnvgQ uYJklTcEc4ZgHiSecYUNmOrBKga0qpElfzodaNdXWfKfXgzKVyNgqtXwjDM6 60mp4GYeKhmiVWOoqHeljYgQsmTEIwxPMWbEQ40yYdXsj8xafMaGxMLyiSkp nDQZP5t2+akESSZFGSDFjyRz/XJSo6OHbWekyMxwwrOGDi+qWrdyps2sRXSg EQi5NJ4+lkwVkpVFBGFwc7pK47ByVxoWjcQ1Z1i5S60wCEeLtZKDGYwjlyMw yKgbOqyzUeoPEbQq78nOxCwGaQQaBKiOFy1jyvFhpTaYMiRK0H9uKwWzNSWB q5wpW9Vt5YzZHUOkYEzC9bJsjIFARUMMElTOEC/rQllDErjK2/1pR8/QjMKg X4+ZiSvIV5G3Xou/cuHWc/sv/fzApH5Bu5GAE1DvS+t8QFdmbj2u20gqtC65 fcPmigU/+EP0SrPj3OmmHzz1l5udhi24xOYM8PZgQW0PTa/4jZmKMYNomdDI h/VkKpN8LBvIlwCniNwZVa9FZp3h2bXY7FpEBb47oVmPaJajBviKRNUEICFL aERLVcIG7jDmrfCsY5Oh20iRGRHaZVV+vUnvNmCDkBBIFMzwXGRKM352BQ+7 FnEwYRpBVHYZD9Zg1hzIMjDg60xkAlEOjLnRslXQSOBEaScreiIGVU5Xg/oW gZDAgFBhCKEhZibBmKAIfATJlGfBXTOLQzVf7yM9Mp/asU2qBm/2GmJFXRjz D3Cl3UrjLgOu4FdwrgrKmjMVM+SrFHC1bYqXTNGiKQ75Km9MwB0+Y0yWTVv5 datz9IO/wXXdQFwZvSkn5+pi6/MHLz4NXNnh0qX3pvT+lM4HTkbnSuo3knO2 0KR2ye6OB//4QeRai/1CC3D1cWuXAXIgoAX7dyuvcyYmbS5jZgeXGndoBWYI mxf2BS07ri3tWSxnVsIKZ2RmLaJeC886I8r1KNjcOjmL/lmLV7keVvtS2mBO Fy0hYBwqjqg5VZ3xh/rk01OGFWN8x8yZqVFrlfsiWBc6XU9QbBqWdD0joQnF CQZUnN1zLOIENBMelmDGHMiIfEXMZKsCQtaNGb4FyxyVdXKqjCIGBqhvaSgb bJc5jCuq7jJCROuuRXoqX5UeBJDIdvkIeWZVE1ihZiIHDuVlu2vk/U9nVvzQ aghngRCYp34rbclUTKmSPpqHR/ShnDlbMUeL5lSZuNpmXBkiechpunDGlNyG 65nlZs/MrNkULBrX4xZIbr7UqmV1661XI9fOte05eOnp/WPa+Tlv3ACXK/hd 4E8avBm9O2nYSFqcqenZhYWVLc/vf++91mI4exK4+vMXHcZQAYgywR0vlDd4 s+PaZXOmbMpWaA9W2Grz3UpmYkudqX7y5eiYbl3hDM2thVTOiHo9plqPatZD qvWIatGnnN9QrYeU7pjSFdF4wuqN2Fwgo4cJx7ctqYoFyamOLq3+/vfvvX7l 3RFjgGhpSBqMnHT9RiSxYW6IcFQybO9jZ0tGXJ6zqJcFr0D0wyrH2EDSYKdY AylLICtQ4d9lYWhlJasyxyo9nmMOy0VcXzMxIBFlQVTIGAxEBfNZXKoyswjj kUKtsYNFKgtV1gSlBaDKVZfdW/K/dii0i+Z40QoJLZwDcqAJuQLhUiVDLG9B 3nLWXMUaLVpSZTMkq1TJHCuaE0UjcJXahluWJVFakesUbUNGd8y0VTCux6xw T/OnFzT2hZcuL5594aNfPn/qyedbhye13rjRlwYz+BMmX8boTkFaM3vSM8pF vdKuu/bq/JkTw0ebnr//8bf+9FeYjwksBFYAXKd0q6ZU0cyIwmsqGnwFLjJM j+1r2rz7f/T0C8+duHrl3b/eHOxTmCcMa3AIatxhlSumWvSqbRvq9bDKE1O7 YzpPVO2KqtxRtTuidIc1vpQOfizAKZ8ojciVn348pguWGKvMJGAsTGspk6DK u0xoSX3JB8VxnjmMWHm8yn6pEWNVyTAIXG1l+eO5mohXpacoDnfy2jwMyMsq i1iENYJhJbPkd615IGqX05JjQdEBq7sW0VOKWwpo1ka/UHesrAmrVd4hV13c jKs+754xrhhCaUtyex64AkLS5fl8FSMw1XTJFMvP53dNoTxyFSta08DVNvBm Aa6SRRNks1TZEM6srgc1n7frFn1GfxJ/JgNX0QJwtWxc9b56NXK15dNn95x5 8vmOoUm9N2bypqHJtJmy+LNmD3CVhIhS75qbNrrefXfz5dNzZ1488OATf7nV bYTx4SAO5y2hgjVUkhtcumjanKuAWfIV/LHDjfwslwbEOnD73U9/8+4nbr/7 +XsfOvzYMy/84viv3/rTF20jw8qFKZ1DZXZrIXEBVx7kCn47gKNxR1QEmwoi kMS8caXBNqVehsukObWDx64EEmWVRrAlWtBIX6v4gW+ti96IBPmEBKvOc7qw sy2QtIay1nwVLScG5Fa14VPYBM/aWDBPI+RraLldgmTXKnCCIHSzsVZiYB4s W54Pbpk8btPGum59ZWxxRRPOwDi2/C7jBLsJhyNUJJNwaqjigMBVAeZQXQpn 1J+2jU2oQRRjJG1JbUOrMQLHetmWhx9NaWu+YsmUzHHgCn6b520wc+AqU7bE 4TQsWmIFS7JghmwGHAaSC72jQ30jVjgufUkL3KxcsXngypdyzq9F334t89qF L57be/7pPf0TSt1GBBMUcOWNmT0J43rY6Apb1sMms0vfO7n57lvxG2ftl84e +sFTf+3qsUTy3MJ5a6igsvrVvggSRWs+zyxXtcNqZ6tSEKZ66I57n/j6nY/f duezt3/n2W98Z/83791/130Hv/fjY4892/zLIzfOv/V5++iQxj6z5NM4t+Y8 cc1GnLJZCM5EtTeq9oRVGzGVeWFSZZuFhOZPzAWSukgOLpzmdBkyuaWONFIN c5gnufG/AaQ+VXk+saSLpsCm0bth8fmUa64pd0AH65ZlYOD8bUTIPI2Gji9u Ia5wBESFd+OQCEL+q9lYK+UQKG1McekRqjISbMm0Yba786+va4Y/bP3LaweP Hd3XfOn3XaNwn8FuRUFLkawgjKpWLKs4vuSLboupkn1EPvjXTmM4C63mSGY+ vW0HMqMZa2bbVqiawhmgy5ouWeJ5O2TUcM6Wr8zHCsh5ogQLZUkU5tNFcyw3 n9petyxP//kTzYpnPpI3+1MAgMkdgc7mzbRz3hl950bmtcsfP7236Qc/e+Pc VW1Pv3VwYn5kar6319bVab3VamlttX3+hev99zavXoj+6mTi1Rb7xeYDDz75 t84+GNAayVkjhfkwWFG3ElGu+edhJmDFHVuhArOy4S5jVpHKZ++49ydfv/On t93x7DfuArQO3vbtQ7d9u+nrdx36xrfB9t1xz4Hv//j4T35+7uCJV87f+Kx9 bEBplS+4Zlf8mo2YxhfTbEQ03rhKb53S2JVIWlzrjai9MTX81vAl4FezPpoz JYqwp6xZDhWJzkio0gwZ4QiMPRyUD3800f5b9dAHv3v74i8OHT509qVXP/xC 7o5JG2G+/hXVeX8Mdij6hSqhgkHqybABTat2jg30qZHxiE3wA769sEtB3odl FbLaQjJlkLd99vtLs32//9vvLj6/97nvPvToz481a7aSjBObZAXmMHiqIo7O fAms3nkxW15W6Ce/7DcuB+25HXuxag0TTsWaJZaxZcGpmMJpUA3IsSYKMIgl krUXkCtrbns+AadhcZ64skRzzq2U5VanUmsyb8Xs0ZxlMzUPx5Y7YosX5jfT Lvg9+Pq1xLUzf3nqmRP3P37mgceURw55W054zxz3txzdbD681dLkg/LcsfiZ g7FTB2Lnj0WunDSdO3Xgwac+6ejlXEXz89G8LVIwe5LTtjV7YQcmY8eVrMAk 7fkq+nmIVBaohMjD33v68q9eP3bgwM+/e98v77rnmW/c9dxt3zoAiesbdx28 7c4D37hzL1bvOvjN7xz5zn1N9z/0wiM/u7Dv+Munr/75o/ZemW5q3qlY8Srn jHKtA3DS+IGrsAYc5Cqm9cXmfHE9BP0JXTBtgJ/D8YI1VZ7P7AAhEgmoNWHj iPgne3838sWNqY6337z24sM/fezeBx/6waPP9qhW8X/jeTRSn31I1eaLW8M5 9l08yMihbiAuRBYKrJVDZcNgjQx9W+ODRakVEvu2LeA3ORfMDoNe9vlffnNh pPXtv/32/HN7nr3/x489fbRlLpRikNgFP3a0mq1UFT6hJarCqTmy5RWzbeKT W6ZAwhrIghCOUtUaydgz2/ZS1RLN2rPlhULFEkmhashVfgFYjeQgaEsU7Lmy LVGEuC2Rh9KxlV6dVk70DFpCcPwlFiB9BVJ2OLOQq7xtM+2xrMZevwJc/fmp X7Y8+OSZ7z/R+8yzgeYjEbAzx6JnjsRbjoRPN6XOH8+ca0o0H0peOB65esp4 9tTBB5/8tKNnPppDiyFX9kjBFszNGFdhcQAtmI+9iKUjDzhV0QpVB6CFyFW+ +x93Pf3oU88+/fSTDz3y6He///i3v3/g0cf3/PDh5757/7O3f2vP1+84cMfd B752R9Ntdx775t1N3/zO0du/c+yOe47c9d3Dd99/9MHHzj7XdOnwizfO/uqj D7/sGFPOLG5oPcE5IGozrvNHtP64bjNh3Ezo/AlAC0ibA2czod+M67cyRthc ieI8XA9gz+YQ8qWw3zDxkbr/PWXvb4db3zja9Ox3H/zRg4/+8ta0ec4Xtvqj 9mSR9kXVka8u5itLm7BDswv4LaAv20E1DhKpuYDVGlN5oYhNZLwPGsar+KyA AVqXt7bWNLLF6dahz9+a6Xp/8Is3zp7av3/fL1+/cvLZPc/d9+MnnjlyQRtJ i0dqwAMaDFKq2Lep/K8G8e0dmLPTbB/+419glRaKFWswAwI5SpX5SHohW1oo wc08Y8uVockCERgwU5xPFmBkK3xmsWyPF+z5bVuyaMuU7Mm8PV1wr7gnf/ue esFpi6atkfhCLAt3LVskP++JLCTy9kDGjVxdi18/++ennml54InT3//pH37y 5PrJpjCidTTWcjjW3BQ+eTBz7mj6TFPy1OHUxWPRa8gVnIOfdvXY41k7ZKpo wQZlrGCPFBXmdUsqay/CJAEq4go+gXCiSIXx9v1/vf3nd9371J3fefB/feOb /+NrP77jnqd//OiTP3nimSd/8ZN7vt/8059fP37y3J6DL/zw4cN3fu/gnffu u+3OQ9+468gd3zl4x7eb7rj72F3fA8wOff3bTd954PD9j7Q8d+TGy2/87r2/ 9k7OTZqWZlc359wRE1AE+QrpiircIaUnovPHgDR9AACL6QMpw1bKEE6bY4WF TbdN8dlo6xszXb8dbbvxwrFnvvfgD+554KHHnn7+WNPJW6/dkI8rbJltmLm3 sLNdq1Ur5eLO9moBvhHxQGaQELQGB5schZqjQH1EE3/kK1ZzkLOYzjq86w79 UPdH1+Xd73V/fK35+N67v3ffo0/+9Cc/e/q+Rx5/7sQ5fSyNwzKiSpBzKgvC wHcUK4vsFQ1xWHaXe3Pqg0/GZuYcpR2oWrfSC4WyxJWDuFrIby+UdqzRFAyy kCnaknnoPA/xUtmeyEErbq4scrUaSzt6BkYHRs2hpC2WAq4csZwN8lUka9sI OxI5ezDttq5AvopdPfPBE8+eeeDJU/f99P1Hn3KdbIq0NEXOAFdHYi1N4dOH IFmlzjSlTh1KXzwWf6XZfL75wA+e/Kyr1x7L2GPIlT2G5ogW1fMeQyi6gFyV HWg7osQvQgcx27nrX/7j+//+zYduu+NHX7v9nn/9+kP/ceez377nydu/9b1/ +9q3/u1rT957f9Mze0+3nH/xxIsHnzr42tXXf9VyoXnPvr3fe3D/PfcdhMR1 932QxA7d9q2m2+8+/M27D9/13SP3PHjwngebfvjT5p8funT87KsXXv34b23d 46rhKbVi3jnj9CrXg3p/FP8pF0gagnF9MGnYhCQW1QXiZpdTJ/u8/4tfKwY+ Hrz55tnmQ4889tP7Hnjou9+573vf++Ge/We03jgcHLBNtrZ3/vf/+5//3//+ z//8f3bX8RurjgLnCncNwQOOHb+06pBw4hJ/VW6sYgccAdUHKiAZFhas4/0f v6IZ+ONY6xvvv3Hm+oUTL507vnffnvsffeK5F84aQOg6NphzFhlRaFX0tysL kKC4g6S5N8Oqv7XOKAzWUBzii8Wd+RAMUl7crtiiGUduG4K2WMaR33aUytZY arG0Y8/m7an8EtyQY1msJoErJAp4c8SzHoNZ9vEXprVNK6Qp4CqaWIhnbVtJ OA0XvBEHdN5Ke6zO+BuQr8598ORzyNX9j/3mkadWXjgYOo1cIV0th0OnDiXP HI61HEo0H05dOh599YzxfMvBHz75RU/fQjyDSTJWBKgWkKuCcTWk9QaApUVO FFkJy4XC9iLEC2A7//3//ud//m///C//7b/f/i//9u3/+bW7/udtD3ztmz/+ j28+8O+33/2//uOR2+546ht3PfLv37jnX//j4dvvfvaRxw88t+/w4SNPP/zz V6699dqrNy6fObvvgR8e/96Dh+/9wb5v3XPwjruP3vX9Q9/67oFv3dv0nfuP 3ns/gHfkvoePPfT4iw89eamp+c0rb/7pz599emtgTGdXrXi17qDBGzY4V/UL Fo1ROaeZ7G//48fvv674/7l27+cozu3d99dtUJjYOcz0TE/OOSdplLMECggJ REYiSAIRhUg2YIONwQFsMBhwANvkjHICkVFOgAn73FP1rfs/3DXy3udU3apV b73TPT2a6ffTz/OsntGZL099vW1by/rauprikpKK8op4PHNh1Zob0FC/+dj5 9uOr9//+n//53//v//w/H//3x4HEx/kHpP8KxfuPibWeezhX/3cO27sSOpNY a5j/X4WZ4+GfCaxv95u3HXfPnvh0zZ8nd/71w7arp3deOd165cfWrY01Oocr kF/yzfU714bHOxIM/LvzQ6Jg3bvmAIN578zr9pfD7dNvEid/DqHB4YnrR479 fun6g8nX9ydeA0tAy/1Xs51zXLWPzXa9+dD9AZL5bOffCa7ujs90ffh3x+u3 HTNvE0SNve6Gdzv5puvtewCmc/bto6FnVw4cunK3+/5zEKvXDyYSXHWNv24f nuwcfw1cdQFXwzOP7/WNN64GrvYE49WmUKXB1+IMdZUXvqgueVlT+mpx8XB1 8dPKgvHa4sna4qna4um6svGG6rtLFudbw0dO/Ng1Mdsx8bYD0Jp42wk1/vbe 44m/eh51J7j62PU+Ud1zaHVDqul70jXzpmf2HRQiFEkEAolQiKUISKFEkiIS JQtE8wXSFBEukCgkmAYhjQitxWgbyqZxqgAr10gJLcpEtKawxR5weLwqY3kk WhDPjLvjK2tXVOcVZxodBVZXod6ap9Jlg10qtEUKbZlcU6IyFfGGAo2p2OCo 8sTqsgrXVtRt39hyuG3bic9bf/xix68/frGvrWn18rofjh08eXR76/amlatW LFq8aOOmpkXVizY0brn66OXtkem7I3BJzvRNve4cfNQ1OpVIJgkr/Ielf88t 5b//oyGQTCZm7/T099653Tk80Z3YCE9IkDOnJHNIJDZ+nKPiP5oD8+63b7ru /vz9p6uvnGq9cabt+pm2qz+1XTvTtmfbKsjtartX5w5Gi8vX7j5wY3QKAJir j11zAtX79/vB9ts3fzl/p/9J+xwej16+un7o8PlzFzvfvn8w8/r+JHD1b3gz D17NAl3dHwCbGQAmMZmY6YLL5MPH+4kDP3aCXs28gUn7xGw3PIQD374HYPon ph8c//bn02cAyPsvIK6/bp+YejA20QUqOpygq/PJyBxX04/vdI9vXDW5tmZ3 KF5lDi00Bht9GacWVp1eXHduyfLzS5f9snT5L0vq7tevera0ampx8eTSBeMN NbeX1OTaIkdOnuqCkzz5FqpjbuwCxl7NXnzQ1/Xu/X+h+tA9N+l/Mv7Lti9u Hfjq0VffP/rqO/H8ZMG8JOH8ZCxJQKaIJClCUaoASEOFErFAJElNYIalimVi hBYgcjGqQnAdwepQ1k1zHorVIRQvIe0UZyBZE6UIO/xhfyjujy+rW7OmHgJS SXE0Z2lm3qJIxgK9pVhnKVTqwCtLFLoiTrdAaazUWso1plKNpcziXuTxLcvK XVJQvCS3sHHlqr0t67Y0rV+9YvmSpbXNm5uX1Cxu2rzj+tBLyBJ3hieuPX11 ++Xojfaua4+Hb72avAOpdWIG1guiLGTdjjeQwT4kLObv95e7Hj148rIH8tLk fwF4/18G/jP+/wvWt/fN6+47Z77bt+ra6V13z+25da7t5tndN37ec2hfg9nl U5udMp1ZZXW70/N/73/SPXcIvFrPh//VMzfvhtP+9t2D0YmbfUODU7P3jn9/ rO0gyBfs6ph5/WBqtusjcPXxwfBMz//h6u/33R///WBipnNupR6Mz3TPcdUx A0d9AN7gYcfkbPff77smXz++++DElm1XHg1BoGp/kbC/diBtfLJzYibBFYjM k9FukLWR6aE73aPrV42vrdkVyqi0BMtt0cNtn93s6L//6OWDx686h151PHx+ /+GLrsFnT7778W1d1VSCq8W3a6vz7OEjp37snnrdNfUWCqDqnpirsbd/3Olp fzPb8x7e54f/jh8fPR693LTnzubW3p17H+76VDIvRfJJMozAlTQpJeVf8wXz kkVJKdJUoSRFAJiJU4VoqogRIYhYIhGKUImURHFEKEFTxbhQwkkJmZRUJ0yT 5BHCgDM8wlhJLqjUuRS8juHSrP6CWEZ5UVmm17cgnlWcmV0SjWUabTlWT4nV vcDiLFXqCxW6Yl5foTaWgGnyumqNscxoLzbZKm2uRb5QRTitrmhBTUHxutUb f75271L34M1nr/7ofXh74PG1qzduPB6+82rizujMvZGpeyOQXWcT49gbaKDu jcF86sLlO51T7zrfgKa9hyVLXGVzOHW//1897xNrCiTAKv+D03+oAEJez3Tc /OG7/Suvnt51+/yeG2f3Xvlpz62ze44e3GgN+JRGG63SKy12Z3rOr30P4fmJ QxL177n5f14HFvrmjbtdp38++/nxW//g9/HfHdBMzXHVC9g/H+9+OQzAd4xM 9fz9vucj6NI0KAAsU/scV93TM51jY10zU3eHx2D5Oqdme96+f/zs5Y39n/52 7vdO2AtK9XICslbnxHT7xGQ3JPnhye6J2c4noz0zbzpHpx7f7RrbsBr0qi2U scgSXhIr/OvW7a6X492j0z1j0/2jM72vxnteTvQOTzzqeTS1uXlqWflow+I7 4IO20JEf5rgCmZr8u3vybc/EG+AKxhsdj+6Nj/W8B4H90DNXve8/POp9duub H7qevegaGe8em0DnpWLzUvD5qWSSAE1KEXySlPpJEgJbkoXI/BTp/GTR/BQ0 SUCAdiWDOQrFAqEEkINRKAQPpYUS4E0sAnETkxJUS3NqKclLST3BmHBGhZBO Runn1FaM1aJ0QKkLqPVWpdqp1MU8gezM3MxIWk1hUV1BvCoarDSZVvndNU5H rc5YpjEWytU1Ck2lSlfM8qUKw1KdpVxrqXBF1sTzmhYt37Fu8+Edu77esfv7 k2fOX7v9Z+/QzaFXd1+OQ2MF460X4/eGJ+8Ow3ziwqUbD0Zfz92Hmb0/8ebB xOwDaJSmIfr+3fnmXcJ9ElHhQwKM93N4fPzYC0Ix+ur+X8e/27f8+k+tt8/t Bjf87fsdt37e+/2RTbawT2G00gqd0mSzRWLbPj94/Oq1zjd/94LKzRVABS8C Z7vz1cjFPZ/+fPh4+/B4+/BE70fY/u/OmdmO6VmY9L7/2Ds41H3j2oP+ofaH L3r+/gAbOyame4ErkKaJmb73HwYf3b958djlC0fXb99yvrena2pmYOZ175mf f/nx9L2Hz+Cluiag6ZsEf/w/XHWA3YPoPR3pBa5GJh/f7hzbsGpsbU1rMKPa GtlYtfz+0JMuYGl0smd8un8swVX38ETfyGT/89HhA1+MLVv4qmHx1aXV2Xbg 6ofu6VkQqwRUifFNz+Tr7snX9/qf33r2rO/D+95EfYCCt/qwc6jrz8t97971 zokY/g9U81OJ+akIKNW/5gv/lZSAbX4qPj+FmNslmy8iAKp5yQCYcH4KgCea lyxNSsWShYxAignFiFCMCsWESEIKxKxQiksQRCLFUYLGKEqIMCJMISF4KagZ ayMhntEWXO5nVWac1aBsVGMMGwxunTZfr9+Qn7ZpWf7SjFBFPKvIFyw0WvMM 1nyQL425Vm1cqFCXqg0r9ZZahXaxxrjUZKsy2JbZXHW+aEN6QcPCmk3rWnZv 3nmw7dOvvvju1LFTF6/dv9w1eO6Xy/dejEPDlSjom0bBL2AyAzXXQ80kSJuY SbTwsDozbztf/93z9t3N9vaOv7458emKG2d33jq3++bZ1ts/t929sOfsN1tc 0YBSb6E4lcpgtfvDVYsrChfX3hgeTZzeDx//QQsmDyenus+ePb1jz4ORid43 f3eMTAJXvR8/dk2/hur7+O8+UM6RqX6g6/Xbmw/6ACfY2znHVe/f7zpevuod ezXY8fulk7vOHduRX1x44ML57vGpoZs3z+/Z82B45MHQi66Z2c6JNx0vp7om Z7vGpzsmproSejXRMznb+SzBFcjgf7mqbQ1lLraHdzdv7wSFBJZGJ7vHpvtG p7tfjXW9muiFtzc88eqbE6PLKocbFl+rrc63B7/68Yee6dnu6TcAVaISXCXQ 6nw2fn1gCLj6p+AK6nv34WH7o86Lf/7DFWAG5BBJqcCM6JMk6b8SJfpXshRs MUFaCgl94nxBgqukBGZYUgo6L4WaB6QlSp4kUKRK0BQBChksIXepeFIqmSyU JAsh9mNCSaIEEjBNMlVEilBUghEIjooQUohSIlQpJpQIpSYYI8FoMcpEyj1y tZVkLaQ8qjUF1QYLy0dMjqjL7TOYcsz2BRm5NSULa/yR+pzCmnB8scVdZbEv 1RoW8PoahW6BylBlci03uTbaXEvNrjq7f1Mo3phZ2JBf3rps9aHN248fOvr9 1yfO/Prnr9dv/3mv687jl9d6H97sH4RT1DE21T4+C0J39xUQOA0PL1/+6+6f 3x/buwKgun9h793ze+7/srfz4v4L37b4okFebwVhVumtTn/wQNv65UurmnZ/ +s3J0zevX7099Ojeyxc9o2N9P50+sXLN/Tv3Bj587AOuRqcSLEGsmnkNKwWT AdDJken+Dx/7X/99ExLPO1ijj10T0wNv3vZ1d3Td+P3quYO3zx9oa15ev2JR TkHBofPnHg89+X1T89mfz/W+fdv++GX37Gw3OODLyTmupjomJ0CCwIZ6J6e7 no/0zMy2j04+vd0xuR76wdpd4awaT+zzzz7vfDXaOZywqu7x6d7Rya7h0e7h yZ6Rye6RiRfnfh9dXj1SX3OztrrAETv20+me6Rl4t71TgNYbaJRg0jvxpnd4 +kp7b+/7v/sSl1JCtQbevhu62XP7+A89T54NjIwOvBplYcWTUsXA0r+SMFCq fyVjn6TMOWNCx6ikVBpGEK55Sfi8ZGZ+ivyTFP4TgXqekAeokoVySFlJqUyS gAPSkgRskoCa0zQpyF2yCEsRoSlCabKASE7YqDg5EdUglUFTgAgklEDCiFFM nNA3EsEJaA0kGC8hVCilw2ktSikQAnTBQSl0GOOS8WGN0aHQhXXWwmg8MxjN sbgWZcbznL5FReWZgXC23Vvi8FZZXKudvpWeSK3D2+Ty1psdSwz2zS53k8m6 0+ba6wvsDEZ3RuM784q3l1W3lVXsrl7StmbD1we+On363IVLVy7duHtj4NG9 oadXL13svf7T5zuWXjqx/e554Grvg98+7f7z4IXvtgbTQrzRwir1aqPd6Q3t WLd0dXlOeVpoVVnpsdaWbw/u/fHwgev7dx+rWXLq8OHugb6B9+/73rztHJvq //gRqmf6dc/0G5gAV92gVwmu3t681THw7v3Ax4/dwBVM3r59ONRx+dTuOxf2 72xcml+Yk19UePTMmZ4ffjx54NDdpy9637x58PjFP1x1vZzsnuOqcwqS1VTX 6D9cDffOAlcTT2+3T2xcAVy1hbJr/Rknz5ztGhmDmuNqqndssnt4rGsYbHEC Dnzxx41Xy6uH62uu1S7KccaOnv2pd2a2Z46rvqm3/VNv+6AVnXwzMPHmevtg 92u4KN73f/gA48Ds26Gr7RfWbrvdvP15254nO3bTqSIqORX5JFn6SRL+SRL6 STI2L3UOqhSwRXxeEvVJMjMvmZqXTM5L4ealqD9JVc0TAFQykCZQMwAvKZWb D1zBFiFABUInnPefRgBPEjDJQtguB/kCJ52fDAwzKWIqVUymCOkEddBvAmxi Ugh+KsHnbJQWSWmwUbE0gZxICkKngO4AJeQoySGkCmMMlFyHszqSs7IKM6Vw yNQ6lvdpjUGd0a7Uhi2uwnheVii2KLd4+aKl5VkFdfGcVfmFm4rLmqNp2zJz t0fjTcFIkze43W7faLGt1ZnWWx31Vmezx98WjezLyT9QVLx3YennNQtaqgvO HGm8eqr1zs97Hvy2v+fPQ798ty0YDSr1VobT8Uarwx/atX5x8+LcNUXx9RWl h5savmqu/2lt7ZdVJQfXrDjYsOrg5sYLf/1xs6//7tAz8LuemZkHfQO9PT0D 794NQpwbmQQ1G/r7796BR4Pv3g+Cmk1MAVeD7989fdZ19dTuzj8OXfup7eL3 27872Lx+1crty1dcvnO/7+VIb1fH7Tv3e6ene8dnu15N9kzNJoiamuyZmOoe He+bmu5+Ptw3O9s1NvHsdvv4hpXj9Ut2hbMXB9JPnjnTPTLaM5zgqmd8qm9s IsHY8FjPSMIZgauXy2pe1ddcra3Kdca+PnMGuAI/7QOBBaLAvqdf90+97pt8 fbfv6YOx0YEP7wYSaL0bmHr9+GrH+fqtV3ftGzpy9NEXX3ICMZ0sAK6wT5KJ eSmgSCwEdYhP8yBlAWPJ8FA+P4UG+5ubsPNT4Tnk/MQu6T+aNl8AmZ8SiKUC kTgpVTI/BQpJBDMBvLI8Wcgli4BecFJ4KVA/WbIISpUi4lPFIGiipFQkRUim SogUMZMs4lIkaJIQTQbqxLARAa1LESuECAHUiaSIWIpAZypC5BKMQUgcIXAE VxC0mmA1JMuDxElpA8EZSLmakJko3i5TmWilW2GMmp0huzfd7i2L5+VH4yWx rJVVSxbFMmviOY0V1cszs1fFMla5fI12xyaXe4fbuc3rbDDoIxrN/s11l77b evXHHe2/fdr/16FfT2wPREMqvZ1RalU6i9UdWF2U31yc11yUs7mi9NM1y47V LzlaW3J43bLj2zcebVx9sL72wJZ1B7c0f3f066vtPb/9ceXE199cvXXzztNn HcMj9waH2scnBl+/7h4YTJAGejUyDj748P27J087/zrZ2n7xs3u/7r/7y97f vt8Zy8p0pWeev36jd3S8f2ribkdP56uX/eOz3ZCO5rjqmRjvevmya3SkH7h6 Mdw/O9szNvH89gPgaqxhaVskqy6Wfe7ixe7R0Z6RMdjVOz7VD1yBD46M90Hc Gh0futX+ZPWKlw0JrvJc0a/PnO6bnemfmR2Amn4zMP16IMHVLKDV8WTk9pMn /XNcDX5493B0+sn1jj/a9rc/fwofZ+DNLJIEnpXIUYpkgTIplU8CcpIRwGZ+ MjBDz09RgBwlUhY8JxUFZkDEkpLpRKRPgUXHBUJpaqpIIMQxTCwWi1JTIc8j EOmTUqkUSPViJFUoFYolqcCSUD1foJgv0CWJ1CkSBeR8YeJ2GfQCoGxsigjw UyeLVckSADKxJVksSxJpk0SGJIk2BTEJxDzAmQwlpFPFWhHKCBBSICVA3wRS VoBgIoSQoIQUoyQYLcJkYpKW0rSUZFCKRWkFQvEooyFkRpLT4KB4Cguj1FOc U6H1aU1urTHT4vKo9Gk6c6bDnW11rCzMqUwLW3nNsorio3vW/vbN5j9P7uj7 69AF0KtISG2ysWo9r7dbXf7l4ciWaHRPWmxHLLwlEl3j921PC7blZraWle5Z ULq3csGBVXUHVy8/0LDy6MHPzp86/f3nX1z8868/b9/569bdixf/+vb77y9e uXrm5I83+gfuDA3dvHa7q6+3f3Z6aOj+Hye2t//+KXB179d9f/7YlpWf5UyL /3zles/4eP/fr++2dz949rR/YmaOqxlQqt7nz9rv3+saetw/Ndn14lX/7EzP 2OTzm/fH168YW7t0dySnoaTyVn9f9+hIL6AFXE1M9o9BMzjSOzLePzLRMzr+ ZODJy5bmF/VLLtcsynHFvjrz4xxUrwengavEJDHOcdU7On2tf2Dgw98JqACt VxNPbnbdOPxlz+QobAG9Fc6bj6ekqkQSjURKJiVTScnEfOj7UvDkVPBHZapI mQzxCYiCQA5GliIG5JJhLxAlwiUSSioRCwSYFKUJUiqVoCIRkyqUCUSsBJFh GIVIBakCSUJkJCqAIVmkTBEphWJcKEJAe4QSaaqIBkMEowS7TBHDHNIamCk9 XwjhDZ5vSRZbkiXGJLE6KfFQlyK2JUusAsQkxpSpUqNAok+VqFOlbKpYmiwE zCiBVJaauIXLCFA0VQIeSosJRoLJRAgnwAghRokwSowDeJQElSE4gxA0QsoQ UomSkOtUOK3CGQVKQx+hIFib3lBZnLdmyYL9LUvOHm1+cGHvhW+2BCNhldXB ao28yWZyeqJOV4nPV+Xz14XCS2D0B1tC/h3R8LZ4fFcssicabg35P02LfJoZ ay0qaist3lpYsH/5iqObmr7auuX7HS1fNNd/u3f7kc0N3x4+eOLwoW/3tZ39 6dSlq1fvXjl/9lDzn9+0XPuxFdLdlZ/25hTmOmLpP/11uXeOq3vt3e0JrqZ7 hhPG1zM+0Ts92TM62j4w2D850fHi5cDsTN+T59APDzcsG15btyOau75s0d2B fnhOH9TYRN/4xMAomOBw78hIP6SysfEn/UMvWxqf1i+5uHhRljO699Bn/dOT A9MzgzPTgzD+Q9c0cDU7OPn6Rld//9vZwQ9/P3r39+Cz0aEbnVc+/7J7fHjw 498PP7wDB4QIxKSKHASplAjx5GQpoJWcwgvFerHEihEqREyDHKWIGIGIAAkS S2UoJG0RCVBJJJhYKBWJWJqB7C0ViQEzBkUUJMFRFEviNCYRC0WAFSpFlFKE RxD53LGwFUNxkVgCgAG6fErCMcnUxHdJTLIALFKRKgSXVIIzpiT2mgGq+UJz ksiWIrULpMpUCZ8iNqdIQhLcnBArCZYsQkHKUiVcKgAslQsBLalcIObEKCdC tUJEI0IUQpROlspTATCpSoAoBAgLW1Il9NyTGZFUJsJQoRQVScUiBBdjClau 5dWxkHdxWU7tgpwt9VV/nNj605HmUDiis7o4rUljdhidPp7XqVhexShNco1F ofNpTBGjPWa05br9+XZXhTtQEwyvioQ3REKrIpHlweAql3tLNLY3LbIR9K0g f2csdCA/q60ob09Fyf7qhftrF31Wv/Lr7ZsvHN51Ymvd2dblp7bWXTq+9cqp PfmF+a5I+ulLf/SNjQ2+nR169vjF+KsBwGN4rG96qneOK/C4u32Dg1MT3S9f DkCuHhl5cvXGk7VLh+vrdsXytpZV3Ll/r3dkOMHV+EQ/cDWW4KpvGLga60tw 9fjVljm9Wrwo2xlt3bO3/eUzgOrhXM2hBTU9MDUzOPX6bu9Q5/jIww9/D71+ /fDF8NPLdy/t2n+vu+PR2OjTsXGwPA2CESkCN8moxEIyOYVOTTWKxAFGHtMb cg3GjRGXGZcqRIhejOgxWUFmXnF+XmlWPEOvDPK0HKgjSLmMwRCUIUkSw2iK 4HAQK4TBpCyOYgiCogiOSlmKYDGUQqWYRIRhUokEBEssF4tMAqFRIJClCjmR GLTOIJY6JKhdIjUIRWxKAng9MJ8qVoFyCgAzoUYgkqeIZakiFUwEIoUYgWhH J7RODA2mSiRNJMZUiSxVbBWieiFiFiIwQjuApcIFIlUKEIMQNQlRTpDASSGQ agQSswhVi1CZGFWKUQuC8+CkElTFKXQq3qjTAlplBfHyosyd6xd9vXdtKD2q dbhkGr3a7DB5/BqlRoWzPM4qUZZDZRwmk+NyBSVXEHIVKdeQCh3FG+Uao0yt Z5UuhdatMWbYvAUuX6bZVuj0LvJ6GyOx9fH0LTlZ4J67C/JaC/P352ceLM07 UpL9RWnOvsqCk/vqzx3dVpifbwtGjp063T401Dn8oqv9QdfDvlu9g/cfP+mb nISxfehh18sXd8CeJiFovRicnQJ+nl679XjVUtCr1lju5oXV9x7c633yZGBk tP/VSO/TZ4Mjo70JrobnuBp7OvD4xdaWlw21fy2uynbHvjh2DHxzcGbqP1wl 0IKaGkxwNdv1+NW9p08efXg7NDX16NXI01+u/rSi6df1LU9273+65zNyfkqm RkMLhVaMCskVBXLSh0ocUjRTa62MR+M6Q75Oo0ZxM0HrJFITq6mrWdOwdsOX DSv3FqZvKsxQ04RKpTGZDAxFR6LpWo1KzbIGROIkMD0UL9fwcrvJaNTwTqMx bDWoUAmBSOUMIaNJk0JuonGNWKgUCnkpykukvFhqwgmdWKwTiXRCMQfYiMQG KWISSTiRhErcdxVqxGJOKFYKRQqhUC6S8hJcKZQaxKhRjDqlmBvFYC8AphMj ToSwSzGTWCqHA1MlrECsFSNQagmiEmEQyVRCqU6EGEQo0KiVSM0IZpBiZhTn MJyjWb1WC6XTacx6fcDjLM2Lr6jMAcDs4aDG4ZRpdEqTVet0K2S8jlAYgB+U NWCcjVKZCN5EKs0kb4UJwevn9qpxBU9wGkLBkxxPK9UEp8BlHMWpZWqz0ujR WnxGZ9jkynEFirzBimB4aXraulhkTSiU63Atqyr5om19Xl6OzevfumTpic0t 3+7f9+OefUd3th7f89mpk6cvXbl25MjXl69fbR/ov3X/fsdg3/Xr129du/z7 +XO3Dx9+vLL6Zf2SnWk568sq77U/6B16BDoGaPU8edr34gVw1fvoUf+Ll/3A Vf/Q8y2bntXX/rl4UZ4ndvyHk9fvtw9MjD4EtAAnGKem/svVzMDI+M3e3sfv Xz8aGX00Ovrs18unlzWeXb7+Scu259u2U/NSfYxMJhJqJVh54sa1M5MQ2Qg6 0+QsCnkdDOuhWC1CZmoMegTRMKrS4pqWNQ0X19esygh7zDqGpAOBmM/jVlBs YX5ZPOLzaFUBs6nQbc2w2xwcazcZMtLi4UAg7A7sqK2I6hiOIvQc67HYmlet WlucXewwmknMJZNbCDJNo/JSlA2FhU7okgtBXCzplNEmElNJUQ2KyiUJwBih gBMK5EKxAaWUYgRgsBOUDkHMUsQiRdViCS9BrChhlWI2CYAkVSEYI5BoxFIz ihhRqUoMDANCuFuKW1HMjKDAp1mCOTCMx1GeJTQqucmos5qNZoPebNCZEmXw ux0L8mNpkYDF79O4HJxGrzBY1BYHSXEcLpNjNCoAW8eUqJwS4ZSYMBBAGiOX kBqMNWIyDSoz07ydUhlxhZ3VmGgeHloZXk8rjazaSPFwbnW0WkertIxKw6q0 MpWWTZRBbYxGI4X5OeG0DKs72JCRuS8e35SdvTGvoLVsAdS24tJdC6t21yw5 unnzoZYtX2zd8s2+PYe3bj28a9eRnbt+27xpYFnVi3V1O9Lz6yG337vdM/Sw f3h4cGys7+XL7mdPgav+p896IO2PjDy8d//ppg1P19b8tXhRjjd2/KeTD3r6 Oh4PPZqefDg9CUQBV//Uo6npR5NTt7t7B2cnHz5/9QQaz18un2nY9PuF84+f Pn7c0UPPEzhpyAYsJ5IuCGRtqyldoMS9tCxND3JtAiuMqFV2hivPLHTJWbOM Dzj8jUUFW/LSvFYLhaN6tbG2atmCkiKelhXGc9oWFxlkjNtkbiiKLisqq7Rp 7GpVPJpVVlRo1xuKgj6LUpZmNgRVypDbt2fN2hPLF9ameX0ydmVWLKLlN5bm 5qjkaZy82Kpf6jHH5fSqwvQit8GnkvlYxkNB2EMVoD8SMY9KVAhuJWgNIITj dpLS4TgrEamkYjMKakk6CcJI4JxUrJaidpwyEgSHSJRSiUoi1UsxKBOGmXFc iyJ6yH4iRI4gPIep1aRWwxn0aqvFZLcYLQa9Ra8zGLQGPaBl9DhsAZ/X4vFp nJCvjCqTTWN1yWS8AmPVkPZFKAGpDKNpaFEluJaQKxGKFqEajGElOGwx0rwK Y2UwoZQyKaXF5WqMlSO0keV5jAUpU4Po0byeBcB4A62C0tNqFcPrjGaPP+gM Rc2eQMjiDmpsHqMr5AjEPWlxdzTTGSxwBcuDaVAV0cw1+QVbFpbtrluya2nt vrrlR5cu+6Wm6taKpduzCuvzSk59uv/6xd/a+3p6nj3pef6s69mT3uFX/a9e 9Dx6dKejo/PK5YfN65+urf2zpjrfl3H8xIm+J09vt3c8nBp/mEALcPqnJoE0 GDsGh7qeP3n44vmT8Ylnv/z12/Zddwa6nr57/ejpC9k8SZYHIpSKFYpiBmdV SUFAQeolSJ49tHVNXVDH20k6Xe9YsajGpZDbOW0sEMmzGqNWt8vlZggq6E2v X7WhrLSIZ+RZDkeeVcdTtFWr3VQUra+qqy/OtKmVboczI+CzqPiAzQJ0rVtU lW3VubT6lfG0pvzMTbVFxQ7Lid31GS5TZdifpZZXe5xfrKr8Y39DvokvCTpz 7GYHSTeHXek8q0YRuVQqk4gVUkRPsjqS0IBL0oSVxG0UrUakClSqw1EHTdsp 0s7QagwxEqSLplwMY6QxA5UQPSNGgJp5CNxOkDyGqKVSUEglgRjVpF7NGjVK h8ngc1qddpPZrLMYdHp9wg0Ner3ZZLbabEaXR+dwK/Qm3mzT2d08p5EjDI8y KoTgJLgi8XNulEcYDUbrUFIhwVQYrZQSPEKaaM5IypVSDEYecIIYhjIcQhkZ JSklwBYpKc2Tco6AkMaCBqoJpZpUcpRCqTObXAFrJGYMBD3OQLonPWAJ2nV2 j8Hl0ru9Zp/b7PZbAwFrMGQLpbmjUVcYrvGCaHZBIL08FF+Wnt2YnbshN29j TsHuykWfrVrx9eZNPxw48Mvp039d+v3mrev3Ox/cufzn4W3bzn/a1r1tw8MN S68uq6mOZH/xxRd37t37/dff+p4NPZocH5qehHo0PTE0BTUJY//LV3fuPxh6 9eLp+MTzX/+8tGv3/Uc9T99MPxp6wiRJ08I5kawwJxY6Gc7E6zwaDcTmHIOv cfXqoFlrQ7Aca6BhSa2LkzkZtspqbs6Op4cDDIWreXV6OLd26frcvDwVI1uZ Fiiz6MxKpVGlas6LNdWtXFazyKZRRnzBmrISp0GrlHEBb3BjfUO6z5Fp0H5W lre2OK8i4l0c9Hyza3XMoGwtTGsIGPJNxn1LK07t2rDAZyv22EvDfhfNtmSH gxyjQlEdgaoRCaiQkaRlGMwxIwXChTjBkDCExSXwBAcDXOEukjbjpJMGrggf wzhpzEniRhS3UiT0uXYM8xCkDsPUREK7lCRqUstMaoVRq7KZjG6n3ek0WcwJ vTIatHoYjXqb1WS32WAlNXanQmfgrVa9w6XnDayEVEopNUJyYlyBUawY12Iy FUoZEEotxTUoo0YJLUabKJmRZhUYCCmrw1kjkINSPEobaQXYqBJlGAmlwTk1 IVPgjJri9aTSQiq1lFKjtxqcfnMkYg6GIr6MyoLFMV+2jjNa4c3K9GYQV95i 5C0OvcuisnuMXuDNbwsAY4Cfx+gPOEIhSPzOSMwZzfHHC8IZVem5S3OLGsoq ti+oaK2s/nzNmhMbN369vuHX1k0dbetvH9j4c+PKxdGcLQ3rvti67chnn924 cW3w+bPB4RePxkYSgE3+F63x8WtXrg++evFkfPzZL3/8sXPXg4Hup/AE4CoF z0zL90VCMqlIg1BeczDij7mlWLbWvax6md2gDSsUaWpDzOYwEESY46pV3JJ4 TlpWhCIIt8mS649l5BZbrTY9I18dDCzPXVBeWqqWyXKd3iVlVemxqFXDZ/uj rc2N6TE/Q3HxaHplfl7ArA+r+dUZGauqFoTUfL5J37AwK02tOF6asSXujsnY Qq2muaZ8bUl2mV4RVfMBJb/UY3PThB7Dlhb40h0qA0ZoUIyEhC9FLTimx6UO HNdhuAKXmAjUw1BuGuwPd1G0X0H6ZKSfYTwywsGQVpJys5QDI8wo6iUIB0UZ KMKEYioSNWjkeo1Cr1FDUHc7bX6/02YxmPQayFd6A3iRwWYz2R1WcyCgcbg4 jUltdWjtTjWnpqW4XAp/nVFAE4HSCY8jQItIwEmFkxqcAn60BKNP/PQRVIgy 4YyJkBlwOUClwVkDKVcRLEgch9BaHLK9TAWHk3ItoTSSigRXOrvB7rdG0yzB cMCbVpFbme7J1MoNZoVRL9OblGYbZzYqzQ6N1aSwWDUOh9oKSmpT28xqh0ll c+g9Nug09G673uM0etxmb8AeDLuiuVmF2ZHcDE96TiCjIppTl1HQnFfSWlS8 v7by62WLVsdza4sr1pRWbVnTcOGn039c/P3ib7/8+duFe/du9fR1Dzx+2PNo sKev95cvv7l67UrP4ODAiZ9+3bLtTteDx8+fDz1+LEtGHDqzjlPqpdCFSX28 zmswOaRInFblhvPUck6HUmGVMc3p0KFYvlZf77RkmV1KXskx8lK/K2yADOvx eAMqWpZt86xfuX7tqjUmrUqn4EPuUO2iRQGvK9NkaVm8JB4LKBUqj8O5qHhB WXqkyKhd4PbnRyK5Gu3mrNDB9dV5Bs3e3Kzdy0pivGyxUXt43ZK1CwrWpXn9 LBVUa4usBjuGezXK1tVlOR5zWKl0cmA0iFGCQqSXIRI9hloJwoAiTgxzg16x qB5F3CQTVTAhlvTLGA9HWQjCTtOQu+w45GrMTeIekjRRpBnD1TRpBunRqYAi p9MSDbvTQh633Wgy66wmvdVicNnNHqfN5YKMFdDbPZzOpLW5tDanklXSYHMY aSZkvAQEitYgjAmTcxIwwcQPHXUYrcdAiBjQKAMuA7qMOA1cQe4CcQN10pFs 4k4FmCnGqgiZllTooU8kOC3BGQm5hlbqtHaDzW2LxsDlQt60ypzyPH+GlTPY FAaH0mBTmhwKs11p9qgsToXVpbY5VVabxubQ2KwgvaCqGqdZZbOp7Ba1y6p2 2NUOh85p17lcRp/X5HcbvF5zwGMNheyxsCMWdabDR4/5YyFX2GGPBtzpdcUL jjc3fb9t82/Hvrh4/Mjvxw9f/u7La999eeXbr64cO/zbvr3f7Wr99sBn13a2 nl218dyu/Y+OHhs8cpSdL9ThiuKMXD9DaATCkMaak55uQNEITmeqjSqM0uNU gFMtjISCciaqUuTxqjBFEhKpVqUK6FUBiyMYCuiAM1aRnVW0cPHSkqIiq1pp Uij8Lk92NBJwu/LM+oU2u1GjMvB8wGwpzc1Nt1sKTJqQjPYolOvTQj8sKzyw ZmEGz1V4XBtqyxZlBst0mq8aV9bmZbQtr/TJaDcjKzTqA5D0NOpFmSGXjKsL OfP0nAnHIYHLJVJaJIK+z4XjBhw1Eqibop0UZkaJMC2LqrmIggnIGCcL/GBm AtdThIugrDThoAk/SdkoyozgaoYy6lUGrdplM6dHPDnpwcyQ1w/RDizIZnTb YQGsQZ876PfaQ2GNw80ZLBo7BC2PhuM5KaFE8MRvfiBlSWkdwpowRgmMSQhA CHQMspYKJXUgWQRjpmUJ2AhWSwBFEPhpLXQfJKtOYMYAVwaGB7lTEwotmfii U8codTrwY4ctHHFEYdFjVTkLS0LZToXRx5vTtDYvb/Tz5pDSHFKbAipLWGML a20xvTOqd/o1Vie0rCqLgzcBbHa13ZGgzu6CD6Cze40+p8Ht1LndehdMfEYf mKbHFLLbIkZbyGQL2O3B7NzihUWVZbH81YULWmvrDq2p/3LDhp927Ti7p/XS F5/+tW/Xpd2t3zZt2te46Y/m5pM1a7+sXPFw3fqHq1YrBUSaJ5Tu84YVrEog cFOadE/ETrF+VmbCcLNMYSZIE0Zm25xBjvNrDXF/UImhJEZG3f59i4uzXI54 KJxtMysYLhbLzI9GMu3urEhYKaNcLmdmLGI3GOJWS1BGW9XauMtulCuqi4o9 Oj5o1MZ0KgfNNGWFzm6tO7F3dRrPNVeWft3WWJcTjrBsS2VRRVo422m3EWRc rcnSaiNadWPtgky3ParUbirPLXLrPArWjBAaBBo6kUYktsy1eAmDA67ABAkm zDIRBefnGDfDGDDMShI2hrAwtIsgLSRupokQSbpIwopgKoo2aDWQ0v0ua3bM X5Aezk8LRlx2j83ktpl9oGB+T1rIFwp4XOnpRo9PabJonS6D26Pn1UopCVwx EoLHIQEmtMiAMbw0Ea6M2D96BX5HGEhWjzNmcEOc1RMyI86qCQCJUhAMTwBd Mh6TqXFOCbwBTiSnA7Gi5AZGodEAWVZHKOqMZgY8aRVZC6oieVGVOcyb0tVW P6/3qcwhhTnKmwK8JaK2RDTWuNYW1zuAuqDO6tZYfGqzl7d4VRav2uJW23xq R0DriFj9Xr3TpXX4dA6f3uM1e70mn8/sd9uCFkvQZPT73NHcjKLMSGHYm5mT VpgZySuIF1XnLVxTXLW9eunXGxpPt2w+tXnTqa1bDjVsuNay6YfaVUdqVt1Y t+HOuvW8gCgMpldkZ6TJKb1YaELokNFqpmQ5St6NIV5GnqbgrLS82KiHrsqr MWZEwgR0TzK+PLvo7KZla7Mzti7IC2g1CoYNmg05dl9ubkVhYaFDrTBrdV6H Vcsr3WAmCnnA4vqsrsKjAaIMVp5L97l8Rl22Tv9jc21Dtn9p0JXOKU7tWr2z OqvcqfYzZK5BH1JyZoqMy2RZLOPGMStOWGjGhNKVdlNLobex0F6dZnSghIMg VWIxLRRqJWCCpBXFPTQDG10sAzzHWNZPUR6wHoTwymm/kgG0nAQObgjtpJ8m vDhhlOIcxB691u9ypId8henhYjibmdGwx+G1W4Iua8TnyIj4stMCGdFwKCPb 4gmoTDaD023zBtIcNh1CWRPfgmFKBDpQxsXCxQhckSoJrkcoSOwGnDZilAWV aVGYJ5IV2CKgBVypcUpJMCwYIrBE8SpcLocwD4krcSuV09ByI6uAjtRgsjoi UXssPeiJLswoqwpmx9XAlTGmAaXSexLaZUxXm4JqS4A3h1XmmMYU0dn8KqtX YwuorT61zcNb/CqLT2PzqG0hvSNkcEUcgaDR7TU4PVBGj9/o8RoBLT/Yok3v N+q8Xk80P7MwN5QXd2XkRArS3BlRd3qaPysjlJMVKyyJFy/LL99cXnO0sen4 ho0XG9efW7nmh/UbfmnbfnHfbqOUKnG50h3uap0qQuNyodTGyuwMV2wyuTAs yipLHQYHw+aqVHqc0LEyjYzGENTGK/M0ul2luVtyM76pKzEo5LxcmROKRL0B pyNckJ5R5bOqWMZuNOp43m02KeVyv8G8Ei54Xh7U69wGTdhmsmrUfoViic/x ZV3xnvxwOs2eXF/zx+drdi7PDnBkgGZ9MpmP49aG3KVaOTR3JgTTSXEbzuab 1Sui+oUBfVQvB1pccpkKkSRu7YokfiyBkI1iTQRlY0g7hYVJKkAyDpyx4ZRH Sft4cFXCg5NWHDOQuJ2GDA+rT8gJ2m42hf3ueMSXnx4qzo4VZcWgbw26LFGv Neazx8OegoxoPlyABfmWQJA3J2622/3+goDbgFN5JlWQZ5WJ4C0zgdnhjAZN 6JUOJUG7IEvoMALMEYKWFqMgNUGy0lIyDXCFUTzGkKC6tEJFcWCFQKaKlCkp uZrk1IxcK1MaoXsw2Z2hdHsoFnZFFsZLCgKZPo05oLWETB6f0RG2eGIOb5rV G7H5QnZ/hiuU6Q5meqOZ/rS8QFqhL5Ljj6b7IpmB9OxQRjwQg+0ZgVhOek5W IB73p8M8zR2OwKeyQhcZ8VtDTr3XpHeHQvHSwoWFacVxdzw3kp/hy8jwZmT5 szO92Rk+qKxMf15OtKgsq2zdgppDS1Z9v2Lt2aaNv+zadqZth1lCLwpEK/Ny PEq5AUPwVIGNZOFsmFm5haKzOOWGnJBBKjFLMZVYoiRJVCJhaFma3bHC525M 86Up2TStQidX6NWG7KyseCw9Fol4VcowcMbQJp1Bp9apeJVarTMydEytCho0 Tl5p4pVGBadh2AKLaalZs6csqyHdG+Xke5aU/XK4+bvWuhyzyoGTBpwIm3SH G8qrzTI7PEQTCuCTKzwqzqVggnp1hs3oolmwGC6RryRmicSFoq7ED5tZWEG1 VKqRSiHGB0gWuILWz06TdpaAZOXESdArLY7oE3ceMJkYlZGM22oOeh1pfmdW yF0QhZ7CH3ZbA05IIaagxxLx29OC7nDY5whF9E4Pb7TCaPH6/QaTSgr9pswn kyslkN7lQI4WZ/6RqcRvcsD1gBYc3DCRr/QoiJsSwlUiwEPrNxfpeQzaUgUP zojLIVPpwQQZpZZWahmFWsYnuDLbHJF0ZyQe86RXpBcvLalcX7dkw8qlm9Ys a2lYuW3D6sY1a1ctqWtatWLtsmXLapY2LF+xfPGSljUrT65adHVx7p7cTJ/F GfIGG5bWNtQuzgHSXIHySHpxetqieFa5J1DqCRSHokBgiSuYbwuALVr1rqx4 XvXCmvKCyrg/oyirpDiruDCjqDizMD+WlxXKzQ3kZQeys4K5WYHczHBhcby8 oaTmyKo1P21uutDaok7FcxzBnHDIzrDpBj0nlejhEkNwHtxEq8qSySuibhWK WEhaLZbKCOAK1WlMAY8326IvdBr8LB6iaRVBmzXm8oqqksI8v8UQh0wip2UY puTkWp1eJVdaLZawUe2XU2ocVeC4hlfqeKVNo8uxGItVbJHHFLdoIdGtzE0r DliXF0ZiRl6DYkYCbEtRaNJEeAgeuCoRpUgrTTsZGnK4j2OAOjNG2VDCJpF4 UKkNlVoRsELaSXPwEWRCsUqCmGALQXkouZnEoQe04rgVJU0IpUEJOYLKUZQR SykxpqBlHqs1LeDOiYLfQb4KFEd9YZfF59T7HEa/yxL0WkJeq9trh/5JbXUo DGYY1XanTqnXoKyDVnoY3oDJrKTCSnFWQmHC5VaSg6xlxuGikEG36CA5B62y UJyN5Myk3ETKjTASMgulMNNKPSlPxLNE6GJ1id+JKbSUQg2qxSih49FqjBZf 2B5JD/oi+aHMhuV1xz7fdexg6/HPWk8e2Pn1vh07WzZtaWpsa2nctblpXf26 1avXbm3c8Pm2xovrlzxbkrsnErQqzF6Hb92q5a1NDfUVFSVOz+p4bEtF8epo 2mKXt768tK1+6c666lpPoMzs9mg8doOnpqy0ZeWS9Ysrq/PzlxcULsnMWRTL ropklIUzi8JZxZG8omheUawgP1qQEynMihQXxEqr8yq316w4tblZnioxUYqg yeSRMcVBj5bFaKFEC3lDIlUjuBknQ0bewBJaguDEUjnFsDSrVqotOrWTp/1G lUfNBVUchxA8I3fwKg8nj+qUPh2nZwg5JqFxjNdqtQaDU6/2q2R2GcnjEkos 5iBF67RuvcbP0UEaD0GnRmIaKRqg6ByOjVCoCZVSAhHoFWQqD4bZMEwuEOsl uEZK6BHUKEX8KBFEca0U0SGkl6ADoGwkGSFpH0FbcSbAKgO0LECxQTBTSuag ZEFG6adYN8G4CNpNsk5S5iJltsQ/o1FahKBFCHBeEAuU56ZVFsUXwLVXnF6e H8kIWCPQIHlMYIXpIUc86IKW0BYIaewuOciUzQl9lc1gNuJMoc1c5rHChVBo MqTLFU4ISygF4UqDgepSFvgrGAn+qCUoJVy2kMwxQoeRIFM8QpkptYaQy1Ca kJIKlObwxP+SgEUmmkQa3FAO0q7ktYne0+NzB4Ihj7dhRe3xg7u+O7T7hy/2 nPhs19e7t7c2NW3e2LSpcePOlualy9bU1K3Zs23T4dZNv29Y+mJJ/p6g3wap 3u1vrF+1s2ndkbamAysrbzVVPGiq2p0bb6lZuL9p1Zfb6/fUL1vsD5aZvB61 2653r62t+Kpt45Hdjd/sbzy5b8P3O9Ycb1725ZrF+xZXtBQWro5mVQXiJf7M wmBOcTQP4tbC/IoFOeUlGeXLSmp4gRSysZEmzJzMa1bLCQmWLDBICTjbeoIy ygmeRNUEiqek0mIpyzJyTg4By0JhcSWZoaYtLGmRszRGMJQM8ky6HE/niICM cNOYCpVgiFRrslgcTrecDZGoF5caERGLShSszGIyOlRKB4raEcQmheCEalHS TTEegnITlAEFvKWwKDqcUEoQToKwCdoJ8EGgXQ2LIiUCDOehZE6K8zIKv0wZ ZhVhVhaSyyIKRZpKncYrwwouKJdH5FxYyYVUCuA/wDE+GelkKBtJmAlMi8Mf RUwSqVIkcRk0FbmhmqJ4TXFGVVG8qiSjLA+4sqV5zVGfOS1giQdtGQEncGXx BdQOl8JkVtkcOrvTqFZDfNpeGD5cm2Yh8GV+20KtKipTWHDagkFPQdkJOsSw TpyC0GX6D2AsxC0jgIfN3ewi5XIpxiV+10qqE1BRGiLRKgJ+RlIGnqjgVAq1 1uD2mYOhgrLCnZvXfndg+4Uvd/18ZPf3B9uO79/xVdu2tk3NmzdsrF+3vrmp aePGjY0b1x3a3fLVns1Xmupe1uZ+Fg64eXPMG9zevH5ny4bjB7d9v339jfVV dxvKL6yu/Lat8cSBLd8d2Hpo8/rlgXCl2e3WOOx6546Ny84daz1/vPXXY7su fLH598ObzuzbcPbTDb8d3nzlqy3n29Yf3bhix7La5WULy3OLCzOLCrMWlBZW FuWWF2SWq0VIFBxKz1nljF0tl1OoaH6yVoxBlNVRlF5GaliCECd+uM4iuFLO qSEtyWmDjDHKWSPP6jiGIlCpFCyPN2mVFl5uUMt1SpmBk/NAICszONxWj99g 1Jn1WiOEML1Kq1NptBq7zWzT630cH5QrgjByKr9Cna0z5JsNJTZTntWow3EQ ySK/Ywn0qzrOieNqKSRtwiYni8L6XL8m06oKa2UmiojqFFl6Lq6iM7Vkvoku NtPFFrbISuebqTwjU2DnCq3ybAubaePSjGxQjXsUuIFGlCCniJiSiKwSsVks dRrUpVmB6vy0qqJoeX64PDdclBGIuy0Rlyns1ke8xjSfNc1vD/k9jmBY7/Ao jRatzWXyeKJ2m41kdheH1oXNYL55Ol2ZTuuhWYhzXpK24ST4e0TOxhRyJy6z 4pSJwCHB6hN6BSFfbmJ5A85wEhSSvAwltDidKICKTPz7m4mSaWlOpdRAQLUF gp709HX1yy582frHsbZfj7b98HnrV/t2HNu37eD2lm2AUv36Des2bGlu2rtj 857tm/bv3PTV3pZrTSteLMk9lhkLqE3p/sC25nX7Wpu/PbB1V03l4bLsP9eU /1Vffmb7qpMHtn57cPvR7Y2r/JFFFrdP64D4uA24Ot7627dtv37Vev7zTZeO bL5woOn8gabfj7T8dXz7pa+3Xfpq27lDm7/cVt/WuGbN8iXlC8sLisryCksL ChdqxbidlbtBOhScSS6TCgQpnySpxbgJIXkUoyRSGkFQoViUJOCkuJLjeIWC IQkCdhEUxykNZrPGYtFZrEazVW82Gaw2g8dpdDotdpfF7TU73VZ/xB1Ks/uD jkDIGfA7Az4PrE0oGIqEY4HgitKc/fWVhxqrDzYtPry19vznDbd+3NJ+dnvf rztLM+wGmrh0uPnltU/3lwRL9bxcLC0O2srDmpX51vIMoxwR6WjMymB6ElGi Ig0pNbFSL49H9WS6iYpbqRwHXeJmK/xchV9R6pbl2ZgCK5NtpLxqUs+iKhrl ZZiSQs0SqVWCusygV5HaoviiwkhlYaQ8L1IEjZPXHHQZQi5D2AuLYskIO9PD Prc/rLO7lYl+0GnyeEMOu41i1kacS9wGkwQ8nYPeGZTKK2MKTSo/y2Sr1EGW BaLAeUG4gnKZnWQTHoGzZrnWAOTgtAolEukd2kYI/DSjp1kjAxFLlugZWZlW rdFo9fZQyJeZuX3zmus/7Lt8Ys/ZI61f799xbO+2o7u2HNrWvG3jxhUr6leu rl+/bt2OTU3bmhq3NG04snfL1eblT2tzWwN+j8oY8wa2NdYf3belbWnN+kj4 s7ry8/uaHn9a37dp8bFNq3/4fMfJXc2bY2lLrD4fXPc6R/OaJT8DwN/s/uPr 7b8dafn9cMvvn28+d3DTr19tu3h0x29Ht10Erj5v+eGz5uO7G79tamipXVpT WllcsCAvr8yEMjoUInHCXHiUoIRiJEUgF0pNUkIjQSHkUCIpkSIikwWJr+bl Ml4hk9EsjuEUSRlUunS/vygercyILk4L5HrtEas12+8vjkQWZWctzM4uysrM Ts/OiudnZhbk5xWXFi8oK6ksXVC9YGF1VeXihQuqj+9tvvxdyx/ftrStLVlT EPx0ZfGFfauvftt87cTmLBf4C7KuIuf0/pXLojYbjjESaY7X9uXGgpX5RieP cUgqhwgNpBSg4jCRlkbtPB4y0DkOebGPLwuqFgZVC0KqxNyvLHZyhW55oV2e pafDRplVQZo4wsKTZjnuEkvtEiRg0SzI9C8qiFXmRSoLohX5sbLcYEbQGveY IWJB750ZsuemubOifncoanB71Q6nDi6cUCDksnlZ+bo0/8aI04ySca0qplRY CdAl0klTOXplhoJzE+B9kCHZqFJeZNNYQa9QCvo+I8upCVKJUTT4O87KcVJJ MDwF3iczUzIDlchXOoYDqlRavSUU9GTGNzWtunhy//lje779bMc3n+44tmfr Vzs27d/SuGnD+uq61TXL1qxds65pw4bNjRsgwx/Y2Xy5se55Xc7n8VBYYw65 Aw1rVjTX1lT7Ag0luYd3bTh5aPulgy3tTbVHyvK+3bHh3L7Nn+dlr/n/eHjv p8Tyvd/351v17D0dbBOSc845ZwVBMRNUEEUySM5ZQEVBMHXbOXdPT/ekntzT k/PsyXs/YZ/z1Dnn1qlb5/wTdzn31LU+9a0lrBLEl++w1gIWH0iQTDwr7l2+ 1c7f288CugTo1b1m7MZm5LQRfbife9DOPtzPPNlPP9iJX64Eb9bCTze8+Wmz 37roNsw4dDP8EcCJcBIoRgLDCCBwbP8w7GL/0Pk+oKdTR6C0kRHgxcH09Q2/ cg56sR8FgVFpHIlKL5UpdAySGgUH/jdj06a6a3l3fblsm19Sqi1ylVOt3bQa Hjh1d+2aqIg8QWVO8ETAzHN4fhZtHo/RwZDTDNaCQJCaUW/ZdRWb1jfGXRJT lqU0u5rlMgoX+VQpaJDW38/DIKfETAkeQxgGyvvw4qj4btl6pzJt4qNwgxeg ly7AL52H9Z3HDl+kw4ascmrDM9raGG/HTAmbeFVHXdKQF5SUGQlhgoMeYyF1 dNg4FaznYtl4MB0FomPADOQI59IAvW9YQMYbZewZrXhOL1sYl59FLKNCL2Vp eTQ5n6YQ0bVSlkHB06lEPJmCwhMS2DwSj08XCTUCrgSCaI5KcyoeaxjMAsNU SKQICuPDoRwIyEQnzFGJejSSBx5hgSDiERh3CEI+O48Dp4IRLBAQukYIw2Bk /9DZyZ0hMHYIjAMBJgjFgWGEETgehiTCABckIDE4uljEVan9PsftbuV4q7C/ Wdir5raz8b1cZCsXW/d45pbXzCtrgBV6vd5sIlLPJ5q56OuRld+c4+8tjM5T mCImb844Nc4R28a09WzocCtztZW7upU9zYRqBs1159SjvPct50xFJLLRuGwC MxN03trNPmgDYpW+3YyflDdO65E7u6n7e9n7uwBsySfd5JVy4LQW6qWDd73r hRnL+uJyfsnWWrRJYDgllqok0HQU1hidzcBhhs+dR7xykQPD201zV2y6JzbF OA4C7rs4cK6PgmUY5h3Tdk98ZfXZ+twiCUmF4ExzLrMjZHYErCvBOUdw2u6f X3A4pMLmhPz2qmFnXuXWjU7POC3WVbtcGhcw4mL6FJkwyhKsOpyPjgufP6y8 vFd4cTv/4nb2uyeVX9+q//7uVsc/oR0e5AwMRhdNXz+uBM1S6MWLVBDYO6V+ tbX2zuH6ipFDAvUhLl2EnT8Hu3AON9xPhQ57DPybedv7Pe8XdzNP99fjVoFj lOYyclN2pdvE03OQehpsmo2cV9IkNAQTN8LEgWlIENAdaAMDXBJWK2KY1IJ5 nWTBILWalNZJlVHO1QjoKj599E+xmlDyDRopX6kkcnhENp8qEHIkUr1SThkE +5X8kJaL6x8cJRNkMDgDiN/9Q7iBIT0Fv8SjuQW0RTqOD4LIEVA5Bk4AIUe5 XAEOy4BAqENg9DB4BKgtZxfJA4kdjB8BSINgIHASBEVCoYlwJJVAwuFJdLFY oNIG3Cu328Vr23kgrjdziXoutl2I7pQS1pV1k23N7QluBEKBQCAaDjYL0a1c 9K7b9tvK+Hd2vYPO5OHpMipnQirPRry7tcThVhrwvuP6WWJvh92HptHTSdWj 2dEsj79AYXMIjELYea8NcJW9t5u+1ogfVCK391IPOpl7reSrgAnuxq/VwgdF /2EpXAy5HgVde+Zlj2VxZ2OtE3JqZKNatcGonwo41rKh0NrS7PClC0D7E+L5 EXfwqnX0UMueIGOh/X19fzlPQDCNFtfisvvA6bi6MO5nEg189Zw9MLcSmF8J Lq6Grc4g8HO2rWPuUeny7NQcn7kyY7nmX8pNjW3bp71qsXXcYCTilyemQjrF glz1+LDw2cPKJw/Ln94vffGg+Oub9f/4YOefH+1+cjM+T0OKh4ZTS6Yfnlab cRMBPMQBQyrrc28fhN677F+Z5JOGLwIOiOo/j+4DuOojQy/JiJBxPjm8Zi2k /QH79LyUrePRJuS8qN0UNYjnlHy3Qb7Awyyo6CoWlkeEAkPDjrAxUDoSzKWg tWLqzJhowQDkK6V1Sr0wKTMo2BoxA+BKLWLpFTyjSmSQiwVSGZHHI3C4QLji iiQmpYwxDFnj0WeoBKCxylBowQiYMDBMHQQxB0EaAtZAxJkIaBeXfHbAdgjQ f6gYQ5ITCGwYggGBMkEQoPqBLw0BK2wYhB8aIYLAeBAMDUMQoAgiCoWDI4HW A+QrilDA02q87uVrO/njem6nlGxkY1v5OABVJReftbsMi2vWVc+a25tJRt0e XzkTqaY27nsXfz/jSmdnMAR4qozEmRBIUub5qwHHs+Tam6m15znXuwXPB3nv a8uTe3L+oVYe43CmSAwOnp7yLd9oZW7uZoH1Rit1ay95by91r5W4txN/sJe8 vhndTntPquHNhKcedz8MuI6szoB58UbC8yzrV6mm9ONWj8NdioULUZ+cT730 yl8H/vIKfhBhlGpKal5eQOIODoDOnR985RxiAG40LmUda7cclqszY50JxYLC OLsSmHL651eDNmcosuTYnlDWFmdyiciSzTJOIy5Z10J2xxO3qTEuXADEzrpo ZtIWZ+31aKjlmCguGt67Xvj00ebnjyuAWP37e63//kn3f3x28K8ftJxahhAM Si5OfvukWvCO81BwFhxadC+8dzn64dWwfZJPGenD9p1DXTyHG7iABUI7ZJCF 7OcSkdZFx6rXP2XQKwkUz8oSj0WVMRgWKjk4bTpJej0y8tIYWy8mi6loERlJ x0IULCyXiBJQcWMShlkvs5oUi9OaxWntgkkxrmTrRCw1n6YS0nVyrkkr1qsl fJmcxOadHRFlcdl84bRKxoVAszqpjUbE9g0psFgGGELoB/iB8MFQPRlnphPt TLyTT2QCvF0CkwcgChzWyqdyQBA+DD6KxZDP3qk9RAQB5ggmDYLJwAqCUeBo IgyBQyDxMBSBRMBgcYD5slWqtbUlgKt2JR2LhkqZyHY5sV2OVfMxi3PdsOSc WHLO2NdC0Ugg6C+kIrVM5Elw+Ten4Vv7+DKNJcDS5GT2JIu3Mzv2mX/2G//0 N76pH4JTv0fn/y2x8F8z1hcrhn2FcE8mdNI5HBwjG3TcaqVv7qTv7GbvtlJ3 W4mbO/Grm9Er1Y3jcmQ7FdzLh7dSwcKGp7ThfRz1HS+tJuyOO1n/01wQfe4i oW+Ii8KpOTydVMqAjSDOnUO8cg5+7gKqr58IZI+hYdSlsyNIsPOXsENoj2X9 5rqjY545sU6dmBRmtREQq1lArFaCLe/6XacpMjO7EYwWstn4msMtYDbcaycr poRO07JNFqZ0Sav1ZHnGZXOWUvFeLhgzihJzunevFT57VP321dLf367/l/e3 /+uL3b+/u21TMUVwcNY++fxyamNJq6biGTBoyjHx/uXwB1dDDgOPCrqI6XsF ceEcabCPONJPhQ3y0cNGPsvjcgdCoQWTfpRC8S3OOxYtjkm9BARa4XECIk5M x/TPSmc0TCUbI6YBXEGlbByPiOLRcOMytsUgX5pWLs9p7fNjgGoZ1Ry9nK2T MHVSllHBNamFeqWIJ5URuDw89yxfMcRiLoWKOzujjSAOgZF9w3wokjoExHIw bmAE3T84RsXNskizTIJLxaCPgOH9YNwgnA9BTtFpXCiSA4FPkSgAUZCBIdKf 56AxQxAM0AdHoHQ4Ekj1OBgcD6gWgQhwReUL+Bqta3X5qJ7LRsLZZLhZigHl brea2KunXV6fadFptK2ZbC63P5BPxwDq8vHQI//yH87x7x36ZQZDiKcqSOwF zdhW2n9ajlyvRK+WNm5XIvdqG69XQ/9eWvnvactLm+7aqDgjFPBxtFzIfruV Ahrf3e34jUbs8mYMqH4nlfBOOlCKBtIhby0VyoQ9Ec96OrT+diZ82bFW9rve TXifx70yClVEIssZNAEBQ7p0kfLXV8jnLpJfuYA81ycjkE1k0igSQwGKcD8I PwCSYFnNxaWH60vhGXNrcXZHLbCoTebV8PySd2fF8Wh9HmiaFmdwNRANxZLJ VUdJzr67NLlpNS0suuwr3iOPozerScslq4uuaCTWq6afHSerVnXXO/f+tcIX D0s/Pqv9/tbm399p/PLW5pyCIYQCejV6kF1dnwZCDJaFgm0G5z+8Gv3wVnzF yGVCLlEGLqD7L5DA/UzkEAsxpCMjT/3mNxrhg+iaWchlD41MiKUph61s1OhA w+wLF8dxmPbSZHrJYNHxx3kkGQPNJEKBlUdCcaiYcSnTbJRaJmW2KfXSnHZ+ Qm6QM8fEQMOl6+VMg5xjkPH1ChFPIiMKhVS5jCGWMqQSJBoLvzQMVDwJHIXr G9YiEezhYfylIdIgiDQwhLs0xBiGAjGejUSS/jxlwxxB8WBoPgLNBMNlaAxv BMUAwwFxo4xA0SAwFgTBw2FECIwGQ1AgCCwMgYXC8cSz95yxJVLp5MSa21lI RoKBQCYR3q0kW+XETjm1U8usen0Ti6tG6+qUxeX2BYAdvF5/ciP0wLv8x5rh jCs6U8rkTsrVJr4ktbp0UE8cNVPHzdTpdvZGM/Oi5PsvBfu/FZb/7jc9n1Jk hXwBnpYP2u9tJ+41E3e3YtfrAFTxw2qkV94IuoEvV9jvTWwEon5vxO/eyoff y0WuOteqXtf9bOCNfDidSVWq9csn3VwxNqkV0PsuEs9dwJ6/QBmERx3OazZt VkhBvvLK+f/rX9DnB+bp/Ptex+H6ciwcuuKx9HQy3/xSLBZzj2mSWmUhEozl cvF8MVkpZMqFk4SnqeevT04G43F/Ju3PpuOZ9Gl8NavkrlqciUKhXi+/eLTz xb3Se9XVjmvmg2vFn9/a/sd7O//+YevX502TlM4GDYanVMFpzYpewoJDOGhk 3md5cT316b306iRbiBxgDPfhhvoo0AEWcoiLHB4nY469jtf2CldriXWDWgqG rLBZbjJOBQWrRoYVUOiyWjbJZ3pmRy0GnkFEVLHxgG+K6BgmGcWlYQ1KQK9k lkn54rTCNqOY0kv0MuaoiKER0M5yu5QxJmaNynlcmZwiktKVSoZUzpDKsGgc +tLQLBkXFTHEIxA7lZDiUScwCDUcOofDsAfAHBBCAoSlATAbhBwjkfR0KhOO HOOwdARcSsMH7uLDMFwwQoDFjLIIeAiUgkQBSkVFIilAHxyBYcEIACoiicyT y9UzMwt2O+BxwBfgg81yfH8TiN/ZcvYst09YVw1W54TVaVt1+/zBNY+/Ucq8 vuH6wznxrd3goLM0QknIveoZH+9aJu7kfdd20ld3Uje30+9m3f+IWz7JO99p xn4NTv9oV10elYrx1Fxg+e524tFO/OFu8qga3y1GarmNTDywugpULufqmsvj XY+FfCGfd38z/m5+44pjPWZfuVfYeKsUr243Ti7fePjobm2nEU/6xEgI8H/N uNDHG8HmfOHurCInpAvQaNC/vEK+ODiNwJ3MzzRisa1263Fi7YpR1VrzvJ33 Hqyau7utzpXDvdPj4xvXT26c7qQ2Xm7Ybq/Nlqr1aqdT2W9X9jvVg041H48J 6fM0btgb6/R2P368/dVrjU/vFeo2VW5e992rjX9+1P7Pl91/fLg3K2Voscj0 otGu4tlVQiEWxUMjc17zy5vpT+9nl3R0IQZEg/bhIQNM1BAXPcxBDWlJ6KrX 2+zsbXV23Lb50RGwBYeZwuM6K+Ygk7pCJhzbZ+qWcZdJsmgQTIipWh5eSEVJ mHg2BSOg44wqjnlcYpuQ26Zk1inlnEFmVHLGxawxEWNUytLLWEYl36iS8MRS mkBCk8qoAilDLJGyWaT+4TURtabl6dEoFRSWErCWiDgZGDqHxegRMPogmNYP Y4AQHBB8DImSI+D0EQgdghjF4nxivhaBniSS2GCYDInySJkyDIqDQNBGoDQo nDoCp4CgxBEEDoMH0GJJJLLJiWmbOREPA53PHw4Uc/HDnczV3YLL4zEtrUza nBOWVaNldXZ5bc3rD22EWrX0m7HVv6+Mf7+oX6Uxx0XSXMx7Wtt4Flz4LDR3 O+e+tbnxdmb9J+/Ui4jlTiP2ajX2I5C4VlRXDTLANPPB5ft7qbt76XYpnk2G MplwIRfJpsPrnvWFJceEZTm04dsI+FzrawfN5Mtc+Mm6px4L3KonbhSi5VZ7 q3u0dXBQ3GsVW83JMRntQh/t4iX2MDq67DmaU2V5ZPIwCPTXC+SBESMKvcYU lquterdzK7TyYFrzjsd8K+7ba3fefu/d0we3tk6O20fHr+/X9i36U+/STbdl r3vUvX69c/1a98aNkzs3G+VUfFQVsVkCSkUrFX/xoPH5q7XPntRe3Ewdro/V Fse/e1T754d7v7zVnBRSTHRC0TMnxqMtMqGKSRJhkEWv+ZPb2U/u58waCh87 QoYNUBDDAgJETIBw0UNqMr6ZSO+cXrm8XQsrxaKBwRW+ML1k2/evezmMgFhy bDF0J2SlxdEVk3hSQR8TUaR0rJJN5JAxQhrOIGct6MULBvHChNRsVMwZFAY5 d1zM1olZ4wr2hJIHjFYsYAklZIGIIhZRRBKGVMokkklnJyuhOhyKcGmIPjhi ANxtCMweAo8jUfQhEA5QKjBGgMSPEUk6In6GRR0jEFQEogKDlSBQKjh6ikSU IREMgCUwRIhByM+O3kBIUBh5BEYG2iIIjoJjsFgcQyyU6A3zi9Z0OrHq8Xk3 AoViotXIZdOJ6cVVndmuM6+Mm9f05hWDxQHUw1Qm0ayknoad/1gxfG/Tr1JY 4xJJsxy5d5h/Yy/xfdT6iXf2o7jjO9/U+/6ZK+Vgr5m8XQx/7zb9YNdcH5dJ cbS0z3b/pHa0Vzo+qDc3s4e9SnMzk01HVtbXTVb7lNWeBAj3eiIbnis7qS93 cu9lIgf5yEk1drOZrO73avvd6n63st8tdTtr/hVM3wXchX4xmeMyzl23aMIc goTBxAyBCJcGZwlkj0RTym1t97ovyv7P/dOXI8Fmt9u9fvu33359+v6zrYP9 N1rFDzLr7VLu9nb+inOh3NqvHJ2Uj04qh0eVw8NONdO2zlYbzUoyuDmtvZNz f/6gDqD1xZPqJzdTV/3G7trk9w8q3z+t6Hl4E4dS3QDyO3l9XKlgEsVY9Jbf /Nm94uevlpcMbCkRykAMsbBgKRUqJ8NEuBENhdhOZ65t1coTGj0KMc/j56Ym 8isu17JtBo8zoLATKJSPRY7NqbPeieSadlrDlDNwCg6BRwV8EDMmZ87phfN6 idkgsU0q5oyycTl7FOiDArpBwTKpeWNKjlzCZYmkZK6AIZFQRQBaQiaJJIHD 1rkUPRIu+JMuKQzMBUFo/SAlFIHvG6IMQVUUmhpPlCPQEgJeQcBriWQtlcqH I/lIFH8EwobAxMgzK6QOnSV2JgouxKOkFCwRMMERGAYEgUHhCASSyuPz1KMm m3kjEw0lNxK5WCIfzRcT/mjI4fdZ3W6z2231Auvast/tiwbzpXilGH+64fiH U/+jbXSdyjRKZfVq+qBTOW5XnhaCv/qm/yM484V/9jgfbtUze83czXLsO+/k Dw7NdT3AFXXDvVgrpfZa1euXO+296pP7l2uVVDq9YXasjJltFudqMhrOJUKt SuT+furrOzsfHZXeu1z86Erp46vl0hlOwPTK3YNSr7sWWMVdvIA/PzDGVZlF 8pqSs0ijCOkc/MAQ9nz/BF0YGJ9OO0KPtisfhuYP9Ypqur51ev3V15//x7/9 6wfvvb6/4b28Ym1Vas3jK3daxX37bLN71Lp+vXnt2tbVa1unV+vFjFep3Wof Nk9O9iqx5oz0yobj84f1zx+Xv3tS/ulJ/vXsXHvF+NndygSXMC3kFAI2Lhyy rpcr6AQ5FtMOLXz1sPTN06rdyFLREBwsiE+AKqhwKREuwI4oCOj87IyDx12e m7WYxhcUmtpmKWEaj1osWgxGCxppzk/cDNszjom8Z+q04rhWd3rmhBOAodGw QiZed6ZXQtuk3D6ttM1orCbVlJqnlzK1QoZezppQcMbl3FEZD/BBMgfgCnBD IZ0vUHLYRgJmb0o6i0Mwh0BzdIoCBSf3D8shcAHAydklyhAdlT7OYFKHoVwy jQxFSukcvVrDgsCnKXgrhQBwRQPBRgGLhCE4MCQPA5fjsalpuZZOIcPReAgc CUfCECgSl81UKycc1vxuPd+q53dquZ1ycbucb5YyjWJyMx+vZaKVVKycTFST qWoqU00Vq+kngA869d/bdE4aa0wqz5Zi1a1MYyt7N+f/+8b8f0taPg1Zd4ux RiO7tZW7XIp+6zb96FDfMMpFeJrbtVQoJYqlTDqfTGSjd24d1zaLyexGKBJ0 +tc3EuFSMbm9lTvtVe8c1i5v5062Mo8Oy6+flN8+rRU7vUoXmMNK96jc69m9 DvC5c/jz/eN8lVmpygro42icSqAiDQ8TLgxadJb8+uo91+LbIdupRVNTiIuJ avX48um9h5+++8Y3h+WDFfNmtVY7Oq4dnTTSEffoaKl9UD2+Ujs5rZ5cqV25 kklG5nmycqtXu3x6cq33Zi90YFFeDS+9vF389tXiv77T/P1ZseNSlWaUcjRU z2Xl3WazmL6q4QlRMBkWsR2Y//pR6avXqo5x1igdoSKPKMkQJQUiIYD5aBDp Uh9vEGRVjhbyRYtxfFasBCpJI5XIyLhAH5xCo7Zn9QWTdju8WArPBG2Km5uu J+21kndMwcQrOPgJJWvJKFueVjrmNPa50cVpzbxObFJxAX+cVvNmtOIptdCg 4AtEYgqHzxRJqUIhhccjo7EKFHSNiZvBovAXB8QwBGtoGNs3IATDmQMQyhCc MgimDo+Qh8H4/hF43xBuEMwFgjocxx6Ba5GYCQyBe3Y9PJgHBgvhEC4cPs3A 8ZEIo5gzDoCExuJhcAwShUKi6RwOW66cdNhy7a38XhOY7Nm6ldurZ3fr2Z3N XKuWbQGwAdu1zHY1s1UtNCtP454/zo5fGVZo7HG5IlPL5BulvXz8Y+/8NxHr F7m1X0Lmu8HlWi1T3SodlZPfe6d+cmpuTsiFBIrX56w08//f7PY2v/7qoytX esXNXL6WydUyxc1sfjNTrOeqW4VGM79dTW/X0rVSZLMc7Wzly92jau+4cnBc ObwMzIrXCZRB8vl+GYk3PTquxaD5YIyKK4JduIg/P+TTL72dDzxamqhb7Pf8 S9saRTld2zy+fHjY/Ww7+TS02MwXNju9WheYbi7gMgultXZ38/i4fnyyeXwC rLX0hk0qq+z2GidXrl4/+Py15vuXIztm6a7D9Ont4u9vN//9vebPTwungTEZ uF+KgOdskwGTal3LZYAG1RTMcXbl20eVP7li6jkIIxM2SoUoyVA5Bc7HjKAv nGcODG/ox/KWmQUmbZpIzE0aCypxmkM2gYaXCKg4g7it4ZeXja8eREshY8iq 3I/NHOQWtByckoszKpm2CdnitMo+p1mZ1y1Na+b0IpNGMKHiTmsFM6PiqVHR hEYsAhyQy6OKRVS+iMwToJFoxghknIA24dHk/iE9Fm2l4oiXBnGXQAwQkjwI ZgxBWMNnV8WQh2DkQagIhh4jU3R8AR+DAeK6CAQbI+BpEAgFDKFBYQIYSgpH GFjkWTWHjkCSkSguCUcn49EoNO3/56pTz+81cgBXne1Mu5lt1dOtOkBUfncz 3zqb3O5mprWZ2anntzefxDxAbv/ONrZCZekUqtRmPpXJXF2a/dg93c5tNOql t7K+H30zVyOrpUapV858uz7104r2plEhIlBdwfXiTq2wUyu3arceXPnqixe3 7t7Mb9dyW9XcViXfqOSaZUAq0/V8ppbLldOZfCyRDf85wWrvtNY73Ty8Wjs6 rR1dWXE7QK+cw52/JMYyzZpxIwqlGEFKkTj8+fPUCwMV7ej9uKvgXIwZp65b DE2NAniM08PeJ7XItdX59JojEQzGAr5kwJf2+459iyWDupKMVXOpejm3Wcw1 SrnH5Y0Dq7EZjzUyqZutwjevb//tzZ2PrsfLM6LOsumXJ/X/fLH3nx93vr6X dXIxGiQ0szx9UvKFTBI5CjpGI14rrf/wZPO7Nxquad6slLQgJs7ycFNcjJ6D EmFBYjDIxONOy9TFTGl+XG/n8Esq2RoOGRewrWTqFb/r1Lt4aBk7ipsP8o6X 93KbG8bVCVbIJldy8TNqxsok3z4pXpxULE6plmdGl2bUM+PCSa3AoOAalHxA rGa0EqMGSM8SGu8sX9FFIqpQhENhMBcHZeARExpJuTTIGAKxQSD4hX4AIdYI gtg/RBocQQ8MwYB9EJgxNMbJpK6JBWtGvVMmXDEZ/GI2YH/kIQgNAuciUEIY ij4MFeKwUxIuD40lQhFqNlUlZAF6RWZz+JrR6ZWVQm+v0N0tdPey3d38/l5+ fze73/qTsa3s3lZmr5H+czKtrfxO49WY7x8O4zc2nZ3G1ijUoUzSrplqTGh3 M8E8oGytBhB1342t/BCYPk74eqXU1+umX53aO0aFGEd1Bl2ADGa3z5Rw+3i3 c7lb7mylt6uprUp6q5JpAhvlZKMYr2Uj5USkGI3mN8K5cCh7tnZPb/au3exd v3lw8+bxnZt+/wru/AVq38is1rhqnBjHImUg6ASZgjx3nnx+OGd1PXxw+/q1 /aRttqYUb8pEV5LZT0qhp+WNbNTjD3hcLte6x+1ye7w+342Ye9tsDAc84ZA/ Ggn5/L5IMNBYs2Y0Uv/y4oZ79agW//JJ8+unDWA+uJroLKpO12d+flz/t/db 3zwouEUEIw4+y2U/akX9JpEUBTEwydfK7u9fa3z7enPdxFuQEy0yyryUNCck TLIwAszwApm4nS+6N4J6pUZOZyv7QbMDA2s0ZsrtneLwN1yB40SgPav54Gq+ Fpl/+3Lqi4eFWmDMYeQAJuidk95uuTYTCytzmuUZtX1ubGV+dGlKsWCUzowK TKOi2XHZ/ITcNK7kSoRE1tk7BylcAYUjwKAw1EuD63RCWsnhgEb4IAi1fwh1 YZAyAJaMQLlDw8SBIeSFAcYgNKEQbojYXgp2nUL2ifk+PtOpkC9TKSoojDcM k8AwBgKODQZThkBUoAnCEWwUYIIIEhxJwONQKDSRxeCq1JPLy/kOwNXZ5M/W dqHXKezvFzrt3P4ucFeus5Pt7OTau7l2q7C781oi+A/AB61nXMmZ/CnF2BRf Ggl6862twl4r197J7223tqpfpFzfhxbeTqz/4Jr8ZXX0LsAVnuoMe7N720Cg z5y5LWC+Z/uf3bLTSO5sJprVeKMUreU3yvFgMezLBnwZvzftAzQlmAmtW0PF 7W61d1QHEtHlo8XlWchfX6FcgjmsKyIqjdw3KBiG+6R8CmCOF0D2qbXdk6t7 10+izrllBHQJBjudmdgN+rZ63cbRfuOgU+3sNg669cP9Zrf9WiPVXl2u7u5W OnvFvR1Alku72/WNNadSmijlS9u1W6eNL57Uv3q6+eVr9W9erb64mWjblfVZ 9Vc3i5/cyfhFZAsVv8Smryv4izKWCDoyzWNcr3p+fNb85vW6Z4ZnU5AWFZQF GXGaTzCysUC+MlOI27l88+Bg3bHI6h/Q9A9UBIyb6/bTDd8cnbFhmrqzNtuZ 0/z0bOdex7u1MfPlw+JHV8O7ySmNAL9sEL5xHH33RjK+qncCPrgw5jTr7bNq 25TSbJCaDfIFo8xiUsxOatlS8dn77bgCMlcIcEXAERmXhsaQiA2VgAsCsSAQ wuAwfgAkhkHFI2A5DEIfAJEvgfRIdJBLc3JZ4yiECY93SUV2Id9tMni4tFki WgYBG0m43IxogoaTYeGMEaiCQlSQyBQgriPQRDwOgUaROEyuRm20L2U7u9ne Xq7bzgNrr53vnk2u28l19wu9LoDZ2S29Tq6zW95tPU0G/tU5/q15zE5hiQkM DZm9YJrK16q1rUZze7uxswXMZmvrtF78NW77Z3jql1X9ryujtwwyEYGyGvXn 9lvAzzkjFhDGbht46Ex7J7O7ldpuAlxFa7lwIRnKRQCQggm/P+HzJX3+TDCU jc5TaFNqW6Kyl28fFLo9s2WS+Mp59gBqzRUgouHsgUETGh8U0BF//Svh4rBz dr3R2K3XatHlGT1sSHDhwhiGkvTFs+liNlfKFcrFymZps1mqN8r1xuNiuO1c 3m73mr3DRu+gfja9e41kYnayvLdfPTi4c2Pvm6fNn97a+v6NxvdP6397tvnN o2LPPVY0Ki9v2BYJqCkC+nJmpWFXymBDzP7+cQ7jWtnzy+uN719vrM/wbSrq kpJikZFm+LhJBlqEBlmopL1EPB0KzDOoiv5++eCAGYPaXbRcDbmsNFJvZuxg Wltdnv78QePbZ7WST3+76f7sbuaj26lZNU3DJ5d8AGmbD7uhkGPct2x0nXE1 ujinXZzRLs+N2Wa0FpNq2qhiCYV4JpvI4pLYXBKHi0NhJWCIg4mNKNn04RHM AAh3aZg5DJohY3jgkbPzyANQGRJrpdJ8SsWyUq3F4WVorH9CHxpTVv1rRa2w MsqcwsElMKhHw53nkXwargiONAtZKgyaCoELKYRRMRuNRpO5bJZGY1hZzh7s 5456hYODXG8/3+tlD3qZ3n62182ercC33T/nDLNie/dZMviPlfGvzaPLZLYU S5cTmDqmYGfG8MH67Gde81d+20uf7UPf4ifBpV/WJ/7Vrf9ldQzg6va4XESg u2KhHMDnAYAr8ED7+e5+fr99Jont3czudrpZi1SyG/l4KBkKAtEn7vXEPd5E wAswlo9ZRiUSMEovmk+UO8BTnZ7TQ/9yjj6AXXMHGRiECYkch2P0GAjm/Cv0 vqENibxjGtsxjZZG+QE6ZoUED0uFx/71tsfVXFupO5ebjqX6kq1uNdcW5u6u zm5NaG/Gws8KqberqQ8a6Y+2sy/K/qOV2cvpjbB1KWeb77pmjgILR2Hz8Ybl ZmLp1bL7tfJqWsWYR0LHhkFKOPxWzvuo4dHg4cgLfWMsxlHWBeD39ZOKe4qz qCAvyogWEWGagx2lwtnw4VUG9Zln8fGy/rXlMQ+TGJaKr9pNGxJB3jg+DkN4 2TT/7Kx/0VYLLn7xuP7qgT+zpvvweurbpzWrkT2jZoUX1Tsxy4e38jsJy2Fl Pe2dWZ7T2mY0S7Max4LOMq0xT8pnAa74fAIDIIpP4QloIhEeh9cgER4mrqhg c4dG0H1DGjhCNgJWw+G0wWHohX4tmdpwWJ0M6hyZPk0kbSglNjpxic8t6eVF rTTOo5VUPCkMzIeMiGDwCTo+rxMayGQWFK7FoHQolIZBClvHCBgMmcXkqFST Dnvh6Dh/+bh4fJQ/PswfH+dPjrMnwPZx5rD7f6A67OUOewBylb2992Pef3OO f28bW2OyhTiahiVYnl9oelYebKy+Fl55M7T8ht/2ptf6YcD6nXvy93Xdz6u6 X5xAbpcJSNTVaCjb3c91ewCxmW4nA+jVPiCD7Wy7lW414/VipJwOZCOBRMgf 93tjHm/M60n4fZmwvxDLbm06Zse1MLSRMx3Jbk8YR/GvXGAP4twrPhoMTDjX p4YigPwM+ctfKX3g4pLrTiP/sJ79MLn85oq+p5fcMhtvrNofl1OPN5OPq7HH leiTSuL1SupZKfo063mY8DzKbzzJh57lQm/kAm/m/Efrto2JiYx5wWfQpccV rWlpZ17WnhHvmMQ70+KdWenegjw/xpmGgbUDgAUPmchEG4+hRCAYgyA1lbyT XPv+We3ju4k1A2NBgrfJ8GYRfpKNUZFhbNjQAgJeZpDv6IXHRtkCj+OZWri2 t301G17n0bkXL04Df30WMzoqq/pnyr6514/jpeD4Qdb+5eOq2cCO2rVPev5y wNiMmjsZ+3Z8uVd0+VeM9nnd4vSZXi3NjlpMasuUTiiXU/giukzOlMiYYgkK jeWMQKeIWAMZh704SB+C1HRyG4O8xmUacRjSIGhVLo9MTVroNO0IeJpIKE5o /AKGi0VtzxuPzOM7crYdh1GNgKeQcCkEwoHALQLmFIsqhiPkKISNRBBjsVNK EQGDIzFZHJXauLyUPzrKAyCdHP+f9fgkd3SQPTrIHR3mDw8B+QK4yh8d5A8P jhqNH9fn/3Dqf1oea6llYjzNBsSz/U6x1wMcs9jbLwL6024BEavU2Tmqlz4P LPzmMfyxrntnQaMn0ydm5lJAptrvAkRl9vcy7d303k5yu5FoVOLV/EYpGcpH famgJ+4FoHIDepXye7LhYD4RLKULe73czpbXPm9AYUZJslE2B/nXV7iD2GXD rIaAMcIgYRJKCx4hvnKBegnuXU8V9rv7zdqrwaWGhmMhU2KLFqdAEnRG8u3O mU52OsX9bmm/Vwae8H6r1AbC1W5lvwXkrlpnp97eqew2yzuNO3eu17dr9zqp l5fDLy9HPjreeHkUeNHzfHbo+6Tnvp+ft+Ig40NDChT8VsV9NTptpSNogwM6 LvOw5AP06sWd+LqRYZMSFmWEBQEQ2rEaCpINHdKDQNtK6alOmnM6DaNjZpM1 Xqon0tmKxWjHQgxDg2sqTT28/sGdcitjDi2rGxszvnnV3d2QeZSVcug+v597 4ziYdemCVq3brK1HzScVZ8xpmFTyJhSCCYXQoBSOKyRcgYjI4JBYPMAESRwO AonCnZU+MPT8AOR8vwAEXSYRx9BIt5BlwmM0DGbWbnXJ+fNkjBWoIVjUEo9n Z9JteGxcLipbZrNi1jIOuYRFTSFhKjhYCIULsUg5Hi2CwQRw+JkVwpAkLA4L cMVgMRRyvc2aARTpqJc9PsweHWaPj7JHRwBRZ9tHx7kjQLUO04e9PyXr8KRW +9Fp+sWu+9vy6NGoVImn2VdXc70zTQPcLXfQA6Z2eHY8PHdw0OjuPw8u/7ii /WVF+83S6CqTIxVK4zuNs9163UyvnevsZfZaqa16ol6NVfKRfCKUBsQqAMiU O+p2R73eZMCfiYby6VApl99tF3Z381tN36oNeDXmEFBFf59gAGrmKWKG0VUS 1gSHAfkBf/4iYwDhcyWLOzs3U6FHHusVkyKpGa02tzej3qBM6VuN5ACout3c fifb/lMwAcyAJ9zpAIKcPzj40/F3iwf73RvXbz+8t3XQeXar8d2T0tePSl+/ uvnDa5XvHhd+e7P6673ky+LsPYsgJ8SN4ZDNxfGKgduYENgpeCOXcaXs+fn1 +qf30+tGulVCXJQSgHWWi9FRkRzokAWP6yjFMbEsHUvphOK5salIKp8KBCN8 5gRoWA+Hj6FxsaXFr57ufPVadT83tzYtWtDwvLPqcT45s6z/4kH+8/vZO9vO QsDot2n8S6OP9kO3d1w+i3JSyTbKuEYZb1zC4/L4OAaTxDm7sIEjlmKQOMwl ELxvCNE3gr4wPIpAAXJkYZMWGGQVDO5XSo58y8258YJ1NjEzYWMxw6aJVT7L QsQZWbxyPtOzjbpEhFUWfgYNNREQagzcoeFoSFguBEIDw0gQKBECwyLRGDSG QKfTRNJRy0L6YD97eJA57KUPuuleJ9XrpLtnPvXn2k13OynAs4BXvtc9rpZ+ WDH9uqL72T52PCpX4Gim6ZlEaysNOFq3DewJqAEQ4IHaCPyxDg67HwXs39u1 P62ov15Su5lMiUAU3apmO51Mu50Cmldr+0+oyhvV3EYxFU5vALHKm/S7Ez53 zOdJhLypiC8bD5ay4Uqx0NrN7bVze3vZnWYw4DQzcPKBfsml4QmW1KtVW3AI 6TBoEoVx0rBAF3bMetrVyuOo90pg7dbiWEo9Xt7qVrrA8wuHtGr/erLUPQZC GkBRoXdYPAC2D4vds4RZ+PPXBBQ1v79fOug1Lx/Vj3tv3m1+/TB/htaTMlDN vnlU+OV28tuS9YutlW/3nLfnxPM4eEIreK8b6q2M+Xi0KQ79Vg3Qq/pHd5Jr RopNQVhUkYFWaBbgxqgwJmRQNTRkx2A6k7orgVULj+0f1edsVq9MaMYjR2GI Ba5gmU33SLlfP67/8rz13dPy5dri0oTQNi7W8ohR29h7p4mP76R/eWf7l3db J7VVIL0fld3vXMvc7/i9S2NWk2ZhQjWlk/OkUjKbxxCKJbpxrlSBQeFgfUPI S2DkpRHK4IgSg1bDEMIRMGNwRA6FlYzypy7jbf9SO+xNLpqtDFp0VJUeV5Y1 ggUGPeRwbpo0q3zCEgnhZmFDMoqBiFhX86fppEUJQwKHM2AwNhpDIeBRKDSJ SmNJZDqrJQVwdXSQOeqlAfs7OMgAc4ZZN33QBoQIuBfAJr3frh90nzaLv4Ss vwWmf3RPXDEpjUyOdX4+XCzE643E5ubW9uatVv1KOVKsZnOtnb3trQ89tu/s 6h8c6q+WNC4WU8IXhmrFdGsnubuV3KkntjajtcJGKRUsxAOZcCAZ8MQ8rrh7 Le5ZTwY9qQ1vJubLx/3FdKhayO/uAVDl2p1ie7/SapbmVSsEqHoYxIRTJrmC MIcwTWOYaDTu4LB4ELo1YezMTp963e1c8vLCaFptqGz1yt1joOtdrabShvEN b658cFw+PKkcXqkA68FJCQCsd1g6OCwcHhQPDkuHx5XD49rxceP44PmD5t9e zf/yWunH18o/PKl8exT+qrD4/XH4H88bX54E2gaug0fu+M3f3c6+l10KiGg2 AevxbvSXNxsf3U24JmlODcWhJtkVZIuQOEZFMsCDvP4BwM1Ts1O9sHuBRZsm k+oTipM59aKYpwJD/VLh7spM3CD55nH157e3fnpz87vXKlcbdrdZqhUQTTLm UW7p5a3cD0+3fn3eBorqTmbRbR3b3LC9ez0HZPhZnXhKLdGppQy+gMDmsmRS iV7PEStRKBzqEkiBQhH7h3lgaE4vFYIh1H4QsR8kQ6LXNOrGmuPAY3+Q3Tj0 LIfF3HUeN6zXZjQSK5Fg5XI9TLKPT5SMgJxc/PG82E5GyaGIaSopNipSIFFs BGKMR1+zjGFRKAqNzpMrxy2WZK8D6BUQpTLHB+nDbubgzPLSwLeAOZ4BdpA9 C/Cda6ftH+63frtS+fuNzb8d5V/sJTrR1cvVjZvtwsPLzfuXm29frn52XHje jr3aST3YL77WKXxR9X8bM38XnfsqPFeeGp9UqBZWVjfq5VizEtkshkrpYC7q y254UwFfzO+Oeddj7rXoujPmcsV97mTIl4n4C0l/ORuuluOFnWxrN9vaK+61 y61mZW7US0RPQcGkc5dGwYgCnzpPpurpVE7/sBCEve5ee8M1UZwx7xWyt5fH k2OGwtZecX+/0u1t7e/frUTLk7qoP1vaPyx1D/+8gOGofHBUPjysHh3VDo+q x8d/zlHt6GD7cP/D+5u/PSv9/Y3qP95qPi0573omf31Y+h+fHv7fH+2/n1mo yKkbOtFuwPx5L/p2yuZk4pfE7Cft+G9vN1/cTvpMjDUNZUVNXpYTF4Q4LRlO B/cbBMLGhu9xMRFYXJSj0K65uceJ9dz0+MrCggSKWFOpyuuOfffcD09qP71Z //FZ+dsnpS8e5l499FvH2RoeedEgdk/LAxZNdFEXWdZ7zBrruNQxqYysGNdt uqVp9ZxBPq6VsEUCGk/AVSn5ChVdKIGjsEIIXAGB4i8OEy8NA2WQdGkAcX5A AkUukPDxMVVkfT1hNj9yzj9am8uNyZeJRCDJu2SSVSbVrZBVxkUNq4IHHpnh Ym/41QcmgQ4GnePSI2qhGI5iwuAKBml1XofHoAl0GksuHTPPJ9p7qe5+stsG HPBPdeqk9neT+23gluT+XrKzmwJmf/fO1e2vbhVftkJfHsQ+60VeXs224o7X j1If3Cx+eLvy4n7900fNzx5tf3Cr8v7lzDsHsXeOE59dL324E3p5kPy8l3y+ m/TNzWjUo55sPF4tRssZQKnCZ0oV8cR9nuifmQr43SJuV9zjSvg86bA3Gw+U 0oFaMVQr66k6r7+c2e0U2r3qbis3LVtEgU1IrASLF/YPTsNgRhiKA0Ny+ofk INTBguV5dPWx39wwT11fGE2NTZS39/L7e4XOXqG9t7nXulMO7i4YUuE8oFq1 45Pan9JUOzs/eLl+fGXz+ErjyunW8cl273Dv+ODjh43fnpX/eFL+amf9dE33 06PN//nFyf98d/fvXf/7qZlNBd0rZjRdU0/TK29G5r1c/JKE82w/8fvb2x/d TvkmqWsa4oqKtCQnzPMxagKECro0PzaZTeTSE+Ntx4KOyynaLEeLJufU9Lxa rUEifVPT3XLh1fTqL083f3tn+9fn9b+9Ufvbs9rv77VOq1aLljE/yl01SSrB iaPi8snmykFtZTO24JxVLOikdpMm4Z7LBRfs5lGxUsYWStgSGY3Hp/IESBSW NwKh9A0BrscYGJZDoZj+flTfYGVMnBcyg2NaIFAlJbyiSlycMkQVkik4QovC +nWjXiEnoFXtzCi7Lj0PCp6hoqo6ZlPPX6TjRXCkRchW4fF0MNQooi9OyolY LIVKY0vFWvNsurOXPdxPHZyBBACW/vMIQAZIWb1OZr+T3t8DoMrs7z6+3vj2 XvGTtv+zw/CXl+Mvr6bqEeuzw+iLG/mPbpVe3C1/8mDzs0fNj24V3zuOP+8E 3+oGPjiJvbXlOcj6ruW9T7bCSxMGiUyxGvFHSpmNfGKjEAtnI/5E8OyQwllQ X/dEALTOoFpPhjypsCcf95bTgWopvFmeQWI0aL59eSPdaBY2i41ZRYqNNSFw WobQK2QYhvoEFy+Sz5+jX+wXDIG9VGZhyXHayLwWnC3L2X61obDTync7uTbg pHv5zt5me/txLdRbnIqH08V2u9rtVnvdSqdT7XRLnd1yZ6+2373caByky3sH nZf3q7/fz/604/qi7vzttco/39/9z2ebv+24fzpNfHUUbGhp8Qn5jmvqtnvh gX/GRkNP8yiPdkJ/vLP1wY2I20haVRFWlASblDTLwynxMNLwJRYUrRXKk6Hw 25W4jUMvaSSrHNqMRu9asGjRmIBl6bSQ7Nn0gF799s7Wb8/PrqL/7rXSD29s vnsleFqcy7hHfVbVtc21d64mvn6y+R8vj/795cGjo6jLPOqx6htR+5unmfsH EZ1BxRJKaAIhjcej8PkYJJYNApMAopAo2qXhURj87FMoQeCCkleSM6Makcek X5kYj4yrI6NKD5dlQcPHkYgZHn+Nxw1xWTkZOyRnC8GgGTTcRcO4eAQdEgao qxCN1hAJnBGIc0LSyjgJWByZRmVKJWPz09n9vUp3v9LbL3XbRaBodzvAC1tu 79W67c1uu77fbhy0d447z283v3tQ/uww9PlJ5OvrqY+vpRoR69Oj6ItbuY/v lD66XfrkQe3zx40XN4sfHMff2Q+81fN9cCX6fC8Yc/vmp+yRVe+MYUYqVTkC rmA+6k0HPEmvO7EO4OSKrK1FVleBNeZ2xXzrCf/ZGydyEU8x4QP0qlII1Uqh wJqJRlJDiOYJu9tmdRDxKQbBCIdO8rWbjqll5LD80kXsX88RX7kog8DdQJ2x uHLNxuVy7On6RExvyNa2sx0g+bfy7Z3s2WxXdjcfV4NHy1OxUCzfauV2t3Lt 7Xwb2GeruFevtLcvb1e3k7H6bu2TK6kfqsvf7K7/9mb978+3/7iT/Lbl+OVu 5r990v2w6wlxsVtrc5EpjYfDaFj1Rgx0Uc5+fX/jt+db717bcOnJDgVxSYoz i/FTHIwMB8EPXcKdvyhl8uZm52ZlMjFoWA0B6yjUhVGdWT8+hkQ6hZJdg3Zr RnWWr96q//zWJoDW316v/Px8+6MbkefHvk8fZBvxqYLf9OZx/NN7xZd3S98+ bf78fG8/by+GF3L+mdS66e5e1GBS0wV8Oo/HkkjYYhkBR4Be7FfTSA6tiDMM MsARgHYpkYiggBKSctxL1lxrO9/abmXjKZPBpVSsKcTzROyykOvS6eb5/LyG uzklWGfj1zjoxjzXryDNEZBGHNrCZ8ixaNbIyPKoaDOyTMTjyQw6VyGftsy/ 9tr1Zw+PHt3oXNurnABlrpwqAiridmwmPN2yfyvj2sqtdmtrn97Of/ew8tlJ 5MvT+Fc3Mi+upbbi1jeOIp/cKXxyv/LhreKnD2pfPGm8uF18/yTxbi/8zlHo xfXke/uha43IYcHfyQWWZuelMvWCY2kt7FsLe51h12rIuQZMeM0VBtByrUU9 60CySoTcmQ1XLuItpnzlbLBWDG5WHbr5kE7rYxOUQyPaYcjk0IgVAga2HTJ9 Y05bFmBVg32X/uUv0L9cUIDgDjZ3TT+fqTZ75cR7voW3PAsFmyNVq/+pVwBU W9mzc5SN2s7ms2rgYHFiI7iR2WmkdrcA5DJn1wtt5Xa3C9v1crNydTP1WXHl +6PQP99v/Y/Pev92J/PVpv3vT2v/z/fX/9dPt5/0wnMYaC/isBtlFh49bRlj DPXPK7lP25Hfnu88vxZx6gjLchygV0sy/CwXI8VCiEP9UhpdweLO6o2LJhPs 7KONLmqVY06Pf2F2RkkkVGymvJK35Zz92+v1P97d/v2d5h/vNH96o/rrO1sv b0XfPwn8+lbjq8f5/YK5Fp57ebf6zWub711PvHuaur8b2IxYX7+aS/smQvYJ pUbOEop4EjlfoeZI1Tg8Cd035NPLt1anx3CoZQqOdHFwAYtapBPHWDTHir20 vVXIZtLm+eTUpHfWnM5lpnjc2MJ0UCE20ahrHMKxWWylYc1SQt3Md4kJ8Rmx XUrvBOaMZBwHPKLjkjzzGiIOj2fQmDLJ5PzU84edH949/unF1Z8/vvXTx7d+ /uTet+/fevn08MXTo0+e7r95p/b4WvbptfRPz3t/e7P75d3y13eLX98vfXqn 9Lgb+fx+5dvHm988a33xqP7ds9Z3b7a/etL44k7+s2upz29nP7+T+6Abevso 8fI0/vHNnN9ukUiVPKGCKZBw+DKuSA4UB6FaIx/Tqycm9HOz88uWbDZQrcQy pfhG8Sxc+Sv5QK0crG1656dzSwvHUccCmzA6OKzsH2Cd7+NfGp7DYOYQ8DkM Sgg6+8wK5jBYgaIE5uZWNaNxf+y0En19zdA2Gd+I2Us2a7JUzbV3C51WvrN7 Jk27O5ut2rOK99A+E9tIZHe283tbhfZOob1b3N2u7jRvl5PvphxfHW/88Vb9 Pz/a/+ed3Jfb7n++1/7fP9/+37/e+1+/3LvXiwjAQ93Yik8vmKIQtp3jWjRo XiV43I79/f29d29EVw0kh4rgVJKscvw0FyXGjtCGL/kUsr3VuVUJW0kgwM/3 gf9yjgpBW+aXTHq9CospaeTrLErNY/n5rdYf77f+eHcHQOun1yuAJ356K/LB SfCXNxq/v90EFOxybbEcnPvwRvnnt7a+fLXy9mmyGlm4shn64G6pEJ6XK2UM ngBohVSugM4XITFYLgjq51BTOrkKhTLgMXwQ2E5EzyCgMzjcqlKVWZjNmE2x eZNnwrCm16XWfVMcrn3cuCQWzRJxkiGQFo2kDg7pSWgvnxDXcY9Cpphe1PJb 7AKWcGTEqmZXQ/MEPJ7CYjHEMs20sVkJnW6Hb+5t3O3Gnl3JvHur/PGDrc9e 3f3qje7vH9/8/eXt3z+5CyD3wwfXv3vv9McPb/ztw5s//b8lved3G+e57v0f 7L1jyxILegcGvQMkSLCCnQDYCfYGEETvvffCToqiGosKJVKiii1ZvVNUsZUo dhIncezYjpPs7H3We94PZ+0P7zrrfSAv3WvWw5kHoAj85rquezAzuHfmy3tn 393f+OLOqVefHT/4dOXZ1YWDGysHN5cPby6/BnVt/stbq4fXF57sZO6dS73c zTzfy62m7R7LlFk9pFcPjA12j/Z1DnQr+nvkXT2K7q6O3u7u8dHe9Vn3ueXQ atobdFnHjdZRe2jEER11xdemR9e1w+v64bmu8mkqUl5S3HD0WNknxRI4upVA VAuYU2V07JFPCB8dqyMLPU73tLJ1Rt53ymu+OqVwKXtX0pF911hkcCAQjkcX 50IL+cBcxptP+WYzyXz8ZtyyONpttdgDgKvZTHA+l86lLgVMO9bx40nPm73E m4u+HWvvg5T223sL//py67+/uvjfvz3/r3dbV5eMUnTRgnFky6IyNIri3dVD bGx/fdnevO13nwO9Mk21U0froOFqqqqS0inEVxJgQNCcLY3nfIZTDk0LjUz6 918h/v0/qEeKZGS2qkVej0X5Gstm+juSQeNvP5/94/25P92f/eO93FefJv9w J/d82/bwlOkPt9N/vpv9y4P5Pz6Yv7ioD+g69lddv7u7+P7z/O0tT9DYu5E1 X1i0yBorKEwOxOLQ+ULQGOIIpDI0dohG6mNCEiRKAEP00KFWArqXiB6CcP10 qhlYYSwciQedbrPJZTaa9aqmhoGa2vH66n4hp6K0hFVUzDpaLMMiVTyKWyFa mpRZm8Qj1WWtDCrjWHEFA5LXSMkkCpPLYUvLZYpWbzIQzQWjKWc4aorHdKmo Oh2emI+pF+JTC9HJxZj6eHJ6NaFZCk+uRqdPxLTrce2p2PRmxryz4NpZcl9Y tO+sOi6vOvbWPKCurPtunAl9uhF5sJO+t5O6vZ28sZ3+/GL603PJG1uJaxvR SydCmwvu9bQzHzKFXRq3dVI/M9qj6mnt6JAp2hta22qbWqT1zeLahkpFt8oU GLLFhuyxFfPYqmX8lGPi6kzb1YEyNx/XUVokPQofbVJsaTruqRsW23nC4iPs o8dkFKEnELWD/N/QsDoy8Lm+06Hoic/NLcwmrronEkP9vkDkl+u5QEQPzuXC i/nsfPLTlG15rNdt9wXnsvlsbM+r3XRMxVKR+aX03XV3ZrDmtKXnr0/W/vnm 9H9+sfVf78//1/tz//pi4+ma2SomOxSyDd+ks6s22FY+ySerGiuvLjn/cCf/ 2Sn9jIKqlkGj1dQBCUXJJZTjYcziow6F4lzEm7MaQHtOO3JUBCstI4Hoi6zC 4LnHjtWTiQNy+WLY/LvbuT8/mP3zvdwf72ZBxPrDneyzbevzTetf7s9+93Du x+fLfztY+euz5esnrSGdcv+459sn6z++2rh2wpWyqbbnTC2tdTQOj8riFriS SKgkKg+FacVh23EYZgmMdqS4CYupx8DHqPhQJd3WWqsdG55Wa0I2iy8V92QS AY9dq1J1sdhaeWt8tKcKBReUFNXCYLSSYhKslIlFVkAEGQOqoZCrcQToGIyN xhFRWDyGQKOzhNKahg65NR50Zwung7rSUU8mEsiGQ5lAMO2L5PyJrD+acUdS 9mjMFPRPhL3DAVefz9LpmGk3TbSap9rN6jbbjMIxo7RNg3G7SS23TMmdGqVn WuGfAdmyM2QeiNrHgT6HTX0hY19Q3+ud7nRMKUEAGO1p6u9o6JLLGhvrRJJy pkD0yydZEI/HLi+ji8u5jY3dZvuYz68NRvyZTDifz6ZCFzTy24NVC03sMRqq BgYf5VfEKrhe0N1T8QMknByNbqJJXJFEIBeb6G7VSyVz7VK9vCcylw8v5Bdm Y/t+dWoEhIcQMLtf1Ck8n4vMZ/Nzqc/TrpWx3jmH5ZpLve6YjmcTkYXsYjoQ 762/FBz99v7CP0Gm+nIDoPXPt5v/enfun2833qyb59v5CVXTzZx5wdzjaRGP sSkjTdLry85v7uRvnJjRKemaBtpgNbWnHGpm4YXYUnrxUXNDzdpM/1gFj11a +B6cPrGwmUYWFhdRPip8CaYEj/IpGi57J//wWfYv9+f/dDcLuAJ69c3d3Itz tpdb1u8ezP34ZPHnF6t/P1j9+eD4Ty/X7533xayqvRXf9y+3fvfw+HxgcHvR 3tnVTOPyIA6XzhOyJRUsBnO0paqFCQkRKEoxTIxE9FHQaia6l0GcqOStq7sz bqNDPTk9OKDV6S0+n81ssrS3DLGo7h5FQNHcgkPxSwpfpsktKWHBYRCslAKH iXAYAQzJg6HoRTBSKRwLR2CQWAqVLqqqaezqMMeDjnTUnklY0lFzNmrLxFyF EJv05BPeXMJVODc45E0EA2F7LKhNeMeTnsGktz/mVUV8qoh/MORXBX2qgLff 4+n1ufu8jh6Pvdtt63TbO13WLrulx2EesOgVRp18Zrptaqp1dKRxeLixTyXr 62/oUTV0DzQoVDL5gKxN1dCiqpcPNylH2ydsE2MmTb95XB1wTkc8M1FfEIhK Irhr6L40IL0/KdvtK19tZzUjS5rgaH8Vd66BX4dEAKEWFMMb6VJXLAmCt8mm aYYIIxSiWt4XArq0kI/OZ/LZ4FXfZKa/0+UGaIEeMBmcywTms/58OptL3A9o bk8p5rTj4VQsmE74Lfq5YeVedPL9jdQPT1f+8frUf749+483Gz+92fr26Ymf D0++XtWd6pNu2EZfnfHvL+rMDewmHFJVI/p0yQa4urai0bbRRuqpPRKygk+q oWN4mCJa0dHx/n67z8ahUGTSyjI6Y3J0xDI5IMXAuZ8cgT46Uo4nDkgr/QMt v7+V++7h/Hf383+6m/ndZ4k/382/PGd7sWn89l7ur0Cvni7//eD4Pw7X//nm 7M9vzjzdi8dtqvML3m8en757IRxzjMoVzUyegMYX0oR8lqScSqc3kcktZCLx aAl0pLSfSTaKyGoJtYZGquLQQoMdp43jed2Ez+e0T4+7Bnpm+vtjOk0fk9bO 4fVLa0bYlHoKCnfsaAcV1wFhRAgYtRRWTyPVkfASDI5dimCh0SQsBoPCUegM XpW0VtFuiPsduYQjn3LmUo5MwpaJg3LkQMeU8eSBXSW9uaQ3FfEngH844/6Z pGskZusP2Xq81h6fQxVwjwR84yGgZoGJkH885B4MOQfCroGQuz/s7g07+iPO kaijO2Dvdpp79IZurb5La+zVmgbUpiG1aWTKMjZpmZwCzaBdPeHQql06rceU WMx4kqlJr6vQDCZCpkR4PWC5qe06re7J+K3nbUOX+qrX2wWNGKRKJLuu7dxW 8kfZtBoMuh6JVLCrfAnQ1qZ9QWsbhygtKe2Wtrpc3oAv4A8G/aFAJuC6aujL 9crtdrsnFXOnYmDfCaTCG0Hbvnlo3za4MqRYcttcY4PjVdKkQ3NwOfrV7dm/ Pjvxw7Pj3z5a/uHgzM9f335zfeHvh6cPl3SnVfWn7OPvL6eenfMOlDPKYCWm jvq7J5x/uJ29sjihboUGpVA7j1RNx4gJSBqimFh0bGJsfHAK+A9xYlotYXOc I+OJGdBLVfGKjlZ+cqSuqLiLxXCOd/zx7uwPT5cBQn+5l/v9Z/E/3589vOD4 cscF1vzt2dLfni7//Pz43w9O/P3lOiD8hxcnX+wnk47h1Yjp158fn41M1TXW MHkiGl9E4nFpYjGJSC5HIjhFRcX/9ivoWEk3nTjMpkyI6I0EXC1w3qqayXJx YrBzVTO0NDPq00xN9amGGlvAVgEC08oXNJIJHByShELUkpHeakYbAVWPQ4rw mAoCno/A0kFgoxC4EBGNwpIZdKa4XNrSBChyzWWd8xnXbKHss2l7FmAW983n CidzzmcCC3PB2Vw4k4gmAsmQJeVRJ0B7Ze73mPvcFpXbMe5xq70ebcAzHfSq A26A1njEPRZxj8Y9QzHXYMw+lLR2Rs0dTr18RqPUaDunjP0ay8iUdVxTOLag 1ti0OqfBGXbOuI0zXos+4Egu5yOzC4ZIdCYUNMci1kTs5rRyzTgRT8aC2ZRb PWgTkZw8cgdT2FvZuNnfPF9Pk+PQjRgU95MiOYUfGRsLD/S65PXddEx5yTGX vP2UQz032ZMdUswNtKeUTfFaya2xtqUumV7WZFV2Lk5P7NunPtf37bmmd/26 Z8aeS6r6oJSv7+xJue23Vlx310PX54P3Tide7oNeZuvrZ9dvn0292Z2/7R9a 66kIdTa+OJ18sh3tENJERcdcvfLPVz3v9lLb0aEuEbaOhpIQ4WUkRBkJxcGU EoqPjQ4OSsSiekmVwWwSUSj9LW1um3VsWCXGoAckglYiuoNGcQ61fXt39qcn Sz8+BpKV++ZW4tv7s6933O8uuf5yPw988CfA1dOVvz9f/cfB2k/P1wD23z9b f3U9A96XrFtzYdnT0lLH4PLpPAGJx6OJRFw6Y7hSWI9HEYuKRSikuY43LYbU FdQmEqYRIgxUlxsaK0LdrYmOWo+81tbZplHIe8slXXhMIxpVx+KUk0l1FQJZ VXlHFW+CRzSwqAoiphKHpheViNB4KgLNIhCpBDwKiSZSqBQBv7y1wZqOO2dz zrmcZ2HWC2rxlzOEc575fGBxPrj04azOfCaQikWTsVjEHXXrwtZxj1HlMA45 LKNOx4TLo/X6jf6gKRAwhvyGkEcbdmsirsm4YzhuG4xaB2JGRVAvt2nlOrVS M9M9bR7RWSe0timtQwMESuMyWMPO2ZVFvc9h8DuMQU9yKR/OZmNLC97ZrDUZ sybiWa89DDwsndR0dc4woblKKMAl9tL5Q9V1m4qqhSr6GJlQUwrjfPRJM57s UTaHxlSJ6YHF3qoZDiHU1TvvNM9ZtfOmiWX92ImZ4cWhzl1N153Jpou9Ffuj zddHG08rqub75YujnYn6slC1ICTlrLZXJ5qrjJV8s4Sr5TM1XIZJxPHXS/zy ulhn0/KAfKGzYaun+mxvRR8bive0xgdaW5hg5y2ZaZVtxw3Xl81zxrZ+CVYu RLdy8Y08XC0Dy8fDiKXHWhsbqFhsv0I5OdjbIOYYJ/vD1knvRFtkUnbS3ZcZ lxqqWEl11zefZr67mwcFfPAPn8ZB1vryiv/9Vf8Pjxd+eLLw/YP89w+AIebB +K9Plr97svw9oOvF+sG1VNTapxvtrJPVULgciMOhsDgguNKpUJeAmVA11hCx rWTiWV1HsIGrraTXQKQqFsMwPuieUYd8zmzAngraF40TriGVpavd2CDtIeHl QoGiTFBVUSZvaeqUVXfRMW4ZvYuB5cHhhYP2CBQVjqKhsAQMHoMs3P2DwRdV tDRaUzHv3KxnNv/hHKR5//JCcGnRtzjnW5orcLW4EJydLZz5NpdL5DOpVCwR KqDlt427TSNOy4TbqfX5jL6AxR+0BoNWIDAArYhfH/fNxJwTUctg1DwQMXT4 ZuQ2jUKvUczoe2cAV5ZJrQ3U9IxDp3Mb3An32ul1c8BtCbgdYc/2ztlYPpc/ uXjh6hVXJm1OxSJz875waLS2tpMI+ZSyaSZyBI9S0gSquqZQdXmyXqBlkUA+ of7qSD9ffMGr3/VOXzOqrqvluyMNl9Ud18yqfUP3rk55WavY1Sr2tPJ9Tftd nfy3tq6vLV0PpxoXmoXZ9sp5VfNah3R/pO2JseeZoePZjOLRtOKORrE/0Xa8 o+r0QP2uTnHN2rmjb0u0styVtOVm/rJC3AvhDTyarYLdRSWI4TDbUPvDTd83 9/NXFtWTLRRVBbmTT27hELokzO56oaJOZBhROsfb12KGVf/kmrNrw9t90tq+ rJVthEacqhp9f3MqbNuY877e8Lw773173nu44To85Xy37X+96Tk46/zNTuS3 5wPvNj3vLgZ+fTnym73YV1eTv72a+s1+5qtbc7+9lX+0E7Rq24ViIZFGJzOY ZCYH4gsYDFpQ3b3iGAGq2EUkepulodbypFJoLKMYy5k5zVAoEfLNZhIul3Na a1P1mRRt1skxt8uuZDE662Xt0kqIQC4pQeBRuGoIpxKTlEwCt7SUh0KyQG6H I/kUEpdKwaAwZIjKKBPVtrW40wngdN7C5RLzhVPyFmcDS/PBhblQ4ZOdhfDS ImjJQS8WSSdj8WgyEop57SHLpNcy5ilwNe62a71eS8BvCwULFQ5Ywj5z2GMI O6fDlqGgqT9gHAjNKFyadotarpvuntEN6kzjOqtmxq7V27UGh9bsMi6spXd3 dx0Aqohndi3z+z98lVpYjC3mHj69n1hatibjNrN+QCAY4fLsM/qsR7fayIwK CO1Y4mB96ziTruPRpvk00SdHyo4e66poi+bzyWx4wTCa6ah3VvI9U/rkQjY9 n03Np1OziexsMj+XnJ9NXArrD809v3aqbo42p4cHLgcth67hHcfU6ajjTNS2 FTLesKg22isfuIffzarfZsa+TI28jY9+qm6+2C3Z6ZVc7K++2i/d6q3QSDlX MjP31q2eLomSQXCMKh5vBv7yeHFvcVIrp/dXkluZ+BoqZrqzfmfFO+cezRm6 F51DWdeErkfWJeWqBzuzmq7sQEsu6lFWl2lGehfmo7sbsT/dzX0PwtX97B8/ T35zO/nHO9kvrwSfb1i/vOz/4oLr1TlQnrcXgYJFDzddK+a+q3njvdPup+f8 r69Gbp11tjRWEGkMCp0DsXgQlyficsPT/YueSSkF7yhnD5Owlhp+vEuSaS33 1/HDfW2JqZGIZsLXpXBMjrgjAXc2YTLovOOTnUxmR5lI1y9TKSupFCyRgK9m U7rZ5GYqToRBVEEkFgLFQCDUXXUDrVI8BgvR6OyKihplmyOTBLoE7A8QBSzP vZDzLBU+aPZ+uLbLO5vxZ5PBZDwYCwfCvpDXGnLoA5Ypv1XtsU7azaMO66TL oXU7Zjwundel9bt0AZcu6JoJ2SbCpkG/achjHPBNK+zTcoOmY2a6WzfTrzcM 6syjevuMwWk0uI1Wr+nz+1fu3vrcE3T7E95nh/f+9Z//lVta9aQT12/tr53d tCdiEzxopKo6FPCH57Jpr3aSgR4iIjtY3P6KiiEmWcuiDtDJlF99RPrVJ11V HZF8fjFom9MO5wZaXDUim8Zc2DuW5sOLs6GFXGQhn5zPbifce7aBpcLtdoOb HvV6f9PmSPdJpzE1Nx9fWoovLyVXFhbmk7MTcqus8sEJ71c3M199mtlJT47X 0HoFmC4uroWGi8sEs61CU5X4y8u5r6+l77v6rBVs33jX083gd4+XdmbHNI2Q XIAXkTDjPU0e08D+RsKoklXSyM019eV8vkDAohMJOoNuyTAcGezyBTxj/d0d srqgzfDZRuLbu9kfHs3+8ABYYbZgeY8Xv7oRe3vB8dV+6N1lz9tLvi8u+b+8 Enp/I3kiMCbl0qxDytvrnqcXgq+vhJ5dDHS0VpHpbAqbV2gJ+XwJi7Gi6Y0M K7sFrLXOimgla5CMT7ZIJss4A2L23Ijy0ljT1lB9drQzHPL78+B9zwXm8vGg e1DIH+Bzrp/NfvnyRjZl7FTKauhQG4PkHapd8XSPyXj00sLV96NtNTpVOx6H h2g0QaW0ur3VkoqCWOWaS7vnM958xrOQAQ7oW5oFgDlySXsm4kqE3fGwLxr0 RwIhMPA7XNYpp3nKYQFcjdusE3brpMOudrlm3C6txzXtcYy5LACnfp+hF0Dl 1A85tB0WrUI/0zmjU+kMwzrjqNY0arBM6h06o9saTPn+8tffvXj2wh/1rW3M /z//+1//9a//zi2tBDLxvWvbWzvn7clYYKzfH48CJCILuaBt1MTCjpAwI43t jTyupAjWSyApqWTGkSP0j452V3dk09GzDu2cWZvT9BgruDatObwwG57LgQoC LGfTexHrVed4LuIK5ZPRucxG3L070nqmpy4wpY/kZ6OLc9Gl+djS7OJq9vKK 1S7nmmWVd1e9x519M+0CVTm+R4hroCNF2OLZBv6aUtSARUw3Ss+ah69b+oCn 2AYVzy/G//p05UJmSFuH7RCT+lqqljOu6xdObC1H2yo5pOJPmDh8bW29vFvJ odLGVUO+nnZDb89wn8qsngxOqnbMwy8XLd/dzfz0KP/jw9z393M/Ppr927OV P9/Jvt/zfXU9+mY3dHjB+3rH+24/dj6jrRcyICKBTiDEdMOv9jK/uZF6eSnS BbhisWkCIUsgYvIFEg4nrGxQ0il6mfTsQP2qstpUIRxgkDON/LO91WdnenaC M5eDuk3TMOgKo5OjYY3WYzAHLGZdXbWroXJzMfT+8LPDB+eddu1gZZmMgPH3 ye6tWlYdfUAAWcUwJhZPJ0FYNB4iQwKxpLq50ZoM/3K5qHc27S0ctkp5cmln LunMJ12pqD3mt/lsdq/dGfO6wh5PwOVxm50FpRp3WCZslnGLbdJqn7Tb1Tb7 pM027jCPuE3DbsOAS9fj1XU7DUMW3ZB5utM43aHXdulm+nSGQYNp3GBRA73S O/VGj3Hjwsr/+T//7+P7j2OZyLuvXvzf//v/Ab3KLy6vnVl49OjK02f3Q8CF 89nw3Gy4oDYZ3dSA+OhRyVH4RMdgOYPM/ujjBhR5UiHnwo5RPzraX98z7zUv 6ceSPldK3akr49hnzACnwvHPhdl8Lr4f0O84p9OpSHQ+n5qf3cuFHvg0K37b dsh4dqA9MGVM5vP55dn11fhnp32Pt9y31gzGOsYgh6bgEroroL4yolJIkEIo LrLYV8EIVTFqEaUNFGxKUXtuuMVZJ4ho+17vpX56uX45PeRXsK+fnfvdF/ff H1z/7PzCyYRpsIlPRx9j49EiiFhGI1QxiTVsRjWdUsumVzGheiZ1WFo2IWLf T8z87fnqzy+P//PViZ+fLv70eO6nZ8e/fzT/9Y3Ymx3/wXnfwXnvq0uBz9Yc iloBRMLjsTgsCsOFaEt+/ftbsy93I13tVaAfZPGEACqGQCBiszvK+EIEItFX cyvY/zg1sTres2Ef3A2M5CZaE051djaSysei4GWJ+dKOmaR60KMdizuN+eGO ZF/LmcXw8fnk3taqzWJUSMTtNGw/gzxaJZySCZpoZB4MQYAh0UgsHkOkQXS+ qLyqQWYK+zzZJEhZznTMkYy403FXKm5PxWzpiD0WcoT97mjYHfK6/C6H12p3 Ge12g9U+YzVNWAxjJsOI1TxusUzoDQN6vUo33auf7jJNdxg13WZ1l0nTYZrp M0wPmjRdRm2XXqea0Q/PGMb0pgmjTWNwGXUeszPsfPnqwf/+X/91/87dE6eW f/rx+//5n//55z/+tby2dnFn/dHDa3/6/fvl9TPh2Wwwnw7m0qHZtHqyl/HR R7yP4VO9Y/UiVhWsuBFDDU6OeeuZVaXFEzVtx40TScNMPJOY0/XYpDyX0Raa y0Xmssvp8E2PesOujqeioA2J51NXE647nqm5iDMyl07lk9ue6fN9snnN2K0z iYfboTun3NsRTVrbOV5ND1SzxzmkFhahmYOtZWK5JCQDXmwVUFxCCvilrSRC vFEaaygzVnLShoFfX8v+4+3mpdTg8kz/u8fXv/v6YHshmrBOJHQ96laOvotM Kf2YBSuilhyFYMfIxcewRz8mHvuYjThKKz5aD+H7GKQHOds/3p7759vt//zi 3M8vT/7t2fLPByf+8mDuN/uxV5fDX15Pvb2aeHouou5tgihEEomIweCQSAwa iSnncM9lrQeXQ11tVQwWl87mUnlcKpdbJRJY+9tq6eSbs4bXZz3vNr230prn pwI3T4YfxoYPF/UvjntuZqy7aevZkG7VNZ2a6PO111trpWF5dW6yeSs24x1W aBWNvY11AhqDBEeBWCXE4SQQoYxIZCMxTAyOgMDQsfjRRml7uYjL5FbVtMrq 2mU1zQ11LX1yhXl4cFjZ1dHcKatXVlW11Fc3avp6Jrq6mqub6qpaZdUt9RUN sor6Rkm1rKK6qqxCWiapLKsU8UUijqCMwwexoVIsqhSVVwrLK0Ti2qqahrom ibispqKyuUGm6Ojo7OtT9vQPTIyP6abGdJOhuGd7a/3T6zt3PrtyfGX+9Knj V6/uPXn0YHZ5JT6XWzyxcufuvdVTWwEAVT4bmctHF3JObW9V0RHxx0h93/h0 jbgPj66Dk4Iq1ayi3CKmTfPEJ9VDUY83novNTcrdEr7X6ozmsyej3s9swyd8 hlguFV7Ip3Lx6FDPWr8iYzX47CaHZsTY3ahpFF5zqfbH6i+pBx4suY/7h5Qi cj0D08TAjoggDZNUj4ZXkdHlEHgBkRR4ibOM7hZCFceO1iIQrVhssFYclInm tH2vLkb/8mjltL/T09Nw79LZu7sb7TUiNhEtIKMEZNisvbyBD8eVHi366Fck 2FHUsY+xx45gj30kRH/Cgh1RMIlTfOjRnOXvh2f+eXj2Hwen//Zs7W/Pj//4 7PhXN1KvL0Xe7sXfXkkeXIx4NZ1cENBIRBKBgEbj4Ag0DIFBorBSAe9UXKds q6ayODQul8bjQixWY0X5cGPdSGPF663I01Pe/aw5pelbcGrPz/qvJzT7kclz zgFbi+S0qe+qo/OKWT7bX6GvZirYlNEa9klr97nwVHi0uUvM6K0rb5JKyGgc FoFm4PAUJI6CxBKRGDqeJGZQOSRyGQVqptOb6FQ2noBDYkkovIAC1bGZjQJe l5jbXc6pZ9JoJDIOTWjicjqFfBqeRMGSSBiwb1CoOIqMz2kvE4D+AIvCY5F4 AoaERRMxaDwWDf5GMCBgkEQkEqQ4NosrQYIfsUQ8kYYmMtAkForAxlKFNE4V R1jbJu/IJLMXt/du37zz9NHDL14fvHv7/A9fvX7z6umtW1c3ts+snTqRXlgK zwOiZkEB2Uno+zoJxW1onL69c0zCm2JRlRisQyq9OdWcaeJ0EfC6ytpgIh7J RBNDra4yYcTmOhd1fGYaXPXbk9lkPBVZiLhve8bTMs64lNsrYbfxyA1MbDuz pION3M+avgirbnaJTk51pWeUrVxcHR1bR8M1cUg9bLK7klWHgokIaBEJXUPF OiRUazlVJYDUZey54dYTg7Xhev66beiLK+k/Plh9vhu+dtJ2NjuzGBjvqGWX 07HAmpoq6cHJMvcwo5KLF9LRdTyisoo+LBfM9JUHJqry5tYNf8+Ot/PVuuXH p6t/P1j/x8GJn1+s/vR87Zt7i0CpXl0Kv72SOLwUm3eOlPNZZCoZhcNhMJjS UngJDIVAYkoR6FIEUsznVErEZBqTTGfSOIWjWFVlYg4OP9XWEBzu7ZSIa5ns cibNr+2d90zGDapJZV1/c8W4vHw7OHgnN3U7N3U+0LcbG7gzP341PnjC3X8q NJ409poG6s0j7SFtfx0fNBw4iEQBxYKoNDKpvowz2Voj4/NAYhQx6E1CbpuY SyWRSSQKh8asFvIapRWVPJ5cKlRWCLg0OgFHZpGoYiadBUE0iCLiMoRsOuCN RKTQIQYVokIQmc2kiVl0Mp6ExRPA8+AIFBQaj0Dj4Wg8mcFh8qUYEg1DhjBE CI4mgJXFcOxRGLYIji/FkOBIAg5NpzPKaxuHaut62tuGOuS9xmlz3J+OBzJu Z3hs3NzeMQ5sKwqC92wmnE/OGfoXalhOIT2kbIsNK4L1AgUWZxAJF9olgWr6 KJs2WVYXDCcSufj8mDwh5e9oRvanO7O6MfvEkLajzd5U96m6I9cibKVjq+m4 ChpGBCSIipIxUH1i6qeL9t/m1b81tt4cqjADDJjYZh5Bzid3iSnGtorjasVs u8hWzTXIpWf8quVuoa9OkJjqspQJzgx3nBxvdErZJ73a958e//bxxrePzvz+ 7urB5djdM85zOfVCYHA1Onw2PX5tWXP7hObaqv7+SeM36yM/LCm/PzH6MDPx 5Tnnb845CnXJ/fWN+J8frPz5wfI3d+d/cy319mLk8Fzw6Ybn/mnXZlxnGZJL OCw6RMUSwGuOZ9HILBoJhcViCUQUBlcMh4OwQ2ayCRQGkc5kAB/kcClkMqGo tK9e3Czh8SBKQ4WwXiKo5HJENAaHBLVUihYCk7sLlmfngm+uJAC6B5fCL875 Xmy4rs9NL/mGT4THF5wDQbV80aOO6AZVzdJKIaejpVrZXDk50GqZUlrG5EMt dWIGh8tg1Ip5vS1VU52yKqGAz+Y0VIpaq8XK+gplbYWyuqJeUlYpFEJkqpDF 7G2Q9jZUyusq+1plynppb6O0qaIMT6Sy2Jw2WU17XW2DtIIO0YlEKo/DpdPZ aAIVRaShQI/CBH+UBEtko8l0TOFLXAkwLOlIMeJXRbCPi+DH4KhSJBaGxGKI ZAKVhSFAaCwJhyXjMCQCjkJAU/AoCh5Lw6IpodlMJA+gSkXyqby+J1BFNQnI 8fb2c6YxbxVXiSOOi8vO99S4ykkKOmNEVGEbUCfc1pPDsk/7q08oJGMSTruQ 1cyjTIlpPj5tiguVkdB8IkZIwVVyKJ01fIOqPu/svzJvfHM58dVe7OuLoa/P 2q+PS3xNvAvJqRvL+jsn9E9X9J87Vc/8I59rmr01/Bdrzq3hikgdNzEl7+VS bLXiSEfFGAtatk8dXIj/+mr61/uZd/vpX19Pf7mffHcVmFfs7V7s7W70zaXQ i03P8zOuR+vW32aV/0rXfJdsW++sfHc++PV+7I+3sj88Wfv5cPPvr7d+frX5 4/P15xuuw6T6S0v34/jkaf9QHRfggqWTCVwmTSLkCHhMFp1KpFBwFDKRAqHx xGIYoggGx1Eg4BaF7+vk8ylsLgGHLyfh/UPNPCJBIasbUrRAeFJpCaKkBFkK QxEwePNEx+6S7fFm8MGZwKOzgQenPJ8dd9w87txO68PaPvd4h66zobu+fFjR 0l4rbauRDiobTSPdw4rGKaVssEXWVlEhYXHJWAoJSxLRGTKRoFnAh7AkPJYg ojM5FGo5i9kg5IsZdBYJzCFiEXgiEBoCmUaESBgyCU2i4EH/ATyRjELi0Sg8 HkNCI/FIBA6NxKFAoUCAxMMRWDgcUwrDoDDgiWkYLBVNoCNw5GOlqCMlyI+K 4EdKEcUITAmwaSodTaFiKIArGp5MIVDAPgihsCQMjoTDEHFIYuHJkVh/LhnM psK5dDgXW9F1zcn4PjFNXdfoVnVGqjmjLNpYRYVLwOnGIwdrakclnBEqFKiu eDDadLKR24BHllEwlVS8VybcH2xQ8yj1bKijRmAabJhzqvbmDY9OeV9diL69 FHt9Kfr6UvzV5fir3cL47Unr51rZeXXX8zMhsPXdpv+L8OSXoamHWsX+aMNS V226juupZJ/Wd+1PtmXaatbH642VzJim/8W56BcgBRUoAhV/fTn6eid8eDH8 6mIEBKSDLc95W++GoWd1olUnYayPy06Oggdyby27XmyHXu9EgUC9B7Wfen8l 9evdyIsN528i478fk70Kj5z2Dcj4UK2QWSVm8dgMCpAsYuHdwFMoWAqFBNGw FGoRDHGspBRDpODIVBKVCXF4eDoT5JMmNs050AQ/doyKw1cJuKgPVCGAgZbA cUjUYlD3cCv26bJzN2++tea+vmi+mDMe96udo8paMds+0mJQVg80iJsk/AYQ l/l8OkTjsdlUIpmNJ+NRBIgA8VksNo1JwZMAJEQsiYLBQzgCnUQRcPk8NpfH ZFZwWHwqjU6GGBCNRgYpi04mMolEBglPIxNpFAIVgyYBhHDgCQkQnkAhgCfA UXBoIhZDwKDBehKOCOGJ4Fk/bMWRQarEgE0ECIYjlWCJRws+CNaRALAkGofI EVK4QohfuO6bXAgDfBKNRWCyyCwOicUCoogn0YK5RDATD6RjoZR/VdMcllIs fPpEXUOgpSpYxpwgYXvIhIaSEuHR4kY6oxnC+vmUW721LwZqLrXzJUXHKvC4 iEz8QNe+beo87h7azek+X7Y9XLEdrnu/ubH0eiP0ciP48mL05U4URBfA1esr yd9cy369n3m/6bozIzs7Jn9w3H+wHTjc8B2ecT9dM79a1d3R1WerqOEa7r59 4IpGHm6rzMjLTZXMvGnoxXbk1Q6o8MGF4MHF4Ivz/hfbvhfbXlAHW+6DE7YD 3+jr4NSnarmKTvCNtFn664bklY4pedYxeDI6eXvNcrDteXXB//qC/3Db/WLL /WVy6ouJxmuWPttAc7WQw6TR8SCvQwVFwgGoyFRC4ateaVQWk0BjAK6OFpeg iQA2OoXFgnhcEoNDwJI6peV+bb91ssunHTAOK9ulwu4GqUQk5vG4nS01x6OG MwmLf7zb3CHL2sYvLgQur0Q3c76FoMGr6/NOdqnqysroNAHoMVlcNofX1dIU MOl7W9rwaCIBS6gQinV9I+OKjs6GWlllZaWgDI8HJkQC/tXfO9ih6KmtlUnK a7iccjyejqcwCVQ+ARLgIT6OwsVCPAJVhIMESCy1FOgSiYYlszEUDorMQhOZ KAyF8OHO8DiIiaHxcXQhjiZCU7hILAVNIIPXAUsC0sTCkjjIwk1SsUgsGbBK IdNxVC4O4uGpIgyFhyNziBQBnszEQiwiS0zhlJEYEjxbHMrEQ6loCPwLus+M N93oFZkFxCE+L1zNX2/kjWFLhJ8c4X58VFIMl+Jw/hreXqc0wiTfaql8P1xp paMW68se6JRPlszPt4MvtgIvtwPPT9sOztheX4x+e3f1zV7y8HLy9ZX0m6vZ w93Uy0uJV3vxb25mvv0s8bv9+JvT5rsG2emhlnsr7hfnQ7fXHPeWbO8vxw6P 69c7+Mka3g3b8JZG4W+vXG4tizQIFkwDTzcCB+cCz84Fnmz7X5wPPN/yP98E XPmennU9PWl/smI5zGheJaduufvd/dWBieaMXpk2dZ2MTtxbdz3fDhxse1+e 9788H3ix6X161vP5cfeiZWSoVlLJZoNYC9SJQAHaDnZ3JonBJNHoFCYQJRaF wyIzmXgqvQSOKiqFYwrGwijkdh4fYvAYRMjYURMab1a3SVV1kpFmaU+9uKGi cL93Q09dXKOYt3StOHsypu7BprJGIWeyvcbU3WDqbLD01Ou66rqqy7hUCAUa MDyxSswp4zCoJBIRRwTNGgKJByaFRhNQCCLwL9yHxg2BJiAxRDSOjMFRUBgy GMOxJAQGAv8tYFsoPOVDQUg8GRQKR0YUigjyOJJARBIhUCBHIckQigyhSTQC hU6EGASIjoZoaIiOoYABA01lEKhMIMh4wBudRaBxCIAZKhNHZxIYLDyLiQWi xOIQWFwci0tk8slgyeESWWwCh0PiCIhsAYHLdxh1hpFBbYdc3VA92yLM1XJM fLKvRhKv4u92lk8RSyT/8R/lHx2tKIIFK4U31a1zozWTXIKXgNurYt1t483X l92Zsx1ejL28GDsAunQx9uyM/cVp87sr0e8ezh9cDD3dCr4A2fhy/HAvcXg5 8sUV/5+ux/98PfX7a/E3u4F358z3rM2nRloenfR8tmbfS+tvzVsenrSlFfyA iH5+uOO8RaWT8mYlnEgNLz7R/+ps+P2lOIAQxOAnW/4nG76nG97nG95nG75n YLkJfnQ9PuV4dMrx8LTz4SnH41POx6c8zzb8LzaDL7fCB5vB55v+u2uek0Gt fqijSiJmsEBCAWjQcBRq4UUGIYXJpPMFDL6AwuZQWEwqmw36PiqbS6azYUhM CcisxIIJkhgsikBI4fA5VLq1s2GiUULHEfForLJG4h9X+ibabANNI7IypURQ L+BV83kSMJPGJGIJ+A+tPRZ0VRiQdnAIBAb+oQqHMpCFqIOAY2EILAJFQCAJ cBQOdGRIFGAMBwdbMQAnKhaEHwyEKRQZi6EUshAOFITCQRgcDZhk4SZ/WAiL LbCHxkNYHBhTMGAmMDj8BxfFA8em4fB0Ap6GJ9AIBBqeSMeRGHgiA09ggE0E HI0IVhLASjqBwCAQmXiwlUTHkcHMwkMKMwsPoRU2kZkEIoNIZBUmgzGJSSIz DbWCCRGtl0nsouJSdSx3OXmaSTSK+T4+90lfzfFaKuPf/w36t49qSxAnhuRP 1+wvLgRWtM09n3w8+PEny1yymkm9Oe8+vBA9vBh9dTEMYs+bS8BlDM+2dPdP WTbio+ez2kuzmrtnLc92/K8u+b646vn1Jd/73fCbi5HHm/7H2/5nJ8z3TK1n Bpp3wtoLkenL8en7K9azfZKchL7fW7/a3zpMJ6pKS/sgwnR707pLezltu73i vDlvvZ4z7eeMuynDbsq4kzJcyBi304bN2PRGRL1gHQ0O9zj7O5LavtPhqc3k 9FpgLKTptQ10jMkbgW2w2RzQylE5IHjzKAAtBpsCOGGxqVw+nctnCsroHC6Z xaRxOQw+j8EV0Nl8kB9gaGwJHI0jUokARQbATwyiBZkEsXG4JhalBiIUNsMQ UgY0VM0ekXJrGFA7l14NkQmlSGQRAlYMB1VSCi8tRpQWwYtL4MXFhWVRCbyk GFFcWCJLi5EgmhUXCllSii4uRZYWCg2WsFIUrBQLg6ORMAwChoHDsIhSDLIw KIwLK0uxYD2iMAGN+DCnsBKOQ8AxgF6AKwrxS+FQCDxI1+hflqC3AIXEY4Ak AtoReBwcj0ESsCiwhohBkHCowtEtLAqoJQFd2BeAeBJ+eRQW+ctMMABRjQTk FBRQWgKatN1Xu9Is1EK4XhRyVso42UAbgxBKLMYqpPuF9ICY2owvqcfAWlC4 ixHT4cXIywuhvfjgFAOhwRbHaPAZOumzeeeLc4GXF8IgRL3ZTb7Zjb/c8d89 bX+w4b171n1/0/d4K/hkOwAoenDaC/zo1nHr52v2Gyu2q0uOKwu2y3njtnf4 Ym9lrlZgbZGZlU2p9upP2wXz5fQLnbU5IUWPgdX+x5EaBErXLouN967YRvYy umt5817aeCmtv5Az7C3Zrixary5advLGkyH1cbvK3VM3UiuK6bpurNoenHKf S2itg+0gPjGoNJDAKQwGBFhi82k8MU0sYZaXs8XlDL6QyuEx+GWMsg/3/OcJ ClAJhBxxGUMkhHg8HIMBw2BLkcBb6MAHgUdQWHwSnc1m0GQsiINFC/FYEZGA hyGRxXAuCddXRhut5nQJ6c1siIZBw4sQBZyKC2G+BOBUBCs5Bi8tggHAYEUo WBGypAh5rAhRVIQsLUKUAOqKkQAtWDEoFKwEBYOBbgAJg6HhcCy8gA0asAQv RcMKhUSUoOGlKEQJBl4KGAObwPxf5qABhzA4BvR6gC5UATAsvIAWpgAVvNC4 oTA4FAAGSUAjsJgPTSIGgcfAC9QBZj4UGOCxCDDngy+j8KCvBHMKEwoPwaIR OEBjga4CYIX5eBSxGgGrQhbXoYv7eITjrdyLcsEUHdnDJDuraBoGSk3DdROw jWhUI5K4F3O8Phd5ddp1Lzdy2dU0q+Rst/EdZYyMfmDJNbboHl92Ta66Jued kznrWNY0vOpVnwxqVgPTJwKak6GpE6HJE0HNimNi0Tm64hvN2wYShu6UuS9v 75u1qZY1yostAg+X4FfUnahmPlfyFsso2cayEANjQRyVffSx4JNjdUzmYEPl SEvZRFvFdFuNrrM1MNqd1Q+ueGbWI+a0eWK6q9093rlk7AiqGtz9rVsx05pH o1E0iCAqHoPHEUAMp1KYLAqTzeSBKCNlS6ScyhqupIojLmcKAUhclqiCXSkV VNUyBSKmQMAUixkSCUMshgQCDESDozCAK2CXILfjyQBOAUTnkgnkKojYLaZJ IDwVgeQT8Hg4ClYM4xDwA1W8iVpuO5/OxuLgBaiAHCGAKJUUIY4VwY4V/6JX QLtQYE3pL1XQq0J9UCdUKezDsrRwyKIYrIGj4L+AgcQCCSqBoUHkA2jBSwrT YDAkDIFGFDZ9EK4CVNgCh3BMKbBaYKkYHAI474frMMA0VMF2seiCFpGxaDIG TfzlQAQarPygYyg0EfSMOAwJh/5QGBIeXajCwXmQB7EkAoGCx4FNeKBpIP5h McRCgXCIJf3/eanJAw== "], {{0, 150}, {200, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag[ "Byte", ColorSpace -> "RGB", ImageSize -> All, Interleaving -> True], Selectable->False], BaseStyle->"ImageGraphics", ImageSize->Magnification[1], ImageSizeRaw->{200, 150}, PlotRange->{{0, 200}, {0, 150}}]}]], "Input", CellID->1098438278], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJy03XdwU9fe6P1n3vefd+ZJHkIHd3o11cYGm2IwELppoYZiEkroJZBOSCMn nRq66bhX3Lss2bItWbLVe7Ut5947c+fO3P/f3yp77bUlmeTM+94zn+OR1t6S pb2+e+3tzJmTcZmntxz+v/7jP/7j/P8DP7YcvJR27tzBT7e+A0+2nzp/7Mip Dz9Yc+rCh0c+PJec+X/D4A34rwL+ix9XWpAKy3WikgNPq6hroJowkwfXJaxv doPzN/vXSNUi1/BPeHqDsvHwnrYbwehu12ttNxi2Fb/hDc51Cu1/vQartd2s tYa6wb2h8Co0eJODttYBO7gJau10vM52HbFfx5swG/+GYV0XP57lBhCOA/7i Fola0Z0aSx5izqsClrtVlhvVyM1qy71acyVTbX1ZYy2ssVYRVdaqavPTGuG7 1EkJx+RWre1WrZ1g3w59wUrrICw3hA9wg/bDz3u4isTpZl82ePBGyAiJgblR Y6dq7WyW6VTCd6wJe7SlzYRsDR5EE229Xme9wRHqkuwZfDCxG5zrghtoEyrn FlEPbDfq7eBmPS5K8iZ25ka4XxHyW6wCyw2EPxEs3LlAnlrIpoc11jzEQnJC qpHCakt9rZmprbYqaqwdlKWjyqKoMRfCZ6gX3SLqqNuU/Tb+stzXsd2osvJu 8qphBoEF/6RPxcWBziNdN8hKEnq+cyODzbhVOu+kdnEK4OgJ5wU9wUOJOwTP hf0Gvw6ISEUhk4gakBzJEHYaCXw8YfA6fRUq5xYHnt4m6tBPtEMDsOGf1I0G 6fuHr0tSvpQl7Di85GWdtRTUWkqrzKChCqXSWW1RV1s01WZGW23trrbqiCqz rkTbXmeW1dtuY7dC3BbZg6AziISEL0M3g9SEeFMYdIIooTTuO4Z51c0g0jOX TXHwnIbJiXsV3ucGZReXCDJZdKv1Rrhjhc9EHEMDgqde0pIUHmxgUB63OPD0 NocNStmEzFhsUtwXh499M5iFPMDfyHpLcK/emlNvlYFai6xUK3utbajQdVQZ 1VXGriqjBjFoStRAW6LuLlHrijt1eQrdzZe6b39V11vUDbbb2K0QeJz7XvWS 78j1YyNXEyzMPcPNOkZ6kyC5iHDLRbh1+00Z0H5C5utv0YoGwc+dMBgaEib0 0MjYEHwYb6KfklT4PW822m6in/xr0dPbnFv8U/py9P7khYKQnMKkxeXUIHGr wUoyeNJgy2mwqRqsqlqLKq9NdeFiw5UfO366pv7pmob45hfNxa81h09qD5/s PnxSd+ioLjNTd/R9yEnbYNGSbBoJ8Rv92WjD4AH9IuhxA4VyqrHdqrbdqqGE TkL64RbeN1zr6VPpdNPLrnD6B107uCkORzhnQ08TcXLDlsPwkyX24OAEJRSU E90amsqtRkcYTcBOoQPuYG6F1EVzFd4TjwvLAi2NI3aF42lEbiHizrdwAPcb bU8aUU5dDdauWkvXs8auS5+qd25X70I0RMYGQrt5Q/f+PboD7+sy39cd3Qc5 9eCcUDZNhF2CJNRkv41JBuFb1NhuE7VSwh0Xvvvipkx63bzFnekhi7/0Ro4v QXyJOO+3UN4OBk20OHH8yhCmhJuDGCQSXEID34Cdh6aVHi4b3waFnjp4t6Vu NdsFjpA92Tvbb4WgOWG3ggkd0k+FkKUjhO0pltOIc6rWd+Wrui59pt75njrj A3XGMc2uC5oDX2iOfKc58Zvm3B3N5w+1mA6c/xFy0kFOjfbgihAHJ+wO6A+9 29ifDL5jx3eP7GaMXzFsfyJ0fbslvYDi1YCcJnZ6XiMhCwt3lHjoLJbkxEhK 4E55fortN/nZCUnoNjcjwRng2b9NsBnHT2kYTUHjDkp8h793q1mS021JadJf Qb8FzoauOfxWISeEWyKwB032p9gLklORGrl0XZ3Voi7pUZcbNFVmTa1FU2/T NNo1TQ6gxXR1Ft2tIt2NIl2DWQtv1RzEQZGcpFvvNFEQj6g+iI1q4OOR5CTe hoVdwNmSws9sQ8j8ircWQif4INNP3uj4k16mHQy/W+hpHhY/WfiAUMJ026X4 DOigeEglL+QHnSKZ8zaDRoJeaJfGFvTb8TQJhfB5YzZM/Kjsne80258TTfbn kFONCW68UU4vqtXNNswO2hFHu8yhlDlaZY4u0IxzymtH6o3d0EYzJrP/SZH3 Z9CmOzIHRQedfEV3OCwhEX/3JQhNQjybwuAXFsefUiQPHr+6hj7l1oRwK0az dHkJnSw+Axl1WxYSiYxBkdwh8DEUxwlxK3WbbUIcYd3G/mSz1izMI0ZPf5md 30EYCfNuj2T25wTNyYwUo5wamu13sXvNTkSG3Jc582SOIpmjiuRUqkFqe7pp LdJmZI67RDOGH5P3Ie95F757vQP10xDsT/TTgTQidNJDLp23wy3RdPlt5Gef Lu/8dUFcOUODaf4b3IzTpQCvBnwP9tsy+21hvsLu/3dT7PizhSd28mZ3OWik hXAgsmChv52bR06L/c8WG4ZbarHTN2TviR+/IGSOF5BTnVlVgxWrVS+qa6El PgDsGc4JaXZ01lm6y7uRio5uGexsv9uC8L+Ffy35gkEjfDMSTeFx041Ok9BV Ouzpzy2SoReINxJWAH6+pMef38QnQU9hce7kjj/l8NOJtLC3GgybI7Tzn9id Qdwl5FJ4cJCXOELd5dxBkxiM2wG/Cf4id+WOe3In0uLManG+bHEgMsdLuHeq NauIYhXkVN1M3gHtyeQRKCe7ssrQDcp7uotk3bilexT8Cgf+RY77cuf9Fuoe /oL8u6GiGh33iCbkblA/zcGC2vhTulCLt21BZxzZXzgf+QtuuPUh9Box2FLg EB/jaSIrCS6BzAI3ZXJCyOkNYYSUEFKLi7kjPLiHOEXCARfmnSd8GOGD3WVo TmIwbE/aEtrNKfw6yS99RbQ4XkFODZYXtRYVATk9KK8kOeE9H2BZcmdBCyZz FDTZ5dUmLSjXabPrtTJcEQ6JEHMSipJ8WeEr321y3qPEogToakiwGCTooD3s oi1dwHlBPUjHhaVgsNVAXGDxfIU56/lsgufRyed0N8S9FheCp4kc+XsKwnVX wRJy3pPMpgu2SnCb7gY1JrgrrC1Bgva5K+wjTCvb6rrPKNwPFO4nCvcrIHfR nOotL+qFnEpVqkcNlc3W+0IPJKdsyImAnOpNzXDfDip1XY/Ku2S2B9IPw15F 3Bdxn0TOWhKKanbQWzXh5kog3IaFwpP4Z7gFfJD1nD/3yTiZTRe4Q7FzU5h9 Lo973KlxJ5zQlSQoADSo4OBIQnfDk0XdU9D3EQ6dG+bxHoW2sj3Jq7jAaJAh I8DBFSuQjtzn3vlBqFbgBrmE3JULOTVaICegIiCn7PbKBsN9heM+ekPnA4Xz ocJZSMidhZBTram51tRVi3O6Vwo5PVQEfQz0Kua+yMW71+y6L3Le5277pTdd jqBlAa/kbHF2iEtEyP3DXbKnnC3Ug3FxBt1NeprzlxtxkE0cCyZ4ARkcOiyt HAXK5n4rdQ8N4sfc4H08oQheKCRHWHgfeGHIb3GyTTgVfr6CPgN98ID9IkR8 +jw4J/PjRkt2g0VFQE5luspK3SOF45HQ4QuFi8vJXlBnktUJOd0qJjnRhFpd YT0kFBL3ZTwne3wPQX9I8rdeEpIFefBJF/K+q2CbpOcp3wY39fwqSl5yN2g6 hKUgzGAItEOrZI7uCe5LSadM0oxQjvch0QY899vcD9rcD1s9lMIDT+8z6CXB v+J+yNSwETQpwkyRX/eQaeOwX9fqyWp15zGQU5PlaZPlYZM1t8na3YCVqrqr TRXVpiyFIwu//6NWVxHiLFI4iyCnOlMpzklda1JX9qhvFaubzQ9bhZDaXA+D 8J+KB2eTzBWsBbnfQq+GzL1wkUhvFUJuKuRsluna+O+tEsIJLpn3oFS4PB62 8nNB8CWEqQUH4wEP2jwPETpfDxBPeGJLXuElHn5+H9CXMziYNpE4QcKnZUuN tBzykTyPRGgcP/AS8BletXny2lhOTqgoq8n6uMla2WS1NWClKhvO6ZnCkaNw 5ba6ClpdVYizSuGsanE215k0RK1JU9GjvleirtM9bHOSz/kI/Ub3IyX1UOl6 SEZ4rdTDFvdDGdaCyd0P5C6C5STcgLHBN60DQZf40KdvMugpzAXATQpecvkT RJhTPMvB09oaPCLMl5fjGQw3p8H7PxqEZD0ZTOjKgz9Y8Lspg3izsCd8Tgp3 XpPtWZPtUZP1SZOtrslmb7TZG2z2EpW92tRWbepU2LoULk2rS0c5dQpnV5NV W2cCPaDW1FPR05NVqa5SPVQ6oRySUBaHdsW1lMV52OJB5AC19AhxEQ8FLDA+ CWkk/C0Ef5colsDPuyQPRchEhywgD0JSYWuIOAXoxPFQYgPitw6ZL28WByYI C5k1fjdh8KGS7e9lC0Xo7NMpwMdZ+Bjimz+UzIsni0CvCvoMPqQdyWr3Ijik x1gu4slTkqXJnSezZclsj2TWJzJbY7PNTooqboOcVNUmY7PJpHCaWiljq1MP OVXrtZihWmcoVxseFRmyG9QlikdK52Ol+7HSM5isIPjzP5IzbkpBPQw12EUz iKQNz4OgS0nIzkz407w1eAUIt3qQsyb0LA7OQyxEGd4jKXETmkrPI8RL8JOL 9xSPrSQnpdgJ2tTOuDFPluAx4iWyRL7HIi/vBc0JoPvwVy2OZy2OrBYbeNpi a5ThnMCTEvvjAtXjAmN+tbm0mTEW1unzq7puZ2lvZ/XczrL8/Jvly08sJw9Z ClpUBS1ZKCfykeinegJgPVR6CByVN0iW3IMoeDin1jfzUMI1XTz73jTpnkGb CbOeC5PSJmJ7CrODZ1PSBj+nfBUw4nvMEyYo6x/xSYXZh84yPXPDfCRudjyk TK4iz+MO4MXQB3tCdFBkUNgBedLhzW/HlAD+pnO+bHE+RuzgaYu9UWa3wwIF HhXaTx1UHXzPeOx980f7zWcOmM9kAuOZTP2ZzK4P9vYc2Gw8sNl2dKvt6C7k dZvqdRvKiQ8pDE/wCBSl8PBoUa2exxz42wHQp23BBskp+CogJBF0iQlZM0MM ssBKTwolOXGox+J6ws81mRGO5MT3c3xiQuL+fpBFeUM9DtIe/FQ87Hj/JwR+ yj7Sk0HwOzzFcjp8+QjLyfUEe9zigJyetdibWuyOZhvyqNBx6pBqX4bxg83m D7eZPzlJGD85qT+5t2v/tp6D24yHttmObsM57bZVKFUVyiylgxQOH+8p087z MeyrPW71Pmn1PEE/BxWaEIWnmKwhIZPOX+Kl44Od1+1459ARXnso2sMTqcfB 1whfUE4hU+bnBD0N5cOHl86s8J7eoNVjcL6nvE7fk04/8TSYD5OOdPie0ZaE nODvNYXrCSF3PJHbn8lxTi02BOek2HPImHnBfPoT8xc/mL+5a/7xsfGXl8o/ 8lV/5Pf8kW/8I9/2W47t899sHx2yVSpVlcqsNtuTDs+TTi8QPob0Y1N+ju9p qzdYG/JEwgPIONv6uE1cGbIGm/GQayvbgV8k6c7CRISe6SE7SxcZjP+OT/hg 0GR58U/JvODp8zEh88jBxyqoKHr0hF+Hf5FXfEOxUjGhJx0+cV46fc8QP6Ly P8WeBcFbw27KR3z5nSQnT36b6xloRZ7KHeCF3NEkd3A5Xa5/re5+rda9VhuB zGaU2Y0tdnmLXdVi72mBp1abzGKr0duu/MtW2d5R2f5Ibn6KQvI+ox+V4ruC qulXEFJ/1uZ91uZ7ij0TeZ8pvU+lV5CnofgYaCT8+sCXE7R6BJ+wbzqdOznC vHAZhDlrJMsOV8szKRZMuMFejj+kQ7Z0BG3yPVFRzxBaBbfO+HAeveBZKLWf eK7ufa6i8CYWEnqarerNR/w0pzbn8zY3eNaKKZzPFI4XCodM4XDK7c4Wu/NR ofNZea3cppTbOuS2TsoO6uT2BvTAZmyxWVoslmaz5fpjS2W7slL9pKH7qcr7 lH6RIJK2nzNwANuo54jvuTLYs3YvEXzF5GeQXkBhZ8b/lKCXBlyy4Kn0PB2M JBhxBE+oCsGnrY+dyM8GW16EE/w5J8xsqshCETrX9B2eqjn8oiGuMD4ieJ3h oWB6n3OeCZ6Hgzf5n3X1PhcUqjGVvxBygqVJ6XqudINnbRhao5wvW52KVqdb YXfL7e5H+e6KthK5rYJR2PIV9pe4OljHCuUOnJMVuZsLObVX6p4CtfeZ2ieh 8j2XHsYgL5TIM6X/OeJ73h5Oh+85XZ/xoWv3P8NLPcvjOeUHzzjoisCf+2iQ LfK9HLKDdEXF8/Lkn0zQoLMmULGzXvQs3Dy+ACrqOZ+ZWoIU9Swc6a8IE4/4 i7qo5/8Y7FxIsJzaXc8RzwvQRqCcXrGcFDinBk1oTi9aHS+x3FaHWm4zy63I 80oz5FRnfgnU3pdq/wsp8Qt2UehbsEOHc3reTvheMB3Ic4a/1ncIYXTQTp5z gi4ooTcDwni41V7cmS2q4rKP+g+eKfF9wp7az9XsCiI9/cU56kPUhHBYMHHe +RH6KuFgqkOwTfjNX4hoD1J9LzRhPOefcm+S29VXiAg5KZ25He4XiAehUblA dpurtc3lbiU55bplhorQ1QkvYkSz3GaQW5EXVYaqtvYmWzZQe7NRLf6XSO9L de9Lof8XeFzAHaV2/0vQQZGKXqAHWCfwFagZf74aDbJynoc16GLYOyh+rlV0 kQ+bBze/ZAYH20pXAOkJ3se8GJQw15re5xr0EwktAY+/JLoG0yfSUC+01Msg GolXSD+nL1vTVwy6QG8xyslX2O542ekRtWNKN8hWupWQU5sDFXX3eWhOLxX2 V21Opk5h0wO5Tf+iSl/d1i6zZQO1Jxt/2ZcaidBjIn7lDsYfRqf/pcpfrCZ8 xTin7E4RbH0h0Rui74WaCZlubt7FqefzCHNG99LTIdw4fKNXIjSPNBJ0pveS 8/1lVz+l6X9JRiSCj94rTrhJp7IZbd8rbS9gkaAd0GA/8VJ4gNGcuJF+/FQy Au9ZSHLSCDl1OF91OF+qPCKSU7sbZLe7lUqXq83parW77jxzyQyVgopmQ4Hc ltPqyG5zEzlt7ppWu67VplPYdC+qdJBTiy0bdDqzyZHkD4KWQ48Jt7Wj91Wn CPp5xahQLVxOfpqTCskBnfgn7IOuqngx5IjreRduSTjxacbqkPO3i66l/CUg aJa5BSH4rA+ZYvh24ecdV4SQs54bZ2uF9KBxcrR9TLa2P4fo7s+l+nLpJhFN oluUzWixbsnWoJ2JvO6+wu6+Yq2QU6c3v8OT3eHMVnmIV6ADwznl4JycSqez 1e6888wp5mSqaDTly235kBNexECuMiQnuS0btNmyNYMeCgH+msKp9KqjL7uT 6RWpRHAuCCCn3mwsR92bS6j88JMsCKSQV6Je6YyTGPqkFYWZ8VfhRl5J22BL AZ0UILk6YPj0DznTg5ADgl4uDnKT/qq7jxw0Ek+uVigHJ5TTLc2pG+fU3Ude i7YKyfHom/dwxN8YQHqI/ld4U2l3H6LtK0U5+Ys7PDkoJxfLCelEoKiXHZ7c Do+yw+1sF3Jq1FYihspmS3GzJSinAqW7ts2ua8M5Pa9EObXasgkIprs3m9H2 ZktPFoZ8zWxVH9XZJz5GhJygoi5RblcvLIAoJ/wY8+PBvmyS0OAZiDlJ7xmE 3VgAQgMsG/FMp6TfhWUQ4LAYuHWASyWXkzM4nESfgC+nP1xOeKSHCFDdAfEx 3dSfrUNydAEEb8rt6RcE71/Y01/aI+ZU2OnNBSpvjsqVo/aIOoE3u9P7Ctau Tm9rh8fR7na02R13njgK6qqa9JVNsDpZ8oHckq90wG08UdThblDadUrIyap7 XKqrbFW1wtUQgwUZh8QdBHKyIDkS+HCp+3KksjH8uJeO0FRwSF30aQ76Q4MV hQfZihdk0AwGq0Iy9TmSCe1jp3YOf+6TU0MbyCG6ef3450CuiA8gkCvsiZ4K c4rmkY8Ej+SGkxOyKTgnQhfIpfA+rCVxPBjZWqgjOfXTnOAPIhVqKVcNXLld HiZHBaAxVFRZp7e70+Pp8Hja7J7bWZ4neeomfUGToUBmoZT2/A5XcYerpMPV 0OHqVNqMoMVovJdtzK1QKW25Sjui7c1lOfUg9GvqEPwtYKRPPFDqPiaHPuhH ugT8TSYH2kC/i8AjOYRw8xC2n1yCXBQILQs+dFlgU9OPvgt3FuRwMQiEpz0U P5u5PQMcPgBx/7yefiYHz3gug3fOQ/tQufxW0aBt5OrDyOOE3SFfH6jQ9Vf0 YCgnP+SUJ3LnarwiFJg3R42KqlJ5TSqvp1OSU1OToUlmIRqVtsYOF2jtcHV0 uHpoTgYuJyei9ef20JBwS5Kc+INDdQX104d/BhAN0Y876UfoOkCbyWc0ffw9 ak7wMhjUQMglhv88IVWIkx5uMC8sHcLPZp5uIL+HCdmhJ5CP9CO6/jxpJHlU IBRdbfT9eRRtI5+TFyLXQOUZJONBr4Kf5ZCTnuXUW6j2ii11AXee1sfkcqVV q31mtdejkuQkazJ0yCxGAuLpcOk6XJoOV1eHy6S0IS0G0+0sIScXAm+r68sR 5CIhJxE3fXldQfryNP35mkC+lsrlria5FFlk+vMZrpzckLuLsNcI8QNIz/o8 0olkroNH8FT2s2ywAU6Yec+HnERkZFD0/YO9KZX8QQ2ISD8hxN0MRIDsWWII lBu4nDS+/C6B2pev8eVpPPlaP8OtWr5atc9Ccmrs9nz/nedRjrquS1bX1VHf bSTkOqPCrFOYNQpzl8JsbdBYC6utT15YL3xk/P7XtnZbbrsL0biDzyzh3IGT SHrQ0Nb8roBIw2E5heaB/m5FCoAWIxX9XS250mtEvoif+n5+6QjbBplZccpC agEFzGATHVRRcCTiccunxB0KOGT2OQODMgZEkk2hTwMFhkBZSE55GlRRPukK PfUWaP2iLgSvWr7aLp8VqDzWKqX18qfW88fln11o+ezjjsufGb++zOi+uKT5 4lLXxfPWcyesx/ZZj+wExm9/lXXY8zpcSKeLlCM9GmGOZx4ZD+mngOlG8rv7 ERwGvRx00wcFTDd9QC4W4vUiaPHhahHWB7y/ZIXvDzPdg5/+wrQOFIjrABop 5Lzh5W94N/KGBfr+AgMhNlPwJgNB8o0Ml5MxaHygQBQA5QQUpe8v7wH+AqDx ETQqlFOvSAM7+MmmWo3PCtReazXJ6Uhexqa2Pas1+9caD21idAc3ag5u7D6w 0Xp0m/XYLsLw/e+QE9yoE6giA8UOheSEovDE8Ql1h4VT0SH5+GdBT4CDnwpL AVtw8qSLzz8JI/TE/2fo1IvTh6e1kMNP97+fhDBoDBRyCqTQoIkYKDDxbXBM Ac4AB14+wMC7VTA4pzJdb4GutxBo/IVaJF/ry+8G3sKeXhHeVACbtL5mrc+q FXPSnDqSvX5919712v2bdJkZuszNhPrgZk1mhvFQhvX4e9bjuwjD99dknfb8 TlcBgU+ofL4lAX+Q89E+tJlCpofpZ1hOAP3div56RYqQ/qKegSIdRS4uBaHr 4d9MX5iPJ9IHh4EfDwSBqS+UzvibBccg9oCS4Cc37MuLgIkZ4BWGJ75/uJ3F ra9NgQqC5GToKzP0Fej7ikC3H0HZ+Ap7fAU90py6/aCg21fW7ZN1+6zdJKc2 yEl//ED25oyuAwe0R05pj5/VHj8Puo5fUF38QnPxC+PFL6zg9Anr8d0op39d l6ns+SpXMaHvKzb2F4redFSLurEehHUipEIV0puQfsBfRIqR/mL9ACgyIEIY /f+8liIm6LMZBrhzNmQqjQNB2G5FIrqpGJgCIiP6KcYghBF2uov4PYE5UIgV SQwUMyZMeFrIKfpb+LWVSADrrzD1l5v6i0z9hYa+ItDjR1BRviKdr0DnLdT3 inr8hWgHXwPOqbvbZ1B7DdVths8+NkBO1x92lbZom3q0TTptM6Ju1qmUVo3S alRaraBeZ/31lvXEbsPP15vVjkK1u5jQ90JORUb0MTByiLijxynuGaB0AyW6 ACPmpBcYJArxnx4lhv4Sw0CJgeZUJM0jjJBNxRzJntycwuyXGImBEhOdsiLh QRjmADZQCkwUfiEpKmh/Whd6gF8FSsIRm7GISgiz8IA95QnjxeHw+1cSJCdz oIJ+ETg4sETAAuUvAT3AV6JDRcGIqMcHqoScdN0+o8pjLJcZz50wnv4ip6mn S2HUtlu07VZtuw2olbZOtUOj9hjVHgvxqtJyKlP/842GLmdRl7uY0PuKcUXs 9KEfySSeleKpqhtgaEt6pFhQpg9UGUTFnFJqoJSsAGgpCEoiPDqPaNGAWQ5Q RuEj4U/LTnl0nE1SwuSGnfQSUtE/Q/e3BCsbBNpqBX+VWP8qFQ3QBxaCvQ9+ KuxTgl9VYsGsA8VoRKIGWDAhpxJx7voQkpMO+Er00JKvyNBbzOh8pTqfTIda ojl1Oo0ldcbzp4zXHuS3mgtazUXt1uJ2W3G7nVI7StQeNcupVG45c1T/881G PietG3IqZp+EUyKFBlFFAyV6grZUiisiKvSBWoPAyFYJpIwaAFBUqXCmC4VI Gig1BfiFgj6m0xogy0iYMCzCEUYHGV0IyoEZKcNnvTh3eIR5zaGDoXlwm1hF rwkrZuP9VQasotcceFpqYwaCt+JBulUsUKKC5GQVcjL2VXLLXbG5rwQY/AjJ yeArBka4EvWWEDpfLZeTXuszVStNlS2mC6dMD3MLWy1FAOdU2m6nIKcuj7LL YyEadJZzFyGnpi5nSZebUrtLLP3FlkBJGCFTRloyEHDxGihj9KgWuCGsNTFc CaaB1xxhMMBnQ07/sr8XKAs76fhpUE4VwEyLKucWjaBUSBXlUmUhwZSFIOPl hE0EOSE4j3JbCDtSQQ1U2P6qCN5ngDyg7wPJAbuo2jZQY2M59Vea+sr43ix9 oMToLwV64CvFaZUae5ky0hLLqcNhVhrNVS3mC6fNRTWFbZZi0GEt6bCVdtgp yEnjadJ4TITCbPrya/0vN5s0rhKNu5Sx9JdaAkyZCM2RZME3EPiyZQQD5Ywp UIanr5ZCOZVxKjileIRfE9ivGHS5MA+EVvSaQ+a3hrsKwAlbgbFCxJWENcDF UBFOpVTQVtZPyAsl5TAVjOOvKmqg2vEXAyOVyADsgLDk7APl2Gv7QC1hG6gl 39TcVwa42MosfYjJ9xroMaO/zEhzKsMa9D4ZgXMydJjNoEpuvnDGXFJXpLQU Ky0lndbSTltpp50p03gaNJ5ujUcPFBY95PQbyqlM4wavCUv/a4jHKnpNkGni CWvRa2BEhJaQ1ywnM4V6MNE8KjikE7JiiBM9iLDxsCp45SwnfPKS2a+0cmwD VTZ0aoNau0QNeeAI4Ryocw7UEw6kTrpDtX0AkhDZByrR7NNmyiVQJKgWO/pJ WgrJaaASoznRqMScGkSBWnug2t5fYe9/be0rF3ZAydn6yoHZXwEMwFdh8peb /GXmXqLK3NvMctJ6W7Qug9Zl7rTgnM5CTqglpaWs04bZRRpPlcbTpfEYQJvF 8NXXht9uNWldZVr3a627XOsp13jKLf3ltkCZLfCasAoPyG0AN19l6B/mo5bK DbQifs3BF7K/EAuB591MA6jgBF9cglYMS8jSgfwFKih088BfXIJXCXz8YVph cquRQDV9gLJBgpoJHQmTU4BEBU9hUMzJIc1JiKGSQ7qqkI5zOWFOpMo5UOkk 7yBwiiDmBgJycgRqHYFqR6ASWPsqyQOswt6H8DmZ/eVILyEDNCevTOeR6zwG nQfnpDCfP2suqytuN5e0W8PmVKPxaKQ5NfA5AUsv5BRO0P3A4DmZ2S3KX4gF CbobqUQCZJUghVQECbpeWIMuN39RcGrjVPAiIIknFJdT4E05OQI1eHZCBOWE /JOcxJacf1XiQipIJ86/mCqnkJNTRHMKpxp/DJxTAJamBmeg1hmoJGz9kpwc fYjFjxiBkBNMtKW3ztIrs4g5NQs5mTotpiqF6fxZU1l9SYe5tMNaprJhdgrn VKvxaFlOly+jnLpd5d1uzIMYPOX2AFGB9OOfAX5eyMibc8L+qrAIpLXgkAKh dyBvuDOhO9DP8BcnfDlh/f+X04CQU0CSE26AF5SNtAp+/C+05rioShfewSUl vLAGNyzmZEM5VTL2/kr+qaMPsforgAn4yEoFLVVYelsJvbcVL01cTlaU0zmU U2mHuazTWqa2YXaE5uSo0zi0GocBKHFOv99q6HGXYxU9nopuzN5fjq/ClViV PVDloPjsC1XO0m7/a33g73PCl6TKYIHKkJvbYIMuNX9ViYRBhyhoiagSbmnw pYTLyUEEhAfsqcDJCbnw1Tgli8kgLQmkYYi7uZDgciQCiBsMgCr3QLMLcwaa XYF6DO3gDFQRMGWu/kpGyKmS5URWKou/weJvJXQeINN7qvQeud6j13tMKpLT KZRTp/l1p+21mrATVZ32qg5rfYdVq7SilricKqRQRQ4Raykop2KFAWm3Fne5 Snq8rw395YQ5UI7/qSwqitwg4RWpirAR0FKAz2aQRSYw2DpDCRcU8a5DWCLC zjLNCWPfCD/g86Ob0G5OCp/pYQLAjwPop3Trv01IBZGOV7kDVailANnaLM2p 1hWoxiAhCqYMPaXj1c4+xOqvwkVVWn0kLXgqswo59Xhauz0Nek81y0ltM1XJ TedOkpzKVbZyNVKhthNVKijKVt+J/iG5QWlCSE46d4XIA2tUpb1PCKm/GhGP Ko/m1GpElMBMvDbApbm/ghRlwaxIFWGjKgm7SIxHMrPi0+qwWCpSNRy2A35K V54wX4pLqCaEGCc33dVIoJo+oKqkTwflJgIhBqTETY3uQLMbVYQIOdVQ/USV E34OMDQnmx9UWX0YyqkFE3Pq8VQbELnBozfwOdWVdZorVLZKta2yy1bV5aDU DppTp02vNCFfXdb/cbvO4K7Eqgzuar23WuettvdWO+H6i1KvRkjkRD9Rg3LS I2JOVEmbsURlLdE6Sw1e1NWgOcE61ktb4hZAcWWQzLj49w433bSW6mBkB74o mkQtwZ3U3FeTbOUJ88XNEQYPapFALXngHqjhcXtW0z3RPkG7oU48QQaYGuAO EE0YzqkfcfY3C5tqgaufqHbRnOhvdPaDGru/2i7kZPPX2PwthMUH4K6pWuep MSCQk8Hgsatt9hqF/fxJe0lNWafpDTl1ddpMsm7k889Nt/6swyFVsZwA/GpX XzX9YP3kYNZR/XX0Y0NOPSynIqUI5dSOlIIOU6nGXqZ3l5vgi/RVWfurbFQF yskbJifpilEjLYdvQ5pT8Ktqyd9cVECCiyQ0nrA50WbcQQICsRNxK34hW7vo yz1IDRUYTC2HjDR6Ak0eIScPVQfcVK27n0JzNMCQxmocfsTmq7F5oaVWxuxt MXvhrqkGGBG50WMweuxdOKcLp+zP8iGnapWtRm2r6bLVdjkotaMNt2TotJkr 28z5deaLF8237tYZXDWIG9F7Eau3xtWHQvL01wrq3P2kJZbTD789uJtb+ey1 okChL1Lqw+fUbkJFdZiKO0xFKmup1llm8Lw2ewmcUz+5VatiN2mhLUlXBj4D VLiTCs7pzZG4OdLBOjc/R/zIQJ2QSp2EJKd6Ct0h14hrIM7JEyQwKK9Eo9BP M86pCddVJ8VmCoqq8wyI3Gjuapx+BOck53MyuFoMrjqDB9SakDaT22ByS3My dnbaOtU2dZetq8vRTagdJliXMJTTq/LQnGoNXqLO3Yc+hofjpuqpwKEPT4Pt 67Z+fO7rX65lPcqvf1naUFCpLGnVh88JFWXETEinqdzorbT2klu1Kka4nuJL ar+QU3AMZIobgAsLlxNdUd0hwg666bzUE24EpSJO2YB0mthjYQe8fz0Dq4G2 u6JDWaGzV6MTkFYkeQnwcoKeYg3egMwjwFe6JjxIkH3qgaefQHPEvgX6Imi+ 6px+UGvzNtg8kpyMrnrEA+pMSLvJbZTmVNqh13Ra9WobMMA9Feg0W9vN9jYd 0qqzV7ZZ7jy3XDwn5mR0gzp4TyMKleTEPmED4ZYgOW1Zt27DgkWbFizakpy+ e3nGqf3nfr7++GFRXU6TqkjeXdyOQioeJCdEbS7RWEr1znKLtxLuFR19/1ZO 6HbChdk8VZquKpWmyuiCJkNzasD3sU0c6TGXPv17A0Qd+onWDQVwU40kJ4vt dd7tokffgN9vPa6w+MIn5OOEjDf6AnLCg8jQ7+pr4HKqZzz9HP6j9oE6lx+x e5XA5kOsvlZAc3IjZqTd7Daa3XaN3V4jRzmdPFry5z3Ng2f6rJfAmPXSBO7c sd+6af/jd/vvv9t//sX+xWfWEwesJ/agnEwuzI2QnIw4J/QxQnLyiCQ5JaVs Sk0Du1PTPtq6gzi+/9RP15/cz6/Orm/Lk6mLOozhcjKVEF3mMqC1lhmcFWYP 3C5WO/r+jZz02trcnwofXgaPr/2SrTTWCpdmsqJ2uvt9gUA/0xfw9AZaBg+m QWqwnBoQISdPUE7W19nX8u5+Dq5+erDMaENv6w3ho6CcRi+F8vAhbYw3IIdl ytvX7IWc+gV8VzCOefgd+mEccflBi8OrBDYPYnTKjbYGoxNzIWZ3g5CTWWs3 V8vNp4+ZP3o/P2ODZs82/V7EuHebae9W094t9v1bqYNb7cd32zDTrTvSnNwN Rg/i7m3AOTUMjuW0bsGidUkp61LT1rOc9uwnTh49zVz57vqdF6Uva+S5ss58 rLDTGJwTVkFobRU99nKTu9rqr7H3or9QJDmhTpqAC9Ora3N/Lrz/ff797x9f O/tnQQvsT3Iiq323r/9//c///r//l+i//4+B1uBa+oNDCl0EkH5M3NrsDSi8 pKh+hcvXqFFXyusrG16Xvfg56/fz4OonB14b7UE50Xh8TD/3GD1VIgEC59QH OTUCtKfASzWQTViTt58hI9BSg8vf7vAiNk87ysnRYnQ0mJyYC7Eg7RaXyeIy d+OczkBO++6sWKnZnaHfk6Hfu8W4d4sJE3PK3Go/sdeGmf68W29y1pvc9SYP QXNy+ho8vY2ePobVjj68B0lfupRgOa17Y07Hj507eYI6deLUd9/8euNJfk5j R0m7tkRlLOkylVJCThhrrKzbXm5wVpk98IdJjbO3zgkLuNAS0EFOvxVm/Zaf 9dvja5/+8aqyWKWrVhvqLJ56V1/D4Dk1EnRyhfNdmhM/7w2+/npf8OJAc0Ig J3dj9dPih19hX4IicP9LnJPwKrYcCVXIOGSk1den5LT5+uS+viZBI9bEQTnx 416mFzS6fEqXT8jJDZQmR63J0WhyYi7EgnTgnEw9dlO13HT2mOmjfVcWr2zb sQla0u/bahTY92+mMrfhlt4Hpjv3G9F7uhtNHtDAWD1NHn+Tpxd/mL4gcPkG y8ZPAYvHTU6fvyA9KSU9NS39H+d08sSpQ3vf37Fy9eH9H546fObTz36487z4 eUVTXktXsVJf0WXic4LAytTGMrXltcbyWgusr7utr3W2SnLFJ7qUkFNuFvL4 2mdffnbuzIVzf1y4VKax4Jz6un19YXLyimd3o3h2o6f01hddXwL0NOfWhAa6 MoiXJ3FBwDmVZV0mSrMul2BcTvxbodmXoXhEwroktOTtU3p626TxhGr09Upy 8vXy5HxOsAShdclRL+aEWZAOi9NkcZp7bGh1OotWpytLVrXt2K1/P1N/4APj Qcp+/AhjO7GPMN190GhxNFrcjRYPaDB7GgUoJ28vTy6AbwfmRcRi49InTGZS p8zctOLdXXv2E/8kJyrz2LHjp8CJ46e+v3rt9tOCRy8Lc+HKKO/Mb9WWqQ1c TqJKjblSY0La5KUvaE4PUE7nz38MPv//kBOGlguYmv4mSQD9QZr45cXlbqp+ WvX0ClH+9MrrJ1fKnlwhOdXjnPAboklvxqQ59QWtS1hvk7+PaPbTVwE2iPj8 QQnxOtxexO4B7SZnO77G4ZwIlFOTBaE56cScfrn8g6xe3qPU6ju6GUt7t6VN 4wKtatft+64T+6wn9hkfPGiyOJos7iaLR2R2Ix5/s7eX41cyHtAbPXTkhOFj JgyPiB8TM38slRgRuzhqPBU9KT1x0bqVazZuzAD/MCfi4JZtBzO2ZWbsPnvk 7NdXfvrXH/eflNYVyDpLlNrXnTqRvKWsvqq4PL+46DlpKUxOTnTb0O3t/W// LfA/RP3+QJ+Cu98IIvNgaK5pTqAZwVNJptXfj+BxsificjVVPal69g1R/vSb 8idXwM3SypIeY73L1+ClU9yMkJz6WqlejAvJ39vqh5ZQTjJGyEn4GKQxP37D 4JBgpEPMyQWUVmeDldwyOZo4zTYn6LA5jTanWQ85tZjPHoWcCsorGrVGjd6q NVi7DbYezAg79JhcRLPS9fF5LicXLsrdTJhdCMrJjz8kIvP5lQTkZPeAyKHD IoeOYMZiE0aMmToqMn5UdPyY6HljYleMn8wsmzZr2Zz5yxKSwY5ladDS3+YE 9mRs2756Ddi9ek3mu5s+2pn52ZmLv1z+9M5PX97/+cuX939m7l3/kbj7h5hT abu2Umet0lnrjbYWi4NyeBvd/kaPv97bC5PbKJLm5PbKfL0yNCl9/GKC57EX o1PJTXSvzOUMyQn589cLaZt3fPT11TK9hUw0fnMaYaufQPFAUUrCj8iwZuEB gl+L4uHHff4Wn7+Vg9crv8Ln7wAkJ1xLI2F2NpgdTcBkJznJbE6ZmJPVXNVk PgM5fVDT3tnYbWzWW5uNVvhjkDLY1Dqzi+jSu67+bCE5WR1NVleT1d1sFXKy kJy8LfgTMmJOXh+IfOudyP8ahgwZFvnOMJJTBE4r7p3hccNHgXHDR08eNXZ6 RCxIih6fzESNn49MWJqQsjRlycqUlYf+Lqct6Oe6XavX7duUkSk4vXHdhUOb kcNHvrl48puLp4hLH3M59Vg4pgqtvrLbXGmwVZtsNWZHnc1dZ/fUO331bl+9 BzVGNLu9CJ41fFvSGy4n6YSSiXY6miqzaE7PRY9vXlqQlpqUviFb3slyavH1 Uf6+Nn8vBQuU041w79wikAMfJZP86qCcfCSndklODj6nRpqTrdlsBywnA8vp 9FHz+c8atD1hc+pkOcECdfOO5cT7xgf3m62OZqurmeRk5XJyulp8Po4kpzaS k2D0W0PGDhkaMWRo5JCh0UOGxg0ZFjdsFCkqZsSoqNFj47Bxo8dOGBkxYWTk lNHRxMzo8WBu9PjFE6cTK+ambFy+akfGNobltGX1uu3BOa28cGgDc3DVu/tW vrtv6YrMjO3g5NEzT0qqc5ta8b9UpLuC6Oip7DZV6m3VWI3ejhicoJpyNMBt pNPb4PY2eHyNXn+jz/+Pc/I3O2z1r+/VPP+m5sU3DTnfMc9vXVqUtjgxfe3L ljYy0TgnAWsJ56TAq4qCqwgoGJ9fTuC62KCCz8lma/L6OhiXF3Oha7HdieCc mhGbDFoSclJBSygni7mqEeX0w08N3frGHmOzITgnpc5soUyWp9mwOukfPSQ5 yaxu0AIswAVk8NPnZTkpfL52wosovL5YWJSEnMZATm8PjXh7aNTbQ6PfHhr3 1rC4d6hx7wyb9M7QKWAoGDZl6MhJw+GmCxk/YvS06PHEjOjxsyJiQGLMxJTx U4jUidNTp8wglienrlm9bs0/yWnR4n0Lkg6CVesObnnv2Jb3zu354POTH//y +VfXPv/6z7tZz0oq8mXtr9u7q7TGGlQUVd1D1eodtQYnYsLMzjqrq97ubnB6 Gl1e/Dcv6oHeCfj9MgYi0XfLSh9BTrWvvm/K/5F5fvuTxSuWJC5bfvWnH28U lzQ43YPk5G8jLeGc5JygnMgODLyK8vpagbLmtay5w2LDK5IDQmrHLfE5wX1O M2KTWXBOdidQ2Z1mO86pogEudqasx406Q6MOcjIH5STXm3v0ZgNiMuSVGU7s 0z1+JLNBli7QYnPJrS65BVEgToXPCxXJMT6nLgxyinp7SOR/Don4zyFjMXgQ 9daQ6LfeQTm9jYx/e9iUt9+Z8hYYirwNXY2cBPfw2PhhI7CRcSNGxYLREdFj omLGRMWNiZowJmrSyIiZY2PnRY4jUmInE2lT49NmIhtmxp/esCIop50r381Y tHjbgqT9YNW6/VveO7zlvePE2k3g0OqVhzJ2nADv7btw8uLXH3/x4+Xvf//5 9oPrD3JKagobW0G1xlhrsCNGB8eO2WpN9npgdoIGm6vB4W52eYCMqKtjOTXn /4t5cftTlFPK0quXT4GyHr0Mr/msqDYqfE4KcluFteNLGMINqrw+zKMydLeC +uyS5886jBYK59RCisLZyCzOZosdg7tKO4L/rT5qkpNBzKlJZ2gWcmphDFaZ 3tytN+uJvDI9yikL5+RsITmRoqwuBUJzYjoID81p/DvDo99+J+Y//yv2P4cw kFPsW++Me2sYMf6tYVPeGiLJaciISUNGTADvjIB3IGARi/2vYVFDR0QPHTFu 6IjxxLDR40eMGTdqbBwG92CTh0dMHhU1JSImHpsVOS553BQibdosalZC2oIk sHZB0vZV6/ZteW+fNKeDq1cezNhB7MvY8UHq0jOJi86sXA8urNt8Yc9B8OWh o//6+LMb//rjz2t3sl7mvyytyK9urOzQMvUGSz384Y/VwU+DFcgQi6y0gORU 9+p7ecG/mJd3PsM5LSE5Xf36+5t3H74uLa5oV1ZrNc16Q4tA8e/n1IZy8mIe lbqxIe9foPrl0472TkRvhJzkjN2BWBxoUUI5WeWE3Q667HYzMJjNFfUop5yc Jr2hWQ85mWRodRIYzC16s4blVF6nP/Eh5NSC3sSpQFwKG8Zy8rpJSHBf1+bz dSLeTpeny+HocjomvDN84tvvTCLeGgIgp+i3hkzgjEctSXN6Z/ikd4bDa8eP GcPEDR8eO+SdqP8aFvPO8HGwaSg1BQwZNn3oCGYK3NsPHz1pxOjYUWPHjxo7 BYmYMjpq+thoYk7U+ISoCWBB3KSlU+OR6XM3pa0k9qzGMnYwu1OXHk1cdHTl enBu3eZzew6Cj7EvNm/7hlm/+YvdBy7vPvD13gNfHzt97ervDx8+fZ5blFtW VaZQVrergIwozYGc4D58sJy+OnUQXMGuf3nx1o/fPPrlain1S5OiReH1Un64 O6LgcavgH+eU1Qwqa1qMRrnbKZLmJLNYgnIyAYPZVFFnOnPYJG+BnGQAcjJZ 5IzBLMc5deNLXo+is+fi+Z7HWfAO0FIr4mq1IUJUToUDLVCkJTEnu6vL5wFT R4xkUE5vD4l9e8jEIcNEb78zHq50zDvDJo8YMWnkiLiRI8aPHD0+IpKBEbje xUFXY8aMI42NGjl5+MhpYBhUNBy1NHIUmDJy1OSRoyahRWzk+KEjpxDDRk4Z MXLyiJHTRoycA4aPnjMyYs5oEDlrdOS8MTHzosZh4+fGTgAJcVPAomnxi6cj S+cs2LRyPdizbvMHew4SR2CZ2rwNfLp522dg9frPdh8Q7dx7dufe8zv3Xl69 5tu1G65mbL763taf9m0HWb+eLX7wZeWTK2FySoM/ZCGn98EV7JdzJ66fP/GI +OwMuPHZ2ecFea9b5FXtapnDxSg8nlavH/H985y+q375bRHNySGy2hG4ulkR mdUit6KcFKgElJMRGMzGijrj6cNGhbxZr0fLpsHUYrIoGMjJYNYYzFqDuRso Orsvnu/O4nNyttoYR6sV83lafV4l1klYHJ1+T7vfkxARyUwaMXTS0OEzho+Y OyaCmTwKLmTDxg0fOW40EodFjxwRNXJEbHQMExMROSEyYkJUFDEeRI4dPwZl M23UqGmjR02nxoIpo8dOHj120vARUBRcNKdwJg8ZMW3IiDnE0FHIsFHzho+a T4wYM39U5BIiInpJROzsyNip2MzI8cSsqEnz4yaDpAnxabMT0+YvTJ+/cNvK 9cTh3QeIswDnhKxec2H5qs+TFn2+aS3x3ceZubc/Kb7/eWhOS9KWzU1KPZqx 4dLmDVfAzq3fHzt0/Th28tAN1BL1x6Xzt/+4VlzXzFSq1PU9OsRoanU4EAhM WK/gBr7T66FUDXU5PwCaU2kZ5NTqRv/H8xrCZNdY7QqrmFOr1dpqsbY67KDL YTc6SE61kJNBIZeRnIwmeUhOnaQlgxHldOm8Nush5NRqR/8P9212Z5uN4nNq 83nbMRVhtqr8HpAUGcPEjxieGjNu+YyZ62bGn1m2gJk9Nm7j6vWbN6zfyry7 ctWMiYsnxYyLo2KiIicgYk5xkWNjx46eHBUxDZsOxoyePmYsmDJm7KzRY2cN HzFr+LBZw4bHDxs+c/jIhBGjmfmwOg0dkTBkVMI71Px3Rs6Hn8PHgCUjxjKz h4+aMmL05JFjBJFzR0Yjo5HZSMyMiLj4yPHxqLQJc2ImgsQJ0xZNmwVWz1lA JSStSUg6vGkttXPzH1c+enXz4/y7n7cU/It5fvvTJelpc5NTPli67FJa2pUV y5nPV6RdXrf68ratV7Zv/WbX9qtHMn88+sGPJw7/8eMPzx48BDn5BfkVlQUV VVR5VU5RcZlcgf5thO3tje3tcru1nWmvqcv+HtCcikpDcrJprDaF1daC4ZzM rRZzq8MGuhw2I4CcXtcYT31IclIAo0lhMrcyBpPcYFIZTN0IzumTi9qs+3Kb HeJpk+Jycit9HmlOJpLT6qlTwcZxE6hpc3etTANnCJJT7NTMfcdOfHT6txPM 4W82rbqwadWsWTOXpaUziVMnJ8bGJk4aB+bPigeJs+KXzmVmTo6JnDVhnCh6 7KyRo+NHjp41NiKBITmNHJXADBs5f/hIvECF5DRibOLIMUmjRYmjIpj5IyNm j4iYMWLMtOFjZo4YO4sYBSJmjoqcDUaDqNlwtzY2BomOnTNt2rwZM3dtXn/s wPbvLh54/Mf5Wvj7TvD85iXIaVZySlpyypZFKbsXpWQuWUpcXLL087Sln69c +dXKlVew71cs+3718u8zMr7fuhl898GHf1w498cnl/78HPvmM3Drlx/v/PIv 8PjRg9zi4iqm6Bn7Z/KgqKAwJCerxmpVWK0tmAxaQjmZSE4qh60H6PU9JeU9 Jw718DnBwsgYjHKDUQUhEYoOlNO9u3J4K5utjbKLSE4uR4fPTaiBx6026tV+ dxfOaceitBPpTGJoTqunzoScLn50OucUQ3NKTV2+acM20bJFm5LmEatWrCQ+ 37+TSZsz7/yRI8xHm9dsTohfMXUyszAqasHo0QtiIxfERROJcdEJkWPmjx6N jEBdLRkdRUVEzY+ISoyISgI0p4hEBnIaNWY2GA1GY2NgVUwaOTZpNDV39JiE MWMSxo5JiI1ImDxuTvz0ubPjwfIlC9/ftnb/9rWXju/Ou/MJ8+jX8yQn0aTp cyZMXzR11rL4+cvj569LStmQlLIzKXXf4qVHli09jSwjLqUt/2YFtnEDuAoy NlzdueXq3ve+27/nh+OHr3328fNfvmJyb3xS9OAKlZvXYjC0uuztLruGMJo0 VovCSv+dq1xOcL2zqjCa08nMnrpama4HcmrlW0I5GcLk9OhunVbdarMqKZtS SEtpdSAWmlOnz90F4G86g6nLoO8yGFFOqe9+um8rI8lp9SawY/WmMDntPnRh 96H92OX3twkyTmRsIw5lbNuVsWlbxiY+pxVJi64c++gO88F7h99dfmbrOuZg 8mxwZFM6k5E0c9HkuEWxMclREVNHj54KDUREE/MjQVRiZFQSGDs2KSISJFIR iTg2YnZEBI5qzKwxY9GeApTT+DEJUyITpo5PmDFl7pxZ8wVQ1LaNK3dkrP7i 1J5r33zEBOU0c+LUmZET5kVNZuZGTaLGTZ01burscVMXTJiWNDV+1byFGxcs 2oj/R9R7Fi46u2z52ZXpl9a+e3ndu19vXP/1pg3fbdrw49YNvyLrf9218e63 x5/+8Sn14GFde3tDj6aR6ehsMZuZRq1GYTaCVrsFqDBJTp2dCp0e+hHBUz3k ZFAZDBqDQQsUHVqcU0unqtVmUYpFCV1Z7USHzwU6ffAHnavLYukymro8DvBu 8rKgnD45lsl8uGcfFZrTkdMXjpw+jvE5XdidSRwHm/mcdoOTe3ZLcvr6OAMt /XxkV953Jxho6TxYuoBInxQLOc2IjJ1LRMfOj44GidHRSVFYNJIYQy1AYpjZ 0RFzoyKSI0AkAe3Ni8AtTYlNmDoxYdbMRYlzmcT5s1KTE7euX/nhrrUMBDZ/ 6eLpC5KmJyIzwfiQnCInMbMiJ82OnjQ/ejISO5WZGzdl7sT45GlzFsUnLp21 YO2C1IyFi3cuXnowfcVJZveWny+fYu58fPHOd9/ep354cPdhblEJKCwtqVPI QX0r0QIqSks7Sgq1z55qf/lFezJTCzm1K+U6HZ+TvKcHwTl1EfL2rk8vqHFO CpNeiYqytIts7Vaqw+sAKq+jC0BLLKd31+54d600p6PMiQP7mYvHTuScYvYd F1oKzinzMHEu8/DxfXv2bdtCczp+Apw5fuKH4yfC5vQlzek0AzldBGuWEpDT 9IjR8dKcEokoTKyIWhQTwyRGRyZGRSYTQlHzIiGnuIQpExKmTU6YFb8ocT6T mDhrzuyZKUkJ2zcsZ1YsS52TsmjGgqQZCYJJM6eMjZsydtyUMeOmjRk3M2IC Ez8mDoTPKWbS3NgpIJ6ImTIjFpkZNxnMiZsyZ0p8WtqyTRvWEic2rP124/vU tve/3LYdfPXe7q/3Hfjj44//uHgJbslufnuFefXVV4qvvtJ88ZXm4wuak5ma 6orm9jaIJ0xOOl2bTqciqmtUV8+ocE5AaTWDdquFY6XQ3wuwAJq7gJCTCuW0 Yfu7G/5JTuczNl5i1q+T5rSd4XP68vxZ5gxu6Q053di67oY0p4+2rBFz2rj0 4MZFRHrC5LA5JceIUiYQMUgckhwXlRQblRwbtRBEUQlRUfOmjps3dcKsaVNI Tikpicy8OTPnzI5PTpiXumhhqvCfOampMxIlOU0fGzt9bMz0MTHTIsaBmcxY GImZFT2JM3FWFBYxLj52EjM9etKM2MlgJjYnesqcmClz4ucnpyxOTlsBlqWt 2rXxfWblojWrk1dsTF6xYzGyM231sQ0bL7237evMA+DbzA/+yPzgReYH5R+C Q+UfHiz//rvSnFd1Lc3N6s7mLjWQ9XTLmW5Nm1Kpqq9XFRWinO7cITm1WYwh ORFmxGJWkZCkOYHdWzYyg+a0Zi2z9V1JTqcOnzp1BLmAHPvbnH7Yvf2H/Ygk p0NbgnI6uX0jW5q+PLqNWZs8e+nEiYnjoaiI4JxiiZi0CaIl42NSxsckj49O wlv5nJKjo+bNmDRvxuTZM6cnJs5JW5q0YmkytSQ5aX78gvmzkxPnJS9ISE5N BQtSU+dBTgnJLKfZk2bOjogjIBIGWkJQTuM542ZFYpBTzERmWuT4aZETZkSB SWAOiJ40Z8b8OQtS56WtmBeS0/qUNQtnLwIpc1NT5y5eMm/JiqQ0sGnlWmLH yrWH0tecXbPu7Lr1Z9dt/HrXnh+OfHjt4wv3rl598fBhQW726/LSmoZapqkw v+3qZexM288/V1ZXgxZ1u9JspPHwLJQkJ6dV5bRufncDtm5tejpx9uhR5g05 7T94ijh68BTL6Txy7Hzm4fN/m9Pu7fcObb/31VHi5ldHbxzaduPQzgdfnWYu f7ALhOaUuSQRrJ8xfm7U2ET4SxBEIiynpbFxaVPGM8smxKQKOSXhnFKiBTFR qKUZUxbMm52+LHlt+mJm9ZKFKfNnpyTNXbwoaXHKwsVLlhLzlyzFOVGD5RQ/ NgaBnKLiZkXDJY8RdoiewEBOM2MmMSinGJxTYgq0lID+Icyq3RvfZ7YsWbNi 2jxiyYwFYGn8QrB8XuryeUuItIQlSxKWLEtctjwxbW3Kyo1LV+1OX3dwXcaJ bTs/277zy117fzp27M6ZM+DllxfqL1+ov0qcqbh65sknn/76ww9lZSWtXerW Ho3SoENdmU3tFhNrCXQajWrGbFSZjZtXbcDEnA7tPcS8t2wJcRysXHv8XeTb 9zcz69ZtPrpuM8sJfHTk2IE9ewg+p72btxNHwe7t53Zvf/xJ5uNvjhJ3vjl7 4zJy7fLZ388eJkhOB5Pnnd2//cujzLYLO9aBjKTpyRNiE8ZGLIigFsZAKiDm 73KKXhIdRcEt1oypc2dOT1kwd83ylI3pS5kNKxYvWzA/LQWWqUVIejpYkp6+ ID09PnnRzKRkYvakKW/OaWZkLBQVJqfIcTMFQTnFR+FVa/r8+PkpCWkrEtNW L01bvXvdLtGy9enT5hFpU+diCWnTElbOSOQkr5iRvHhG8iIQn7xw9sLU+YuX Lkhb9+4mZmfausxVG8+v3/Jlxpbv9u+6dmgPc+nYieePHublZIP8nOzq6vLm liZFRxvTrGxtbm1VCDq6usDONesIltO69PXrllJcTkupNRmPLxxiPtm+/pPt GUE57d+zh7j4/gHwQyaxE5Citqcvu39+P5/Tg2/OPriMhOaUMXdmUE4Xd6wD ZzfN37siPiEicoFgYUwMtIRyiotbPmU8g3KaGJMiSIqR5LRwxrSUBQnpSxZt Sl+6efWyzavTiE2r05YtSli1bNGaFalrVixds2oNWLVqzZJVa+YtTF3BJMyb GxEHFsROYGaznMbGzImMQ6LBuNkYzikuPjJuOjJuetQkIMkJlqzYifEz5sfP S0pIW564fPXS5at3r90hWrZ+pZBT+pQ56VPmpk9Fj6U5Ja6Ynrh4emLq1AUp GFrHZi5YlpDKLJ67ZMn85UsTlqclpqclpS9PIVZsWLc5c/OuG+fP/fnpx6+u /5xz41dQePu3EuR3oujW70XXfym5+gOh/OM62LtmHYVb2kzMmrU1AcSznN5b tnQ9tkOa083MLeC99w8Su0HGzt2bNu1evmz98mXvgaQFJCSaU8ZmsHHRgqCc 8n46ywTl9NGSJMiJuAhwSyynBePiQMrYqJSI6JToWLAwNjY4p4kxqZNiUgTJ QTnNnrU0JWnlMpzTmuVMxrvL03FOG1elbVyzauPGDWDDxg0rNm6Yn7p4Y2qq IGn9rMlg8SQ+p5g35RQ1Lj4qDkyLjJ0WPQHuwwGf08yYCfFxE+Nnzo6fk5C4 LF3I6T0R5DQrOX1OcnrCQgz+PElZtWDJ6qQlqxemrU5ZsT51xSZR+tol+DTA 1qavZd5NXbkqNX1V6vIVScuWzVu2hFiycuum997L2AWOZuz6cn/mv44d/+30 6Udfff74ype5P39fwHz7VcnXX5Z8cqnk4oW2y5+1ffv13vVrqeRl6cnLNhOz Zp1eu4TZPC9x87Klq7APw+WE7ubX7dy0CUIiUE6rsZVz/1lOv5xnbn+ZeXFX xi8ndjD/LKcYLqfY5RPGM6kTY1MGyyk6ZuHc2f9ncoolaE6RcXMjJyJRCMkp PiJuZvSEmdASgdaoiWAGXOniJsXPnBU/ez7Jafny1Tvf3X5wy65TmQdOHz54 4dihiycOf3r66KenPyLOHfvo3JEPwYkPPrx47PDdY4eLiSN7it9fd+Xg/hPM /vd3pK/ds5J4F+xYsnzrkrQtYNGyLQuWbVi5fu97+5gdG3dtfnfL3vXvHdu8 +7O9B6+dPvvw4sfIJ5dACXHxQtnlzyr5nOLnpsfP3TyLkOYUH//GnHbv2EmJ OS2auzABWTpHklP6ogWA5MQ8+Co4p3WzZ/A57Z09btG4Cbvmz7q4aSFDckoe FwdSxpCcxoPk2PGL48Yvh6KQcctjx6VOHJcyaRyXE3crHh23cO7cFalJa9OC c9r8b+c0ieU0NxKMnw8i4hIixydET2bmRU0Es6PGzYmaMCd6Iob+USfJSfxz T5LTyuXLV+5cte3EB5nXf/oK3Pjpq7vgxy/vXgVfXPv288sXL1y+eA589fG5 nz49m/PpWTXx/xZ3n89t3emC5/+J2bs7bVuJOQHMmQRzzjmJORMEQCLnnHMG o5iTGEQqZ1mUKIrKlGhZ3Xb72t3tdrfv3Zq7L6b2xdbU/s454I9gkOTuuTXD +tQpFCVRVdRXz3nOEQCRml8054u72vmDRIhZU8OsKUWVC/taIF5rQ1NsSmNF OaOzGSKdr20vKgOac0rrs0vqskvbCqvp1Y2mgUHrwOAiZpCyKOQseuaUFFsK 4HAYz5zyfX2BIH9cemxcR3ycoDwfwObSsZwK6jKyEPFhMXhcTGgoITS0Mz0Z IoTjgKJwXEt8pKG1FDNEajySUx4+8HhOhXi/jtQgVAhQlRiSFR5COHsmBfji q5QvTqWc9k5EJZ32Jpw6gwIPvJO8vZN8vBN8Tsf7nAFiT52J/epM9FdnIr86 FenjXZSWWJ2fXluSWVvqVo3IqC5My0qMzCTEfiSnBKA4MaEiMaYiNgxTjAsG Ms56Rf2mnPyQ+0so/FfeyJj68tzJOaVkgjFfk1lG7GgFITk0omGtGBpSCvZz ogJiNk3Hpy3yaa8w5JZXzYXivi7+YL9eOAhcFQ7eBgbrUF0GTh8k7mtrSkjp baoxCilG0YBNNjAESclObo+V2mboOS89X8MoLunOqeivbFQ3dzk7eicGKbMC 9qyQW1+QB9QW5JWiOYWfPhsb4JsT4OuZU+jpU6Hnzgbu5zSQHg+lB+BhS0BZ cUFmSkomaAYXCk77MZFRhMioNCA0NC3EPy3YPwkXEoMLKQrFtYTixBU5bs0V szoqdFJOZ0BO8b5eib5eSUF+oCKIcMY7BTjrneLlle7rd8DHO8X7XIqvN0Dw 9U729U7yPZd47kz8mTMxp85Ef4EI/+JUdLB/TX5yY0lmY2kWogxRh6ouTMlK DM9MjsxKjskixGcRUgACIQVcfIfGJSSgOMUEXVM61JYQDlQF+Kae8QIVJZ8C zqBH3yjPnL7wxn9xLKcvvYK/OJ5TeCSaU1FFMY/e61ByZgyCGYNoxiAGJvUn 5KQWMYxixpqY8RpBfz3Y+rq5UEEl8Rlkq4rtVLGvqti3AQ7ptnDgtpI5o2S5 UA4lS00ntScSuJS2KQt/2sqfswqABcAiWNDRgTUjE5oWkkyUDm5bE7GiUd/V M04fnOEz8gjJpRg0p+DTX2A51aTGQKFnz4X6+oCcEmPjcmPjijFRwUCy/7Gc wnFATGRMWGxCTGwCAQPGVEhAQpB/RDg+JhyfF44vBWJxmM78dEQxor04BShJ iGwuToIyAs9Fnf2qhBAE5ScEZocF5uACc4K8gUKcdyneqzTUrzTMrSTCuzji XDFy9C4O984N984OP5cecibJ70ysFzKakJx+9xtzis5Kjs1KJmQlEZKTCJFJ BFxsbCpKVHpSToEBIKeE0+dSzoLN7Sy6v/kCUe6czoV/cQ5/2if0tJ8bmlMQ uMRDLve8Qr70wn3lhTvljfMNxvmHhCcSYjMy+vvaZgz8ixYhSnTRIp4zHc1J wqUDSE4SxrqE8Roz2AFyslBJUj7VfkJOrBUV54KKM6TiOFQcE2egKzEFycnK n7cLMUuARbCkpy/pGWtWDrRkZi8Z2VNquoHdJxzo4bR3jNKpqeDUhp3mULjT X+C+/BJ/9svkEB8o+Ny5AF8fP1+/0EC/zEC/rBC/LDw+KzQ0KzQsCZURFp4R G4WKzoiNS4yJi0lIiUlOB5IxicngIy45KTmFkAYWsPI8WV+teqBBPXhex2qa 1hCvjjDvTHA253jQ63U5JCtLqiaEdxZiwoDqrJDsMF+spaM5RfqVxfjVJHjX JHihR0R5jHdR+LmisDO5IWfi/M5En0GEnzkVjQc5pTSVZDaVZiFOzIkQjU4n Qhb6VjMxSE5xqaiTc8IFFON8i3F+QK4vAo3qbPLZM0DS2TMRZwPw0Gk//Jd+ gb87G/jVqaCvToecOgPgTp3FnT6H8/PHBQRFJCfHZ2dz6D0bw1Jo1XWQk0sh MIs4YC555MRclzBfY6junExSpmdOO/JBhJK1o+FuarjDqCEBlZ6WjuYEQhJd hJCcGCCeNSsXcuekYQwrqHbRgH2QyGhqSQ3xS8X7JeD94lC4L5GccGcRIYgv /E//zu/cOT8kJx8wozJ9fbL8ArMSEkoyU2uzUs9D6YmlKSn1uTn1ubmYqtzC kpyiwoLS8tLKirLaisqGyqqGutrzgFVCXXUwoIt2xmdzMlCKoJNzivQqjfer SPKrApL9apJ93RJ80Jy8imPAsDoLciKEnAn3+SIalRj60ZwqClKyksKzkyPy 02Py0xPy01OBnNTUmORUfHJiKuqzOeUFoTl5ny0J94c8c8Kd9sEhc+l04Fdn gr46gz+FOYsHOfkHHM5JBqE5iSb1IqdKaJVxjUK2kPbxnFrzPXO6rGLfUHN2 IDSnKYyUrinI/WhOZt6aFeIumznLZvaqlrGqoK7KBlbBko/k5A8kB/km+/nG +51FRtOXp0PPnI5y+zLq9Je+587hQ6OTM/IJGfl5qPyUNFp5qaKzSd91QNxQ La8vnG87MNNcRC0orS6tJJbVEisbiFUNxH82pxlx/YzEbVpSvp+TF1Cfilf2 5OgGCoy0UojRkNSeh2/MwtWk42qSA8tjfIpj/ICCGL/8GL+ogK+ifRGJoQHu nPbVl2TWYYrS8gmR2YTIwvTYwozEwow0IC8jLTYlLSw5MQulKiVAvIzYisBA BC6gNCywKizIDR+U7+PlmVPk2QAInPWCf3ca8dWZ4K/2WzrjhT/jjfMP/GRO wmEN3yLlWqRsNY/Bpg5iOSn47pzeYqgdb9sKblD7kZyULISas6zj7UBoTpcx UvrltgrJ8ZzM/CU9C+S0YoW4yxbOsuVQTrqmljxcZF5YFCY3LCraP6C5tGq4 oWrZLW+5Ia3AP7ywuqW8uYfe2rPWhWlf6+pUdJL1XRBJ3EqSt5Dm24jz7S3z 7YXATHubtr69u76djqlqoNeep7e0LToFmwsSaGdZsntZ8e66GjqaU23mRV3H NXsX1FoUHXbq/0Kc+V1PYdwEv+GmtffRDAdaNXexmtOh7tLY6vRQKDn0XLT/ V8DRnEoz66GSjKJUMJdiitPjirMIxVnpQGFWelx6enQyARtWqhwMAeBlx+aH BAJgNIGcGmNDu+MPnMdaiokBclDx/mhOX545nNNZ/ClvvLcPIjAY+FhOE3qB Tc6zSNgmEVMrYrApFC5tkMsYVAkYegnz0kFO7SCnnYE+kBNCxgQ5TX8up1mL cN4mugiZOQsmzoKZdxG1bAFOyMk00NHf0sElk6GOxsrBbtJoN2kZg+ZUHBJR VNd5vrnH1uaZU/9+ThSMpp2iaYM51c0TG2eIbWPEdkDTjIA5LXnk9GhBsruh +MMt7Xd39NCDCfrzVSmkolddsZFvDEHE1pK44C/+j+Av/uWTOZVC1NLU7kJE TUYYkBHpFxt0GgA5VWYn1BelIYrT68syD4Cc0kBOscUZiZ45xaeDnZBQmp5a eiynnJBAIMPb63hOnTEhJeHBh3Pyizx9LuKL0+6cQFdfnsGfOQfmkjsn5LZ4 cFhyEsiJNti1OCSDpi1iuwLNScwyihggJxqZzGFSuUwqyEktYFwSMN4BPOq7 wdZ3IKeeDmpPB3ewd1TGWFNzNnS8qzreHYyae0fJugVCwmA5GfnzYCK5cZeM nPmP5kRflVEQjN41LlFEo0AC6qdy4rb0TB7OyXQ8J8bgPETsWHZrX+5Gc6pv VlDJOirZndOifHNJvrMs//0N3U8PLH96aIO+vaU7nFPNjSHq7VGIAnLCfflf /D+dU2sjornUxeyFenKjGnOj8pNC0iL9UAFFKVG1+Sn1pWnny7POl2dD9aUZ RcjWFFuanVSaTSjNTgdgTuUZqYAqD0MADnLyOimnuJA0/+D6uBgox98vx88X CEFe1XU65EvgDO6sD8Ib4c4pCcmpv691yiKBxjQCq1xgkPIMYgYAchro/0RO hTvNZS1FZdrB3ocyxraas63jPdfx3ul4H3S8P6q5f1Sy/sjvBe7ye0FOBiQn 7rwnAxfkNG/iXkShLQFMYElGQbBJS1ziGo/0G3Pqqeua6OqZ7DqUk6uNfL6d rOulzGBI1BkuV8PlTmEO5+Rqbnc1tblYdBeP/k/kdPNYTvgv/0vwl/+C/3xO dZ450SoJxEpCRVZEepR/GqogJaquMLWxPL2pKru5OhdCcsqMKfpkTtw8DAEg Z8dgOaWcOZuPD3DnlBGO6cwIP5JTWTAO484JXNZ9dSbsrA/CG3Eop+7WKaMQ GtPwwQZuUrABAwrLic+mqQQ0tYC2LKDtCah7POoeqWmvrfBZS0FLVq6WTURz Ym9ruM813Hca7gcN0tJPgJT8k6j1J3bd/Ya8sWM5zbpz4lx0YwOLevqYjHJF SrkiolzhUK5zKdc/npNbfY49O6o4JFJ1vmuhqxuabGsZbae42inadspi7779 nADwYAYJqXOZ2ItwP/2yE8lJyl5zCh4uSB7+IzkhFU3SIZBTxKl/ifD6r5Fe /zUvxGuEWLuupEA2NhmEJMa0NHjmZGwsYTcW1uXFFcQGH+RUdEJOtaXpRZnR RWlYTsnY0wwKM1PjwcVdakp5BoKbh0FyaggNyvbzA+K/Op2P96+NDG6ODO5E Q+o8yCkUgjlFfXU26qvTuLNnQs4eygkXEhQcEhSVTCCUFPd2t41p+ZBTwTNJ WSYFBzCgOnv7sJzEHJqMQ1vm0PY4gwiQUweSUzOWk4KxrWIBBzlpuD+pOO6c BE3fEEuvkltmdZxZPdfNgGEB8wgmZlxOdUkpN6SDN/go3uB1PmXIZcGIhDQB tS81Dk9taRuDGrL5CbjqsLi53q4FgELGTFLIozSai0bT0miLAI+3yBcuSoQz EqELIZgRC2YY9GUOe5nrNgJw2CMCgUshvruofYRZ0n4sp6fLUkhOqrs7zvp6 lg21l8QleP2foKUYr98VhPiOEFvWDQIIbAifyakwrjAxOCMqAORUmP7pnGI8 c8rPRFbxqPT08ox0dDod5MRKDGfF4jFVJ+WUH4avj4sEWFlxEMgpJzIQCvPy gXDBQaCn2NTUzIqKzsM5meVsu5oLYTmRqYMgJxGHphRxLok4e5iBzr2O4mfd 7eTudguWk5YNPNdy32m5H7T7OalomG9I5S+QnNiLgJ6LWdBzZ3SsGR1jQksf lVOHpYNO8aCBTzHL6TcgweB1EX1hcQYj0yrpzL4kLz9eH2UMasjmJYS5c6LR Foy6pX1X+DSEXndl2L444ly8MA7MXBi/jxi5L1XcN5lmzAiXzTQCgZys+ntL +q0VjPbpivKbK5rv7xh/uG+B3t82XB1iQSCn+xPsr+e4UHtJbILvFzE+vwPQ nHrXTQZo1KRltTSYWt2crbXO5goMltP5wvjiJHx2bEBKVEBRRvTJORXv55SZ UJqZXJqZChRlpMemp4enpxMAQmoHIUWWHQux4iMxjXj/qsjgqmM5lUVHAkdy 6iFEQCm+3tFe3mFeXgA+KAjnkZNDwYPsWs6oXgBhOXUT+7GcdDLOhozzDYbW +Q3IidY7IhtYkw2AnB5q2SjuKy33vZb7/Qk5Nc8ZWIsGNrSgZ15Q0ocVANUl GdCyyTIWwqZi3ocUjOsKxkFOBp1QpyrJTflITi0LUt2CxbSEugbwadeMpms3 rl/Zd2l+8hLMyeK4Pz4+A1y44JqeGIHEAuvhnLZWlK8va747lpON2w6BnB5M gYp4UHtJTELgqSRUQUjACIO9PjIMgZzYLQ1mYhfGCeznZGksETUWtpYmlaSF 5Sbi0qOC0JxSGkpSz5dnNlZlQ9XFaUXIXYJY5EZBRnJxRirwW3MK8q/y9wXy vQJyg4LzgoMrIvGI6MiKozkFe+aUGuwNhHp5hR7OqaO7TcBmYPQSpl3L88xJ K+O0g5z6+kn9JBaHgeX0HkPrfA9yEg/O2vnrdv4zjIH9zCOn71Wc71VM4AOW E6l5ziVbRCgQNsWCTTFulQxbJXY5xyoeZNIpmGEt67GWB91QMQ9yslhEFlMH sRXkNA4hOUVUhyM5zUl1c1bLXatlE2OxbI5PvX27C926uXbrcE5T4+OWIzkp VabflpN0oAFDKs9SE+sezgo3L4qh9pIoAv50Kv4MUIAPcrI5KyPDEMiJ39p5 Qk69FZbeYlFvMbe3mNmRXQ4W8mg0p0Isp7TzFemYhor0qiIkp9LM2NLMOGw6 Hc+p69M54ULzcaG5uNA8XOhvzQnnBxBQ+ICDnGqam9kcBoLHUIkZR3IScxn1 vd1NxO4+KokvOpZTW/ELKXvWLlm3S57ZJbt2yR+Mkj9o2SjOew3vvQqxi6Dt Ijk1uXMaMgHLc0OQSs7hspGceAyKTjI4Z2Y9mdZC90bFBzlZbSKrpaO//VBO dVm8hOjK8ARXdYVLqlv0zGlkfPPS1T98+Ba6dfPSQU7OYc+cIJPLBdxbcm2t uNCcNDsrylfLyk/k1FWQbiTXbi2ItlelUHNRVEbouTT8WSAbH2Rkc8ZGhqEh k1YmF5kxaE4TlGY3ScuYog3qqUoozoiuLUgGOTWXpzdXZGEaKrLAlV0Z0hLM iVCMPIc8JZaQEk5ISSekFBEIhrIDR3Py863ChxWER2AqIoHoiswsoA+TFAfU 4w7lxCpPhbLDcLiAoMjk5JSS4uqWer5egRHqFXadYlQvG9WLUSKOUsiU8xky DkvK4ktZOhl7Q8Z+j6G1v28r9MzpG7vkR6PkR/nAj3Laj0ruKzUPeIGR0l70 lWE5IYZMc0dzEnK5gyIhU6PmjVilc3bZ4ZxkapsDI7E6xFYryIna1DMO1WVx 4zPq8ur4Xe2zUt2VT+a0DXJyDd9yIqaB8fGJ4zkNjbjGRu7Oj2xeHNlctj5a Vu4sK769pgK+u22A3lxWHcnpyeKhnFqKonLCzmXgz6bjz2Ydz0mjUMoVZgyL cSSnCUXnshHqEPXmNhalNJWnt1RltVTlYJqrcs6XZ1XnJVVkQ4SyTEJhGiE+ mRBBIIDZdCSnqjAcptDHt8DLG/GRnMozs+oBXBCmLDgox9e3PNwf8MypICYq ws8/PCkhOb+wuqWBb1RjBEa1znCAb1Dw9Aqezo2vVai0slWN9L1a+l4leU/v QXKScY7mJCD9KERyeqMW3VSLnqlFrwAx81Vv2au+Ns+cnmzdgYaHrUI5TyTn fiwnmX0IkNqHJCiQU2dR1XgdlEWJz+jLb7zC77/CV38+J+ehnIbHx3Uo09iY aXTMNDIKchodH9lcwdgeraiwnH5/48DrVcmzVQnMqb80w8ltfbooeboqxWA5 FUWfK4o4mwNzUssgmRzJyY3F0DQ1YC1dtFExy8B+TjZeTWMxyCkD5NRanQc1 gpzykypyIEJZDqE4i5CIvjYqPZlQlJjomVN9GM4N759+2gvI88gJyA2Lzs/M yj/IKRCTGxiQ44XmFBlyJKeYkICY2LjYzJxSkJNJvU8jhIxITnBwYSR6xapO 8V6reK+Ru3OS820myahJcs8k+caE5qQQIZQikNOLg5w4SE6krgktWKVl40Om yfnhJ1t3ocmZCaFGJlJLNWrJiTnJHaMYmWNE5hgGOdXmFMig9Izz8RkSd07k KxrJbTf17ZHxB0dyunFpCAtpPyfzfk5LY2NLo2NLI6NLQyMT4yPbl0ZebgC2 lxtaAOT0w13DD/dM0JNZiecrOsdEXc+X5c/XlZiddWVneWwNIbgmKagy1r8s xpdfWQEI+SKMZ07DLMYIsXOC0jlB7wQh3Z/lQTCn1pKU1vKM1iM5VWRVF2Ah JaMIFb85p9RTXoBnTm0RER1J8R1F+YjSQiKUFIXm5H1CTglRmQmRmQnRGVk5 5a2tAqsBElr2mQ18s55v1oHGkNmFDCu10KBeNajf69Tvtcr39L73bUXP5Hyp WjSqFt1Ti77RKn7UKaE3agnI6blatAuIObu9ZbukrmmtXALo5B/PSQpymrbL MIt22SWX+MqIzDYx4Zw+QCS2tRcVc6H4jGKQU33nlfmpA2PmKzz1A+fQg9mF h9fXtyGH0+ZwXYCcwxrXiMI1ohweWUIMI35bTtvzgkUdFRoTdz9fASGpMDvr qq7y2LpUXF0KrhpElRCk4QtRIg2ak0SqUO5DcmL0A7dG+cD9Wf6jBQEEcprS dUJyRo1HUTmNZWk1RSnVxanVxemY0oJ0LCcgLTGxKyGRnR4NgZAwyV95Ib70 ivndWUZaAjRQlN8HHM6pMDCgMNAfy6kyMwb6RE4Ci1FgNQmsZjczYOSDtEyA XmDSrxr1742693rtewYJ5LQj5/OVolGl6J5OvW3QbRt1b9y0bwyaF2rpoZwo vTMGjQR1Qk4GjVCrFGrlUrVUqRZr1EKNWqBR8TUyNhicJ+RU34rpKyruIyQC R3JaHHfNYjk5hx5iHJaHDuuq3aqyW1cwFsuK02l0uhROl9LpWoJcw5Pjw9uX hl9uDMOc3l35TE7j0p4Xa6oX624gp56K2PNpOKAmJbgWy8lmw6hsNglHNNHV PDHQh+qfZiBerWmhxwtCzJ1RyrqTev0CE6K357fVujVXZjaUpdeVptWVZmMq S7ITCcnhySgsp4x4COaUesYLk+/l89mceBWJkGdOaEvHczLu88jJavFgEltN q1bTtyb9t3rdt0zSt2hOLDl/VC4FOd0z6O4ZES8Q2l2D5jud+julCAFy6irb pRJnzDqhWS8260FOW/CtWR4hOfGNWr5ezdeq+GopTy3mKYU8BZ8n4/HEbA6f diyn/o5ON1JRMYkQB0jquxbmp6Dxcdc4yMluRTgwljGHRWm3qOyWFYR5xWJd sdqNVrvGaldZ7UtWG8q6ZLNNX7BtX7K9ugwYXl3WAm/WlZ/N6c0l1Zt1t2dI TnGNGfjGdDCggusSgg18ocFmw/yWnJ6uybCcHs5w7kyxHi/IoQULmdxS1NdU 1Alyqspt2tdQ4c4pYT+n5GM5xZ06VRHiC6V6+dXjQxnpaYz0TMxAcT65OF9K 7IAkOQkSj5z6smKA2mRETlIUKjoHy8lmFjisAofNzQZY3azWg8c2i9hmWbOZ v7WYvzXqsZyecphkDlMrk97SqR8adFtGt+cwJ4XwOxEL2O0q3aWRZ6wmHvjt bGaN02waskBiMANNBp5Rz9FrOGoZSy1mKoV0GZcqZlCFVOoJOZE6ut1gTrxj OY0wuQ9E3AdWCwgJWHVYVA6kJc+c1qz2K1b7Lav9jtV+12pDWe9iOa3CnNTA y3Xl6zXFh5s66OSc9j27dCin9gT8Gl+4ZrNhVoCW85/LSfF0VQZ55nR7km+X dAHs3oqWmjwI5hRDSApF30clKzGxJzFRmBEPZZ0955ETXtlSD8GcRB/JiY/J SwBqEyIBSn0uVNLaLHA4BUNOIeRyCjw5nQK7FSOxW2/arR+s1g9Gwwcm6UNb 4bOGvI7qmuM5bXnmxOgCdjtL0JzMPJtHolYzH7CY+WYT32TEcmKrZHSliCrj D4jpJCGFxKWQBTSFw6Ucghzd3SQIawkQNnZNu0YXxkdvu7luM5s2SPQlq2XJ 4bbssFyyQ+a1fzCnl2uKl2vy7UXh1jTiwTRnUdm7r+dYTspDOcXh13j8QzkZ NBMQlzI90Dfd0fCP5mQVdhJbi2BOjZV5dWWIhNTUiBREVnJKT1IybEmWlwp1 xER0pKZ65iQszkLlG6uLHMQOSHtSTg0JkQ2fz8nF3+fOyWFH2RwO2wuH7YPd tp9TwaumJp3ZpLVab1mtD63WLYRly2reMht3TbrvTFqEQvQdpWavp3CPRr72 23KiyngDAiaZNwhaQl4qI2ILjNjYdIMtUYD4MIywizVttiyYLbcxKhmSE5G+ JBYuGU1LFjOwbLFcslgvmd3WzCflND0OzE6Pb6+OfyynB9buOX7DpKTXM6cx cd+bS0oI5NR9JCcGHVoh94OcxvaNcrmj5E4bpWtzXvl0DfpUTi5JF6rTJWlD /lOPT+eUHoXxzKk7IZLbXP9bc8qJ7cmKwUL653Liu5x8p5PvwNhdDvsLh/2D 3X6QU3u7w2rR2qy3bNaHNusWYLdh3tht39pQ4ORIasJy2j6ak+XEnAYl3AE+ ncwik7hUMp9NFvEEBuuRnGhQYQ4l2I8S7HtCTirNhkqzBLhzsrhzwlhBS5Y1 q/WKzXbLZrtjs4GhdPfC+N2FWWBtYXZnGTDtLCufr8iBtxuAFLM7y7wvrJ49 nNOwuO/1JQX0ZFnSXRZ9Pi3kfEpQfXJQewx+rec8gsYCVoDDOUnqKhWUrq1V 7YGVQzk9mudjNuf4IKdFMxma0nb21R3NKSYFkZWS2pNEEKZFYTxzIqYnO/qa IBXIqb5SWFEsLC02Vhc7+BzI2pAjyohtjww4lFMkviE8+FBOLf9UTgbDB1ov yOl1e7vTalHZrPM264rNugHYbcBtu23HbnuH2rNb9kjNSE5U8rYFyemA1cID 25TFxDObeCYj16hj61R0hXBQzO7nDvazBolcOlnEpUiESE4GI99g4Go1g1xN d2sfDQI5hfoBWE5LnjmpLRsWy9IB57LNecnDms25ihzt6zbbBubC+MbC7PTC 7IY7J+vOsurEnJ4a2p4aum9YyNCk7FBOX8+xu4rCz2eEAA1pwXXx/qZ0wnRJ 3jSNhRk7mlMRyOnJqvbNVR20syp9vOQGQnpzTfPmug66NsaB5kzE3saDnJLz CqAyQlpZiD/GMydRUepqX9MqsWmV0gtMUXqNlF7h+VrxSTmRU3CIrDigC3U+ ORxoSE8EyoCMzKKmRr7DwXc5kHLc9ltyuvZDQigc9lWH/Y3Dvme376mUe+T6 vf7y193tw1aL0GYF1DbrJGC3YYbttk277a1nTl1V2wbdsZyMPJOBY9CxNEqG UkqX8gdFTDKf2s8a6OXQiHw0J6lQaLRKjGY3nUpUXUkrhHIo0eGU0HB1F8uE 5nQRo5JdVFsnLU6T1TkK2Zxiu0tiH/bgktpcMrtdgXBaLoxPozldXZh9uTz7 ZsX2ZkX1ZkX+Zj+n91eV0FNX/84UF7qhp77ZUEJITiXhbVm4lsyQ5rSQuoQg kNNIZdkIjYUZFilcEJurb63QU7q2D+f0akO+syKZ0ZOxuQRy2r1uhLZXVdfH eRBYy+tLs2qKM8ryUpPzC6A0Qnqat3+atzcvnwAREyJFRZmrfS2rxJZV7gAw j7L3NIGcEKAiqCHHWZ0E0XISoY66XKigoZ5js3AdNr7TjnIAPIzD6WlsxP58 zv52zv4NQvfNBTnw2sG/a7UsDCGuDFkfImwIp+2q3fbIbnuBnPUsb6TEN7Ta N9Sqba1S/LGc1AqGQkqT8AfBssQGo2mgD+QENigxyEkshC2hOUmqc0BFAigu vC0sfLybua7VQksC7qLaOrWf0wzG5pw5npPDJXM4ZE4nAHKaWpgFbi/Mvl2b /Wbd9v6yCvrT1/Y/Q3fMR3My0t9eUUEgp77S8I4sXKs7pwTTQN+SkLEkZLmx +JCrn6TvajF3tzw/KadHC7zfmFNjOZZT+udzig9Hc+paJXZhOS1iPpLTBWIm ZCv1zCkPKqivY9vMSE4O+35Rdh5gt/McCC7CxrXbpkdtz+csb+cs3yD2cxrl 359Q354y3p0zfr1oenjAfGvS8mjc8mzc8gohemVjAk+s0qsmE3cfx2jkGLQc nQZtSTwg5Q0IWRT2AIlJ6mUP9HHp/SI2SSakyEBOVimk14GcerMzBZA7p56r UgkEcprSnJzTtH1Y7xyWubkUziGFcxhQDo+oh0c0wyOG4ZF7C663a07PnH5+ 5DpwYk5mxrsrGujuDOtQTrklSgZvSQgxlhjdS4wujKumxiIWXBQL3qwq3l7T Qe9uHLg/zft0TjxSDaa5NufTOUmA3CRJUfZq10k5FeQgWtq0LW2WTkz+BWL+ f2JOS+Mn5PQSyUl4d0p1d0719aLq4aJmn/bOpPbRuHZnXPt8XP18XPTcxgS2 rMKrei17H1OvZmoVDLWcKhMMiFgkAb2fQ+ln9vcwyT0gJz69HyxRMhFF7s5J idHrlNU5rIQEgVs8yKkayanjKrXjqpJzVckFVgAtkpPiICfbks25ZHct2YeX nMPWk3Ia2nd/wfXOI6fvbuqP57TlIh3Jae+aBvpYTlckGMYVCf0gp7rGEXdO 8rfXNNChnCZ5z1fVu1eNwB/uO6Df37dhOW2McDBztsG8wvzkfLe0pI/klJut 7Oqy9XQtwpbQnHj5ORyUtiIHhIQ5OafiZB2nDSqoq+NaTRK7TWK3S5wIGcZu lznscocdrExKh00LTl5Ttufzlrfzpm/mjd/M7+c0zr8/Kbw3rbqH5rS5pIHu TkoejYuejot2MDbmDpIT86peTFdJIKpcOCBiU0BI3ME+Vn8fjdjDIPawyT28 wT4h46M5VeXIW8ogQRy+OgyP5tR5VaXErAJaw6rFLLFY1RbrDGrJbF4y25Go 0H9McThdH8vpAZKT3Z3TVc0JOT2wbDlIm1YqdOVITlMHOTWlBtd8Mifeb8jp 63ku5smy/EhOr68aYEtoTtTC0sy4jAwgIS0jMymlJTsRKvQ6h7aUJGmsl+g0 Ip1mEeLSFzuqeHk5xLw8cl6etiLvIzklDGaiDudUXle9sjK+Bi04Fi+Yx2xm l82st5osGJsJnDG+njLtLGA0OwuSJxe4mAfTwgdzkgdzCpDTo2UNdHdK8nBc hNkEbEwEkhOTLhVCVDEHzCUkJ85gL70P6GGQezgDIKdeIatfzCUhOUkFR3Kq zFe2lEHieL+iM962mjo0JxVwA6M13LCYLltMYotJbjFNmwxLKHBBt+Z0YWwn 5TQ6PPIQzem7m7Y/PbRiQEW/PBv/+6spaMtBWWW3bkBITlroDsipBN+RFdya EdyYGlydW8Jl8ID9nOiAo4eIkfQQ3TldUuxd1xy4odvbz2n3shJzck6jPDeY U5pbX36mur0casL5u3NqbcZy0kE8jpDHYaNoNeXamnJnZz6kqo1T1SYBpv4q 6EhOV1fGn18ff3V3/PW9ScSDWejpzckHqw6U+dVVK/Ryw/JkTvxkTvRkTvJ0 Sf50TQfsABtGaGtZ+WiavznNw9yfcLs3wRsUcaABAWNAQKNwB4kMUi+th8vt l0poUgkdxeZI+AMyMUUudypVGCUgFx7PKcMb119VJWjsHFGpVg5y0mE5rVtM IlAUzMmkXzMa1ywW9L6TxW61SAGTRWa2DJktU2bLdZtla860d9n0wx0zzOnX 11O/7s5Cf38zu+UYnKK1zgPEGuCSmfbNTQN06wK1uyikPSO4LR3JqS8txdBe ZSBTsJAwoh4i0InlJGACry/r9m56uA7K3J9UV1TQ8ZxuzYigIzkRD+fUjPMX pMeKgNZm0bGc2B458UFOtXnO2iSMsjbOQS5F1QGmfsRvz+ndvcl396fePZiB wE94dXvC7c6BFzdHd646d67Ydy5jbC+vOaDtdfOTZR3m0bLOoaZz0LddJvGp vWywKfV2M7q6qV2dtJ5hA3vGJoIcapFQJiXL5cPUjmFqC2BsaGY11LNSDueU ENqZEMthsgGeSjUKc1Jrbpj0l9GXjaxZjFLUksW4ZgY56S8bdAgjoLcY9UKT Xm3SL6KuGzXPllV7lxUwp19fTv37u/kDb2d/fTN724rkhBis17QVHMnp+gVq Z3FIWyaWUyCzIHeGR4JGGd3nS0vbeogYkJO+oUIvJL+9Yfj9HeMfDhh+f1v3 7U3Ed7e0f7xrgn5/1/TNLQu0e0N/kJPlIKeEE3IKIsXjyIRo8vGc5MJ/NCf5 YBP0vyWnjSnFpQnp4pBo0sweVjP1IoqY1c2mdvZTT8xJRpLLVxntbn1Fqw0J 7LzSqe7y21BXjqU4liOQIqSqUanqBsZoBC4bjevILDKuWowKi0lmMa2ZTWvI 1NJfwZi0V4xam0m/vO+6FeSk3rusRnNy/e3Z2Ik5PXQNTvE6MCCnVSvz25sG COTUVxrclb2fU2npjIQLjTJIR3KSNFRYxAPf3DB8d9d4YD+nP94x/HDP+KdH tr9s2aEfN23ffz38p6cT0H5OgwWFn8qpNSxIRAhFppNGDUjcFIAAw+PIW+rl LdVODJqT4qScpORqqKS67OqC6fl156u7o/+7c+ro72s5OSeZfFWvvw6oRNf7 Sq6fTzWfkFMSR6IQ6BCjOsUNneyGhIbkZDauo0BOKJMKnPU8croBmLQ3jFow xy5hzCAn7bNl7d5lLcjpb2BfejlxYk7Phgcv6wYw5oHqdRvzw00DBHIiluG6 c0JATg2pQcdzqo2PraturEeJgLryJfHAtzcMniMIy+nDLd0Pd41/+try82PH X7cA51+fDAM/Pxn+8xOQ0xT0zT0nmhO9ojI/PCkZaClIJRaksjB5iK7QIEBE iBruqhpmk4dl4mG5WKOSH8qJQ8dywhQE+/TGBbJLD+WkIyI8c8qtLFcphSM6 +YRBMWNRrA0rrk8q7s2rH17Ub61b3t2bOJ7Ty4/k9PSqc+uKffs/PSeJrE+K 5HQHUInu9JXc6ci+WHs8pxSOTCnQa4BRveYGwB3AclrD7Oe0ajFpzCalR053 TNo7Ru0dkw64btJdMuuW0Zx2N7Q/PbR/NKdXU8/G+U/3rVmIV5Cc9NDVMQqW U0tacAMhiFlXdySnwY7mfQ28ghLefk6eT6n64Y7hu9v6727pPXJy/rI9/Ldn F6Cfnx3k9OHB2K058ZGcoMbQIHJcEDkpGMByGmOTx2TiMbl4TCXXoznJMCAn YjfMqTk8sD4KycnakQ1R8xKa0xJK0lP2pYOcuEqhVKeQ6lWAXK9S6VVqncqk V5kNGsBi0DgBvdqpVzp1yiGVZFghGJUzJzUDC2bWgpWNcLCXHOxlFwdYGeZt jIuuTEjuLqih2wvqG/NuV2aUJ+dE7+pn9HaxiL0cisKigThKFUUhuwxz4lPv 0BpBTuu9FbchJKdUnsKdkwPLSUjFclp1F6VHj6ZVlM5i0h7JCXXdqL1k1oKc tpa0764bftocwnL6+8upf9u7fmB35tcXE7tLKmhzhntr6HBOo/0HOSUFMVrb PHPSUUmKvh6oOiuVV1oCcvr9LcNPD23Qj/eM4DQHZhR48JdN62/J6fUN5/RH cqpDcgokJ+GAg5wAHhPk5NAoAOtHcuKm4aEifFA2KjMwIC3ILwbAh8WlIjnR NHK2UcsxuQlMGpEBITHpFBizEZCajTKzUWnQqTQKlUKgEg2qeF1KfrOM3ybh d0n4vWIB1IN8ht0m5wCt4KgEWG1KZpuSUSul14oG6oSDzVxqG4PaSaZ2ddN6 iUwSU8yElDa90mbGSAxmKsxJq0IgOeWCnKDpsuiW8FSJQinRazBGQEgdNepH zYg1jElzzah3M+mtJt2aSXcDGUogJPWmTrGpkm1qFZtm7aL5hJz+vnf9V+jV zN+eH8lJemuI45nTxlAfltP5tODqxKCB1jYXjwYxBygKGhVqbarnleYscTu+ v2X480Mb9KcHyID6/nM5/fRk6l9RWE5zNg6WU+ThnAYyoyDykZx4TAePB1h5 yHNgZQMUGbFbUF2KKM1vTk3kpmGiQE6ksODSEP+sEP/MQL8kd054mBPLqGOZ dByzgQtYDHyLESOwmIRWM0ZsNR/kpJSpJGwVj6jkt8n47aAlCZ8sFlIgiYAs 4ZPknF45p1vO6VBympWsZiWzWcmoltKrmQPN/dR2Iq2TyOgmgnHEIlHFTIPd AnnmJLMiLuu1d4CP59S6n5NCr7FgkJx0WE7AKgBy0opuGtUozU2Tdh1sTaAl QL+fk1oBLKoVW0sKLKdfdkb//vzC358jOQG/7F3/K7A9Bnw6p0v27t6ikOas 4OqkgNJo//bWNjqPBnnmNMIG6kfYtcBJOZn+eMf00wMzyOkvm7aTchr/6fHY jyiYU0lpflhSYmRSYhMhUVGfi7lALIeEOZGitvNj5C6kJQFzTMh0oKxCuoXc DVoCyDnpzSnpzQV5ABeTncbNxrOzcZX4ozlFpaZklBaDnLhGA9dk4JlNfKuJ bzMLbRY3qwVrSWQ1S6xmMKNURr3KqFPpNSqVTCViK9hEEbtXwCOLBINiIRWS CJG73XJQFL9fzutTcto9cqpBc+pAc+oBORHZJPCFXGPD0PTCBczc6grmstEE ilrUqhC0xsXavMM5xfRGp84plBf16kt69TpGSF1ncS/xBJeEwksi4ZpIuCoS XhMJbglYb1WyPQ/3VOIbKvGmkLbJR7EB+taSFOT04+bQT5itqZ/3rv+MtfSR nO5N8j7c0UMrlq6uwqDzKaFVWbFVWXGk1jZmZ5tLRnLJKMAEwKdOcKkTIkzz hJg2YeR+NqefHzn/ujX0y5PhX7ZHMD9vj/z0eOTHx8PA2xtOLKeCgszQ+PjI +HhhV5Wd0Yy5AOznpCxL1HU36hQinUHjgIQsJCcWnb2vOiu7oiCv4nhOob4E X5/kQP+44MAYAI+LTEjMKCpggzXebBSgs0hktYhsHqwWsdUi2acwm07IidnL 4w0KBDSRECFGSYQ0uXBQzkeLcufUqKQ3KqlV0oHzzIG2fmo3kd4LliUSizjA Jptd6oseH++/fQfde3gHADm59FqHVoXgEB25hZN1UL45K6Y3uWhOr7+o11/S 69cBrXid3L9uRhYhzJpJu2xSXzMqbxmVb43KPYNiT9y/x+zcEw5uY6QMYNON vmlnvRoWIcYUr9bAVcnU3uY69OyiCXg8pnw87fb1tPTBpOCPDywQyKm3BNdT kbVg50In5CTluJmkFydkSE5fWyHPnMAqDgL7+aH9r48cv2y5UEO/bA3/GQ3J ndM1/c6q5NoFJCd8HPIh7qmzczowF4D9nDSVSTAnQIvuyRatAsMFWHSAWJdN rMsD2svy2AV57Ow00BKak39qkH9XZSbUUJiSUVbE1ihBSJh/KCeFiC1lE/m/ ISc5s11Oa5RRG2TkKmH/eRqaUz+9j8Qkk9hkKpdy487KrTs3MJvbt3/9+79B WE5ao0lr1DowXDSnUigVySm1/FhOA+tWy6V9a1bTssUANqhbZv1bkxbJSS3E IC0ZTdtW67bNummHzK+GlO8uazyfJPBc3XGFWrHaX7LaULJal/NySbd3CVI/ nBT+8MAKITlV53EoDWsTCgjNCTEB8IkTXKJnTlcnFN/f0v1033jggeVHFHjw 09fmw2yIR64fj+W0OS8oL0wPiY5Nio617+fkOpaTsbtxUSFaNGgwUwadBUBv 6spR6xe0L59sQFoVmduYbedUQaAiYn0x9L8mJxmzXTrYKB1olJDqeaQmLCcS mhOZTRWqeH/88Rvov/3Hr//tP/4d82+//juWk8Rs0pr1DoQOzalYmlusBLIK lVmJSpBT2rGcBj6Zk1EDbcvZh3JyYEBO2o/kVLRalwYcyenRvPzHh3YI5GTT sNbnhqBP57Rgkj6ZUPxwS/fn+0boL5t26Lub2nfrUuDtmmx3Q/kOoXq3oXl3 zQiBnN5sqJ4sSioLU8Ni4pJi4mBOFzANWYCjMu1CTdqFPiSnJYNmn27SoFPs t4TltLt9Fdq+O8un9952DEIORu1ncjqArEyeOcnMJqVer1QrlXKpUi6W8Rki ahf4+lzuoIB/KCcE2KZ4A2IOSczsEQ82iiiNInKjiFjPIjUNUtpIMCcOdWLO /t//+/8D/Y//8f9BIKeHm3cAidmgNRsOcio/Ly0/TwRKSzA9pdUmvf4CpBWb eSyd1aJG6dGc1tCcgG2T4TV0OKcFh/XqmPXBFGB+NXVSTl35WEvHc9pZVv0Z va+I+ebFHWh3a/0qmpOF3W5hIbQsopWEknIA3X5Of3nk+PmJ829Ph6CfN51/ Qf3rfdPehgzk9ArNCdqe5Dxd1uxeM0BPLkoqi4/mdE3Y8UAFtGMuCpovCrou GiRLBpmbHslJbdQDetRJOZE/kVN6WRHDIycAuaazInhuyKvLhUYd9ipdkVIu kovd+AwBvY9P6+IwetmMPg6LyGUR+SyigEUUsogiFlGM6BPT2sWURj6lkUdu 5PU30UmtJEo7mdZNZoGWBphi5pOndz+R0x/e7wIgJzVCrzbr1NxeSk1rZ01r b02rsOOA0zMnjcIIoH8LbFbLZYTpssVwGc1p1WS4aTLcxRg1d43qi0bTrNV6 bdx6bxrxAGF+cCynBXVHW3qIISfGVRbnKos/ktPrS9pfnk/uW/9hbwuCOZHr s/urykqqyoik/ZwEHEAi4CwIOCCnX57P/O35zN9fHPj5ycjPW0MAmpPq3brq 1brKM6frwx/NKTUuzt5dA1w2kHYucF5NclGCV5PiR6PibWBEsu2UAY+dsst6 3UWD7oJR7/hnc2opLqSqpFzsFoGbhnfQEpIT26xj65Q8jYSvEB+0JBfz+AwW vY9J62TQOxj0Lharj80CUWF6OaweHqOVN4hWRG7kkBuZ/Y2M/qbBwzmJ5Jzf kpPUbEDppWadkNZGqW3rR4GKDPtG1NILgE6BMQJmw4jZcNWDOyfz0ZwuGQ2X LMZr46Z704gHCAPI6cEU95aLe8uBcDJr+4pj6hP9DDnRaE5AyoWBpvVBt8/m NGWTGuhZBjqSU1t9Iw/q6hB2dSwMdDyx0H5jTq/WwAWCDJjV9MqITSfllAZy yk1OFNcVATtTEuAV5qM5yVbVklUZb4U1YGAOjDAHZiziz+aUhw+Oxwe35KYg 8nOpSjHXoPGgRujVHBRLr2QDKilbJgY4Mi5CzOEIWBz2AJPex6CBljro9C4M 6IpN72DT2tgDzVxKE5fUiGGSGgeJjQP9TeR/JCewisOcFG46Rb+7JSyny537 uAMjCvmITgFY0ZxmjLqrJp1nTtfNepRnTmo0J/ULvf7FuOHFNAJpaVr+YIr3 YIp9zUUSZIYL0sLZhDCgNsGPl4wXpWLCjU2FMxha42dymjWPKCgGeiLAbsKX peKbSmL6ahMF7an6gcIJfvUCv/rp8OdzermOeL6qeLoouepilGbERAaFWPn9 J+UUC3Ki1hVRf1tON/WymzrJTR3vponsZhGvWpTLUw5INEgW9dZ1Zsfui+ko TIdacrMpYh5Hq4TYagVbLcew1HKGWsZWS5CWpCgRl8VnMbhUOotMp5Oo9D7q QDt10G1wsL2f1EDpr6f01Az0VCH6agf6zlMwxPMUNKf+Yzn9x//9b9D/6/Hx t19+hTmBUWNG6MykNnNTmwzjmRO5fUShwHIy6RQLOsUayOmA9qq7JcRNo+6m XoXd0pw2qq9Y1G8tyrfjirfTbvemRTdH2dOSbnVvhbOrFBrn10O2zspxTFv5 OLd394rzYznNmKWXbN3Xh4D+OyPkDyPknzDD7T/NMP91hvkGWGTvbcg/kdMf 7xrfrB/k9HBG0lWTFxYSACRGRM5oqVtLIqiyKA0fFfkbchJvOznbM8JnK4rn HrYWxY9neI8nWOvGvhkZwsLpwkiI5+sL0joaCgc7yw60lnQUZrYUpHZWFHZW FGNqS0oHms5DTWWVVfkV3bXVUHtlZW1hIaqgJjenJjerODu9ODvDLTMjJyWZ EB9HiE/EZKSm52TmYfJz8krLyytqaytq6xra21qJnQDIaXpq+Mr68s2rNx/e v/diZ+vV861v3+1Az54+vHnr9pGcZigQCKnerasR5nQFIb+i116FdCrPnK7r 5C46BdAzKSsmyrMlxbtlxZ6bbG9etHeBvWHrvznU/xC1Cdj7N/nNj11MaOpY Tn98MAF9f3/i/a2J1+sTr9YmXq3Kn6/Ini/Lnl+UPlsUfZjk/DrO+nWE+utw +6+zwn9dk/3+mvanr10/b0/+dWfqb9DTyV+2xn5+7PrLI9efNp3gOg55wx/U 1ryE212RFBsRExUahgsOCwlKiYkalROhsqK00OhokFNTbia/MR/LCfNwlLtm 4K9DVtrmp3LqnxF3zoi7PHOiNFcBg51VR3KqQXLKhgrT4suykiuzkqswGclV acllyQk1OSmY2sJsqCY3BTieU1REJAaHCw8KjQyLToF8AsJ9AsJ8/MO9gmND IlIjYjOKSso1Su389PL1yx/N6dq1VZCTHWPU2kl1oCLocmc+pFEoFDrFXTf5 XSnrKkarBK5oldcBleS6hH3dRLo/yn06J32+KEMcykm+d1G2tyhFXjGxKHsF TfJfijtfeuS01l/p1uHO6XtQEXR//P0tx+t19as15T+UE/ALBslpGOT050eu D7ct8M96e1FmYjaDlvZzCgkLCfEPComPjiAkxUMgp9SE+LyEeJCTsKkG4vfW mDgdGIuQeG9Ktjkj+0ROo+K20f+JnA5kJJd9LqeiT+YUEBoZGp0CeQWEnwvA nfML+srb/6y3P3jgHxLhHxGLi0zMyG0Eiosay0sayT0Dcr5aLtBAUqPOARg0 Dr3KcTin2ep0VMZsdaZQrLimUzx2kz/uab5CbL0LUFrvslvv6og3bLR7dtr2 MPfDhhU6yGlFuXdJe2BNs+uZ07Tg5QTv5Tj7qYv5FMuJ3uDW/Z+cE+bnp5N/ ejT8/pLq/bzk/Yzw6QTnzhhrUk4cbCxJjY84yCkMEYwKCAXf8/DAsHDQEqYi JZHfW4dqAHgoclNZVU5KVUG6U0r6SE7SxzPSxxO8dSNpSNw25JkTpV+wD22p GdHaTKxtbistP8ip5nzdvvLS6rKs7LKMdJBTVtI/kVN0FIgEF+cbGhcckQT5 BIb7BEZ4Yfwj/PzwgSERgRGxgZGxQdFxByJiUPGBEQmBEUmA1KAZ12s29OoN vWqjv3rj5Jwylhu6rrGpj9nUXUxL3i6x7GvrwKNp4eNp4RM3wc689PtbDuj5 qhZ4t6rdW9V+uKz9/iqk+WZNfpDTrGh3SQZtu5gb9CbMWnfpML1za07+elX9 ek2DWMeoT8zpLZbTMPVXbSXI6YdP5zTFfq/sei/veCrvGOM3ZsdHZMRHeOQU FhYRFowJC/UNwfsE4QNBXvs5kcvTwfKMahB55ESqzpR3l2I5PYAmhfcvSIG7 o9KrTullJ29aTRITa7kdlaSKgqbSgqayAoFHTp1lRaAiCORUkZORTyDkxyXU Hc4pJyM7JzE9PiIxLDgGHxwTAgSBYxwQiAmKCQwIDwyM8D0QFhAUigiJDsDF +uLifEBRQEicf3Ckf3CoPy7MHxfhi4vww+DDAsN+Q06RSVKdelyn3kDINoiV G/UVF6GKZFZysjA943JXIXCtq/BxVyESEsZI256XQU9Qr1ZkP9xzQFhOwItV 7R8O5/T+kvzVxY/kNEI7yGmwfpjS+HRGurssh5D3ybyI2FmS7ixKDkzxdiZY O2PMBwjO5gT/8bRoZ0H65pJq19OaandF9f6iBM2p8724+am4eYzXkB0fkxEf kxofExUdg4+OCYmICImIxASHRwbgwsH3GeQUEhMLRMTEUityPHPCZhS/vQyA OUHXXIJrLimwbpcu2aWTOp5ZSOJiOZWlNeTEVxbkeeZUU3BCTtkEAiHmaE4Z GdnJienREYl4j5wCYEtoTsgu9L8oJ8W4Rr6hlm2o+Bvd+Rs1OV/XYtIBZ0bw UGPJQxf98ZwAswv05u82pe+a2FhIT+fBZHA7ktOzVS3mIzkJQEjbqI/ltDJY bwM5TUt2F+XQ0wXx1rwQeDzL35rmAdvTPKSlyWM5TYKZKUbMip/OiXfmhDtz AuDlHP/lNOflFPulsvPFYO2lwVpaQ35abEJojBseLcotMgYXHg3OdFhOuJh4 ICIm/rM5jSsGoXmzYAkNaelYTvWZCanxUf8zOSUlpkdGJPoGx7gFgWMc5B0U A3YhcNry3ndiTj6fyQmIDAyLCgyL80MFABExqIOcpjXycZV0QyraELI32vI2 apKwkGBO8xLK9rwE2p0T7crP7zYRDnJaACEpMa9WlB/PSQMq2qeCOT1GHcnp Cq1pAzWL5NTwdELsmRP6S0BLgsfTYP7wgO1J3lPMBOvpR3JCCZ/MCoDHk9yH Fzg3nGzLYHNjRhK4UsYnJIQnE6CI+AQIHxeLi3LnFIA/nFNbPsRvK8NawnIy DVbamdWQhlJFqcoBBquhLGJlZmUaaCkCSojAB/v7+3n7eZ31O4vyBs4FeHsH A14HguDjc4BPCOTlE4wKcvMN8vJDnPML8Q7A4HwDcX5BeMg3CDmP+wTjfUFI mGM5+YWF+YaBY4RfWCQqOgCIwET6R8QgImOmyURn8/n58pL5krT5kiTgSE7L MsbOvAR6Oie6rWu+xcq79dGcPN7ickm+vax4uqx4sar4w7riu3UV5M5phr85 wrmPujdCfzRCcxusX0OBnAztdU8vHM0JXIA/muI/muAhJnmb+x5OsB4cyWlK DG1NCh9N8m+5OCPC3v7G8lRCeiSQlBoRnxxOSIlJzYAikpIgfDzoJwbLyf9w TlB7bpJnTrz2IlpDXnt2QntGTHFMdFp0dFJEdERIqJ+Xr885X283n7NnvE+d Onf6tPfp0z5uZ3xPYc76nj7r53Yu4JxnS17BXueCkCPMyftwTt4eOQGgPZ/A cz5B3j7B3j4h3j44X8AX5Yfz9ccDPihfP7yfL4D8H+l+yOdD3QJCfQLwPgE4 5OiH98V+KADhFxAG+QeE/v8uHuuK "], {{0, 147}, {197, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{197, 147}, PlotRange->{{0, 197}, {0, 147}}]], "Output", ImageSize->{201, 147}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->564803888] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Tools", "Subchapter", CellChangeTimes->{{3.6883316789600058`*^9, 3.688331681091453*^9}}], Cell[CellGroupData[{ Cell["NetTrain", "Section"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetTrain", "[", RowBox[{"net", ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", "1", "}"}], "\[Rule]", RowBox[{"{", "2", "}"}]}], ",", RowBox[{ RowBox[{"{", "2", "}"}], "\[Rule]", RowBox[{"{", "3", "}"}]}]}], "}"}]}], "]"}]}]], "Input", CellID->839379754], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["DotPlusLayer", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Arrays:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"matrix\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Ports:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{265, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1731528449] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetExtract", "[", RowBox[{"net", ",", "\"\\""}], "]"}]], "Input", CellID->832397325], Cell[BoxData[ RowBox[{"{", RowBox[{"{", "0.9999023675918579`", "}"}], "}"}]], "Output", ImageSize->{90, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->619392767] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetExtract", "[", RowBox[{"net", ",", "\"\\""}], "]"}]], "Input", CellID->2107312978], Cell[BoxData[ RowBox[{"{", "1.0001592636108398`", "}"}]], "Output", ImageSize->{68, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->589072254] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"netXX", "=", RowBox[{"NetGraph", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"DotPlusLayer", "[", "3", "]"}], ",", RowBox[{"ConvolutionLayer", "[", RowBox[{"10", ",", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}]}], "]"}], ",", RowBox[{"DotPlusLayer", "[", "1", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", "\[Rule]", RowBox[{"2", "\[Rule]", RowBox[{"3", "\[Rule]", RowBox[{"4", "\[Rule]", "5"}]}]}]}], "}"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}]}], "]"}]}]], "Input", CellChangeTimes->{{3.68729890520715*^9, 3.68729892269143*^9}, { 3.6872990094642553`*^9, 3.6872990158347273`*^9}, {3.687299076691278*^9, 3.6872990862135344`*^9}, {3.687299287370285*^9, 3.6872993008029623`*^9}, { 3.687299331891913*^9, 3.687299351686195*^9}, {3.687299396042348*^9, 3.68729940801422*^9}, {3.687456793235352*^9, 3.687456814690474*^9}, { 3.687456998513578*^9, 3.687457038629586*^9}, 3.6874573133296013`*^9, 3.6874573630940657`*^9, {3.6874577743557777`*^9, 3.687457825609158*^9}, { 3.687457940525632*^9, 3.687457962940613*^9}, {3.687458007343073*^9, 3.68745803420786*^9}, 3.687458087516323*^9, {3.687458140685161*^9, 3.6874581519666367`*^9}, {3.687458189553194*^9, 3.687458191903857*^9}, { 3.687458979821487*^9, 3.687459006901196*^9}, {3.6874590934149513`*^9, 3.687459093933576*^9}, {3.6874591296045523`*^9, 3.6874591406520357`*^9}, { 3.687459283173563*^9, 3.68745929960462*^9}, {3.687459351754261*^9, 3.6874593730398684`*^9}, {3.6874594804861593`*^9, 3.687459514345584*^9}, { 3.687459615407034*^9, 3.6874596175617113`*^9}, {3.687459654867552*^9, 3.687459684549877*^9}, {3.687459830915036*^9, 3.6874598344846487`*^9}, { 3.687459974216318*^9, 3.6874600269655447`*^9}, {3.6874600996141148`*^9, 3.687460102691677*^9}, {3.687463420358796*^9, 3.68746344661353*^9}, { 3.687463499070611*^9, 3.687463530024372*^9}, {3.687463747844757*^9, 3.687463757820524*^9}, {3.6874640337082043`*^9, 3.687464045424725*^9}, { 3.6874642356607018`*^9, 3.687464236388426*^9}, {3.687464398214405*^9, 3.687464409005807*^9}, {3.687464480424197*^9, 3.687464481587578*^9}, { 3.687464572992078*^9, 3.6874645732853413`*^9}, {3.688328101432004*^9, 3.6883281155207148`*^9}}, CellID->575727821], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Failure", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { FrameBox[ StyleBox["\<\"\[WarningSign]\"\>", "Message", StripOnInput->False, FontSize->35], ContentPadding->False, FrameMargins->{{0, 0}, {0, 0}}, FrameStyle->None, StripOnInput->False], GridBox[{ { TagBox[GridBox[{ { TagBox["\<\"Message: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Incompatible types for \ \\!\\(\\*InterpretationBox[\\\"\\\\\\\"output of vertex 1\\\\\\\"\\\", \ StringForm[\\\"`` of vertex ``\\\", \\\"output\\\", \\\"1\\\"], \ Rule[Editable, False]]\\) (\\!\\(\\*InterpretationBox[\\\"\\\\\\\"\\\\\\\\!\\\ \\\\\\(\\\\\\\\*RowBox[{\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"a \ length\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\"}]\\\\\\\\)-\\\\\\\\!\\\ \\\\\\(\\\\\\\\*RowBox[{\\\\\\\\\\\\\\\"3\\\\\\\\\\\\\\\"}]\\\\\\\\) vector\\\ \\\\\"\\\", StringForm[\\\"``-`` ``\\\", StringForm[\\\"a ``\\\", \ \\\"length\\\"], 3, \\\"vector\\\"], Rule[Editable, False]]\\)) and \ \\!\\(\\*InterpretationBox[\\\"\\\\\\\"input of vertex 2\\\\\\\"\\\", \ StringForm[\\\"`` of vertex ``\\\", \\\"input\\\", \\\"2\\\"], Rule[Editable, \ False]]\\) \ (\\!\\(\\*InterpretationBox[\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(\\\\\\\\*RowBox[{\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"a \ rank\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\"}]\\\\\\\\)-\\\\\\\\!\\\\\ \\\\(\\\\\\\\*RowBox[{\\\\\\\\\\\\\\\"3\\\\\\\\\\\\\\\"}]\\\\\\\\) tensor\\\\\ \\\"\\\", StringForm[\\\"``-`` ``\\\", StringForm[\\\"a ``\\\", \ \\\"rank\\\"], 3, \\\"tensor\\\"], Rule[Editable, False]]\\)).\"\>", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[GridBox[{ { TagBox["\<\"Tag: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["NetGraph", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { FrameBox[ StyleBox["\<\"\[WarningSign]\"\>", "Message", StripOnInput->False, FontSize->35], ContentPadding->False, FrameMargins->{{0, 0}, {0, 0}}, FrameStyle->None, StripOnInput->False], GridBox[{ { TagBox[GridBox[{ { TagBox["\<\"Message: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Incompatible types for \ \\!\\(\\*InterpretationBox[\\\"\\\\\\\"output of vertex 1\\\\\\\"\\\", \ StringForm[\\\"`` of vertex ``\\\", \\\"output\\\", \\\"1\\\"], \ Rule[Editable, False]]\\) (\\!\\(\\*InterpretationBox[\\\"\\\\\\\"\\\\\\\\!\\\ \\\\\\(\\\\\\\\*RowBox[{\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"a \ length\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\"}]\\\\\\\\)-\\\\\\\\!\\\ \\\\\\(\\\\\\\\*RowBox[{\\\\\\\\\\\\\\\"3\\\\\\\\\\\\\\\"}]\\\\\\\\) vector\\\ \\\\\"\\\", StringForm[\\\"``-`` ``\\\", StringForm[\\\"a ``\\\", \ \\\"length\\\"], 3, \\\"vector\\\"], Rule[Editable, False]]\\)) and \ \\!\\(\\*InterpretationBox[\\\"\\\\\\\"input of vertex 2\\\\\\\"\\\", \ StringForm[\\\"`` of vertex ``\\\", \\\"input\\\", \\\"2\\\"], Rule[Editable, \ False]]\\) \ (\\!\\(\\*InterpretationBox[\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(\\\\\\\\*RowBox[{\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"a \ rank\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\"}]\\\\\\\\)-\\\\\\\\!\\\\\ \\\\(\\\\\\\\*RowBox[{\\\\\\\\\\\\\\\"3\\\\\\\\\\\\\\\"}]\\\\\\\\) tensor\\\\\ \\\"\\\", StringForm[\\\"``-`` ``\\\", StringForm[\\\"a ``\\\", \ \\\"rank\\\"], 3, \\\"tensor\\\"], Rule[Editable, False]]\\)).\"\>", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[GridBox[{ { TagBox["\<\"Tag: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["NetGraph", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], Failure[NetGraph, Association[ "MessageTemplate" :> MessageName[NetGraph, "inctyp"], "MessageParameters" :> { StringForm["`` of vertex ``", "output", "1"], StringForm["``-`` ``", StringForm["a ``", "length"], 3, "vector"], StringForm["`` of vertex ``", "input", "2"], StringForm["``-`` ``", StringForm["a ``", "rank"], 3, "tensor"]}]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{ 3.6872876067444153`*^9, 3.68729892376458*^9, 3.687299017061963*^9, { 3.687299078162128*^9, 3.687299086850813*^9}, {3.6872992917879667`*^9, 3.687299301307135*^9}, {3.6872993465552607`*^9, 3.687299352356188*^9}, 3.687299408921184*^9, 3.6874565350022*^9, {3.687456794377366*^9, 3.68745681512908*^9}, 3.6874570018516808`*^9, 3.6874570395616007`*^9, 3.6874573152469597`*^9, 3.687457364127101*^9, 3.687457394881379*^9, { 3.687457775317974*^9, 3.687457826743165*^9}, {3.687457941419643*^9, 3.687457963727335*^9}, {3.68745800800756*^9, 3.6874580353076553`*^9}, 3.687458089591654*^9, 3.687458152934675*^9, 3.687458192539703*^9, { 3.6874589859335833`*^9, 3.6874590076951714`*^9}, 3.687459095199628*^9, 3.687459141459098*^9, 3.687459300303629*^9, {3.687459369230452*^9, 3.687459373928829*^9}, {3.687459493996478*^9, 3.687459515243773*^9}, 3.687459618212328*^9, {3.687459656461315*^9, 3.687459684962819*^9}, 3.6874598350829*^9, {3.687459999338435*^9, 3.687460027756266*^9}, { 3.6874600874818783`*^9, 3.687460103365273*^9}, 3.687463447557111*^9, 3.687463531108107*^9, 3.687463758768145*^9, 3.68746404612636*^9, 3.687464237121413*^9, 3.687464409488944*^9, 3.687464482162072*^9, 3.687464573802619*^9, {3.688328104021908*^9, 3.688328116034215*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetChain", "[", RowBox[{ RowBox[{"{", RowBox[{"10", ",", "10", ",", "1"}], "}"}], ",", RowBox[{"\"\\"", "\[Rule]", " ", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", " ", "\"\\""}]}], "]"}]}]], "Input", CellChangeTimes->{{3.6872994130596952`*^9, 3.687299453095748*^9}, { 3.687299542599689*^9, 3.6872995482157173`*^9}, {3.687299581630525*^9, 3.687299589889241*^9}, {3.6872996929162693`*^9, 3.687299694893465*^9}, { 3.6873001569390287`*^9, 3.687300174263443*^9}, 3.687300334754958*^9, { 3.687300735456798*^9, 3.687300742803701*^9}, {3.687300773141934*^9, 3.687300820050315*^9}, {3.6873008597360163`*^9, 3.68730085979387*^9}, { 3.687300895588955*^9, 3.687300900474777*^9}, {3.68730093407625*^9, 3.687300979301984*^9}, {3.687301037309026*^9, 3.68730106686605*^9}, { 3.687301153524302*^9, 3.687301210318397*^9}, {3.687301328558551*^9, 3.6873013299711113`*^9}, {3.687301776094679*^9, 3.687301801487286*^9}, { 3.6873018469561033`*^9, 3.687301901235824*^9}, {3.687301972490096*^9, 3.687302041101313*^9}, {3.687457126777732*^9, 3.6874571320315437`*^9}, { 3.687457213909862*^9, 3.687457214265891*^9}}, CellID->657058718], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetChain", RowBox[{"[", PanelBox[ DynamicModuleBox[{NeuralNetworks`NetChain`PackagePrivate`grid$$ = Grid[{{ MouseAppearance[ Annotation["", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Input", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"encoded", " ", Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"1"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}]}], {"Inputs", "Input"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["1", GrayLevel[0.5]], {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"10"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "1"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["2", GrayLevel[0.5]], {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"10"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "2"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["3", GrayLevel[0.5]], {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"1"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "3"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation["", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Output", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"decoded", " ", Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"1"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}]}], {"Outputs", "Output"}, "Mouse"], "LinkHand"]}}, Alignment -> Left, Spacings -> 1.1], NeuralNetworks`NetChain`PackagePrivate`assoc$$ = Association[ "Type" -> "Chain", "Layers" -> Association[ "1" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {10, 1}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {10}]]], "Parameters" -> Association["Size" -> 10, "$InputSize" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {1}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {10}]]], "2" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {10, 10}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {10}]]], "Parameters" -> Association["Size" -> 10, "$InputSize" -> 10], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {10}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {10}]]], "3" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {1, 10}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {1}]]], "Parameters" -> Association["Size" -> 1, "$InputSize" -> 10], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {10}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {1}]]]], "Connections" -> { NetPort["Layers", "1", "Inputs", "Input"] -> NetPort["Inputs", "Input"], NetPort["Layers", "2", "Inputs", "Input"] -> NetPort["Layers", "1", "Outputs", "Output"], NetPort["Layers", "3", "Inputs", "Input"] -> NetPort["Layers", "2", "Outputs", "Output"], NetPort["Outputs", "Output"] -> NetPort["Layers", "3", "Outputs", "Output"]}, "Inputs" -> Association["Input" -> NeuralNetworks`EncodedType[ NetEncoder["Scalar", Association[ "Parameters" -> Association[], "Output" -> NeuralNetworks`TensorT[1, {1}]]], NeuralNetworks`TensorT[1, {1}]]], "Outputs" -> Association["Output" -> NeuralNetworks`DecodedType[ NetDecoder["Scalar", Association[ "Parameters" -> Association[], "Input" -> NeuralNetworks`TensorT[1, {1}]]], NeuralNetworks`TensorT[1, {1}]]]], NeuralNetworks`NetChain`PackagePrivate`opart$$, NeuralNetworks`NetChain`PackagePrivate`part$$, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Null}, DynamicBox[ToBoxes[ Column[{ EventHandler[ NeuralNetworks`NetChain`PackagePrivate`grid$$, "MouseClicked" :> If[ ListQ[ NeuralNetworks`NetChain`PackagePrivate`part$$ = MouseAnnotation[]], If[NeuralNetworks`NetChain`PackagePrivate`opart$$ === NeuralNetworks`NetChain`PackagePrivate`part$$, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Null; NeuralNetworks`NetChain`PackagePrivate`opart$$ = Null, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Part[NeuralNetworks`NetChain`PackagePrivate`assoc$$, Apply[ Sequence, NeuralNetworks`NetChain`PackagePrivate`part$$]]; NeuralNetworks`NetChain`PackagePrivate`opart$$ = NeuralNetworks`NetChain`PackagePrivate`part$$; Null]; Null]], NeuralNetworks`NetChain`PackagePrivate`fmtSelected[ NeuralNetworks`NetChain`PackagePrivate`selected$$, NeuralNetworks`NetChain`PackagePrivate`part$$]}, Spacings -> 1], StandardForm], ImageSizeCache->{204., {33.4169921875, 38.5830078125}}, TrackedSymbols:>{NeuralNetworks`NetChain`PackagePrivate`selected$$}], DynamicModuleValues:>{}], BaselinePosition->Automatic], "]"}]}], False], Deploy], LineBreakWithin->False]], "Output", CellChangeTimes->{{3.687299413660975*^9, 3.687299423422908*^9}, 3.687299453782702*^9, 3.687299549729918*^9, 3.6872995831969147`*^9, 3.687299765471298*^9, 3.68729981256855*^9, {3.687300147366365*^9, 3.6873001752128897`*^9}, 3.68730028934921*^9, 3.687300335420741*^9, { 3.687300736624484*^9, 3.687300744212884*^9}, {3.68730079466783*^9, 3.6873008220795813`*^9}, 3.687300863244371*^9, 3.687300901769375*^9, { 3.6873009398389187`*^9, 3.687300945593802*^9}, 3.687300980424081*^9, { 3.687301039639707*^9, 3.687301068763859*^9}, {3.687301160759307*^9, 3.68730121073923*^9}, 3.687301331541205*^9, {3.687301789679899*^9, 3.687301802441984*^9}, {3.687301850168974*^9, 3.6873019015040407`*^9}, { 3.687301973269793*^9, 3.687302041585373*^9}, 3.687457132442844*^9, 3.687457215184906*^9}] }, Open ]], Cell["Initialize:", "Item"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"net", "=", RowBox[{"NetInitialize", "@", "net"}]}], ";", RowBox[{"net", "@", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}]}]], "Input", CellChangeTimes->{3.6874578606545*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", "0.030225737020373344`", "}"}], ",", RowBox[{"{", "0.02593918889760971`", "}"}], ",", RowBox[{"{", "0.022490456700325012`", "}"}], ",", RowBox[{"{", "0.019517721608281136`", "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.6874578663623047`*^9, 3.687458050353434*^9, 3.687458094655891*^9, 3.687458156457361*^9, {3.687459122547467*^9, 3.687459145887721*^9}, 3.687459310536401*^9, {3.687459382900735*^9, 3.68745941270928*^9}, 3.68745949947514*^9, 3.687459665345915*^9, {3.687460057491233*^9, 3.687460107399847*^9}, 3.6874635693058033`*^9, 3.687463774938871*^9, 3.687464243508264*^9}] }, Open ]], Cell["Define training set:", "Item", CellChangeTimes->{3.68729957577559*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"trainingset", " ", "=", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", "1", "}"}], ",", RowBox[{"{", "2", "}"}], ",", RowBox[{"{", "3", "}"}], ",", RowBox[{"{", "4", "}"}]}], "}"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", "1", "}"}], ",", RowBox[{"{", "4", "}"}], ",", RowBox[{"{", "9", "}"}], ",", RowBox[{"{", "16", "}"}]}], "}"}]}]}], "|>"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"net", "@", "trainingset"}]}], "Input", CellChangeTimes->{{3.687287626797209*^9, 3.68728763717428*^9}}, CellID->333472059], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Failure", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { FrameBox[ StyleBox["\<\"\[WarningSign]\"\>", "Message", StripOnInput->False, FontSize->35], ContentPadding->False, FrameMargins->{{0, 0}, {0, 0}}, FrameStyle->None, StripOnInput->False], GridBox[{ { TagBox[GridBox[{ { TagBox["\<\"Message: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"\\!\\(\\*TagBox[\\\"2\\\", \ Function[Short[Slot[1], 5]]]\\) inputs provided, \\!\\(\\*TagBox[\\\"1\\\", \ Function[Short[Slot[1], 5]]]\\) were expected.\"\>", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[GridBox[{ { TagBox["\<\"Tag: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["NetGraph", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { FrameBox[ StyleBox["\<\"\[WarningSign]\"\>", "Message", StripOnInput->False, FontSize->35], ContentPadding->False, FrameMargins->{{0, 0}, {0, 0}}, FrameStyle->None, StripOnInput->False], GridBox[{ { TagBox[GridBox[{ { TagBox["\<\"Message: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"\\!\\(\\*TagBox[\\\"2\\\", \ Function[Short[Slot[1], 5]]]\\) inputs provided, \\!\\(\\*TagBox[\\\"1\\\", \ Function[Short[Slot[1], 5]]]\\) were expected.\"\>", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[GridBox[{ { TagBox["\<\"Tag: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["NetGraph", "SummaryItem"]} }, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {6.5, All}}, GridBoxSpacings->{"Columns" -> {{0}}}], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], Failure[NetGraph, Association[ "MessageTemplate" :> MessageName[NetGraph, "invargc"], "MessageParameters" :> {2, 1}]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{{3.6874568046074743`*^9, 3.6874568274355373`*^9}, 3.687457007490733*^9, 3.687457071142044*^9, 3.6874573276597424`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trainingset", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"x", "\[Rule]", RowBox[{"x", "^", "2"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"Range", "[", "10", "]"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.68730019109126*^9, 3.687300218807234*^9}, { 3.687301002221034*^9, 3.687301002962747*^9}, 3.687301093008285*^9, 3.687301142836238*^9, {3.687457368369882*^9, 3.687457369583891*^9}, { 3.6874591764770193`*^9, 3.68745918206427*^9}, {3.687464682422709*^9, 3.68746468552604*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"1", "\[Rule]", "1"}], ",", RowBox[{"2", "\[Rule]", "4"}], ",", RowBox[{"3", "\[Rule]", "9"}], ",", RowBox[{"4", "\[Rule]", "16"}], ",", RowBox[{"5", "\[Rule]", "25"}], ",", RowBox[{"6", "\[Rule]", "36"}], ",", RowBox[{"7", "\[Rule]", "49"}], ",", RowBox[{"8", "\[Rule]", "64"}], ",", RowBox[{"9", "\[Rule]", "81"}], ",", RowBox[{"10", "\[Rule]", "100"}]}], "}"}]], "Output", CellChangeTimes->{ 3.687300220680624*^9, 3.68730029401052*^9, {3.6873003413890667`*^9, 3.687300355098503*^9}, 3.6873007580478*^9, 3.687300828408785*^9, 3.687301003903124*^9, 3.687301094270015*^9, 3.6873011433817472`*^9, 3.687457051243144*^9, 3.6874571468247623`*^9, {3.6874573299212217`*^9, 3.687457370362143*^9}, 3.687457407469603*^9, 3.68745787018467*^9, 3.687459182447859*^9, 3.6874646864351463`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c", "=", RowBox[{"Predict", "[", "trainingset", "]"}]}]], "Input", CellChangeTimes->{{3.6874646879407387`*^9, 3.687464750110256*^9}}], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["PredictorFunction", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{}, {{}, { PointSize[0.125], GrayLevel[0.55], PointBox[{{-1, 1.5}, {0, 2.3}, {1, 0.8}, {2, 2}, {3, 1.3}, { 4, 4.}}]}, { GrayLevel[0.7], AbsoluteThickness[1.5], BSplineCurveBox[{{-1, 2}, {0, 2}, {1, 1}, {2, 1}, {4, 2}, { 5, 4}}]}}, {}}, Axes -> {False, False}, AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, BaseStyle -> {FontFamily -> "Arial", AbsoluteThickness[1.5]}, DisplayFunction -> Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.7]], FrameTicks -> {{None, None}, {None, None}}, GridLines -> {None, None}, LabelStyle -> {FontFamily -> "Arial"}, Method -> {"ScalingFunctions" -> None}, PlotRange -> {All, All}, PlotRangeClipping -> True, PlotRangePadding -> {{1, 1}, {1, 1}}, Ticks -> {None, None}, Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Opacity[0.5], Thickness[Tiny], RGBColor[0.368417, 0.506779, 0.709798]]], GridBox[{{ RowBox[{ TagBox["\"Method: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"GaussianProcess\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Feature type: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Numerical\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{}, {{}, { PointSize[0.125], GrayLevel[0.55], PointBox[{{-1, 1.5}, {0, 2.3}, {1, 0.8}, {2, 2}, {3, 1.3}, { 4, 4.}}]}, { GrayLevel[0.7], AbsoluteThickness[1.5], BSplineCurveBox[{{-1, 2}, {0, 2}, {1, 1}, {2, 1}, {4, 2}, { 5, 4}}]}}, {}}, Axes -> {False, False}, AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, BaseStyle -> {FontFamily -> "Arial", AbsoluteThickness[1.5]}, DisplayFunction -> Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.7]], FrameTicks -> {{None, None}, {None, None}}, GridLines -> {None, None}, LabelStyle -> {FontFamily -> "Arial"}, Method -> {"ScalingFunctions" -> None}, PlotRange -> {All, All}, PlotRangeClipping -> True, PlotRangePadding -> {{1, 1}, {1, 1}}, Ticks -> {None, None}, Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Opacity[0.5], Thickness[Tiny], RGBColor[0.368417, 0.506779, 0.709798]]], GridBox[{{ RowBox[{ TagBox["\"Method: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"GaussianProcess\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Feature type: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Numerical\"", "SummaryItem"]}]}, { RowBox[{ TagBox[ "\"Number of training examples: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["10", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("PredictorFunction[\[Ellipsis]]"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{{3.687464698339405*^9, 3.68746475217837*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c", "[", "20", "]"}]], "Input", CellChangeTimes->{{3.687464759131062*^9, 3.68746478534687*^9}}], Cell[BoxData["384.5539114429619`"], "Output", CellChangeTimes->{{3.687464761752468*^9, 3.6874647861266623`*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["The Loss Function", "Subsection", CellChangeTimes->{{3.6883407905702*^9, 3.688340798975094*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"net", "=", RowBox[{"DotPlusLayer", "[", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"data", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "\[Rule]", "1.9"}], ",", RowBox[{"2", "\[Rule]", "4.1"}], ",", RowBox[{"3", "\[Rule]", "6.0"}], ",", RowBox[{"4", "\[Rule]", "8.1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"trained", "=", RowBox[{"NetTrain", "[", RowBox[{"net", ",", "data"}], "]"}]}]}], "Input", CellID->251830945], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["DotPlusLayer", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Arrays:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"matrix\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Ports:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"encoded\"", "\" \"", TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"decoded\"", "\" \"", TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{265, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1529842736] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trained", "[", RowBox[{"Range", "[", "4", "]"}], "]"}]], "Input", CellID->1851058163], Cell[BoxData[ RowBox[{"{", RowBox[{ "1.9500058889389038`", ",", "4.000001907348633`", ",", "6.049997806549072`", ",", "8.099994659423828`"}], "}"}]], "Output", ImageSize->{194, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1751768687] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"loss", "=", RowBox[{"MeanAbsoluteLossLayer", "[", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], "]"}]}]], "Input",\ CellID->1257758047], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["MeanAbsoluteLossLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox["\<\"none\"\>", StripOnInput->False, GraphicsColor->GrayLevel[0.5], FontColor->GrayLevel[0.5], $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5]], "SummaryItem"], ""} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox["\<\"none\"\>", StripOnInput->False, GraphicsColor->GrayLevel[0.5], FontColor->GrayLevel[0.5], $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5]], "SummaryItem"], ""}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"vector\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Target\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"encoded\"","\" \"",TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Loss\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"scalar\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{328, 46}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1503946801] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"loss", "[", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "5.0"}], ",", RowBox[{"\"\\"", "\[Rule]", "3.0"}]}], "|>"}], "]"}]], "Input", CellID->1466793142], Cell[BoxData["2.`"], "Output", ImageSize->{18, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1777460223] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"data", "=", RowBox[{"{", RowBox[{ RowBox[{"1", "\[Rule]", "1.9"}], ",", RowBox[{"2", "\[Rule]", "4.1"}], ",", RowBox[{"3", "\[Rule]", "6.0"}], ",", RowBox[{"4", "\[Rule]", "8.1"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"trained", "=", RowBox[{"NetTrain", "[", RowBox[{"net", ",", "data", ",", "loss"}], "]"}]}]}], "Input", CellID->707313148], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["DotPlusLayer", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32], GridBox[{{ ItemBox[ StyleBox["\"Parameters:\"", Bold, StripOnInput -> False], StripOnInput -> False], ItemBox["\"\"", StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox["1", "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Arrays:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"matrix\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { ItemBox[ StyleBox["\"Ports:\"", Bold, StripOnInput -> False], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {1, 11}, BaselinePosition -> (Scaled[0.] -> Baseline)], "CacheGraphics" -> False], Spacer[{1, 11}]], Frame -> {{False, False}, {False, True}}, FrameStyle -> GrayLevel[0.85], StripOnInput -> False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"encoded\"", "\" \"", TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput -> False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{"\"decoded\"", "\" \"", TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput -> False], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{265, 47}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->340646788] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trained", "[", RowBox[{"Range", "[", "4", "]"}], "]"}]], "Input", CellID->731319502], Cell[BoxData[ RowBox[{"{", RowBox[{ "1.9000091552734375`", ",", "3.9664883613586426`", ",", "6.032967567443848`", ",", "8.099447250366211`"}], "}"}]], "Output", ImageSize->{251, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->67847737] }, Open ]], Cell[CellGroupData[{ Cell["Automates the training process:", "Item"], Cell["Uses clever ways to choose step sizes etc:", "Subitem"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trainedNet", "=", RowBox[{"NetTrain", "[", RowBox[{"net", ",", "trainingset", ",", RowBox[{"MaxTrainingRounds", "\[Rule]", "100000"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.6874587475958433`*^9, 3.687458758429449*^9}, 3.687459621549061*^9, {3.687460124742106*^9, 3.687460125744648*^9}, 3.6874638022484417`*^9}], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetGraph", RowBox[{"[", PanelBox[ TagBox[ DynamicModuleBox[{NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 1, NeuralNetworks`NetGraph`PackagePrivate`outIndex$$ = 6, NeuralNetworks`NetGraph`PackagePrivate`inputs$$ = Association[ "Input" -> NeuralNetworks`TensorT[1, {1}]], NeuralNetworks`NetGraph`PackagePrivate`outputs$$ = Association[ "Output" -> NeuralNetworks`TensorT[1, {1}]], NeuralNetworks`NetGraph`PackagePrivate`labels$$ = { "1", "2", "3", "4", "5", "Input", "Output"}, NeuralNetworks`NetGraph`PackagePrivate`vertices$$ = Association[ "1" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {50, 1}], "Biases" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association["Size" -> 50, "$InputSize" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {1}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {50}]]], "2" -> Association[ "Type" -> "Softmax", "Arrays" -> Association[], "Parameters" -> Association["Size" -> 50], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {50}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {50}]]], "3" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Tanh, "$Dimensions" -> {50}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {50}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {50}]]], "4" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {10, 50}], "Biases" -> NeuralNetworks`TensorT[1, {10}]], "Parameters" -> Association["Size" -> 10, "$InputSize" -> 50], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {50}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {10}]]], "5" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {1, 10}], "Biases" -> NeuralNetworks`TensorT[1, {1}]], "Parameters" -> Association["Size" -> 1, "$InputSize" -> 10], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {10}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {1}]]]], NeuralNetworks`NetGraph`PackagePrivate`vports$$ = { NetPort["Vertices", "1"], NetPort["Vertices", "2"], NetPort["Vertices", "3"], NetPort["Vertices", "4"], NetPort["Vertices", "5"], NetPort["Inputs", "Input"], NetPort["Outputs", "Output"]}}, TagBox[GridBox[{ { TemplateBox[{TagBox[ GraphicsBox[{{ GrayLevel[0.7], { LineBox[{{-5., 3.061616997868383*^-16}, {-4., 2.4492935982947064`*^-16}}], LineBox[{{-4., 2.4492935982947064`*^-16}, {-3., 1.8369701987210297`*^-16}}], LineBox[{{-3., 1.8369701987210297`*^-16}, {-2., 1.2246467991473532`*^-16}}], LineBox[{{-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}}], LineBox[{{-6., 3.6739403974420594`*^-16}, {-5., 3.061616997868383*^-16}}], LineBox[{{-1., 6.123233995736766*^-17}, {0., 0.}}]}}, { InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-4.4, 2.694222958124177*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-3.4, 2.0818995585505003`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-2.4000000000000004`, 1.4695761589768238`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736765*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-1.4, 8.572527594031473*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-5.4, 3.3065463576978537`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736762*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-0.4, 2.4492935982947065`*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}]}, { GrayLevel[0], { AbsolutePointSize[5], {{ GrayLevel[0.35], TagBox[ PointBox[{-5., 3.061616997868383*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 1), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.78, 0.64, 0.98], TagBox[ PointBox[{-4., 2.4492935982947064`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 2), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.29, 0.29, 0.83], TagBox[ PointBox[{-3., 1.8369701987210297`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 3), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.35], TagBox[ PointBox[{-2., 1.2246467991473532`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 4), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.35], TagBox[ PointBox[{-1., 6.123233995736766*^-17}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 5), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.5], TagBox[ PointBox[{-6., 3.6739403974420594`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 6), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.5], TagBox[ PointBox[{0., 0.}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 7), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}}}}, {{ InsetBox[ FormBox["\"1\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-5., 3.061616997868383*^-16}], Offset[{0, -5.5}, {-5., 3.061616997868383*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"2\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-4., 2.4492935982947064`*^-16}], Offset[{0, -5.5}, {-4., 2.4492935982947064`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"3\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-3., 1.8369701987210297`*^-16}], Offset[{0, -5.5}, {-3., 1.8369701987210297`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"4\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-2., 1.2246467991473532`*^-16}], Offset[{0, -5.5}, {-2., 1.2246467991473532`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"5\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-1., 6.123233995736766*^-17}], Offset[{0, -5.5}, {-1., 6.123233995736766*^-17}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"Input\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-6., 3.6739403974420594`*^-16}], Offset[{0, -5.5}, {-6., 3.6739403974420594`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"Output\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {0., 0.}], Offset[{0, -5.5}, {0., 0.}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}]}, StyleBox[{ InsetBox[ FormBox["\"50\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-4.4, 2.694222958124177*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"50\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-3.4, 2.0818995585505003`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"50\"", TraditionalForm], Offset[{3.3677786976552205`*^-16, 5.5}, {-2.4000000000000004`, 1.4695761589768238`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736765*^-17}], InsetBox[ FormBox["\"10\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-1.4, 8.572527594031473*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}], InsetBox[ FormBox["\"1\"", TraditionalForm], Offset[{3.3677786976552195`*^-16, 5.5}, {-5.4, 3.3065463576978537`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736762*^-17}], InsetBox[ FormBox["\"1\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-0.4, 2.4492935982947065`*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}]}, FontColor -> GrayLevel[0.5], FontSize -> 8, FontWeight -> "Thin", StripOnInput -> False]}, DynamicModuleBox[{ GeneralUtilities`Graphics`PackagePrivate`vpos$51463 = \ {{-5., 3.061616997868383*^-16}, {-4., 2.4492935982947064`*^-16}, {-3., 1.8369701987210297`*^-16}, {-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}, {-6., 3.6739403974420594`*^-16}, {0., 0.}}}, DynamicBox[ Typeset`ToBoxes[ If[ Not[ IntegerQ[ NeuralNetworks`NetGraph`PackagePrivate`selection$$]], {}, { AbsolutePointSize[10], Opacity[0.2, Black], Point[ Part[ GeneralUtilities`Graphics`PackagePrivate`vpos$51463, NeuralNetworks`NetGraph`PackagePrivate`selection$$]]}], StandardForm, Graphics], TrackedSymbols :> { NeuralNetworks`NetGraph`PackagePrivate`selection$$}], DynamicModuleValues :> {}]}, ImageSize -> {426., 25.680000000000025`}, AspectRatio -> Full, PlotRangePadding -> 0, ImagePadding -> {{19.5, 22.5}, {15.5, 10.179999999999998`}}, ImageMargins -> {{0, 0}, {15, 15}}, BaseStyle -> {TooltipBoxOptions -> {TooltipDelay -> 0.08}}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = None), Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]],FormBox[ TemplateBox[{ StyleBox["DotPlusLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["SoftmaxLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["ElementwiseLayer", GrayLevel[0.35], StripOnInput -> False]}, "PointLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #}, "RowDefault"], TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.29, 0.29, 0.83]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.29, 0.29, 0.83]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #3}, "RowDefault"]}, { TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.78, 0.64, 0.98]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.78, 0.64, 0.98]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #2}, "RowDefault"], "\"\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{2, 2}, {2, 2}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"PointLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.35], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.23333333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.35]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.35]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.35], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.78, 0.64, 0.98], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.52, 0.4266666666666667, 0.6533333333333333], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "RGBColor[0.78, 0.64, 0.98]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.78, 0.64, 0.98]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], RGBColor[0.78, 0.64, 0.98], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.29, 0.29, 0.83], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.19333333333333333`, 0.19333333333333333`, 0.5533333333333333], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "RGBColor[0.29, 0.29, 0.83]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.29, 0.29, 0.83]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], RGBColor[0.29, 0.29, 0.83], Editable -> False, Selectable -> False], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2, ",", #3}], "}"}], ",", RowBox[{"LegendMarkerSize", "\[Rule]", "12"}], ",", RowBox[{"LegendMargins", "\[Rule]", "2"}], ",", RowBox[{ "LegendLayout", "\[Rule]", "GeneralUtilities`Graphics`PackagePrivate`legendTable"}]}]\ , "]"}]& ), Editable -> True], TraditionalForm]}, "Legended", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> Automatic, BaselinePosition -> {1, 1}]& ), Editable->True, InterpretationFunction->(RowBox[{"Legended", "[", RowBox[{#, ",", RowBox[{"Placed", "[", RowBox[{#2, ",", "Below"}], "]"}]}], "]"}]& )]}, { DynamicBox[ToBoxes[ If[ IntegerQ[NeuralNetworks`NetGraph`PackagePrivate`selection$$], Item[ NeuralNetworks`NetGraph`PackagePrivate`vportInfo[ Part[ NeuralNetworks`NetGraph`PackagePrivate`vports$$, NeuralNetworks`NetGraph`PackagePrivate`selection$$], NeuralNetworks`NetGraph`PackagePrivate`inputs$$, NeuralNetworks`NetGraph`PackagePrivate`outputs$$, NeuralNetworks`NetGraph`PackagePrivate`vertices$$], Alignment -> Center], Item["", ItemSize -> {0, 0}]], StandardForm], ImageSizeCache->{179., {80., 85.}}, TrackedSymbols:>{ NeuralNetworks`NetGraph`PackagePrivate`selection$$}]} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], DynamicModuleValues:>{}, Initialization:>{NetGraph}], Deploy, DefaultBaseStyle->"Deploy"], BaselinePosition->(Top -> Scaled[3])], "]"}]}], False], Deploy], LineBreakWithin->False]], "Output", CellChangeTimes->{ 3.687287676986574*^9, 3.687288012765229*^9, 3.687298945775899*^9, 3.6872990414111547`*^9, 3.687299114090673*^9, 3.687299154340901*^9, 3.687299784749852*^9, 3.687300227882206*^9, 3.687300299659165*^9, { 3.6873003474417877`*^9, 3.687300357593439*^9}, 3.687300762691368*^9, 3.687300833837585*^9, 3.687300881540215*^9, 3.687300919302011*^9, 3.687300953207576*^9, {3.687300991380227*^9, 3.68730104695297*^9}, 3.687301078226899*^9, 3.68730113300208*^9, {3.687301165489853*^9, 3.687301188318844*^9}, 3.68730122489345*^9, 3.687301338666807*^9, { 3.687301406129512*^9, 3.6873014131057053`*^9}, 3.687456851741661*^9, 3.687457055272088*^9, {3.68745715769306*^9, 3.687457185747981*^9}, 3.6874572384294653`*^9, {3.687457332079808*^9, 3.687457372520462*^9}, 3.687457420609297*^9, 3.687457900140993*^9, 3.687458065926827*^9, 3.6874581186662893`*^9, 3.687458176111971*^9, 3.6874582251274157`*^9, 3.687458753349806*^9, 3.687458793748042*^9, 3.6874591514105797`*^9, 3.687459219695492*^9, 3.687459332295493*^9, {3.687459409577032*^9, 3.687459434154522*^9}, {3.687459503873419*^9, 3.687459509556609*^9}, 3.687459580485106*^9, 3.687459624101465*^9, {3.687459672054762*^9, 3.687459691270356*^9}, 3.6874600614832573`*^9, {3.687460092958112*^9, 3.687460138693582*^9}, 3.6874634739074497`*^9, 3.687463558247698*^9, 3.6874635929715843`*^9, 3.687463800131054*^9, 3.687464021293619*^9, 3.687464189373911*^9, 3.687464283643229*^9}] }, Open ]], Cell["Get losses:", "Item"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"net", "@", "trainingset"}], "\[IndentingNewLine]", RowBox[{"trainedNet", "@", "trainingset"}]}], "Input", CellChangeTimes->{{3.6872877430881243`*^9, 3.687287814650714*^9}, { 3.687287865908657*^9, 3.6872878728749447`*^9}}], Cell[BoxData[ TemplateBox[{ "NetEncoder","invencin", "\"Invalid input, \\!\\(\\*RowBox[{\\\"\\\\\\\"input was not a list of \ numeric values\\\\\\\"\\\"}]\\).\"",2,36,3,31272144955404235684,"Local"}, "MessageTemplate"]], "Message", "MSG", CellChangeTimes->{3.68745716136525*^9}], Cell[BoxData["$Failed"], "Output", CellChangeTimes->{ 3.687287686202216*^9, {3.687287746836257*^9, 3.687287752831661*^9}, { 3.6872877843710413`*^9, 3.687287815277914*^9}, 3.6872878739519777`*^9, 3.687288015533361*^9, 3.6872989494999447`*^9, 3.68729904545577*^9, { 3.6872991193862667`*^9, 3.687299160544454*^9}, 3.687456855444487*^9, 3.687457161387652*^9}], Cell[BoxData[ TemplateBox[{ "NetEncoder","invencin", "\"Invalid input, \\!\\(\\*RowBox[{\\\"\\\\\\\"input was not a list of \ numeric values\\\\\\\"\\\"}]\\).\"",2,37,4,31272144955404235684,"Local"}, "MessageTemplate"]], "Message", "MSG", CellChangeTimes->{3.687457161405386*^9}], Cell[BoxData["$Failed"], "Output", CellChangeTimes->{ 3.687287686202216*^9, {3.687287746836257*^9, 3.687287752831661*^9}, { 3.6872877843710413`*^9, 3.687287815277914*^9}, 3.6872878739519777`*^9, 3.687288015533361*^9, 3.6872989494999447`*^9, 3.68729904545577*^9, { 3.6872991193862667`*^9, 3.687299160544454*^9}, 3.687456855444487*^9, 3.687457161414178*^9}] }, Open ]], Cell[CellGroupData[{ Cell["The losses have decreased!", "Item"], Cell["Remove loss layer with take:", "Item"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trainedNet", "=", RowBox[{"Take", "[", RowBox[{"trainedNet", ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.6872989541727257`*^9, 3.687298990479538*^9}, { 3.6872990537608423`*^9, 3.687299053885726*^9}, {3.6872991244875193`*^9, 3.687299132161927*^9}, {3.68745686273799*^9, 3.687456862923069*^9}}], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetGraph", RowBox[{"[", PanelBox[ TagBox[ DynamicModuleBox[{NeuralNetworks`NetGraph`PackagePrivate`selection$$ = None, NeuralNetworks`NetGraph`PackagePrivate`outIndex$$ = 2, NeuralNetworks`NetGraph`PackagePrivate`inputs$$ = Association[ "Input" -> NeuralNetworks`TensorT[1, {1}]], NeuralNetworks`NetGraph`PackagePrivate`outputs$$ = Association[ "Output" -> NeuralNetworks`TensorT[1, {1}]], NeuralNetworks`NetGraph`PackagePrivate`labels$$ = { "Input", "1", "Output"}, NeuralNetworks`NetGraph`PackagePrivate`vertices$$ = Association[ "1" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {1, 1}], "Biases" -> NeuralNetworks`TensorT[1, {1}]], "Parameters" -> Association["Size" -> 1, "$InputSize" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {1}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {1}]]]], NeuralNetworks`NetGraph`PackagePrivate`vports$$ = { NetPort["Inputs", "Input"], NetPort["Vertices", "1"], NetPort["Outputs", "Output"]}}, TagBox[GridBox[{ { TemplateBox[{TagBox[ GraphicsBox[{{ GrayLevel[0.7], { LineBox[{{-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}}], LineBox[{{-1., 6.123233995736766*^-17}, {0., 0.}}]}}, { InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-1.4, 8.572527594031473*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-0.4, 2.4492935982947065`*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}]}, { GrayLevel[0], { AbsolutePointSize[5], {{ GrayLevel[0.5], TagBox[ PointBox[{-2., 1.2246467991473532`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 1), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.35], TagBox[ PointBox[{-1., 6.123233995736766*^-17}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 2), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.5], TagBox[ PointBox[{0., 0.}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 3), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}}}}, {{ InsetBox[ FormBox["\"Input\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-2., 1.2246467991473532`*^-16}], Offset[{0, -5.5}, {-2., 1.2246467991473532`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"1\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-1., 6.123233995736766*^-17}], Offset[{0, -5.5}, {-1., 6.123233995736766*^-17}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"Output\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {0., 0.}], Offset[{0, -5.5}, {0., 0.}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}]}, StyleBox[{ InsetBox[ FormBox["\"1\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-1.4, 8.572527594031473*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}], InsetBox[ FormBox["\"1\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-0.4, 2.4492935982947065`*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}]}, FontColor -> GrayLevel[0.5], FontSize -> 8, FontWeight -> "Thin", StripOnInput -> False]}, DynamicModuleBox[{ GeneralUtilities`Graphics`PackagePrivate`vpos$5907 = {{-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}, {0., 0.}}}, DynamicBox[ Typeset`ToBoxes[ If[ Not[ IntegerQ[ NeuralNetworks`NetGraph`PackagePrivate`selection$$]], {}, { AbsolutePointSize[10], Opacity[0.2, Black], Point[ Part[GeneralUtilities`Graphics`PackagePrivate`vpos$5907, NeuralNetworks`NetGraph`PackagePrivate`selection$$]]}], StandardForm, Graphics], TrackedSymbols :> { NeuralNetworks`NetGraph`PackagePrivate`selection$$}], DynamicModuleValues :> {}]}, ImageSize -> {170., 25.680000000000007`}, AspectRatio -> Full, PlotRangePadding -> 0, ImagePadding -> {{19.5, 22.5}, {15.5, 10.179999999999998`}}, ImageMargins -> {{0, 0}, {15, 15}}, BaseStyle -> {TooltipBoxOptions -> {TooltipDelay -> 0.08}}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = None), Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]],FormBox[ TemplateBox[{ StyleBox["DotPlusLayer", GrayLevel[0.35], StripOnInput -> False]}, "PointLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TemplateBox[{" ", "\" \"", TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #}, "RowDefault"]}, "RowWithSeparators"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{2, 2}, {2, 2}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"PointLegend", "[", RowBox[{ RowBox[{"{", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.35], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.23333333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.35]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.35]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.35], Editable -> False, Selectable -> False], "]"}], "}"}], ",", RowBox[{"{", #, "}"}], ",", RowBox[{"LegendMarkerSize", "\[Rule]", "12"}], ",", RowBox[{"LegendMargins", "\[Rule]", "2"}], ",", RowBox[{ "LegendLayout", "\[Rule]", "GeneralUtilities`Graphics`PackagePrivate`legendTable"}]}]\ , "]"}]& ), Editable -> True], TraditionalForm]}, "Legended", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> Automatic, BaselinePosition -> {1, 1}]& ), Editable->True, InterpretationFunction->(RowBox[{"Legended", "[", RowBox[{#, ",", RowBox[{"Placed", "[", RowBox[{#2, ",", "Below"}], "]"}]}], "]"}]& )]}, { DynamicBox[ToBoxes[ If[ IntegerQ[NeuralNetworks`NetGraph`PackagePrivate`selection$$], Item[ NeuralNetworks`NetGraph`PackagePrivate`vportInfo[ Part[ NeuralNetworks`NetGraph`PackagePrivate`vports$$, NeuralNetworks`NetGraph`PackagePrivate`selection$$], NeuralNetworks`NetGraph`PackagePrivate`inputs$$, NeuralNetworks`NetGraph`PackagePrivate`outputs$$, NeuralNetworks`NetGraph`PackagePrivate`vertices$$], Alignment -> Center], Item["", ItemSize -> {0, 0}]], StandardForm], ImageSizeCache->{0., {0., 6.}}, TrackedSymbols:>{ NeuralNetworks`NetGraph`PackagePrivate`selection$$}]} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], DynamicModuleValues:>{}, Initialization:>{NetGraph}], Deploy, DefaultBaseStyle->"Deploy"], BaselinePosition->(Top -> Scaled[3])], "]"}]}], False], Deploy], LineBreakWithin->False]], "Output", CellChangeTimes->{{3.687287990566203*^9, 3.687288018310568*^9}, 3.687298961934883*^9, 3.6872990554490957`*^9, {3.6872991334263153`*^9, 3.687299163166451*^9}, 3.687456863986018*^9}] }, Open ]], Cell["Make a prediction:", "Item"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trainedNet", "@", RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", RowBox[{"-", "1"}], ",", "0", ",", "1", ",", "1.4142135", ",", "2", ",", "3", ",", "4", ",", "10", ",", "11", ",", "12", ",", "20"}], "}"}]}]], "Input", CellChangeTimes->{{3.6872879986208973`*^9, 3.6872880228788233`*^9}, { 3.687298969959812*^9, 3.687298982140545*^9}, {3.687458805062055*^9, 3.687458845044887*^9}, {3.6874596018403883`*^9, 3.687459602105111*^9}, { 3.687459719856769*^9, 3.687459727631008*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", "6.244139671325684`", "}"}], ",", RowBox[{"{", "0.3630675673484802`", "}"}], ",", RowBox[{"{", RowBox[{"-", "0.1619565486907959`"}], "}"}], ",", RowBox[{"{", "1.003860592842102`", "}"}], ",", RowBox[{"{", "2.0147886276245117`", "}"}], ",", RowBox[{"{", "4.0024542808532715`", "}"}], ",", RowBox[{"{", "8.973852157592773`", "}"}], ",", RowBox[{"{", "15.993581771850586`", "}"}], ",", RowBox[{"{", "99.93385314941406`", "}"}], ",", RowBox[{"{", "117.76367950439453`", "}"}], ",", RowBox[{"{", "131.20953369140625`", "}"}], ",", RowBox[{"{", "144.76754760742188`", "}"}]}], "}"}]], "Output", CellChangeTimes->{{3.687287995935094*^9, 3.687288023311769*^9}, { 3.687298966927834*^9, 3.6872989830878143`*^9}, 3.6872990605287113`*^9, 3.687299166890748*^9, 3.68730084148973*^9, 3.6873008857620707`*^9, 3.687300924247364*^9, 3.687300960849901*^9, {3.6873009967123957`*^9, 3.687301050483879*^9}, 3.6873010844344807`*^9, 3.687301138082203*^9, 3.6873011932399397`*^9, 3.687301229641609*^9, 3.687456867550198*^9, 3.687457199094322*^9, 3.6874572414167643`*^9, 3.6874579309004602`*^9, 3.687458075151887*^9, 3.687458122875764*^9, 3.687458179505857*^9, { 3.687458799816101*^9, 3.687458846931913*^9}, 3.687459225485471*^9, 3.6874593373510103`*^9, 3.687459438636438*^9, {3.687459585074079*^9, 3.6874596272559147`*^9}, {3.68745967596357*^9, 3.687459695430572*^9}, 3.6874597288956327`*^9, 3.6874634781186028`*^9, 3.687463596546028*^9, 3.6874641958594627`*^9, 3.687464287036673*^9}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Choosing a specific output", "Section", CellChangeTimes->{{3.688339829363377*^9, 3.688339857956379*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetGraph", "[", RowBox[{ RowBox[{"{", RowBox[{"Ramp", ",", "LogisticSigmoid"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "\[Rule]", "2"}], ",", RowBox[{"1", "\[Rule]", RowBox[{"NetPort", "[", "\"\\"", "]"}]}], ",", RowBox[{"2", "\[Rule]", RowBox[{"NetPort", "[", "\"\\"", "]"}]}]}], "}"}]}], "]"}]}]], "Input", CellID->1310129356], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnc1PI9l6hyvJJsv8C9lbrLOy5NVVWr63o4kiYYnNLWW4GoQmxDOjyBIL hlgojtm4NqlE4+uEiCsCQmrfFnDVNN2WGc9UELY8QAZETNotxnjKn0M1ljXy ovOeKtuYDwNtXLbr+PeIdleVTx2fKp/nvO85djd/Lv7dR+N/LAjCZ39KDx/9 +h8cbvevPX/9Z7TzN59+9slvPv34b//y088//s3H7r8Q/4QOfkV/nvyRILDt 9wAAYAWq1WqpVMpmsxkAeIf6OfV26vP91q4X0GUWCgW6Xk3TKgDwDvVz6u3U 54dB8HK5/NNPP/X7lgPQU6jPU8/vt3ymUywWLy4u+n2zAegp1Oep5/dbPtM5 Pz/v950GoA9Qz++3fKYDu8FwArsB4BXYDQCvwG4AeAV2A8ArsBsAXoHdAPAK 7AaAV2A3ALwCuwHgFdgNAK/AbgB4BXYDwCuwGwBegd0A8ArsBoBXYDcAvAK7 AeAV2A0Ar8BuAHgFdgPAK7AbAF6B3cByZLPZYDA4OztLj7Td7+YMLpzaXYuv yD6fL7SVfg+7uYOknmlA2/1uzuBi2F1NRwM+X0AOZ2r99rI75AJjs3u5Uklj 1wO7OYOidtNu2u53cwaXeuyuaSUtF/ZMbZX6rGWXKMlTcvNSYDdPvHv3TpIk xO6H0JqZKwFPlCO7c40d2M0NpPa333776tUrzLsfAuwGVsFQm6CNfrfFGphu d62qaVoXZ/OpsM+3kbqvFOzmDajdAW3trsafCoIvaiiiySNCIK7d5VMtvbIY vfq7wKtReUqoMyJH0w82+C7ivhFhVrmvFOzmCqjdGXfbLYz4dEe0wIjgi98Z 1zMrNBi0+p9aGacKQkq6WqvurcxOhfY+ROK2xAOOkYBeVe2OjAB28wPU7ph7 7BYEz0aGdi7t1g4D4w4jHnsW47pg2uJU/cgIQxgZX9RqKQrbY4uHN8XbC3lC yuGGb8w4Y0P/EC6trEw9HTEqmV3ZY4eqh56n43Jo1jg6LtcTg72AQxgPBMb1 wyPj0Uz15kvAbktSVDMZtXj1GNR+DHfY7RDGwhs+QZjKva/KdbtztO/wbdBW rRSn2BzYY+G6lMsdbnjIy8NcLpNJZ3Lae01xCCNGbVpOp1QP7HsyGzYcsyup XC59mCoxk2tbgdlFJU2bGUWmZ9kHcxobXkamQoe5Ujq+SAcD+vBinC5HU5qW Do1RchGH3danuCmJjUmcML2cMI5eU1tNLPsXEw+pLrEsLSbUxp4qOwVvJGNK wwebO+127FW1RYcwFY6HnjK7q4chuvljvlBIlkOhEJtUN+Sq7gXIv8vMXD9d YftaqB6lA6XL4Bu+4WP1MLri80yNjznqIus1xBuReWOKRGbT7cvM/P37QzLd EbptOQB2W4mEPCoIo2tHTMBUjA3v/ljmZtSOeQXBG3tAfaqfFdTtVvclJ+t9 Uky97ywOudtuheRKsbg5ohun7bE77wtHlegWEVWUeKp+ghb3XbV7j5z2bNUN qx3KzWeZntcCbi3tYcl3ILqXqtZy9VmAYXd9bl1bGWuxu3H6nuxoDhqw26qc Jyhsy4nLlPxoWRTs/7IV+fe/+sV0lqmtyqOTkbc7enS3hRInIdFud9ptNsE2 6t8vVtQdSfTr1hdj4qj8NiHr4WRyp1ihZ0S/LOrDRd8usH/cYzcTsrbBlscE mSXh6SkjM9cnxqm40pz11tIrVCbMZK+Wcs0U2hHey+iralSFr9TObk2h0SPM EvPa4UagGbufsqm9otVquT02woT0WcBNuxG7rY0asQn2WMt8O6/8syD8/Yut r5y2f9SdzPjtzk2VYrfN5o2w0GwTptdS9MTmtM3mj6kxr306YlTltHkzVN7W mooXJdqF3Tfsrn8IltmidFnWd6qZ6PhIc4Y0Fr38Ynp1w+NoHPek2GFtKzDW LDobrq+wUWbuCFybLFc3fMYanuCY8owZ03ndbsfTep3jofjN0w9DyMytT3GH cudn6foe5eFbX31Mdp9mXzntfiO9Nuze8dttLDMneZ0RfTQ4T0iCTTohu726 3cWYbrd6VWc2GsDuh3+bhX1DRbtlsfqW4/q3WW5d174GK1ht+ZDLmPjX9Eof cv4VYLeV2PRS9Pbuq0ztyPOvfiEI4n99R4HYLkwe0dNqzCnYI3rsFozYbad5 NLM1wqJ5TI14BXGZdjMxkt3PYrfQGrthN2OwvomqKRSyo3d+g6Y9sNtaqM/8 o80077P/3NYPZkKirXHMGVMrmYhEW2Loa32hzMaes0/TvJv0n2yebJco3Eck VluoPpdXJTvsHjC735eUrWiuw++wwm6LwVbIv45sbW2Vr36ufV68/gm4Pg0f pVB+XrzyzC0Fh54BtvsxwG4r8YFfWaHMfHRzGD/g+mBgNzCJs5Pvj08L9xbD t9HMg1O7c/LU5Vo67O49Wrlc1iqa8Vd7oLaptNodl2d5+b9ZNHnMMT41FQiz fysKu3tNWVULWmPzrNDGb6htNvX/Vy214ZmaejoyrnS4Rj141GpVQl+Ug929 5Ozk5PqcuHB6M0WH2j2gEbsvXeAP2N1LmN3XgnXhNH1Wbj0AtXsDp//j8RVg d68pnDXT8fLZVbGhdg+B3cAMtHK5UGaLatrVOA61ewnsBiZxdvL9yY2E/Jtv voHaPQN2g95QLBZfvnwZjUahds+A3cBsyuVyMpl8/vz5xsYG1O4lsBuYB3n9 3Xffra2tPddJp9P3nwO6B+wG5kGRmhLyWCz24sWLSCTS7+YMHbAbmEdzhTwe j799+7bfzRk6YDcwidYPv1KpVL+bM4zAbmAG1z7Xvri46HeLhhHYDboOvrIy IMBu0F2g9uAAu0EXgdoDBewG3QJqDxqwG3QFqD2AwG7weKD2YAK7wSOB2gML 7AaPAWoPMrAbdAzUHnBgN+gMqD34wG7QAVDbEsBu8KFAbasAu8EHAbUtBOwG DwdqWwvYDR4I1LYcsBs8BKhtRWA3uBeobVFgN7gbqG1dYDe4A6htaWA3aAfU tjqwG9wK1OYA2A1uArX5AHYPPOX92Kvd47Oz4+T3Z4WT3Whs/9TU1+u22r1u f7excPth98BzFn2RbPkl2KevXuyb92ImRO2ett8ELNx+2D3waIVC62/B1tSz gkmvZE5C3rv2m4OF2w+7Bx5197+PW3eTu8dtyz4C0+baPWq/aVi4/bB74Cmn 063BQkufnHX9NcxcRutF+83Ewu2H3QPP2e9/+7vddEE93j9WC+nki9/9Ptnd FzB5hdz09puMhdsPuy2AppU1ejQeytr9J3wAvfjwy8z29wLLth92DzP4XJtv YHcHZLPZYDA4OztLj7Td3cpbKRQKJycnXW9/On3+xRepX/7y4JNPkn/4g2Ke 2qa2/1e/OqBH2u5u5a2Y1P6e9R/Y3QH0psw0oO3uVn6N4+PjtbU1Cq9d7GYk xZMnB8bPF1/8b1fqbIf57U91pc52mNH+nvUf2N0BNOo2350vv/zyudVwOveb dtB2v5vzwVi9/dRnmv2H+lJ3O2crsLsD+Ird1ot9Vm8/YncXse68CfPWW7F6 +zHv7iJYMwfDCewGgFdgNwC8ArsB4BXYDUB3KKqZjFrsdytagd3tiPntdv9O ByeqiWX/YqKDE3uIKjsFbyTT72Z0QmpTsgk6o/79QXGpuCmJQoPp5dvf/Yd3 jMSytJhQK4++WNjdDrLb5o11cqJXEDo6sUeo+5KT9Rcppva7KR2wPyoI/ki6 UsnQAOWUB2IUTcjUqNG1IzZapmIy3Vt/7JaR88EdQ/WzgurjLxZ2t6Nud3FH tNmcdjaCOj9fpjueCE3a7Ha7jY6MPjsqVooxcVTWPVHl0cnI2x19ELeFEgPq zo4kin5ZbNMDB53z9LPFtbS+GfmcHIj0uT3EeYJuppy4jKxHy6Jgl9W2HeMk JNrtTtaDbHpEVukt8evW66e8Tch6tJ7cUR97sbC7HQ27Y3bB9ix1rr+J9k1V Pz69RgXSm9OCza+qEafNq3uS8dudrIDXZhuEXncXRUr4vFa0u0Fqk+KbbS01 ACsqasQm2GMtaXNxh9rmz7TtGKrfJkyvsa/YbU7bbP6YGvPapyNGVfopGSrQ Om/q+GJhdzvqdtMNt/uNEbjxHjmnjZz2fIfSpdjb6wV2Ok3pewjrYJa1u7jp p4zVORBqV5jMNNF5lr48oEam63bf3jFIXmdEHw3OE5Jgk07IbiMcFGO63WrL 2Puoi4Xd7bi0+9oITH9JTN5MxGvEbrswecTew5hTsEf0IXogMsa7sK7dxeVJ QbB79SWmQfkwZJPecWqSbnIxFSEbxeX9StuOQbILkn7zIyyax1TqSOIy7WZi JLufxW7BiN2PvVjY3Y4dY81cH4F1DRojsL4mxabdgn2ZvaOZkGhrLJc6Kapn IhJtiaGBWPBpgyrZLWl3cT8ktOD0D0iOpD5jEbbO54tGq9p1jK9betA0M1eN TTZPtkvUpSISq+3fwv/6yIuF3R8KZebMi/Nia6XnxcH6oBP0AeoEqnp+49iN jkFJ4CiF8vPilWfM6EGwGwBegd0A8ArsBoBXYDcAvAK7AeAV2A0Ar8BuAHgF dgPAK7AbAF6B3QDwCuwGgFdgNwC8ArsB4BXYDQCvwG4AeAV2A8ArsBsAXoHd APAK7AaAV2A3ALwCuwHgFdgNAK/AbgB4BXYDwCuwm29+/FFLJIr0eOuz+eSC 6woTSj4bnHBv57vZhvzBejB80O5ZRRLnt7P31rEguoK7XW3WEAC7Oebly9xH H/3PkycH9EjbNwvkk0GXSzrK5rOnBlmt0n27d2WXS95t92w+dZDK3j74tJYi u+XdewcBcAXYzSsUrw21jR/avhnBdbuDV1Wu261ld+cnXC6RfuaUU61SSs6J E+4J2nfNBRckD9vwyK+pxpslZ0TRKOmeX8/TLssKxN/+xz+5ZYVe4Cg8J86t 04mn27JHVpJL8wu7+VLq9dzExIQouib0Siqnq/NuvdKJJeUNtTR43e7suuyh AqzEfDjLXsWj6FfyZlNyy9u3tMpIT2bWS+be+AECdvMKJeRNtY2fROL6b6qq Z+aiDtN1KV+3u7Q04fKsJivsl0fPucSlUml3wjXx+pS0e00F11OavuHeLd1a Utx8o1W0gxnXBA0Uu7IoktenmzQwnFZYeXqlg4q27nZJSnZXdtOjItGT6zSo HKwvhZU3B0tuqpRkLaXW6VWSpet2l+jF5lZP9WvwsFfRNmdc7tUj2qdMYSH5 w22tcoUP3uTz9+YJ/AC7eeVm7FbVW2O3TI5odSqN2J2SRJfoZnhmZjwz8tEP intCj/IlxS1KTCvdd+WOkhRw9TQgGZwQWWaeX5gQF16HPW4pOOOW18Nu18yR VjHsrmQPgjNMe4r326n8a4q7jUo9npn1ox9uxO7TsEw5AitE51DU1o6W6FqO DlbpMVu5rVVicNjm7bCbYx427261W6u0xO7515QSV0pH63PSeilPdsjMrjyT l23U7W5fspHkU+x26Tl5an2Ohe3VoyybirtEebtSqdu9HZxf0uVVglTd9sEC q5TVoR3Jc/JBic27pe1mSytv1mdc4oI+2rDYzZKKSnbBzYaH+U1qzB2tGiJg N9/ct2a+dHXN3LWU/L/6vPvNa+YKy9ddwe03l1K32O2mzPyOko3YnVVY/j+z elDJblOpVQrYJYXi9NIBmwGT3bKSzSZXRVd9Gr2azFa0VLBRqSe4rVXyS+6W VroXftRfVKSp+oSbClENFTZpmGM5v36t7Vs1RMBu0B4tn88/bA3q4SXvqaR1 GCrdU6l29Wltl4K3tN3tVlkY2A24IK8v1rmVYQvPdwK7ASdopdIQLYc/CNgN AK/AbgB4BXYDwCuwGwBegd0A8ArsBoBXhsFuTdMuLi76facB6CnU56nn91s+ 06HLfPfuXb9vNgA9hfo89fx+y2c6P//88zsdRHAwDBjhjKCe32/5egFdZkX/ 90XnAPCO8U95h0RtAAAAYBj4f6S5RGg= "], {{0, 156}, {330, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{330, 156}, PlotRange->{{0, 330}, {0, 156}}]], "Output", ImageSize->{334, 156}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->2126115611] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "[", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0", ",", "1"}], "}"}], "]"}]], "Input", CellID->1276463465], Cell[BoxData[ RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"\<\"Output1\"\>", "\[Rule]", RowBox[{"{", RowBox[{"0.`", ",", "0.`", ",", "1.`"}], "}"}]}], ",", RowBox[{"\<\"Output2\"\>", "\[Rule]", RowBox[{"{", RowBox[{"0.5`", ",", "0.5`", ",", "0.7310585975646973`"}], "}"}]}]}], "\[RightAssociation]"}]], "Output", ImageSize->{389, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1627987704] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0", ",", "1"}], "}"}], ",", "\"\\""}], "]"}]], "Input", CellID->1051424917], Cell[BoxData[ RowBox[{"{", RowBox[{"0.`", ",", "0.`", ",", "1.`"}], "}"}]], "Output", ImageSize->{82, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1290767103] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Extracting layers from a net", "Section", CellChangeTimes->{{3.688340118088345*^9, 3.688340137522819*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetExtract", "[", RowBox[{"namenet", ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.688340153388461*^9, 3.68834015419394*^9}}, CellID->1627483344], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["DotPlusLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = True}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["4", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TemplateBox[{GraphicsBox[{{ Opacity[0.3], {{ LineBox[ NCache[{{0, 0}, { Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[1, 2], 1}}, {{0, 0}, {0.5, 1}}]], LineBox[ NCache[{{0, 0}, { Rational[3, 2], 1}}, {{0, 0}, {1.5, 1}}]]}, { LineBox[ NCache[{{1, 0}, { Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[1, 2], 1}}, {{1, 0}, {0.5, 1}}]], LineBox[ NCache[{{1, 0}, { Rational[3, 2], 1}}, {{1, 0}, {1.5, 1}}]]}}}, { AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{ Rational[-1, 2], 1}, { Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize -> 32, BaseStyle -> GrayLevel[0.65]],StyleBox[ "\"uninitialized\"", GrayLevel[0.5], FontSize -> 8, StripOnInput -> False]}, "Labeled", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]& ), InterpretationFunction->(RowBox[{"Labeled", "[", RowBox[{#, ",", #2}], "]"}]& )], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Size\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["4", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Arrays:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Weights\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"matrix\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"4\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Biases\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"optional\"","\" \"",TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"4\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"vector\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"3\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Output\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"vector\"","\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"4\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", ImageSize->{275, 53}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1304283924] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Create a new network consisting of layers from other nets:", "Section", CellChangeTimes->{{3.688331726039603*^9, 3.688331733810763*^9}}, CellID->148356842], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetGraph", "[", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "4", ",", "8", ",", "Tanh"}], "}"}], ",", RowBox[{"{", RowBox[{"1", "\[Rule]", RowBox[{"2", "\[Rule]", RowBox[{"3", "\[Rule]", "4"}]}]}], "}"}]}], "]"}]}]], "Input", CellID->1384668015], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnc9vIkebx3t3L3vcf2HvyOc9IXHcCL0jZbWSUXxIWhu/etEoa/HOqxWS IxHLthbhw4Dm0BOJQWvJI8uWlWE2xsrwekzwi9TjYIQwO2YneE1CGNJg2nFn EIo4zD7VDRgD/tlgaL/fjxzSdFdXVxddn3qqCnv+kf/3Dyf/luO4P/49vXz4 yX9YHI5PnP/yD/TmXz/74x9+/9mn//bPnz349PefOv6J/zva+Qn995e/4Ti2 /R4AAABQqdVqsiwXi8UCAAAMANILSYZUM2zbDRC6u6OjI7pNRVGqAAAwAEgv JBlSzR3W6fHx8S+//DLsmgYA3H1INSScYTtvUFQqlXfv3g27jgEAdx9SDQln 2M4bFCcnJ8OuYADAXwsknGE7b1DApQCAWwMuBQAA/cClAACgH7gUAAD0A5cC AIB+4FIAANAPXAoAAPqBSwEAQD9wKQAA6AcuBQAA/cClAACgH7gUAAD0A5cC AIB+4FIAANAPXAoAAPqBSwEAQD9wKQAA6AcuBQAA/cClAACgH7h0VDnei72M v3n79k3y9dujg3g0tpcfdpGuzdtkyDPnIb56lRt2WW7M268ePkoeDbsUN0J6 /eLhnGdu7uGL19Kwy3ITjFV+uHRUeRt9kVRO3+ZfvtgbXmFuxtFzz8NX1AiO XrlcTw3QGHqx9/yRy/XQoC6NP330gnpgKep59FK5PPnIYazyw6WjinJ0dNz+ VnprzPZMTSG54jJCW+jm+E3o4dNYPLQSN2ZPkI89cc09fjznehw15LjAWOWH S0cVKf7qTfvbZPzNuWlHmHx8xeV6/Ob48pSjx8Fjlyt6kI89ffzi9dthF+YG HIUeeb6KH+SSzz2PQgbsiQ1W/rvl0vruquB2uwObufeGd+lxLtf++Ci5A+M1 5/yrpy7PV8ab59U4zoVWGI89c49WXhmwN5BW5h7tsfFA7olnxXhPj9HKr7m0 lot63W6vECzUh61DXZS8EzOpkiwr7DYM7tK3z588jeeOpDd7b6SjXPLF0+fJ YRfpmigHT1wul+fhQ8/c3OMXox9XnMfr508NOl/65uWia47V/5MXr4ddlptg rPI34tK6IiuloHNqUx6yDfUhC1NC6w4M7lJykXJMnXLj5diI841g+ByfnXc3 HMYpf/sYX/Q6o8Z3aan5xvAuBQAYB7j06hSLRb/fPzMzQ6+03d/M2zk6OpKk /q8c//jjjzTmnpiYoFfa7nv+LVD+nhi9/LncyZ/+lP3d79L0Stt9z7/FgMo/ 6PY7cJfWa4qi9HEWNht0uzey5xwcrEvpI3A1oe3+Zt5BIpHY3Nzc29vr40NF xbY1oe1+ZdsTlL8bo5efFPrBB2nth7b7lW1PBlH+Qbffc11a273Hce6oZiZF GOO8u8pFjqvnVpeitTO7alFhimswJkRz1xdnD3bdY9yMeM7BwbqUerTWZ/HF F1+8HDChUOi/Vb7++utvvvlGf4YfffRRqy3Ttv4MLwbl78Do5bda91oupW39 GV5M38tPbbbVfqkt91cO1ctcyo25VTUp3jHOvXthzFpYJfW22za7OkkZBMRc rV5Lrc5MBVI3cmcnu17LmFfNqt4d7d5eXPrll19Kg+T7779fX1+nR+i77747 ODjoS56ff/55qy3Tdl/yPA+Uvxujl9/h+N+WS2m7L3mexyDKT212iHEp4dwo 0JtTlyr73kmLFms6l3ZVnSlLU409YwxubHJJqWcpJJ1Y2u+WYSrgDIj7G+4J 7YwN9WtYOXF16t6YlsnMaortqu07700KgRlt76TQCHpTXgs36fVOqrvHJqOF 9lj47syX0uim75e4zfk6lL8bo5f/NudLB1H+oc2X1nYt3ERww81xU6X3NaHh 0hK9t7g3aKsu71Lc6U2xUFQulfY3nGTB/VKpUMgVSsp7RbRwY1puSklFbgSt KYFJ2jKzmi2VcvtZmXmzvumdWRJztFkQBTrKvpqlMJmPTQX2S3Jud4l2elWZ a6cL0ayi5AITFDjv3ppLAQDgPC50qSVVU5Ys3FRwN3CPubS2HyCPTbgDAUEI BAJsMrSpslrKS7Y7HeOrp4vsvRJoRKBe+TSwDHaFq7X96KrbOTU5YWloU81h txl1bkyRNtk06ekY//37ffKqJdA2sQCXAgCGw8UuFUllWRYTjql+U1IsaHQH o2J0k4iK4m62cYKy6z7r0hQZ1LnZEFt9X2gdZTI8E0yydSsnG8Z7o6lsrV5q zCdoLm3MidZXJ9pc2jw9JVhaioZLAQBD5BKXMv3VN9giEiew4XxuShvjqxOa 2V2xNVtZz61SmiBTa00utQbjlmCqoK49URZu+TyXKiK5OsiG+PX9DW8rLr3H pmRFpV4vpZjPA+p8QrdLEZcCAIbOxS5tfA2qsEkDb0F9UytEJ8eaX3TiJqKn v8Bf23BamvudWbZb2fROtJLOBBvrUDTGt3jPupTOdWsrXZxlyjmhTcOqLrXc a+Q5GdjtPn0/gDE+AEClIhUKUmV417/Zd/XZ9++V2pX2q9/V75G0C5aw1vY1 J23Ctq5mepXzGX1wacxjNnt2bnCilFjxLCVucOItIglWbjZSGHYxbkI27DNp 3eq4Z2+IDeam5CKCVv7x2XUDFr/Bjs9qno0NuxTdVMI+vhW2Ta/0boZXb6GJ Fd9S4tq/IzC6v0OqiFQt0Qt/P6CL/rjUdKOnJTbLcaP4mDWR9nxW9qT5Ykb8 u8Z74xznieSq1QJ1B1ZhxPusblj5Z6n8J3v36UZ2jPgRVCsJtvRs9ozcQ54Q qHbH1zMsSMjG2JqOJ9YjYLhyC5U8LOEdcul7WdyMlq7326f9c2llhzeZrGYW SlgfrFC1JgL3TWaz2UR7xp9lKtVKjB8X1OqWhPH7kR921H7RFLh+d3Y77Ph4 3iPw5zxmo85J7tnSuvan1SMPmJWGXJ5rIyViqkBPMtPUnRnRpScJEtaD6XHr qFX+SYKeaiFxGuxnVnjOLEjnttCDAG82W1lTNqljHInahtZBqKf8kBDU8Pb+ zjXHDyPs0hvQR5fGzJzpWfZE/aTMYUndP71OCXLhac7kkaSI1TSrWqngMVtZ glmTadQes04qNE6eNaJLm2TDFDKY1rOGnAmnuE4d5lsN+AlUlniOX8lW93wj N8aXIibOHGvzXmWHHhJP4dwWKnlM3PQ6+3sC4WmTyROTYrPm6YiWlXpKgRLc YCoMLu2g4VKqVbNH69SaH4R1Wgv7T3ZolBn7oTPBzk0nB24R9hQZ1qWVsIci I6tBRdp6GCOz1JJHvM/tRGJ24mYDS74HVs58fyky2D9scj0q1B65Z23/HpQU mW64tHcLJVVaI6p7TxI+zuQ7IJdqUVAlprpUulnIcbdcWhKmTpf19bq0o1Oj //mYKguRWS0uNXP3M+yDitHjFVF7vZEfexrXpZWV+xxnnlVXnQz4BQ02zOG0 SQoWC416n9vJSWEvvB5eXw+veHjT+Gxkb7QeoTA1PXo2VG9WshHqcfmVveq5 LZTUyvnUVhBhkWpMohbNr9DbQozU6mFxKac3Lt0VZgz+d/UVYcIyOTXlDbI/ ynezJrejreOrnZpam81OTV25YdOlnHmFfWyFAG9qrhxaKWItRHy0xQdGeVlE 8pkN6dLKXoBrwzp6yx+Xklh6wJ4f9vhM7xjvE2hAw2frKHYE0jM2ZmnwYEkr 4Xkt9C9tTXma9c5S7H7rZLOP2nbEx3ILJK43Ydr4956yG86pqXtjk+L11s1H j3q9RqgrVv0NX2iMzyx0UmnP9KQyzO+zAYNBjwuel8HBqlc66drXVeM00hyn MPWkcuaI/qbcjEtPFXRnMOBQEABgVO7Wv+l8BrgUAHBrwKUAAKAfuBQAAPQD lwIAgH7gUgAA0A9cCgAA+oFLAQBAP3ApAADoBy4FAAD9wKUAAKAfuBQAAPQD lwIAgH7gUgAA0A9cCgAA+oFLAQBAP3ApAADoBy4FAAD9wKUAAKAfuBQAAPQD lwIAgH7gUgAA0A9cCgAA+oFLAQBAP3Ap6IkkSalUil57Hi0nF22n2P3hdO9k 6ZA/SIfKy4725PNiXinHBbtPvLQY5bjfxi+Wdd3KVfn5ZyWRqNBr75KcuWV2 G2K56Lc7tvtauGaN9Ub08QvbxUvzWORt/vjt1Bk4BS4F3Xz77bcff/wx+YJe abs7QTnpt9l8mWK5WMwnwwKlXE73aLxxOiLEtda9EM6UKXkxuzZvszmDP13R pexC/lvwwp//XPrww//54IM0vdL2OSVRbzmvUVSq/Xdps8Z6U86ms8Xeqm9P RbUtxC9VLugzcCnogGJRTaQatN0dnXYoThR4G4lROVyet6sn8Yvbh1U56VK3 19I/+ClSSjYkIDNf+H/QXCrHXc5lNZ/ysnNeLFfl7Na83W7n+Ub42uXSdIgu xtNxm30hWSyvOe1+zRuHYYfdn6/m1xYoCGaHl8VDynbNxatFms+cLyGKRTWR aj+03R2d9rJ6w6VKMb5gV6/JszLTjc/zdoedXXfev+hzsg2nsEU5dqd08byW 0rEQKjdr7Ml//adDYB1NJjjPz4foxPy24BTE5PLCYrzcUUXVrlv2d7q0GBKc lECts2CRXcUplrU68zmE7R6l0j57V0i+wgMDNOBS0AEN7c8OZm20pyNNh1hk 9laI+e22+TAzxuEWtXMaZcYFnmdOKC/abbxrwS8Igo810/lgpjHGL4sOXlCb fcNLoo8Oh8hP6dByUDzsNJiSEVwLqifIouTv4mFo3uZYq6rjX/tiMr3ssDnX KL2cDZGfkjIL0lzBZLl8UfhIQ/uWSLUf2tN1y+oYn1dhcqQuQCuzvGynayYp TTY8b+OXZTlut9m38iS5LUoYyirqhiMu90zJhw8Vul2Xzb7dqrF8mGohX2Xp 6UrpqhJysJuNCw567aii7lvucKlMF5tfy6v34GRXUcIuqrMMvadebTH5U69S 2YLpw3L50hgYnAKXgg6649JSqXPM26G4bIgineBTu01IaoGMvMwC1WLSb+e1 MT611sVwPC5ub4uZPDvv1KV2LZ9yY7xcTPtdanDrWNjOlruiQSUZFCgkszsc lIjNCippp43fysZdNn67WN2iAIt3MJwup9MVyuQoW/GyYXh3XCpJPeNSgYyk NKg2/Z/18a1rupwuIfNT86Zk6il8TGKqXcULUjZvv63G+MWtoNPh87scQijo sLkortZc2lFFXbf8U1dcmg8KFP+yRHQO1YaSWaZ7yaTX6LVY7VUq/jbmVe4Y cCno5mrzpZpY5Hw6TA1bEPNxNtLfZoeLol01G9ujxqWsdSfPtM6WSymWzarv Hcw21W3/wrLqAZGi3IXtToMdUuhlV9dVymsUqm0zUcUX2coWvxCm7TRZe2GL XYAi2HkhLV91SvNq86XtLlWqbXHpwhYNrqtyJjTvC8mtYFvtKdhGw6Xnp2yG 5c0ao+5pnoWka5kimxKx8QKrWM2lHVXUdcssFFdrplHMQ+rptPU7mcWlLGCu FtU6sy2ED6vVC0oFrgFcCnpyrXX8xa0M2ytnBBYusRHwQpCNGYsiS+Za+657 NaSseoGSNOczWZhFkiwm13hbY25vLVnsWD1fjO/72dSgnXDwNruqHXVEbFtO qyGxkvU7GmVw+revtTx02Tr+csfUx3Ly/xrzpYdbzWva/NuHpwptc6lDvbtz Uzbj0maNpavFbUq1RsGoTN1N4+6ozgSx2FFFXbd89lsTjsWf1Ys264xUzS6Y 32JLgGn1Xs8vFbgGcCnoL3K5LF9zmk2Ry2fXOJTyhVN18tmj+fiiOlY9k6B8 26smypWvefWUl2TSXgmX3bJy9rDCgnltENHPUv1VA5cCQ5NUB6t+MT/sghiI srqk5RARevYVuBQYHEVGOHVdqM6wRN9v4FIAANAPXAoAAPqBSwEAQD9wKQAA 6AcuBQAA/cClAACgnzvsUkVR3r17N+wKBgDcfUg1JJxhO29Q0N39+uuvw65j AMDdh1RDwhm28wbFb7/99qsKolMAwIDQYjaChDNs5w0Quruq+udyTgAAYABo f37xbosUAAAAAADcAf4fwyJ2Qw== "], {{0, 97}, {452, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{452, 97}, PlotRange->{{0, 452}, {0, 97}}]], "Output", ImageSize->{456, 97}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->481059224] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Take", "[", RowBox[{"net", ",", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}]}], "]"}]], "Input", CellID->204929327], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnd9vItcVx6ftSx/7L/Qd+blPSEh96Qplpa0qLYofklHjqGiVIrJRNZIj EctGRfCwID/MRmJRkbyybFlZ0hgrSxw7UKSpFxDCdE0TXLNhCRkws/HsIhTx sD33zoD55V+Yn7PnIy97mblz59zL+d5z7gXj37J/vTX3S4ZhPvw1PNx6928G q/Vd7o+/gSd/+uDDv7z/wXt//sMHd997/z3r79hfwcF34d/vf8EwpPwaQRBk YqjVapIkFYvFAoJoFHBvcHJw9XGrbYhA746Pj6GbsixXEUSjgHuDk4Ora1jO L168+Omnn8Y90ggyCsDVweHHrblhUalUXr16Ne4xRpBRAK4ODj9uzQ2Lk5OT cQ8wgowOcPhxa25YoJaRNwrUMoJoA9QygmgD1DKCaAPUMoJoA9QygmgD1DKC aAPUMoJoA9QygmgD1DKCaAPUMoJoA9QygmgD1DKCaAPUMoJoA9QygmgD1DKC aAPUMoJoA9QygmgD1DKCaAPU8sTzw2f3lpPH47aiL8Snj+8tOZeW7j1+Ko7b ln6YLvtRyxPO/ufLNtu9KdVy7OHy4zxIIuxc/noav6N8uuxHLU8yL74N3nsY jQXXYlMQFnqQjz6wLd2/v2S7H86N25Z+mC77UcsTzOF9my18mI8+vP/46Q/j NqYPjoPLzs9ih7nk587l4BRmFlNmv7a0XI+v8w6Hw7ede60BLb/IBdcI951L y2v/fjFuc66OuLa0vE9y09wD59oUTkZTZr+i5Vou7HY43HygUB+3HK9FyT27 kCpJkky6MfVabvD084dTul7+9mu/benePefSg8dPx21LP0yX/WpcrsuSXApw lm1pzGq8HhJv4Zs90IyWp5sXx8dTmFKcMj32t+bYgpsLT7+WS40nqGXkjQK1 fHmKxaLX611YWIBHKA+28VaOj49FcfA7199//73NZpudnYVHKA+8/SZDsj+X O/noo+xbb6XhEcoDb7/JkOwftv8MXcv1mizLA1yFZwMOx1b2jJPD1TK8BLYG UB5s4x0kEont7e39/f0BOhWYbWoA5UE125Nh2A8SvnEjrfxAeVDN9mQY9g/b f87Uci1+k2EcYUUZMj/DuOPyeRqr59ZXwu1/y7kW5i2Mygwfzl1duD2IO2aY BeGMk8PVMsyozdfik08++XrIBIPBf1K++OKLL7/88voNvv32200tQ/n6DZ7P wO03GvebWoby9Rs8n4HbDz7T9B/wpcE6Z/UiLTMzDioN2T3DOOLnxuzCOki/ Ve3Z9TlowCfkavVaan3B4kv1pd1O4m7DjJs2Ve+O9qOLy59++qk4TL777rvN zU1woSdPnhweHg6kzY8//ripZSgPpM2zGIb9Vut/m1qG8kDaPIth2A8+M8a4 DHBbBXhyqmX5wD1nUGIttxKncpJXLOqRGQIzM7ci17MQkmdXDrrFmPJxPuFg yzGrXLFF3wbLCeuWmzNKIwvrKXKodsDdnON9C8rROV4N+im3gZlzu+fo4Zm5 cKE1F9DOehmyu4HfYpTr5WHYP8r18jDsH9t6uRY3MLOBLQfDWEqva7yq5RI8 Nzi2oFSX4hB33SkSiqVS6WCLAxUelEqFQq5Qkl/LgoGZUVqTSxRJDdopnkwS hoX1bKmUO8hKRLf1bffCipCDYkHg4Sx5a0wmk8mMxXdQknLxFTjoppOJcjkf zspyzjcLiUN8ZFpGkEnmXC0bUjV5xcBYAnHfTaLl2oEPdDTr8Pl43ufzkcVw Q0q1lBvUdppj08sF8lz2qRHYLZ0G1kBXuK4dhNcdnGVu1qDKlrYQb0TdLQvI liyTT3Ps168PQNcGX0tij1pG3lzO17IAUsqSmDhD9SWnSNB0BMJCeBsIC0I8 q14gxx3tWk6BgrltVVj1A755loixLZiSfTOOpNHucCpbq5fUfF7Rsromrq/P tmi5cXmKNzSnCNQy8oZzgZaJ/OpbZBOL4Uk6nbMoOTZd0GbjQnO1Ws+tQ50A kXZNKjWTYUMgVaB7X9CEQzpLy7IAc0WApNj1gy13My7fJEtyQa7XSykyn/ho Pt+tZYzLCFK9SMvq21CFbUh8efqkVgjPzTTeaGJmw6cf4K5tcYbGcS5LDsvb 7tlm1YWAug8GObbB3a5luNah7LQxBgs3qyzDqZYNN9U253zx7ssPfJhjIxND RSwUxMr47t/fZ0XI5z/k2qWO08+K9KjaBalYa3mbSVmw12mjl7meMAAtR516 vXOvjwvFxJpzJdHHhSNE5I3M4m5h3Gb0Qzbk0SnT+m3n/hgF05tKyMM2w9b8 Wm83uLyHJNY8K4krf0Zlcj/DKQswLOFzP5/SxWC0rFuM9nPhIsP0deGIEPc9 RuJpnug0fq/B/m2Gce7mqtUCTEdGfrLmzAQP1t3ezJBJMhsle0rOaI8J89Ie IjpJRQ1p+bUkbIdLV/v05+C0XNljdTqjnoQC4901GNaE745Or9fr4MjtR5lK tRJlb/N0uEX+9p3dZ3t0Xtb5rj6djoY9D8s6efYMN5t0TnKPVjaVr/bYvQuO vjtme1o5ScCo8onTXCGzxjJ6XjzTQw59rF5vJK6kozmGCK+Nk2qcXvIswdPw fmfviunHBGu5Dwao5aie0T3KntBXSh8S6fH5TaiQC80zOqco7hp1i1QVBafe SCos6nQT5WM9qECeujiNWm6QDUHI0m1mJ2knRNzVMfpoi+4qe2Cks3Cmh4hO HTO/ST5PHprX6ZxRMbqon99VmqKXFKBCH0sh1HIHqpZhVPVOZVJtvBDGeSXt OdmDLC/6rLPCXr/J+QghXjS1Wq6EnJDKGidLyFUiXVi7PGr5PjBxd17Vcm8P Aakad6n2TxIeRuc5BC0rUaASpVoW+5tytaXlEm853da+rpY7JlX4z0OkWthd VOKynrmTIS9U1Mjod+msO1m5Xw+mV8uVtTsMo1+ku14T9wZFCF56sI3qtpLd hRmHXduvnukhIG3GQ1+FXRKpoyJ4FLsGTwtRkLaTxGXmunE5zi9M+feKyPys Yc5icQfIL0X295LvKfvYdFKlo9mYVOnOEVkuM/o18rIVfKyusXNphIhd2PVA ifVN1rZMO6JHP5Varuz7mBaMzknLf8RHJGdQubuimHeWh/yrxZXmyewkRu80 L9Z7wLd2PaQ1X+JqC2b1+76yW5zFcnNmTrjavvHkUa/XALpjNtjpG3JsooKT SmujJ5Vxvp+ITBbgDaJ40nWsy0Mg07sNYfqk0nbm+q7UiMunEtAME5eKIcgw 0dZ36raBWkbeKFDLCKINUMsIog1QywiiDVDLCKINUMsIog1QywiiDVDLCKIN UMsIog1QywiiDVDLCKINUMsIog1QywiiDVDLCKINUMsIog1QywiiDVDLCKIN UMsIog1QywiiDVDLCKINUMsIog1QywiiDVDLCKINUMtDQhTFVCoFjz3PlpN+ 0ylmbyjdu1o66A3AqfKqtbW6XcjL5Rhv9ggXmlGOeU2sv3ytrlyWH3+UE4kK PPa2pK3LpBtCueg1WyMDNa4xYr0RPKwrUrywDT9r8sZGM2aDBLU8DL755pt3 3nkH/BUeodxdoZz0mkyeTLFcLOaTIR5qrqZ7OE8MzvAxxbtcoUwZqhezG3aT iQs8v6SWyY28I/DLr74q3br1nxs30vAI5TMsoV3OKxTl6uC13Bix3pSz6Wyx 91TTWgtGm49dKPmJA7U8cCAWK0JWgHJ3dO6QmMCzJhCmfLRqN9OLWH/kqCol bbS8kX7mhUiRVJ1QIv7qfaZoWYrZuFXaTnmVswvlqpTdsZvNZpZVw3eXltNB uBkL501mV7JY3uDMXsVvj0JWszdfzW+4IAkgp1eFI2h2w8ZSk+yZs0UAsVgR svID5e7o3GtWUbUsF2MuM70nS2yGjttZs9VM7mv3+j0cKXD8DrTYXdPGskpN qytYbozYg3/83cqTiS4TsLP2IFyYj/AcLyRXXf5YuWOIql1d9nZquRjkOahA xyxQJHfhhLIyZh4rH+lhlfLa24LSJRxmUKCWBw6k1u3JpAmOdNTpcGyJPOWj XrPJHiIee7QDfgZZXoxnWeKTZb/ZxNpcXp7nPcRN7IGMmmOXBSvLU7dTdSF4 4HQQ9JEOrgaEo04FyRne5qJ+CiqG+aN4FLSbrBtVmn+a/ck0ZPPcBtSXskHQ R1IiQcoWSJbL54VPSK2bQlZ+El1/10zNsVkKESdMQYrN0qoZ7pmskj+vbDex q5IUM5vMO3kQ2Q5UDGZlWrDGpJ412dCRDN21mcyR5ojlQzAK+SqpD3dKV+Wg lXQ2xlvhsWOIurvcoWUJbmbfyNM+cOQucsgGY5aB5zCr+pPPe1llCqSPyuUL c4BBgloeON1xuVTqzDk7JJYNwkwfeGg28UllIpdWSaAuJr1mVsmxwVv8oVhM iESETJ5cd6pls9JOWc1Xi2mvjQZ3qyuSLXdFQzkZ4CEkma1WqERWhXKaM7E7 2ZjNxMJScgcCDGslcDaOswUzOWhWuCgN7o7LotgzLvOgCFml2ph/sh62eU8b Z+MzzxudkmCm8hARUXUL59RsdL9lxFj/ToCzerw2Kx8MWE02yCsULXcMUVeX n3fF5XyAh/hPKsE1MBpyZhX6kklvwGOx2ssqdhTrmg5Qy8PgcutlxbGlfDoE jsUL+RjJtCPkdFEwU2WRIzQuE+9KtnlHU8sQy7P0uZV4ezXida1SPxQgyrsi nQo6gtBjpvs65Q0IVREilJif7KyxrhCU0zBruHbIDSCC2/m0dNkl7eXWy61a lqstcdm1A8ltVcoE7Z6g1Ew26ExFCqqWz67ZSEsaIwbTo52E5I1MkSxJTCxP BlbRcscQdXWZpCJ0ZFQzj2CmVfYPJRKXScJQLdIxM7lCR9XqOVaNFNTykLjS PrZ/h/zNbXAFnoQLkoG6AiRnKwqkmm3jSfduTJn6JVRprGdJmAGRFpMbrEld 223Aerh999gfO/CSpSEsF81WyOOp29OM1LSapimBnPVaVRs4b+RK21MX7WOv diw9VpP/U9fLRzuNe5q8kaNTCbdo2Up7d2bNRlxujFi6WoxArQ0IxhJMd2rv YMx4odgxRF1dbn/XwOr/kd60MWYwVZAb5nfIFmSa9vVsq0YKannSkMpl6YrL LFkqt++xyOVzl2pS+9l8zE9zxbYK5VHu2hDkS9/z8jUvaKR1EC7qstx+WibJ jJJEDdKqa4FafsNJ0mTRK+THbcgUUaZbalZhwt62Qi2/8cjSeMPJNAJjNtIt 6kuBWkYQbYBaRhBtgFpGEG2AWkYQbYBaRhBtgFpGEG2gYS3Lsvzq1atxDzCC jAJwdXD4cWtuWEDvXr58Oe4xRpBRAK4ODj9uzQ2Ln3/++SUFozOiYZSYBYDD j1tzQwR6V6W/7nKCIBpF+fVRbQsZQRAEQTTD/wEN9DFb "], {{0, 97}, {324, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{324, 97}, PlotRange->{{0, 324}, {0, 97}}]], "Output", ImageSize->{328, 97}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->2033930460] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Applications", "Chapter", CellChangeTimes->{{3.686851238375558*^9, 3.6868512454809694`*^9}, { 3.6883396988807993`*^9, 3.688339704340756*^9}, {3.6884269607347517`*^9, 3.688426963963896*^9}}], Cell[CellGroupData[{ Cell["What number am I thinking?", "Subchapter", CellChangeTimes->{{3.688341033672175*^9, 3.68834106420096*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"net", "=", RowBox[{"NetChain", "[", RowBox[{ RowBox[{"{", RowBox[{"2", ",", RowBox[{"SoftmaxLayer", "[", "]"}]}], "}"}], ",", RowBox[{"\"\\"", "\[Rule]", "2"}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"NetDecoder", "[", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"Less", ",", "Greater"}], "}"}]}], "}"}], "]"}]}]}], "]"}]}]], "Input", CellID->1364422612], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnc9r62p6x9V202X/hdLdILLuSpBlQeXADAUvzmZMby4t5o7njmkJeGGC swhiIDahKF0cQYpScNqJk9ZJiThnhDsqiUlMGncST5BBISgXBSu50j3GXLI4 fZ5XsmLLTmwnxz9O8n7hnmvLr368zvvx876vnq/eP4/+4qdzf8wwzK/+FP75 6c//cfbbb38+/7M/gzd/882v/u7rb77627/6JvHV1199+5fRP4GNfw3//cUf MQy+/kRFRUU1mJrN5s3NzXfffWdSUU1C0PagBUI7nDQKIxTUrl6vQzVd121Q UU1C0PagBUI7fMGs3d7efv/995P+pqmoGtAOoTVOGohRybbtjx8/Tvo7pqJq QDuE1jhpIEYlx3Em/QVTUfmC1jhpIEYlChrV9IiCRkU1BlHQqKjGIAoaFdUY REEbUHYpy7BZ62n7VhVZqX7Gi5m4hq9R/WCveNl5P7N+vL64dvik89cPNldT IGG1eIp/E+OgWLma6rulFLQBZWkCwwhPBE1Ls0n1M17MxDVsjS61d6l3Wmij WzfOjad8o0YRKHt3elU/L66lUsunt416JZcSdm6fcKxxiYI2oKySB5olxSKx GM+A2IRmYqiL8ZFohMUtfLJsYSuMRUWvAZWysV+vr5DPGDYqPY3T0csSI5xY IldnKhEuWW04SjZKrpqTsJINu5KPeLWICIf7UluN7ILglWSScgkKyrFIQkhz DJNWzdbxL9dSi9pVw706XhNSJBKtVSy3frrzbucU/oUNi4uLgrAorO7UG+7h 9qpXaK+Cl3R7vpdKrZzW7y8XIuGqdklengupxUP8qL65mNo5n17UKGgDKgAt C40skTNsQ44yrKABVkBdVFQtSxehxcXyDUvl2bTXyLQ0n1RrJTnBxmTdnFbO 4DoFjkkq8KKai0IVDCUJ3FQsR1ezUKVKo5pgmIio2rYhAW/JvaBGeh4+4QtV U9ckYE2qXIgcQicWSobtH/y2BihtAg2V3GJqtXjbuNUgEK0fQxgS1o8bt1dG zbgyDpcBp73Tq8N1+KxWdy+PtyFs1SDwXR6ur23X2hlyb71uolF8l0qtGeT1 +c7yYq4y1m9tGFHQBlQLNFPgeIUQY6lJDrpPlsoxCd0rZBZYeI2gCW2gmdDR 4qa76+joMvx8GA1H4hlBs5Qkx0SS2WxWzAJxjPBf2ywT8+voWIZpBzVS01xE 9gdrapLlxd/BD1E01zF8sw7XEahGo7aHoWp1ffvg+NxyGz5oRMc5IbXyAWCC sqmV9e3t7Z1tIC61Wak3eqt+kAM0Ux9qfoHb083U4vZDpScuCtqA6gGa19ja 4heBLlo2VZ7zRnNOLoI9KGvqQYPfiDTDSlohwkQhKhQSHJfMyhJIlkRJPcix QR1ts6pbQY3gxyZR8EJKoyRwbFoRWCatdcTu2t6K0Io1V7Xjvc21RSDknWa1 QLs6AKZWayRKHawJwvr2hz3Qh72dvePLnr3BS+AytZw7b+OqDqClNqe200BB G1CtyZAu0GwNxyMK/t5rWZ7hRNvDDU5uKPCRoJmWmmZjebvPGSasioxDLS6N +FSggxghI0qnHGV4zSxD91hQESjsVCaUoEYV0pWsQmVNDV4JpRoBzWw/Ms5U rHxwG7d7y6l3RTyIhf3D3AUBzb3UALs9ZAZ6hC5QCT1IBMg9X00tY0Cr1w60 4/Y5xRocaHkHL8/FXbyN1vF6aqU4tTOPFLQBZeH0fhg0noAGjZDzZgcYPl+B 1mfJMe89x7MwjDMdPY8DF16c2t9blKnARUtl7/dAz3pzHzA0yyrwPVYLgv+e iUGF2moEI9NW5dN5GMPCGC0EGnC1SALWba3ozYWkUoubBwYAuLx+XNlcTt1r 5fT2cnul9Wb70PVD1eLxffCq76yk2nfxepeHa4urRWOM39dwoqA9V5bfUbQt u/18tmV96ffLHahSRxiGOvUOy6TkI9V1iyuptUPvZ8a9rd/2jTtYaKgZRPcU glxleicdKWjPFgHN7F/udetKW1xcvxrZ4U+3l1f2aiM7/GcQBY1qPHKHC1FT dPDPIgoaFdUYREGjohqDKGhUVGMQBY2Kagx6zaDVK9srm4Nmx1klkbkXLxZ6 7xj4RzrLMwlJg20CH1H730uzshze5h7wwiYiapMZVq8UNNfYWcO7nsIQoAkM k9Ztx7atqooQJZUet0cD/0hbedtLuJWrF8HN7sdP1Z1cMW2iNplh9bJAuzva EJeWlqT3xqd+oBV39rbXlpcHzvdu5Tr6wtQjLhsyidjle/9IDcqzQXkbdk6q px5opWws63HkG2ocVUy0Al+pF2iOJvkFIkLBMhWeTZRJ5Swty0Ul26lmPZ8O ce7YFZmPJIQEbEkPhiu1yYxcHmhNo5hZWsqIW+bdpFl5lq4zbxdOrm9uXKxG 366je7oZZI/3VQg0m7wth00iZuAfIeUTWhWlyklolYrlp295Kf3koCQh2VJZ jHe2Xc2RYmHQnKrMYMKhY1fzUEC1zHSrGedjmCqvJFkmkbccW83yTCRnlrIk VUosVQdNSaI2mVHLj2h37o17vTUff38zYVSepxsxLgY1GGCMlnsmaP8RNomU A/+I5bV2X5yQLzcaXaDZKs+lTUzchSLRrFwo61aviGZXyyWlkBMSPBJnERyi BcACwqpqGWmWiSQFNLWkMe9S+W+4tthQIyhqkxm12ruO+5n54pcP2nXrzUhB wxDAS3thk4hm3YPW3nX0dA+a362C5u0512xDzUsJ7P6xORjKdTpNHIx0TDQt KlohxvI4nUIMAooisBHZaegY0ETJN7WIuf/9n+5T9xW1yYxWFLQBvyh/csPB yZByPs0Q/0uXScQK/CMhMIkC0LiIhA1PBVrZLBylFYBM7LGp5xAUkgqeyrIt y7L/D+JXJNfAgRLEHY7MWzp5YhAQEFgbwlAEB3cNpyKxXLb2pMebUJvMSDV6 0O5c1222hn5NY3d+YWuodTXMohhf2LjuX/DTE0BbHgK0jun9rD+9HzKJNAL/ SO3hiGaV5ZaLhmf5rNmwckmuZUoRKrYlRpj2c6m/V3i/B8pz2A3F6TuIKRDl KqSKjqEEe2QV3fYdPUOK2mRGqQdBax69YZilotdsXXGGyRy5j7XxO2NDLoYI 0nczQXOZl0/wQEdLcNRhaL7bisPes/uPnryl4UD7bN9hH5PIQ/s4oS2PHgQ/ 9v9PSpVE3pu+CPSgieWpojaZz6jHQWNmlki7dTMzzNLRo3yYG0BQOw03R0jZ wtaJe9c0iuLc0nsIa+4JbMwMuVLU3X1E7KPJgDZ2WSJGOF6Z6lttnaI2mcdB g0i0a8Kbe9Dcs8zcbCtIHREAXDnub5lBMTNzsvupKb+FEu9DJBDQ5jekea/8 0taZt93Y34i/mfE2Lmyc4GGbZ/EZPODs7Oyb+EaA8Ik0n3lfFN+SwjNzRbOd 2lcCWhDWviRRm8xDoM0yb7d2oacXv/7UFH3QruH97NIuvLq7OZqD4HSCBNxc X5/tAjsLZ9fXpmmY17DxegE46uptuic40pld2DJd90gCFOMGiVnvMwvyvgF8 mftYgNxluLvGQ5Ejz2TuQRPhB2BGLOqua8ABZpaOXiFoVF+cHgVt9qTpyrNM fOtIeoOgNc/wpuTbJUkScTYZB0+tdt4kfcI2rsz5FoZdEa1VzN2HkNUafDXP ihtL8/G5txgcM23d1NCRjzKzAVxnAN2s1HYOChrVlOpx0PahX4a3MpkZ0vi9 eLS0VdwvvgcV9/ePdH8HMsvRDporwf6Z9nDTBZp3ChcnUrArOZcpnujNu+vQ eNB9GLQTcRaCXdvQkYJGNaXqAxq277vdOZJUg+HJiHtdRzKI0o/2gxHSnbEB ZbaQu+bNNR7luriEVO6euXd35snGmzdL0DXsDRqGNmYLe453Z2SiMjMMaGON aM5nn9ujehV6HDR/jGW+h/6cSN40zeLcTDBn/7Z4nxzZ3J2fDebydbL5bGsh KBqXMDwiNTMdoHlH3V3ypl6Y2fj8284+Z8cuAFdmNgiUZ9KTu45hn8UAMnNJ vlUbTir1nvLTSC6uoF2ocq76PCJLWd67ZTaFojaZYfW0G9ZNF+9CD7a92X7D +hHdNQcr95gGBa3bZ9FXpoopERXCTlnGdIhepGGaooR5Elaa4ZTngaaRnK5n HWJkojaZYfU6U7B6+Sz6iPhihFbmgS6LeUx+qhb8tAg+CSGuJHqGkZ98/bOf kBesVK5JsUiUrD7DRtJy1nO7RAoY7Qwp5iWEsEKh4lTzHMOTtEGD5Azq3aAZ muTvgAkkhsBzske+pUXYWNnu9LbY5QQfFYQYSfh/vHLUJjNyvU7Qevos+sgq ee2JjyalfIm0bx0tIkLBtHQZmjMv22Y5wUKvsnpRK3kvLAdXn2GTeRM+QsJE 3TZzMWyFVRkdbXDqKjpNMGVXxSz8bB6fK44rHnaBVoGmntWMhoOmlaRqQnmW pCbq+RgTydVC3hbyCGV4USj178NSm8yo9UpBQ4V9FgPIrmiKRByVAE/VxBR6 f6BiKQBJybYEjmTXN4IX948QJ0n75DMv9d0xyyWtkBPR+8J5a4nqGAmYiJf8 3h3RzGpZUwuikCDDQJP41BLQzGQe0wvD3pbf4pP/c/pgzYDaZEas1wpaD5/F 4yqLiWwp6IHp+Iu/+xsIA340xKUuOM0KsDJ7gubZ0DzQqjnghU2LOVUROf9Z x9UkYdjrEIZBI4GMjaZzigp9TtIxMwWWFdUHvC2//4CXNOg4kdpkRquXBdq1 GL+fhHwEtJ4+i8dVxvzCRNnEY8LQDIKFdLyP3agC/npr8CmucN0GGsuRaccH QctBmyaxoExWNLSwecMZ8iXsWSaqHmhJxSYJu8QtA0GHBFAbjaLe03sIrTB2 7OVtuUD2B3gWkC9qkxmp2kE7Ehe+cIe1K76dnYvHM1v6p8dA6+2z6PdNGVIi mN73nmrVMFTRt4jgOjJWG1ZOgdwLEEt/6Ow6+qABcobiG084Hkum1zMMdj4b 3lOwOEErdbplBO1E6HDLkN5m6zEI5BI7vS12iR8GNGqTGan8Z4bou/Px+JuZ ucHcKFOsu7smiNwlGNUNazNkcHGssONliKN52cGDJwm3vDT+HlZZDD2Bp8vb 8nRRm8xnVCui3bfPF6MXn4JVymKE83p00y5qk3lRj5vr0IsHLTCDfhGiNplJ AzEqvXzQqL4cUdCoqMYgChoV1RhEQRtW5J4WRZhqOFHQBpdZku9vpHHJB4wy 9hAGGaeak9Vpm8/QhEhbPvCTZKmRfut6P/MsX5xPh4I2qMj93ESu7L3B9A22 Z1saxiDjqByTnrasoZLQemL5k+VoPNtnfY1nnuWL8+lQ0AZUGW0y4j1AmHfB iOULMRrzMvusUjaaVSQ/TaLDIMMwfK6MD/LuKPzrtVgr16I0+ahm5ZMkF4SL RDmW5HeFnTKVvJ8cEhEKeL12NdvyCMkkuluVnFfbSCzCehGtc5mbXmfxz/7i fToUtAGlCRwnlNo2WPiIcO00yLDyMhhto80gA3/sqKhbloo+tUS1Le+RFH5v lGUOWqBuTnzIp2OeZVQzLIO4XQCBsFNGz2NGmabbZgmzG9UL4o8RKqapoUco UnF0YqXRLFuXon6GWGiZm2rXWYILePE+HQragOoGLR0GTSAJ7W1OGZbN+Vkb RoJhc/pFuLCt8k94dvcIpCTYaMtRoyTg0sKmm4V//gcmmvcKOKZh2maaZeSq 9w3jMlJZ9d/vrTRmgcV+dXiZm3/6ZfgswQW8eJ8OBW1AYfY+L9138Zwy2jDL f2hh1ajKUWLD7GGQ8R9xUKmFC1sq32/SYDwqxNhk68HHnssg5JT5t3e/DMZE tqnr1kWa5Qr+HmhuTf/nv7JB1qWtcjhGCy9z8y9/Hz5L2yW8cJ8OBW1QhSZD 0J4Cf3r8YZfQPmYInLf8RGCQIUn4aUx9JysD8iW7qzCuvpSoTrzj6Lld2LQe uF28hXLanDK//Z2Iy21gWzfQKKPWIPQwyQLZAz7iNAt/edIKhh0NOooYqcPL 3Bx0naXjGl60T4eCNrjMktxa9OV+er8s+1MauDIMghYYZGrY3DjfQpLMV3oU dqqepXrykyHOvS+GjJ6sLqeMXUj779moZKBtSI22yqdJ7XSlbe1FMkYLLXPT 6yxtetE+HQrakHIs0zQ73SIPrAMDXccI3iTr/LTPojETld1jiZtOp0xXCTt8 976HlSa0qfssD+kl+XQoaCNT+xiNatKatE+Hgkb1SjRZnw4FjYpqDKKgUVGN QRQ0KqoxiIJGRTUGUdCoqMagFwya67ofP36c9BdMRdWAdgitcdJAjEpQux9+ +GHS3zEVVQPaIbTGSQMxKv34448/ENG4RjUpeb/2IGiNkwZihILaNTDx03Wo qCYhl6Qcv2zKqKioqKioQP8PXb46/g== "], {{0, 77}, {291, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{291, 77}, PlotRange->{{0, 291}, {0, 77}}]], "Output", ImageSize->{295, 77}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->241304798] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trained", "=", RowBox[{"NetTrain", "[", RowBox[{"net", ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "\[Rule]", "Less"}], ",", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], "\[Rule]", "Less"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "2"}], "}"}], "\[Rule]", "Greater"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}], "\[Rule]", "Greater"}]}], "}"}]}], "]"}]}]], "Input", CellID->343630102], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnc9r62p6x9V202X/hdLdILLuSpBlQeXADAUvzmZMby4t5o7njmkJeGGC swhiIDahKF0cQYpScNqJk9ZJiThnhDsqiUlMGncST5BBISgXBSu50j3GXLI4 fZ5XsmLLTmwnxz9O8n7hnmvLr368zvvx876vnq/eP4/+4qdzf8wwzK/+FP75 6c//cfbbb38+/7M/gzd/882v/u7rb77627/6JvHV1199+5fRP4GNfw3//cUf MQy+/kRFRUU1mJrN5s3NzXfffWdSUU1C0PagBUI7nDQKIxTUrl6vQzVd121Q UU1C0PagBUI7fMGs3d7efv/995P+pqmoGtAOoTVOGohRybbtjx8/Tvo7pqJq QDuE1jhpIEYlx3Em/QVTUfmC1jhpIEYlChrV9IiCRkU1BlHQqKjGIAoaFdUY REEbUHYpy7BZ62n7VhVZqX7Gi5m4hq9R/WCveNl5P7N+vL64dvik89cPNldT IGG1eIp/E+OgWLma6rulFLQBZWkCwwhPBE1Ls0n1M17MxDVsjS61d6l3Wmij WzfOjad8o0YRKHt3elU/L66lUsunt416JZcSdm6fcKxxiYI2oKySB5olxSKx GM+A2IRmYqiL8ZFohMUtfLJsYSuMRUWvAZWysV+vr5DPGDYqPY3T0csSI5xY IldnKhEuWW04SjZKrpqTsJINu5KPeLWICIf7UluN7ILglWSScgkKyrFIQkhz DJNWzdbxL9dSi9pVw706XhNSJBKtVSy3frrzbucU/oUNi4uLgrAorO7UG+7h 9qpXaK+Cl3R7vpdKrZzW7y8XIuGqdklengupxUP8qL65mNo5n17UKGgDKgAt C40skTNsQ44yrKABVkBdVFQtSxehxcXyDUvl2bTXyLQ0n1RrJTnBxmTdnFbO 4DoFjkkq8KKai0IVDCUJ3FQsR1ezUKVKo5pgmIio2rYhAW/JvaBGeh4+4QtV U9ckYE2qXIgcQicWSobtH/y2BihtAg2V3GJqtXjbuNUgEK0fQxgS1o8bt1dG zbgyDpcBp73Tq8N1+KxWdy+PtyFs1SDwXR6ur23X2hlyb71uolF8l0qtGeT1 +c7yYq4y1m9tGFHQBlQLNFPgeIUQY6lJDrpPlsoxCd0rZBZYeI2gCW2gmdDR 4qa76+joMvx8GA1H4hlBs5Qkx0SS2WxWzAJxjPBf2ywT8+voWIZpBzVS01xE 9gdrapLlxd/BD1E01zF8sw7XEahGo7aHoWp1ffvg+NxyGz5oRMc5IbXyAWCC sqmV9e3t7Z1tIC61Wak3eqt+kAM0Ux9qfoHb083U4vZDpScuCtqA6gGa19ja 4heBLlo2VZ7zRnNOLoI9KGvqQYPfiDTDSlohwkQhKhQSHJfMyhJIlkRJPcix QR1ts6pbQY3gxyZR8EJKoyRwbFoRWCatdcTu2t6K0Io1V7Xjvc21RSDknWa1 QLs6AKZWayRKHawJwvr2hz3Qh72dvePLnr3BS+AytZw7b+OqDqClNqe200BB G1CtyZAu0GwNxyMK/t5rWZ7hRNvDDU5uKPCRoJmWmmZjebvPGSasioxDLS6N +FSggxghI0qnHGV4zSxD91hQESjsVCaUoEYV0pWsQmVNDV4JpRoBzWw/Ms5U rHxwG7d7y6l3RTyIhf3D3AUBzb3UALs9ZAZ6hC5QCT1IBMg9X00tY0Cr1w60 4/Y5xRocaHkHL8/FXbyN1vF6aqU4tTOPFLQBZeH0fhg0noAGjZDzZgcYPl+B 1mfJMe89x7MwjDMdPY8DF16c2t9blKnARUtl7/dAz3pzHzA0yyrwPVYLgv+e iUGF2moEI9NW5dN5GMPCGC0EGnC1SALWba3ozYWkUoubBwYAuLx+XNlcTt1r 5fT2cnul9Wb70PVD1eLxffCq76yk2nfxepeHa4urRWOM39dwoqA9V5bfUbQt u/18tmV96ffLHahSRxiGOvUOy6TkI9V1iyuptUPvZ8a9rd/2jTtYaKgZRPcU glxleicdKWjPFgHN7F/udetKW1xcvxrZ4U+3l1f2aiM7/GcQBY1qPHKHC1FT dPDPIgoaFdUYREGjohqDKGhUVGMQBY2Kagx6zaDVK9srm4Nmx1klkbkXLxZ6 7xj4RzrLMwlJg20CH1H730uzshze5h7wwiYiapMZVq8UNNfYWcO7nsIQoAkM k9Ztx7atqooQJZUet0cD/0hbedtLuJWrF8HN7sdP1Z1cMW2iNplh9bJAuzva EJeWlqT3xqd+oBV39rbXlpcHzvdu5Tr6wtQjLhsyidjle/9IDcqzQXkbdk6q px5opWws63HkG2ocVUy0Al+pF2iOJvkFIkLBMhWeTZRJ5Swty0Ul26lmPZ8O ce7YFZmPJIQEbEkPhiu1yYxcHmhNo5hZWsqIW+bdpFl5lq4zbxdOrm9uXKxG 366je7oZZI/3VQg0m7wth00iZuAfIeUTWhWlyklolYrlp295Kf3koCQh2VJZ jHe2Xc2RYmHQnKrMYMKhY1fzUEC1zHSrGedjmCqvJFkmkbccW83yTCRnlrIk VUosVQdNSaI2mVHLj2h37o17vTUff38zYVSepxsxLgY1GGCMlnsmaP8RNomU A/+I5bV2X5yQLzcaXaDZKs+lTUzchSLRrFwo61aviGZXyyWlkBMSPBJnERyi BcACwqpqGWmWiSQFNLWkMe9S+W+4tthQIyhqkxm12ruO+5n54pcP2nXrzUhB wxDAS3thk4hm3YPW3nX0dA+a362C5u0512xDzUsJ7P6xORjKdTpNHIx0TDQt KlohxvI4nUIMAooisBHZaegY0ETJN7WIuf/9n+5T9xW1yYxWFLQBvyh/csPB yZByPs0Q/0uXScQK/CMhMIkC0LiIhA1PBVrZLBylFYBM7LGp5xAUkgqeyrIt y7L/D+JXJNfAgRLEHY7MWzp5YhAQEFgbwlAEB3cNpyKxXLb2pMebUJvMSDV6 0O5c1222hn5NY3d+YWuodTXMohhf2LjuX/DTE0BbHgK0jun9rD+9HzKJNAL/ SO3hiGaV5ZaLhmf5rNmwckmuZUoRKrYlRpj2c6m/V3i/B8pz2A3F6TuIKRDl KqSKjqEEe2QV3fYdPUOK2mRGqQdBax69YZilotdsXXGGyRy5j7XxO2NDLoYI 0nczQXOZl0/wQEdLcNRhaL7bisPes/uPnryl4UD7bN9hH5PIQ/s4oS2PHgQ/ 9v9PSpVE3pu+CPSgieWpojaZz6jHQWNmlki7dTMzzNLRo3yYG0BQOw03R0jZ wtaJe9c0iuLc0nsIa+4JbMwMuVLU3X1E7KPJgDZ2WSJGOF6Z6lttnaI2mcdB g0i0a8Kbe9Dcs8zcbCtIHREAXDnub5lBMTNzsvupKb+FEu9DJBDQ5jekea/8 0taZt93Y34i/mfE2Lmyc4GGbZ/EZPODs7Oyb+EaA8Ik0n3lfFN+SwjNzRbOd 2lcCWhDWviRRm8xDoM0yb7d2oacXv/7UFH3QruH97NIuvLq7OZqD4HSCBNxc X5/tAjsLZ9fXpmmY17DxegE46uptuic40pld2DJd90gCFOMGiVnvMwvyvgF8 mftYgNxluLvGQ5Ejz2TuQRPhB2BGLOqua8ABZpaOXiFoVF+cHgVt9qTpyrNM fOtIeoOgNc/wpuTbJUkScTYZB0+tdt4kfcI2rsz5FoZdEa1VzN2HkNUafDXP ihtL8/G5txgcM23d1NCRjzKzAVxnAN2s1HYOChrVlOpx0PahX4a3MpkZ0vi9 eLS0VdwvvgcV9/ePdH8HMsvRDporwf6Z9nDTBZp3ChcnUrArOZcpnujNu+vQ eNB9GLQTcRaCXdvQkYJGNaXqAxq277vdOZJUg+HJiHtdRzKI0o/2gxHSnbEB ZbaQu+bNNR7luriEVO6euXd35snGmzdL0DXsDRqGNmYLe453Z2SiMjMMaGON aM5nn9ujehV6HDR/jGW+h/6cSN40zeLcTDBn/7Z4nxzZ3J2fDebydbL5bGsh KBqXMDwiNTMdoHlH3V3ypl6Y2fj8284+Z8cuAFdmNgiUZ9KTu45hn8UAMnNJ vlUbTir1nvLTSC6uoF2ocq76PCJLWd67ZTaFojaZYfW0G9ZNF+9CD7a92X7D +hHdNQcr95gGBa3bZ9FXpoopERXCTlnGdIhepGGaooR5Elaa4ZTngaaRnK5n HWJkojaZYfU6U7B6+Sz6iPhihFbmgS6LeUx+qhb8tAg+CSGuJHqGkZ98/bOf kBesVK5JsUiUrD7DRtJy1nO7RAoY7Qwp5iWEsEKh4lTzHMOTtEGD5Azq3aAZ muTvgAkkhsBzske+pUXYWNnu9LbY5QQfFYQYSfh/vHLUJjNyvU7Qevos+sgq ee2JjyalfIm0bx0tIkLBtHQZmjMv22Y5wUKvsnpRK3kvLAdXn2GTeRM+QsJE 3TZzMWyFVRkdbXDqKjpNMGVXxSz8bB6fK44rHnaBVoGmntWMhoOmlaRqQnmW pCbq+RgTydVC3hbyCGV4USj178NSm8yo9UpBQ4V9FgPIrmiKRByVAE/VxBR6 f6BiKQBJybYEjmTXN4IX948QJ0n75DMv9d0xyyWtkBPR+8J5a4nqGAmYiJf8 3h3RzGpZUwuikCDDQJP41BLQzGQe0wvD3pbf4pP/c/pgzYDaZEas1wpaD5/F 4yqLiWwp6IHp+Iu/+xsIA340xKUuOM0KsDJ7gubZ0DzQqjnghU2LOVUROf9Z x9UkYdjrEIZBI4GMjaZzigp9TtIxMwWWFdUHvC2//4CXNOg4kdpkRquXBdq1 GL+fhHwEtJ4+i8dVxvzCRNnEY8LQDIKFdLyP3agC/npr8CmucN0GGsuRaccH QctBmyaxoExWNLSwecMZ8iXsWSaqHmhJxSYJu8QtA0GHBFAbjaLe03sIrTB2 7OVtuUD2B3gWkC9qkxmp2kE7Ehe+cIe1K76dnYvHM1v6p8dA6+2z6PdNGVIi mN73nmrVMFTRt4jgOjJWG1ZOgdwLEEt/6Ow6+qABcobiG084Hkum1zMMdj4b 3lOwOEErdbplBO1E6HDLkN5m6zEI5BI7vS12iR8GNGqTGan8Z4bou/Px+JuZ ucHcKFOsu7smiNwlGNUNazNkcHGssONliKN52cGDJwm3vDT+HlZZDD2Bp8vb 8nRRm8xnVCui3bfPF6MXn4JVymKE83p00y5qk3lRj5vr0IsHLTCDfhGiNplJ AzEqvXzQqL4cUdCoqMYgChoV1RhEQRtW5J4WRZhqOFHQBpdZku9vpHHJB4wy 9hAGGaeak9Vpm8/QhEhbPvCTZKmRfut6P/MsX5xPh4I2qMj93ESu7L3B9A22 Z1saxiDjqByTnrasoZLQemL5k+VoPNtnfY1nnuWL8+lQ0AZUGW0y4j1AmHfB iOULMRrzMvusUjaaVSQ/TaLDIMMwfK6MD/LuKPzrtVgr16I0+ahm5ZMkF4SL RDmW5HeFnTKVvJ8cEhEKeL12NdvyCMkkuluVnFfbSCzCehGtc5mbXmfxz/7i fToUtAGlCRwnlNo2WPiIcO00yLDyMhhto80gA3/sqKhbloo+tUS1Le+RFH5v lGUOWqBuTnzIp2OeZVQzLIO4XQCBsFNGz2NGmabbZgmzG9UL4o8RKqapoUco UnF0YqXRLFuXon6GWGiZm2rXWYILePE+HQragOoGLR0GTSAJ7W1OGZbN+Vkb RoJhc/pFuLCt8k94dvcIpCTYaMtRoyTg0sKmm4V//gcmmvcKOKZh2maaZeSq 9w3jMlJZ9d/vrTRmgcV+dXiZm3/6ZfgswQW8eJ8OBW1AYfY+L9138Zwy2jDL f2hh1ajKUWLD7GGQ8R9xUKmFC1sq32/SYDwqxNhk68HHnssg5JT5t3e/DMZE tqnr1kWa5Qr+HmhuTf/nv7JB1qWtcjhGCy9z8y9/Hz5L2yW8cJ8OBW1QhSZD 0J4Cf3r8YZfQPmYInLf8RGCQIUn4aUx9JysD8iW7qzCuvpSoTrzj6Lld2LQe uF28hXLanDK//Z2Iy21gWzfQKKPWIPQwyQLZAz7iNAt/edIKhh0NOooYqcPL 3Bx0naXjGl60T4eCNrjMktxa9OV+er8s+1MauDIMghYYZGrY3DjfQpLMV3oU dqqepXrykyHOvS+GjJ6sLqeMXUj779moZKBtSI22yqdJ7XSlbe1FMkYLLXPT 6yxtetE+HQrakHIs0zQ73SIPrAMDXccI3iTr/LTPojETld1jiZtOp0xXCTt8 976HlSa0qfssD+kl+XQoaCNT+xiNatKatE+Hgkb1SjRZnw4FjYpqDKKgUVGN QRQ0KqoxiIJGRTUGUdCoqMagFwya67ofP36c9BdMRdWAdgitcdJAjEpQux9+ +GHS3zEVVQPaIbTGSQMxKv34448/ENG4RjUpeb/2IGiNkwZihILaNTDx03Wo qCYhl6Qcv2zKqKioqKioQP8PXb46/g== "], {{0, 77}, {291, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->Automatic, ImageSizeRaw->{291, 77}, PlotRange->{{0, 291}, {0, 77}}]], "Output", ImageSize->{295, 77}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellTags->"RasterizedOutput", CellID->1160614450] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"trained", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "3"}], "}"}]}], "}"}], "]"}]], "Input", CellID->1702502536], Cell[BoxData[ RowBox[{"{", RowBox[{"Less", ",", "Greater"}], "}"}]], "Output", ImageSize->{108, 16}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, CellID->1820798577] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Optical Character Recognition", "Subchapter", CellChangeTimes->{{3.6868512663528557`*^9, 3.6868512729299307`*^9}}], Cell[CellGroupData[{ Cell["Initialization", "Section", CellChangeTimes->{{3.6757869410586863`*^9, 3.6757869587695847`*^9}, { 3.676045956603855*^9, 3.676045960475119*^9}, {3.676051044799789*^9, 3.67605104658801*^9}, {3.676051917847702*^9, 3.676051919071334*^9}, { 3.676507928592152*^9, 3.67650793245385*^9}, {3.6767699174647617`*^9, 3.676769921635754*^9}, {3.686850682999064*^9, 3.686850685844821*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"lenet", "=", RowBox[{"NetChain", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"ConvolutionLayer", "[", RowBox[{"20", ",", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"ElementwiseLayer", "[", "Ramp", "]"}], ",", "\[IndentingNewLine]", RowBox[{"PoolingLayer", "[", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"ConvolutionLayer", "[", RowBox[{"50", ",", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"ElementwiseLayer", "[", "Ramp", "]"}], ",", "\[IndentingNewLine]", RowBox[{"PoolingLayer", "[", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"FlattenLayer", "[", "]"}], ",", "\[IndentingNewLine]", RowBox[{"DotPlusLayer", "[", "500", "]"}], ",", "\[IndentingNewLine]", RowBox[{"ElementwiseLayer", "[", "Ramp", "]"}], ",", "\[IndentingNewLine]", RowBox[{"DotPlusLayer", "[", "101", "]"}], ",", "\[IndentingNewLine]", RowBox[{"SoftmaxLayer", "[", "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"NetDecoder", "[", RowBox[{"\"\\"", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"FromCharacterCode", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "100"}], "}"}]}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"\"\\"", "\[Rule]", RowBox[{"NetEncoder", "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"28", ",", "28"}], "}"}], ",", "\"\\""}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.676763360925894*^9, 3.676763394530229*^9}}, CellID->399992287], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetChain", RowBox[{"[", PanelBox[ DynamicModuleBox[{NeuralNetworks`NetChain`PackagePrivate`grid$$ = Grid[{{ MouseAppearance[ Annotation["", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Input", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"encoded", " ", Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"1", "28", "28"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}]}], { "Inputs", "Input"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["1", GrayLevel[0.5]], {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ConvolutionLayer, {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"20", "24", "24"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "1"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["2", GrayLevel[0.5]], {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"20", "24", "24"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "2"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["3", GrayLevel[0.5]], {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[PoolingLayer, {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"20", "12", "12"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "3"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["4", GrayLevel[0.5]], {"Layers", "4"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ConvolutionLayer, {"Layers", "4"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "8", "8"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "4"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["5", GrayLevel[0.5]], {"Layers", "5"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "5"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "8", "8"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "5"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["6", GrayLevel[0.5]], {"Layers", "6"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[PoolingLayer, {"Layers", "6"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "4", "4"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "6"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["7", GrayLevel[0.5]], {"Layers", "7"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[FlattenLayer, {"Layers", "7"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"800"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "7"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["8", GrayLevel[0.5]], {"Layers", "8"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "8"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"500"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "8"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["9", GrayLevel[0.5]], {"Layers", "9"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "9"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"500"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "9"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["10", GrayLevel[0.5]], {"Layers", "10"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "10"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"101"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "10"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["11", GrayLevel[0.5]], {"Layers", "11"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[SoftmaxLayer, {"Layers", "11"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"101"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "11"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation["", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Output", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"decoded", " ", Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"101"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}]}], {"Outputs", "Output"}, "Mouse"], "LinkHand"]}}, Alignment -> Left, Spacings -> 1.1], NeuralNetworks`NetChain`PackagePrivate`assoc$$ = Association[ "Type" -> "Chain", "Layers" -> Association[ "1" -> Association[ "Type" -> "Convolution", "Arrays" -> Association["Weights" -> NeuralNetworks`ChannelT[20, NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {5, 5}]]], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {20}]]], "Parameters" -> Association[ "OutputChannels" -> 20, "KernelSize" -> {5, 5}, "Stride" -> {1, 1}, "PaddingSize" -> {0, 0}, "Dilation" -> {1, 1}, "InputChannels" -> 1, "$GroupNumber" -> 1, "$InputSize" -> {28, 28}, "$OutputSize" -> {24, 24}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {28, 28}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {24, 24}]]]], "2" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {20, 24, 24}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {24, 24}]]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[3, {20, 24, 24}]]], "3" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {2, 2}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 20, "$InputSize" -> {24, 24}, "$OutputSize" -> {12, 12}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {20, 24, 24}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {12, 12}]]]], "4" -> Association[ "Type" -> "Convolution", "Arrays" -> Association["Weights" -> NeuralNetworks`ChannelT[50, NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {5, 5}]]], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {50}]]], "Parameters" -> Association[ "OutputChannels" -> 50, "KernelSize" -> {5, 5}, "Stride" -> {1, 1}, "PaddingSize" -> {0, 0}, "Dilation" -> {1, 1}, "InputChannels" -> 20, "$GroupNumber" -> 1, "$InputSize" -> {12, 12}, "$OutputSize" -> {8, 8}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {12, 12}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {8, 8}]]]], "5" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {50, 8, 8}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {8, 8}]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[3, {50, 8, 8}]]], "6" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {2, 2}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 50, "$InputSize" -> {8, 8}, "$OutputSize" -> {4, 4}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {50, 8, 8}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {4, 4}]]]], "7" -> Association[ "Type" -> "Flatten", "Arrays" -> Association[], "Parameters" -> Association[ "Dimensions" -> {50, 4, 4}, "$Rank" -> 3, "$OutputSize" -> 800], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {4, 4}]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {800}]]], "8" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {500, 800}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {500}]]], "Parameters" -> Association["Size" -> 500, "$InputSize" -> 800], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {800}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {500}]]], "9" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {500}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {500}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {500}]]], "10" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {101, 500}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {101}]]], "Parameters" -> Association["Size" -> 101, "$InputSize" -> 500], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {500}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {101}]]], "11" -> Association[ "Type" -> "Softmax", "Arrays" -> Association[], "Parameters" -> Association["Size" -> 101], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {101}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {101}]]]], "Connections" -> { NetPort["Layers", "1", "Inputs", "Input"] -> NetPort["Inputs", "Input"], NetPort["Layers", "2", "Inputs", "Input"] -> NetPort["Layers", "1", "Outputs", "Output"], NetPort["Layers", "3", "Inputs", "Input"] -> NetPort["Layers", "2", "Outputs", "Output"], NetPort["Layers", "4", "Inputs", "Input"] -> NetPort["Layers", "3", "Outputs", "Output"], NetPort["Layers", "5", "Inputs", "Input"] -> NetPort["Layers", "4", "Outputs", "Output"], NetPort["Layers", "6", "Inputs", "Input"] -> NetPort["Layers", "5", "Outputs", "Output"], NetPort["Layers", "7", "Inputs", "Input"] -> NetPort["Layers", "6", "Outputs", "Output"], NetPort["Layers", "8", "Inputs", "Input"] -> NetPort["Layers", "7", "Outputs", "Output"], NetPort["Layers", "9", "Inputs", "Input"] -> NetPort["Layers", "8", "Outputs", "Output"], NetPort["Layers", "10", "Inputs", "Input"] -> NetPort["Layers", "9", "Outputs", "Output"], NetPort["Layers", "11", "Inputs", "Input"] -> NetPort["Layers", "10", "Outputs", "Output"], NetPort["Outputs", "Output"] -> NetPort["Layers", "11", "Outputs", "Output"]}, "Inputs" -> Association["Input" -> NeuralNetworks`EncodedType[ NetEncoder["Image", Association[ "Parameters" -> Association[ "ImageSize" -> {28, 28}, "ColorSpace" -> "Grayscale", "ColorChannels" -> 1, "$AugmentationFunction" -> None, "Parallelize" -> False, "MeanImage" -> None], "Output" -> NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {28, 28}]]]], NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {28, 28}]]]], "Outputs" -> Association["Output" -> NeuralNetworks`DecodedType[ NetDecoder["Class", Association[ "Parameters" -> Association[ "Labels" -> { "\.00", "\.01", "\.02", "\.03", "\.04", "\.05", "\.06", "\.07", "\.08", "\t", "\n", "\.0b", "\.0c", "\n", "\.0e", "\.0f", "\.10", "\.11", "\.12", "\.13", "\.14", "\.15", "\.16", "\.17", "\.18", "\.19", "\.1a", "\[RawEscape]", "\.1c", "\.1d", "\.1e", "\.1f", " ", "!", "\"", "#", "$", "%", "&", "'", "(", ")", "*", "+", ",", "-", ".", "/", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", ":", ";", "<", "=", ">", "?", "@", "A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "[", "\\", "]", "^", "_", "`", "a", "b", "c", "d"}, "Dimensions" -> 101], "Input" -> NeuralNetworks`TensorT[1, {101}]]], NeuralNetworks`TensorT[1, {101}]]]], NeuralNetworks`NetChain`PackagePrivate`opart$$, NeuralNetworks`NetChain`PackagePrivate`part$$, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Null}, DynamicBox[ToBoxes[ Column[{ EventHandler[ NeuralNetworks`NetChain`PackagePrivate`grid$$, "MouseClicked" :> If[ ListQ[ NeuralNetworks`NetChain`PackagePrivate`part$$ = MouseAnnotation[]], If[NeuralNetworks`NetChain`PackagePrivate`opart$$ === NeuralNetworks`NetChain`PackagePrivate`part$$, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Null; NeuralNetworks`NetChain`PackagePrivate`opart$$ = Null, NeuralNetworks`NetChain`PackagePrivate`selected$$ = Part[NeuralNetworks`NetChain`PackagePrivate`assoc$$, Apply[ Sequence, NeuralNetworks`NetChain`PackagePrivate`part$$]]; NeuralNetworks`NetChain`PackagePrivate`opart$$ = NeuralNetworks`NetChain`PackagePrivate`part$$; Null]; Null]], NeuralNetworks`NetChain`PackagePrivate`fmtSelected[ NeuralNetworks`NetChain`PackagePrivate`selected$$, NeuralNetworks`NetChain`PackagePrivate`part$$]}, Spacings -> 1], StandardForm], ImageSizeCache->{271., {93.4169921875, 98.5830078125}}, TrackedSymbols:>{NeuralNetworks`NetChain`PackagePrivate`selected$$}], DynamicModuleValues:>{}], BaselinePosition->Automatic], "]"}]}], False], Deploy], LineBreakWithin->False]], "Output", CellChangeTimes->{ 3.676755966175316*^9, 3.676756009259728*^9, {3.6767603863912983`*^9, 3.676760435802134*^9}, 3.6767625508959227`*^9, 3.676763404441657*^9, 3.6883274146145277`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetGraph", "[", "lenet", "]"}]], "Input", CellChangeTimes->{{3.688330602262745*^9, 3.688330611468223*^9}}], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetGraph", RowBox[{"[", PanelBox[ TagBox[ DynamicModuleBox[{NeuralNetworks`NetGraph`PackagePrivate`selection$$ = None, NeuralNetworks`NetGraph`PackagePrivate`outIndex$$ = 12, NeuralNetworks`NetGraph`PackagePrivate`inputs$$ = Association[ "Input" -> NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {28, 28}]]], NeuralNetworks`NetGraph`PackagePrivate`outputs$$ = Association[ "Output" -> NeuralNetworks`TensorT[1, {101}]], NeuralNetworks`NetGraph`PackagePrivate`labels$$ = { "1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "Input", "Output"}, NeuralNetworks`NetGraph`PackagePrivate`vertices$$ = Association[ "1" -> Association[ "Type" -> "Convolution", "Arrays" -> Association["Weights" -> NeuralNetworks`ChannelT[20, NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {5, 5}]]], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {20}]]], "Parameters" -> Association[ "OutputChannels" -> 20, "KernelSize" -> {5, 5}, "Stride" -> {1, 1}, "PaddingSize" -> {0, 0}, "Dilation" -> {1, 1}, "InputChannels" -> 1, "$GroupNumber" -> 1, "$InputSize" -> {28, 28}, "$OutputSize" -> {24, 24}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {28, 28}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {24, 24}]]]], "2" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {20, 24, 24}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {24, 24}]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[3, {20, 24, 24}]]], "3" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {2, 2}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 20, "$InputSize" -> {24, 24}, "$OutputSize" -> {12, 12}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {20, 24, 24}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {12, 12}]]]], "4" -> Association[ "Type" -> "Convolution", "Arrays" -> Association["Weights" -> NeuralNetworks`ChannelT[50, NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {5, 5}]]], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {50}]]], "Parameters" -> Association[ "OutputChannels" -> 50, "KernelSize" -> {5, 5}, "Stride" -> {1, 1}, "PaddingSize" -> {0, 0}, "Dilation" -> {1, 1}, "InputChannels" -> 20, "$GroupNumber" -> 1, "$InputSize" -> {12, 12}, "$OutputSize" -> {8, 8}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[20, NeuralNetworks`TensorT[2, {12, 12}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {8, 8}]]]], "5" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {50, 8, 8}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {8, 8}]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[3, {50, 8, 8}]]], "6" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {2, 2}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 50, "$InputSize" -> {8, 8}, "$OutputSize" -> {4, 4}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {50, 8, 8}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {4, 4}]]]], "7" -> Association[ "Type" -> "Flatten", "Arrays" -> Association[], "Parameters" -> Association[ "Dimensions" -> {50, 4, 4}, "$Rank" -> 3, "$OutputSize" -> 800], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {4, 4}]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {800}]]], "8" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {500, 800}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {500}]]], "Parameters" -> Association["Size" -> 500, "$InputSize" -> 800], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {800}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {500}]]], "9" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {500}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {500}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {500}]]], "10" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {101, 500}], "Biases" -> NeuralNetworks`Nullable[ NeuralNetworks`TensorT[1, {101}]]], "Parameters" -> Association["Size" -> 101, "$InputSize" -> 500], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {500}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {101}]]], "11" -> Association[ "Type" -> "Softmax", "Arrays" -> Association[], "Parameters" -> Association["Size" -> 101], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {101}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {101}]]]], NeuralNetworks`NetGraph`PackagePrivate`vports$$ = { NetPort["Vertices", "1"], NetPort["Vertices", "2"], NetPort["Vertices", "3"], NetPort["Vertices", "4"], NetPort["Vertices", "5"], NetPort["Vertices", "6"], NetPort["Vertices", "7"], NetPort["Vertices", "8"], NetPort["Vertices", "9"], NetPort["Vertices", "10"], NetPort["Vertices", "11"], NetPort["Inputs", "Input"], NetPort["Outputs", "Output"]}}, TagBox[GridBox[{ { TemplateBox[{PaneBox[ TagBox[ GraphicsBox[{{ GrayLevel[0.7], { LineBox[{{-11., 6.735557395310443*^-16}, {-10., 6.123233995736766*^-16}}], LineBox[{{-10., 6.123233995736766*^-16}, {-9., 5.51091059616309*^-16}}], LineBox[{{-9., 5.51091059616309*^-16}, {-8., 4.898587196589413*^-16}}], LineBox[{{-8., 4.898587196589413*^-16}, {-7., 4.286263797015736*^-16}}], LineBox[{{-7., 4.286263797015736*^-16}, {-6., 3.6739403974420594`*^-16}}], LineBox[{{-6., 3.6739403974420594`*^-16}, {-5., 3.061616997868383*^-16}}], LineBox[{{-5., 3.061616997868383*^-16}, {-4., 2.4492935982947064`*^-16}}], LineBox[{{-4., 2.4492935982947064`*^-16}, {-3., 1.8369701987210297`*^-16}}], LineBox[{{-3., 1.8369701987210297`*^-16}, {-2., 1.2246467991473532`*^-16}}], LineBox[{{-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}}], LineBox[{{-12., 7.347880794884119*^-16}, {-11., 6.735557395310443*^-16}}], LineBox[{{-1., 6.123233995736766*^-17}, {0., 0.}}]}}, { InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-10.4, 6.368163355566237*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-9.399999999999999, 5.755839955992561*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-8.4, 5.143516556418883*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-7.4, 4.531193156845207*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-6.4, 3.9188697572715305`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-5.4, 3.3065463576978537`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736762*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-4.4, 2.694222958124177*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-3.4, 2.0818995585505003`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-2.4000000000000004`, 1.4695761589768238`*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736765*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-1.4, 8.572527594031473*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-11.4, 6.980486755139913*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736757*^-17}], InsetBox[ GraphicsBox[ StyleBox[ PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}], GrayLevel[0.7], StripOnInput -> False]], {-0.4, 2.4492935982947065`*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}]}, { GrayLevel[0], { AbsolutePointSize[5], {{ Hue[0.61, 0.75, 1], TagBox[ PointBox[{-11., 6.735557395310443*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 1), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.29, 0.29, 0.83], TagBox[ PointBox[{-10., 6.123233995736766*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 2), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.38759999999999994`, 0.57, 0.], TagBox[ PointBox[{-9., 5.51091059616309*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 3), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { Hue[0.61, 0.75, 1], TagBox[ PointBox[{-8., 4.898587196589413*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 4), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.29, 0.29, 0.83], TagBox[ PointBox[{-7., 4.286263797015736*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 5), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.38759999999999994`, 0.57, 0.], TagBox[ PointBox[{-6., 3.6739403974420594`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 6), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[1., 0.4, 0.], TagBox[ PointBox[{-5., 3.061616997868383*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 7), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.35], TagBox[ PointBox[{-4., 2.4492935982947064`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 8), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.29, 0.29, 0.83], TagBox[ PointBox[{-3., 1.8369701987210297`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 9), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.35], TagBox[ PointBox[{-2., 1.2246467991473532`*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 10), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { RGBColor[0.78, 0.64, 0.98], TagBox[ PointBox[{-1., 6.123233995736766*^-17}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 11), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.5], TagBox[ PointBox[{-12., 7.347880794884119*^-16}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 12), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}, { GrayLevel[0.5], TagBox[ PointBox[{0., 0.}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = 13), PassEventsUp -> False, Method -> "Preemptive", PassEventsDown -> Automatic}]]}}}}, {{ InsetBox[ FormBox["\"1\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-11., 6.735557395310443*^-16}], Offset[{0, -5.5}, {-11., 6.735557395310443*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"2\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-10., 6.123233995736766*^-16}], Offset[{0, -5.5}, {-10., 6.123233995736766*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"3\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-9., 5.51091059616309*^-16}], Offset[{0, -5.5}, {-9., 5.51091059616309*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"4\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-8., 4.898587196589413*^-16}], Offset[{0, -5.5}, {-8., 4.898587196589413*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"5\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-7., 4.286263797015736*^-16}], Offset[{0, -5.5}, {-7., 4.286263797015736*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"6\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-6., 3.6739403974420594`*^-16}], Offset[{0, -5.5}, {-6., 3.6739403974420594`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"7\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-5., 3.061616997868383*^-16}], Offset[{0, -5.5}, {-5., 3.061616997868383*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"8\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-4., 2.4492935982947064`*^-16}], Offset[{0, -5.5}, {-4., 2.4492935982947064`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"9\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-3., 1.8369701987210297`*^-16}], Offset[{0, -5.5}, {-3., 1.8369701987210297`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"10\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-2., 1.2246467991473532`*^-16}], Offset[{0, -5.5}, {-2., 1.2246467991473532`*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"11\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-1., 6.123233995736766*^-17}], Offset[{0, -5.5}, {-1., 6.123233995736766*^-17}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"Input\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {-12., 7.347880794884119*^-16}], Offset[{0, -5.5}, {-12., 7.347880794884119*^-16}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}], InsetBox[ FormBox["\"Output\"", TraditionalForm], NCache[ Offset[{0, Rational[-11, 2]}, {0., 0.}], Offset[{0, -5.5}, {0., 0.}]], ImageScaled[{ Rational[1, 2], 1.}], Automatic, {1, 0}]}, StyleBox[{ InsetBox[ FormBox["\"20\[Cross]24\[Cross]24\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-10.4, 6.368163355566237*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"20\[Cross]24\[Cross]24\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-9.399999999999999, 5.755839955992561*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"20\[Cross]12\[Cross]12\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-8.4, 5.143516556418883*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"50\[Cross]8\[Cross]8\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-7.4, 4.531193156845207*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"50\[Cross]8\[Cross]8\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-6.4, 3.9188697572715305`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"50\[Cross]4\[Cross]4\"", TraditionalForm], Offset[{3.3677786976552195`*^-16, 5.5}, {-5.4, 3.3065463576978537`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736762*^-17}], InsetBox[ FormBox["\"800\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-4.4, 2.694222958124177*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"500\"", TraditionalForm], Offset[{3.367778697655222*^-16, 5.5}, {-3.4, 2.0818995585505003`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ FormBox["\"500\"", TraditionalForm], Offset[{3.3677786976552205`*^-16, 5.5}, {-2.4000000000000004`, 1.4695761589768238`*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736765*^-17}], InsetBox[ FormBox["\"101\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-1.4, 8.572527594031473*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}], InsetBox[ FormBox["\"1\[Cross]28\[Cross]28\"", TraditionalForm], Offset[{3.3677786976552166`*^-16, 5.5}, {-11.4, 6.980486755139913*^-16}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736757*^-17}], InsetBox[ FormBox["\"101\"", TraditionalForm], Offset[{3.3677786976552215`*^-16, 5.5}, {-0.4, 2.4492935982947065`*^-17}], ImageScaled[{0.5, 0.415}], Automatic, { 1., -6.123233995736766*^-17}]}, FontColor -> GrayLevel[0.5], FontSize -> 8, FontWeight -> "Thin", StripOnInput -> False]}, DynamicModuleBox[{ GeneralUtilities`Graphics`PackagePrivate`vpos$2041 = \ {{-11., 6.735557395310443*^-16}, {-10., 6.123233995736766*^-16}, {-9., 5.51091059616309*^-16}, {-8., 4.898587196589413*^-16}, {-7., 4.286263797015736*^-16}, {-6., 3.6739403974420594`*^-16}, {-5., 3.061616997868383*^-16}, {-4., 2.4492935982947064`*^-16}, {-3., 1.8369701987210297`*^-16}, {-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}, {-12., 7.347880794884119*^-16}, { 0., 0.}}}, DynamicBox[ Typeset`ToBoxes[ If[ Not[ IntegerQ[ NeuralNetworks`NetGraph`PackagePrivate`selection$$]], {}, { AbsolutePointSize[10], Opacity[0.2, Black], Point[ Part[ GeneralUtilities`Graphics`PackagePrivate`vpos$2041, NeuralNetworks`NetGraph`PackagePrivate`selection$$]]}], StandardForm, Graphics], TrackedSymbols :> { NeuralNetworks`NetGraph`PackagePrivate`selection$$}], DynamicModuleValues :> {}]}, ImageSize -> {810., 25.680000000000046`}, AspectRatio -> Full, PlotRangePadding -> 0, ImagePadding -> {{19.5, 22.5}, {15.5, 10.179999999999998`}}, ImageMargins -> {{0, 0}, {15, 15}}, BaseStyle -> {TooltipBoxOptions -> {TooltipDelay -> 0.08}}], EventHandlerTag[{ "MouseClicked" :> ( NeuralNetworks`NetGraph`PackagePrivate`selection$$ = None), Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], Scrollbars -> {True, False}, ImageSizeAction -> "Scrollable", ImageSize -> {600, Automatic}],FormBox[ TemplateBox[{ StyleBox["ConvolutionLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["ElementwiseLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["PoolingLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["FlattenLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["DotPlusLayer", GrayLevel[0.35], StripOnInput -> False], StyleBox["SoftmaxLayer", GrayLevel[0.35], StripOnInput -> False]}, "PointLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], Hue[0.61, 0.75, 1]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], Hue[0.61, 0.75, 1]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #}, "RowDefault"], TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[1., 0.4, 0.]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[1., 0.4, 0.]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #4}, "RowDefault"]}, { TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.29, 0.29, 0.83]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.29, 0.29, 0.83]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #2}, "RowDefault"], TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], GrayLevel[0.35]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {\ 12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #5}, "RowDefault"]}, { TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.38759999999999994`, 0.57, 0.]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.38759999999999994`, 0.57, 0.]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #3}, "RowDefault"], TemplateBox[{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.78, 0.64, 0.98]], { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], AbsoluteThickness[1.6], RGBColor[0.78, 0.64, 0.98]], PointBox[ NCache[{ Scaled[{ Rational[1, 2], Rational[1, 2]}]}, { Scaled[{0.5, 0.5}]}]]}}}, AspectRatio -> Full, ImageSize -> {12, 12}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.16666666666666669`] -> Baseline)], "\" \"", #6}, "RowDefault"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{2, 2}, {2, 2}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"PointLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { Hue[0.61, 0.75, 1], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> Hue[0.61, 0.7499999999999999, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], "Hue[0.61, 0.75, 1]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = Hue[0.61, 0.75, 1]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["HueColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], Hue[0.61, 0.75, 1], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.29, 0.29, 0.83], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.19333333333333333`, 0.19333333333333333`, 0.5533333333333333], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.29, 0.29, 0.83]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.29, 0.29, 0.83]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], RGBColor[0.29, 0.29, 0.83], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.38759999999999994`, 0.57, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.25839999999999996`, 0.38, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.38759999999999994, 0.57, 0.]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.38759999999999994`, 0.57, 0.]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], RGBColor[0.38759999999999994`, 0.57, 0.], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0.4, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0.2666666666666667, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0.4, 0.]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[1., 0.4, 0.]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], RGBColor[1., 0.4, 0.], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.35], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.23333333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], "GrayLevel[0.35]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.35]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.35], Editable -> False, Selectable -> False], "]"}], ",", RowBox[{"Directive", "[", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.78, 0.64, 0.98], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.52, 0.4266666666666667, 0.6533333333333333], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.78, 0.64, 0.98]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = RGBColor[0.78, 0.64, 0.98]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["RGBColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], RGBColor[0.78, 0.64, 0.98], Editable -> False, Selectable -> False], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6}], "}"}], ",", RowBox[{"LegendMarkerSize", "\[Rule]", "12"}], ",", RowBox[{"LegendMargins", "\[Rule]", "2"}], ",", RowBox[{ "LegendLayout", "\[Rule]", "GeneralUtilities`Graphics`PackagePrivate`legendTable"}]}]\ , "]"}]& ), Editable -> True], TraditionalForm]}, "Legended", DisplayFunction->(GridBox[{{ TagBox[ ItemBox[ PaneBox[ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], "SkipImageSizeLevel"]}, { ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, GridBoxAlignment -> { "Columns" -> {{Center}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> Automatic, BaselinePosition -> {1, 1}]& ), Editable->True, InterpretationFunction->(RowBox[{"Legended", "[", RowBox[{#, ",", RowBox[{"Placed", "[", RowBox[{#2, ",", "Below"}], "]"}]}], "]"}]& )]}, { DynamicBox[ToBoxes[ If[ IntegerQ[NeuralNetworks`NetGraph`PackagePrivate`selection$$], Item[ NeuralNetworks`NetGraph`PackagePrivate`vportInfo[ Part[ NeuralNetworks`NetGraph`PackagePrivate`vports$$, NeuralNetworks`NetGraph`PackagePrivate`selection$$], NeuralNetworks`NetGraph`PackagePrivate`inputs$$, NeuralNetworks`NetGraph`PackagePrivate`outputs$$, NeuralNetworks`NetGraph`PackagePrivate`vertices$$], Alignment -> Center], Item["", ItemSize -> {0, 0}]], StandardForm], ImageSizeCache->{0., {0., 6.}}, TrackedSymbols:>{ NeuralNetworks`NetGraph`PackagePrivate`selection$$}]} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], DynamicModuleValues:>{}, Initialization:>{NetGraph}], Deploy, DefaultBaseStyle->"Deploy"], BaselinePosition->(Top -> Scaled[3])], "]"}]}], False], Deploy], LineBreakWithin->False]], "Output", CellChangeTimes->{3.6883306119589863`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Prepare for training", "Section", CellChangeTimes->{{3.6757869410586863`*^9, 3.6757869587695847`*^9}, { 3.676045956603855*^9, 3.676045960475119*^9}, {3.676051044799789*^9, 3.67605104658801*^9}, {3.676051917847702*^9, 3.676051919071334*^9}, { 3.676507928592152*^9, 3.67650793245385*^9}, {3.6767699174647617`*^9, 3.676769921635754*^9}, {3.686850682999064*^9, 3.6868507202456255`*^9}}], Cell[CellGroupData[{ Cell["The loss function", "Subsection", CellChangeTimes->{{3.68685077108026*^9, 3.6868507741641073`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"loss", "=", RowBox[{"CrossEntropyLossLayer", "[", RowBox[{"\"\\"", "\[Rule]", RowBox[{"NetEncoder", "[", RowBox[{"\"\\"", ",", RowBox[{"Range", "[", RowBox[{"0", ",", "100"}], "]"}]}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.676758433418215*^9, 3.676758434431727*^9}, { 3.676760409345441*^9, 3.6767604096896343`*^9}}, CellID->250324149], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["CrossEntropyLossLayer", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = True}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"TargetForm\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"Index\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], True-> GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, 3.5 CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]}]], GraphicsBox[{ {Opacity[ 0.3], {LineBox[ NCache[{{0, 0}, {Rational[-1, 2], 1}}, {{0, 0}, {-0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[1, 2], 1}}, {{0, 0}, { 0.5, 1}}]], LineBox[NCache[{{0, 0}, {Rational[3, 2], 1}}, {{0, 0}, { 1.5, 1}}]]}, { LineBox[NCache[{{1, 0}, {Rational[-1, 2], 1}}, {{1, 0}, {-0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[1, 2], 1}}, {{1, 0}, { 0.5, 1}}]], LineBox[NCache[{{1, 0}, {Rational[3, 2], 1}}, {{1, 0}, { 1.5, 1}}]]}}, {AbsolutePointSize[5], PointBox[{{0, 0}, {1, 0}}], PointBox[ NCache[{{Rational[-1, 2], 1}, {Rational[1, 2], 1}, { Rational[3, 2], 1}}, {{-0.5, 1}, {0.5, 1}, {1.5, 1}}]]}}, ImageSize->32], GridBox[{ { ItemBox[ StyleBox["\<\"Parameters:\"\>", StripOnInput->False, FontWeight->Bold], StripOnInput->False], ItemBox["\<\"\"\>", StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"TargetForm\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"Index\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { ItemBox[ StyleBox["\<\"Ports:\"\>", StripOnInput->False, FontWeight->Bold], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False], ItemBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, BaselinePosition->(Scaled[0.] -> Baseline), ImageSize->{1, 11}], CacheGraphics->False], Spacer[{1, 11}]], Frame->{{False, False}, {False, True}}, FrameStyle->GrayLevel[0.85], StripOnInput->False]}, { TagBox[ StyleBox[ TemplateBox[{"\"Input\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"vector\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Target\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox[ TemplateBox[{ "\"encoded\"","\" \"",TemplateBox[{"\"index\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"range\"", "\":\"", "\" \"", TemplateBox[{"1", "\"..\"", "101"}, "RowDefault"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem", StripOnInput->False], "SummaryItem"]}, { TagBox[ StyleBox[ TemplateBox[{"\"Loss\"","\":\""}, "RowDefault"], "SummaryItemAnnotation", StripOnInput->False], "SummaryItem"], TagBox[ StyleBox["\<\"scalar\"\>", "SummaryItem", StripOnInput->False], "SummaryItem"]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], None, Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{{3.67675841347379*^9, 3.676758435853446*^9}, { 3.676760416273645*^9, 3.676760435884905*^9}, 3.6767625567728148`*^9, 3.6883308361387053`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Dataset", "Subsection", CellChangeTimes->{{3.68685077108026*^9, 3.686850785007914*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"dataset", "=", RowBox[{"Flatten", "@", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"SetDirectory", "[", RowBox[{ RowBox[{"NotebookDirectory", "[", "]"}], "<>", "\"\\"", "<>", RowBox[{"ToString", "[", "x", "]"}]}], "]"}], ";", RowBox[{ RowBox[{ RowBox[{ RowBox[{"ImageResize", "[", RowBox[{ RowBox[{"Import", "[", "#", "]"}], ",", RowBox[{"{", RowBox[{"40", ",", "40"}], "}"}]}], "]"}], "\[Rule]", "x"}], "&"}], "/@", RowBox[{"FileNames", "[", "\"\<*.gif\>\"", "]"}]}]}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "100"}], "}"}]}], "]"}]}]}], ";"}]], "Input", CellChangeTimes->{{3.676508182514427*^9, 3.676508183943961*^9}, { 3.676508243511991*^9, 3.6765083075458612`*^9}, {3.676508358843294*^9, 3.6765083610088873`*^9}, {3.67650840377806*^9, 3.67650841562573*^9}, { 3.676508507240221*^9, 3.676508532877035*^9}, {3.676508576623888*^9, 3.6765085786844*^9}, {3.676543835211618*^9, 3.676543853515112*^9}, { 3.676544418019414*^9, 3.676544445253652*^9}, {3.6765445034666853`*^9, 3.6765445164331827`*^9}, {3.6765445716434927`*^9, 3.67654457596037*^9}, { 3.676545234903378*^9, 3.676545235905508*^9}, 3.676546421902636*^9, { 3.6765466529621973`*^9, 3.676546656871828*^9}, {3.676546699013855*^9, 3.6765467223943567`*^9}, {3.676546881273192*^9, 3.676546918473569*^9}, { 3.67654698440073*^9, 3.676547026454598*^9}, {3.676547074852386*^9, 3.676547098761631*^9}, {3.676547150506968*^9, 3.676547152998527*^9}, { 3.676756246863796*^9, 3.676756273006955*^9}, 3.676756311345957*^9, 3.676756598966919*^9, {3.676756919658243*^9, 3.676756934614394*^9}, { 3.676756973668951*^9, 3.676757043511436*^9}, {3.6767570981201*^9, 3.67675709996916*^9}, {3.6767571411472263`*^9, 3.676757151960194*^9}, { 3.67675728568607*^9, 3.676757290841915*^9}, {3.676757345381084*^9, 3.676757353771707*^9}, {3.676760412352748*^9, 3.676760412597875*^9}, { 3.6767617271489153`*^9, 3.6767617308813143`*^9}, {3.676839243273481*^9, 3.676839247274*^9}}] }, Open ]], Cell[CellGroupData[{ Cell["Training", "Subsection", CellChangeTimes->{{3.68685077108026*^9, 3.686850794460339*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"lenet", "=", RowBox[{"NetTrain", "[", RowBox[{"lenet", ",", "dataset", ",", "loss", ",", RowBox[{"MaxTrainingRounds", "\[Rule]", " ", "20"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.676756514353557*^9, 3.6767565286173477`*^9}, { 3.6767573595114117`*^9, 3.676757360747217*^9}, {3.676758408586494*^9, 3.676758410061743*^9}, {3.676760226020903*^9, 3.6767602263451643`*^9}, { 3.6767605824836807`*^9, 3.676760583476247*^9}, {3.676762563831882*^9, 3.67676256394077*^9}}, CellID->675551318], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["NetChain", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ GridBox[{{ TagBox["\"\"", "SummaryItem"], TagBox["\"Input\"", "SummaryItem"], TagBox[ TemplateBox[{"\"encoded\"", "\" \"", TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"28\"", "\"28\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"1\"", "SummaryItem"], TagBox["\"Convolution\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"20\"", "\"24\"", "\"24\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"2\"", "SummaryItem"], TagBox["\"Elementwise\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"20\"", "\"24\"", "\"24\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"3\"", "SummaryItem"], TagBox["\"Pooling\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"20\"", "\"12\"", "\"12\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"4\"", "SummaryItem"], TagBox["\"Convolution\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"50\"", "\"8\"", "\"8\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"5\"", "SummaryItem"], TagBox["\"Elementwise\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"50\"", "\"8\"", "\"8\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"6\"", "SummaryItem"], TagBox["\"Pooling\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"50\"", "\"4\"", "\"4\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"7\"", "SummaryItem"], TagBox["\"Flatten\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"800\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"8\"", "SummaryItem"], TagBox["\"DotPlus\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"500\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"9\"", "SummaryItem"], TagBox["\"Elementwise\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"500\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"10\"", "SummaryItem"], TagBox["\"DotPlus\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"101\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"11\"", "SummaryItem"], TagBox["\"Softmax\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"101\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"\"", "SummaryItem"], TagBox["\"Output\"", "SummaryItem"], TagBox[ TemplateBox[{"\"decoded\"", "\" \"", TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"101\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ GridBox[{{ TagBox["\"\"", "SummaryItem"], TagBox["\"Input\"", "SummaryItem"], TagBox[ TemplateBox[{"\"encoded\"", "\" \"", TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"1\"", "\"28\"", "\"28\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"1\"", "SummaryItem"], TagBox["\"Convolution\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"20\"", "\"24\"", "\"24\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"2\"", "SummaryItem"], TagBox["\"Elementwise\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"20\"", "\"24\"", "\"24\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"3\"", "SummaryItem"], TagBox["\"Pooling\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"20\"", "\"12\"", "\"12\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"4\"", "SummaryItem"], TagBox["\"Convolution\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"50\"", "\"8\"", "\"8\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"5\"", "SummaryItem"], TagBox["\"Elementwise\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"50\"", "\"8\"", "\"8\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"6\"", "SummaryItem"], TagBox["\"Pooling\"", "SummaryItem"], TagBox[ TemplateBox[{"\"tensor\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{ "\[Times]", "\"\[Times]\"", "\"50\"", "\"4\"", "\"4\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"7\"", "SummaryItem"], TagBox["\"Flatten\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"800\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"8\"", "SummaryItem"], TagBox["\"DotPlus\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"500\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"9\"", "SummaryItem"], TagBox["\"Elementwise\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"500\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"10\"", "SummaryItem"], TagBox["\"DotPlus\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"101\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"11\"", "SummaryItem"], TagBox["\"Softmax\"", "SummaryItem"], TagBox[ TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"101\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"], "SummaryItem"]}, { TagBox["\"\"", "SummaryItem"], TagBox["\"Output\"", "SummaryItem"], TagBox[ TemplateBox[{"\"decoded\"", "\" \"", TemplateBox[{"\"vector\"", "\" \"", TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"101\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0.5], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.33333333333333337`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{Automatic, 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], "GrayLevel[0.5]"], Appearance -> None, BaseStyle -> {}, BaselinePosition -> Baseline, DefaultBaseStyle -> {}, ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, If[ Not[ AbsoluteCurrentValue["Deployed"]], SelectionMove[Typeset`box$, All, Expression]; FrontEnd`Private`$ColorSelectorInitialAlpha = 1; FrontEnd`Private`$ColorSelectorInitialColor = GrayLevel[0.5]; FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; MathLink`CallFrontEnd[ FrontEnd`AttachCell[Typeset`box$, FrontEndResource["GrayLevelColorValueSelector"], { 0, {Left, Bottom}}, {Left, Top}, "ClosingActions" -> { "SelectionDeparture", "ParentChanged", "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> Automatic, Method -> "Preemptive"], GrayLevel[0.5], Editable -> False, Selectable -> False]}]}], "]"}]& ), BaseStyle -> GrayLevel[0.5]]}, "RowDefault"]}, "RowDefault"], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic], BaselinePosition -> Baseline], DynamicModuleValues :> {}], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("None"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.676757502940117*^9, 3.676758428936306*^9, 3.676758565283226*^9, 3.6767603662941017`*^9, 3.67676042867332*^9, 3.6767605771560907`*^9, 3.676761082046625*^9, 3.67676193951436*^9, 3.676762668681697*^9, 3.676763893373769*^9}] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Main Results", "Section", CellChangeTimes->{{3.549542055118816*^9, 3.5495420583168*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"comma", "=", RowBox[{"Import", "[", RowBox[{ RowBox[{"NotebookDirectory", "[", "]"}], "<>", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.676763074934066*^9, 3.676763082651672*^9}, 3.676763919811138*^9, {3.676763961972006*^9, 3.67676401688153*^9}, { 3.676764139474551*^9, 3.67676414345051*^9}, {3.676839255149475*^9, 3.67683926288163*^9}, 3.676839981579451*^9}], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt1UFqlWcYhuFD7aDDbsFddNphp0oXoBjFSQpRKN2NS3CHen5KiKXGRhtz ///3Xhc8Bh3lvN/N8fHzP568/OF0Or356fzHk2d//np19eyvpz+f//L75ZvX ry4vXvx2+fbi1cXVL88fnf/x/Y+n07vzz/MPAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAYN8+3DL4Vrc1dd+D zUP1pkc+Vfemw5nqvnQ4T92SFmequ9HhTHUnGpyr7kOHM9U96HCuuoE9jEb9 7nsaD6t+7z2O769+4yOM76N+1yON+1e/6ZHG/arf86jj/6vf8Ojj29Vvt8r4 evWbrTS+Xv1mK467qd9p5fFl9fusPm5Xv82U8Xn1u0wa/1a/ybRxo36LqeNv 9TtMHf0bTN909f2nb7L69ja7wfruNrvB+uY2t8H61qY/29cmqW9tsxus72z6 s31ugvrGNrvB+r6mP9v3Vlbf1vRn+97K6tva7Abru5r+bP9bVX1Xm91gfVOb 3WB9T9OfHWerqe9psxusb2n6s2NtJfUtTX92rK2kvqXNbrC+o83ub1Pf0vRn x9pK6lva7P429T1tdoP1LW12f5v6nqY/O85WVN/UZjdY39P0Z8fZiuqbmv7s GFtVfVeb3d+mvq3pz/a91dX3tdn9beobmwbrG9vs/jb1nW12f5v61vUb1r+n /tbaCjeYpr73Ht6s/v0n93etvnv5TvVn0d+N+v7V+9SfS3836jco3qb+bPr7 p/odHvpN6s+ovy+b8BZ1e/r7byu/Qd2e/u5uxdtr77hWubv+KOmPkv4o6Y+S /ijpj5L+KOmPkv4oaY+S/ijpj5L+KGmPiu8+SvqjpD9K+qOiPUr6o6Q/Svqj pD8qVXv6Y6M9SvqjpD9K2qOkPyrao6Q/Svqjoj1K+qNStKc/rumPivYoaY+S /ihpj4rvPkrao+K7j0rRnv64pj0q2qOkP0rao+K7j4r2qBTt6Y9r2qOiPUra o+K7j5L2qPjuo6I9KtqjpD0qvvuoaI+K9ihpj4r2qPh/l4r2qGiPivaoaI+K 9qhoj4r2qGiPivaoaI+K9qhoj4r2KBTdaY+N9qhoj4r2KOiOQtWd9thoj4Lv PQq6o6I9KtqjoDsKuqNQdqe92bRHQXc8tLo53c1Vd6e9mermtDdP3Zru5qk7 091MdWe6m6nuTHvz1H1pbq66M93NVvemvdnq5nQ3m+Yo6Y6S9ijpjpLuKGmO kvYo6Y6S3ihpjpL2KOmOmt4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAYCEf AWf+XcA= "], {{0, 1200}, {160, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{26.450781250000006`, Automatic}, ImageSizeRaw->{160, 1200}, PlotRange->{{0, 160}, {0, 1200}}]], "Output", CellChangeTimes->{3.676763084245228*^9, 3.676763897585492*^9, 3.676763963431151*^9, 3.6767640014013863`*^9, 3.676764143888199*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"lenet", "[", RowBox[{"ImageResize", "[", RowBox[{"comma2", ",", RowBox[{"{", RowBox[{"40", ",", "40"}], "}"}]}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.67676438986407*^9, 3.6767643950503798`*^9}, { 3.6767647004207706`*^9, 3.6767647102733088`*^9}}], Cell[BoxData["\<\",\"\>"], "Output", CellChangeTimes->{{3.6767643954469757`*^9, 3.676764414365527*^9}, 3.676764710741726*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"OCR", "=", RowBox[{ "Import", "[", "\"\\"", "]"}]}]], "Input", CellChangeTimes->{{3.676912815108304*^9, 3.67691285431065*^9}, { 3.676914683202799*^9, 3.676914686109448*^9}}], Cell[BoxData[ StyleBox[ TagBox[ TagBox[ RowBox[{"NetChain", RowBox[{"[", PanelBox[ DynamicModuleBox[{NeuralNetworks`NetChain`PackagePrivate`grid$$ = Grid[{{ MouseAppearance[ Annotation["", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Input", {"Inputs", "Input"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"encoded", " ", Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"1", "40", "40"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}]}], { "Inputs", "Input"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["1", GrayLevel[0.5]], {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ConvolutionLayer, {"Layers", "1"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "40", "40"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "1"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["2", GrayLevel[0.5]], {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[BatchNormalizationLayer, {"Layers", "2"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "40", "40"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "2"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["3", GrayLevel[0.5]], {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "3"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "40", "40"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "3"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["4", GrayLevel[0.5]], {"Layers", "4"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[PoolingLayer, {"Layers", "4"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "20", "20"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "4"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["5", GrayLevel[0.5]], {"Layers", "5"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ConvolutionLayer, {"Layers", "5"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "20", "20"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "5"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["6", GrayLevel[0.5]], {"Layers", "6"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[BatchNormalizationLayer, {"Layers", "6"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "20", "20"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "6"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["7", GrayLevel[0.5]], {"Layers", "7"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "7"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "20", "20"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "7"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["8", GrayLevel[0.5]], {"Layers", "8"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[PoolingLayer, {"Layers", "8"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "10", "10"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "8"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["9", GrayLevel[0.5]], {"Layers", "9"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ConvolutionLayer, {"Layers", "9"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "10", "10"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "9"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["10", GrayLevel[0.5]], {"Layers", "10"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[BatchNormalizationLayer, {"Layers", "10"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "10", "10"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "10"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["11", GrayLevel[0.5]], {"Layers", "11"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "11"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "10", "10"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "11"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["12", GrayLevel[0.5]], {"Layers", "12"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[PoolingLayer, {"Layers", "12"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "5", "5"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "12"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["13", GrayLevel[0.5]], {"Layers", "13"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ConvolutionLayer, {"Layers", "13"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "5", "5"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "13"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["14", GrayLevel[0.5]], {"Layers", "14"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[BatchNormalizationLayer, {"Layers", "14"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "5", "5"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "14"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["15", GrayLevel[0.5]], {"Layers", "15"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "15"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "5", "5"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "15"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["16", GrayLevel[0.5]], {"Layers", "16"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[PoolingLayer, {"Layers", "16"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"tensor", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"50", "2", "2"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "16"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["17", GrayLevel[0.5]], {"Layers", "17"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[FlattenLayer, {"Layers", "17"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"200"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "17"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["18", GrayLevel[0.5]], {"Layers", "18"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "18"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"600"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "18"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["19", GrayLevel[0.5]], {"Layers", "19"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ElementwiseLayer, {"Layers", "19"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"600"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "19"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["20", GrayLevel[0.5]], {"Layers", "20"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[DotPlusLayer, {"Layers", "20"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"10001"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "20"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation[ Style["21", GrayLevel[0.5]], {"Layers", "21"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[SoftmaxLayer, {"Layers", "21"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"10001"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}], {"Layers", "21"}, "Mouse"], "LinkHand"]}, { MouseAppearance[ Annotation["", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation["Output", {"Outputs", "Output"}, "Mouse"], "LinkHand"], MouseAppearance[ Annotation[ Row[{"decoded", " ", Row[{"vector", " ", Row[{"(", "\[VeryThinSpace]", "size", ":", " ", Row[{"10001"}, "\[Times]"], "\[VeryThinSpace]", ")"}, BaseStyle -> GrayLevel[0.5]]}]}], {"Outputs", "Output"}, "Mouse"], "LinkHand"]}}, Alignment -> Left, Spacings -> 1.1], NeuralNetworks`NetChain`PackagePrivate`assoc$$ = Association[ "Type" -> "Chain", "Layers" -> Association[ "1" -> Association[ "Type" -> "Convolution", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[4, {50, 1, 3, 3}], "Biases" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "OutputChannels" -> 50, "KernelSize" -> {3, 3}, "Stride" -> {1, 1}, "PaddingSize" -> {1, 1}, "Dilation" -> {1, 1}, "InputChannels" -> 1, "$GroupNumber" -> 1, "$InputSize" -> {40, 40}, "$OutputSize" -> {40, 40}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {40, 40}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {40, 40}]]]], "2" -> Association[ "Type" -> "BatchNormalization", "Arrays" -> Association[ "Gamma" -> NeuralNetworks`TensorT[1, {50}], "Beta" -> NeuralNetworks`TensorT[1, {50}], "MovingVariance" -> NeuralNetworks`TensorT[1, {50}], "MovingMean" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "Momentum" -> 0.9, "Epsilon" -> 0.001, "Channels" -> 50, "$Shape" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {40, 40}]]], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {40, 40}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {40, 40}]]]], "3" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {50, 40, 40}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {40, 40}]]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[3, {50, 40, 40}]]], "4" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {3, 3}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 50, "$InputSize" -> {40, 40}, "$OutputSize" -> {20, 20}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {50, 40, 40}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {20, 20}]]]], "5" -> Association[ "Type" -> "Convolution", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[4, {50, 50, 3, 3}], "Biases" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "OutputChannels" -> 50, "KernelSize" -> {3, 3}, "Stride" -> {1, 1}, "PaddingSize" -> {1, 1}, "Dilation" -> {1, 1}, "InputChannels" -> 50, "$GroupNumber" -> 1, "$InputSize" -> {20, 20}, "$OutputSize" -> {20, 20}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {20, 20}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {20, 20}]]]], "6" -> Association[ "Type" -> "BatchNormalization", "Arrays" -> Association[ "Gamma" -> NeuralNetworks`TensorT[1, {50}], "Beta" -> NeuralNetworks`TensorT[1, {50}], "MovingVariance" -> NeuralNetworks`TensorT[1, {50}], "MovingMean" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "Momentum" -> 0.9, "Epsilon" -> 0.001, "Channels" -> 50, "$Shape" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {20, 20}]]], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {20, 20}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {20, 20}]]]], "7" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {50, 20, 20}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {20, 20}]]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[3, {50, 20, 20}]]], "8" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {3, 3}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 50, "$InputSize" -> {20, 20}, "$OutputSize" -> {10, 10}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {50, 20, 20}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {10, 10}]]]], "9" -> Association[ "Type" -> "Convolution", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[4, {50, 50, 3, 3}], "Biases" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "OutputChannels" -> 50, "KernelSize" -> {3, 3}, "Stride" -> {1, 1}, "PaddingSize" -> {1, 1}, "Dilation" -> {1, 1}, "InputChannels" -> 50, "$GroupNumber" -> 1, "$InputSize" -> {10, 10}, "$OutputSize" -> {10, 10}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {10, 10}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {10, 10}]]]], "10" -> Association[ "Type" -> "BatchNormalization", "Arrays" -> Association[ "Gamma" -> NeuralNetworks`TensorT[1, {50}], "Beta" -> NeuralNetworks`TensorT[1, {50}], "MovingVariance" -> NeuralNetworks`TensorT[1, {50}], "MovingMean" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "Momentum" -> 0.9, "Epsilon" -> 0.001, "Channels" -> 50, "$Shape" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {10, 10}]]], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {10, 10}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {10, 10}]]]], "11" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {50, 10, 10}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {10, 10}]]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[3, {50, 10, 10}]]], "12" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {3, 3}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 50, "$InputSize" -> {10, 10}, "$OutputSize" -> {5, 5}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {50, 10, 10}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {5, 5}]]]], "13" -> Association[ "Type" -> "Convolution", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[4, {50, 50, 3, 3}], "Biases" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "OutputChannels" -> 50, "KernelSize" -> {3, 3}, "Stride" -> {1, 1}, "PaddingSize" -> {1, 1}, "Dilation" -> {1, 1}, "InputChannels" -> 50, "$GroupNumber" -> 1, "$InputSize" -> {5, 5}, "$OutputSize" -> {5, 5}], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {5, 5}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {5, 5}]]]], "14" -> Association[ "Type" -> "BatchNormalization", "Arrays" -> Association[ "Gamma" -> NeuralNetworks`TensorT[1, {50}], "Beta" -> NeuralNetworks`TensorT[1, {50}], "MovingVariance" -> NeuralNetworks`TensorT[1, {50}], "MovingMean" -> NeuralNetworks`TensorT[1, {50}]], "Parameters" -> Association[ "Momentum" -> 0.9, "Epsilon" -> 0.001, "Channels" -> 50, "$Shape" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {5, 5}]]], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {5, 5}]]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {5, 5}]]]], "15" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {50, 5, 5}, "$Rank" -> 3], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {5, 5}]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[3, {50, 5, 5}]]], "16" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {3, 3}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Channels" -> 50, "$InputSize" -> {5, 5}, "$OutputSize" -> {2, 2}], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[3, {50, 5, 5}]], "Outputs" -> Association["Output" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {2, 2}]]]], "17" -> Association[ "Type" -> "Flatten", "Arrays" -> Association[], "Parameters" -> Association[ "Dimensions" -> {50, 2, 2}, "$Rank" -> 3, "$OutputSize" -> 200], "Inputs" -> Association["Input" -> NeuralNetworks`ChannelT[50, NeuralNetworks`TensorT[2, {2, 2}]]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {200}]]], "18" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {600, 200}], "Biases" -> NeuralNetworks`TensorT[1, {600}]], "Parameters" -> Association["Size" -> 600, "$InputSize" -> 200], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {200}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {600}]]], "19" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> Ramp, "$Dimensions" -> {600}, "$Rank" -> 1], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {600}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {600}]]], "20" -> Association[ "Type" -> "DotPlus", "Arrays" -> Association[ "Weights" -> NeuralNetworks`TensorT[2, {10001, 600}], "Biases" -> NeuralNetworks`TensorT[1, {10001}]], "Parameters" -> Association["Size" -> 10001, "$InputSize" -> 600], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {600}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {10001}]]], "21" -> Association[ "Type" -> "Softmax", "Arrays" -> Association[], "Parameters" -> Association["Size" -> 10001], "Inputs" -> Association["Input" -> NeuralNetworks`TensorT[1, {10001}]], "Outputs" -> Association["Output" -> NeuralNetworks`TensorT[1, {10001}]]]], "Connections" -> { NetPort["Layers", "1", "Inputs", "Input"] -> NetPort["Inputs", "Input"], NetPort["Layers", "2", "Inputs", "Input"] -> NetPort["Layers", "1", "Outputs", "Output"], NetPort["Layers", "3", "Inputs", "Input"] -> NetPort["Layers", "2", "Outputs", "Output"], NetPort["Layers", "4", "Inputs", "Input"] -> NetPort["Layers", "3", "Outputs", "Output"], NetPort["Layers", "5", "Inputs", "Input"] -> NetPort["Layers", "4", "Outputs", "Output"], NetPort["Layers", "6", "Inputs", "Input"] -> NetPort["Layers", "5", "Outputs", "Output"], NetPort["Layers", "7", "Inputs", "Input"] -> NetPort["Layers", "6", "Outputs", "Output"], NetPort["Layers", "8", "Inputs", "Input"] -> NetPort["Layers", "7", "Outputs", "Output"], NetPort["Layers", "9", "Inputs", "Input"] -> NetPort["Layers", "8", "Outputs", "Output"], NetPort["Layers", "10", "Inputs", "Input"] -> NetPort["Layers", "9", "Outputs", "Output"], NetPort["Layers", "11", "Inputs", "Input"] -> NetPort["Layers", "10", "Outputs", "Output"], NetPort["Layers", "12", "Inputs", "Input"] -> NetPort["Layers", "11", "Outputs", "Output"], NetPort["Layers", "13", "Inputs", "Input"] -> NetPort["Layers", "12", "Outputs", "Output"], NetPort["Layers", "14", "Inputs", "Input"] -> NetPort["Layers", "13", "Outputs", "Output"], NetPort["Layers", "15", "Inputs", "Input"] -> NetPort["Layers", "14", "Outputs", "Output"], NetPort["Layers", "16", "Inputs", "Input"] -> NetPort["Layers", "15", "Outputs", "Output"], NetPort["Layers", "17", "Inputs", "Input"] -> NetPort["Layers", "16", "Outputs", "Output"], NetPort["Layers", "18", "Inputs", "Input"] -> NetPort["Layers", "17", "Outputs", "Output"], NetPort["Layers", "19", "Inputs", "Input"] -> NetPort["Layers", "18", "Outputs", "Output"], NetPort["Layers", "20", "Inputs", "Input"] -> NetPort["Layers", "19", "Outputs", "Output"], NetPort["Layers", "21", "Inputs", "Input"] -> NetPort["Layers", "20", "Outputs", "Output"], NetPort["Outputs", "Output"] -> NetPort["Layers", "21", "Outputs", "Output"]}, "Inputs" -> Association["Input" -> NeuralNetworks`EncodedType[ NetEncoder["Image", Association[ "Parameters" -> Association[ "ImageSize" -> {40, 40}, "ColorSpace" -> "Grayscale", "ColorChannels" -> 1, "$AugmentationFunction" -> None, "Parallelize" -> True, "MeanImage" -> None], "Output" -> NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {40, 40}]]]], NeuralNetworks`ChannelT[1, NeuralNetworks`TensorT[2, {40, 40}]]]], "Outputs" -> Association["Output" -> NeuralNetworks`DecodedType[ NetDecoder["Class", Association[ "Parameters" -> Association["Labels" -> CompressedData[" 1:eJwc3VMQ4Eq3BtB/7DO2bdu2bdu2bdu2bdu2bdt3zU3VqspTKi8ddO/+dvwG bSu0CfC///0vfNL//f/x7zwggQhMEIISjOCEICShCE0Y/iMs4f5dhwhEJBKR iUJUohGdGMQkFrGJQ1ziEZ8EJCQRiUnCv9tLRnJSkJJUpCYNaUlHejKQkUxk JgtZyUZ2cpCTXOQmD3nJR34KUJBCFKYIRSlGcUpQklKUpgxlKUd5KlCRSlSm ClWpRnVqUJNa1KYOdalHfRrQkEY0pglNaUZzWtCSVrSmDW1pR3s60JFOdKYL XelGd3rQk170pg996Ud/BjCQQQxmCEMZxnBGMJJRjGYMYxnHeCYwkUlMZgpT mcZ0ZjCTWcxmDnOZx3wWsJBFLGYJS1nGclawklWsZg1rWcd6NrCRTWxmC1vZ xnZ2sJNd7GYPe9nHfg5wkEMc5ghHOcZxTnCSU5zmDGc5x3kucJFLXOYKV7nG dW5wk1vc5g53ucd9HvCQRzzmCU95xnNe8JJXvOYNb3nHez7wkU985gtf+cZ3 fvCTX/zmD3/5N/gDEJBABCYIQQlGcEIQklCEJgz/EZZwhCcCEYlEZKIQlWhE JwYxiUVs4hCXeMQnAQlJRGKSkJRkJCcFKUlFatKQlnSkJwMZyURmspCVbGQn BznJRW7ykJd85KcABSlEYYpQlGIUpwQlKUVpylCWcpSnAhWpRGWqUJVqVKcG NalFbepQl3rUpwENaURjmtCUZjSnBS1pRWv+PcDb0o72dKAjnehMF7rSje70 oCe96E0f+tKP/gxgIIMYzBCGMozhjGAkoxjNGMYyjvFMYCKTmMwUpjKN6cxg JrOYzRzmMo/5LGAhi1jMEpayjOWsYCWrWM0a1rKO9WxgI5vYzBa2so3t7GAn u9jNHvayj/0c4CCHOMwRjnKM45zgJKc4zRnOco7zXOAil7jMFa5yjevc4Ca3 uM0d7nKP+zzgIY94zBOe8oznvOAlr3jNG97yjvd84COf+MwXvvKN7/zgJ7/4 zR/+8u/FH4CABCIwQQhKMIITgpCEIjRh+I+whCM8EYhIJCIThahEIzoxiEks YhOHuMQjPglISCISk4SkJCM5KUhJKlKThrSkIz0ZyEgmMpOFrGQjOznISS5y k4e85CM/BShIIQpThKIUozglKEkpSlOGspSjPBWoSCUqU4WqVKM6NahJLWpT h7rUoz4NaEgjGtOEpjSjOS1oSSta04a2tKM9HehIJzrTha50ozs96EkvetOH vvSjPwMYyCAGM4ShDGM4IxjJKEYzhrGMYzwTmMgkJjOFqUxjOjOYySxmM4e5 zGM+C1jIIhazhKUsYzkrWMkqVrOGtaxjPRvYyCY2s4WtbGM7O9jJLnazh73s Yz8HOMghDnOEoxzjOCc4ySlOc4aznOM8F7jIJS5zhatc4zo3uMktbnOHu9zj Pg94yCMe84SnPOM5L3jJK17zhre84z0f+MgnPvOFr3zjOz/4yS9+84e//Pvo D0BAAhGYIAQlGMEJQUhCEZow/EdYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIR nwQkJBGJSUJSkpGcFKQkFalJQ1rSkZ4MZCQTmclCVrKRnRzkJBe5yUNe8pGf AhSkEIUpQlGKUZwSlKQUpSlDWcpRngpUpBKVqUJVqlGdGtSkFrWpQ13qUZ8G NKQRjWlCU5rRnBa0pBWtaUNb2tGeDnSkE53pQle60Z0e9KQXvelDX/rRnwEM ZBCDGcJQhjGcEYxkFKMZw1jGMZ4JTGQSk5nCVKYxnRnMZBazmcNc5jGfBSxk EYtZwlKWsZwVrGQVq1nDWtaxng1sZBOb2cJWtrGdHexkF7vZw172sZ8DHOQQ hznCUY5xnBOc5BSnOcNZznGeC1zkEpe5wlWucZ0b3OQWt7nDXe5xnwc85BGP ecJTnvGcF7zkFa95w1ve8Z4PfOQTn/nCV77xnR/85Be/+cNf/v3wByAggQhM EIISjOCEICShCE0Y/iMs4QhPBCISichEISrRiE4MYhKL2MQhLvGITwISkojE JCEpyUhOClKSitSkIS3pSE8GMpKJzGQhK9nITg5ykovc5CEv+chPAQpSiMIU oSjFKE4JSlKK0pShLOUoTwUqUonKVKEq1ahODWpSi9rUoS71qE8DGtKIxjSh Kc1oTgta0orWtKEt7WhPBzrSic50oSvd6E4PetKL3vShL/3ozwAGMojBDGEo wxjOCEYyitGMYSzjGM8EJjKJyUxhKtOYzgxmMovZzGEu85jPAhayiMUsYSnL WM4KVrKK1axhLetYzwY2sonNbGEr29jODnayi93sYS/72M8BDnKIwxzhKMc4 zglOcorTnOEs5zjPBS5yictc4SrXuM4NbnKL29zhLve4zwMe8ojHPOEpz3jO C17yite84S3veM8HPvKJz3zhK9/4zg9+8ovf/OEv/yb7AhCQQAQmCEEJRnBC EJJQhCYM/xGWcIQnAhGJRGSiEJVoRCcGMYlFbOIQl3jEJwEJSURikpCUZCQn BSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5yUVu8pCXfOSnAAUpRGGKUJRiFKcE JSlFacpQlnKUpwIVqURlqlCValSnBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUt aUVr2tCWdrSnAx3pRGe60JVudKcHPelFb/rQl370ZwADGcRghjCUYQxnBCMZ xWjGMJZxjGcCE5nEZKYwlWlMZwYzmcVs5jCXecxnAQtZxGKWsJRlLGcFK1nF atawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5wlGMc5wQnOcVp znCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCUZzznBS95xWve 8JZ3vOcDH/nEZ77wlW985wc/+cVv/vCXfxP9AQhIIAIThKAEIzghCEkoQhOG /whLOMITgYhEIjJRiEo0ohODmMQiNnGISzzik4CEJCIxSUhKMpKTgpSkIjVp SEs60pOBjGQiM1nISjayk4Oc5CI3echLPvJTgIIUojBFKEoxilOCkpSiNGUo SznKU4GKVKIyVahKNapTg5rUojZ1qEs96tOAhjSiMU1oSjOa04KWtKI1bWhL O9rTgY50ojNd6Eo3utODnvSiN33oSz/6M4CBDGIwQxjKMIYzgpGMYjRjGMs4 xjOBiUxiMlOYyjSmM4OZzGI2c5jLPOazgIUsYjFLWMoylrOClaxiNWtYyzrW s4GNbGIzW9jKNrazg53sYjd72Ms+9nOAgxziMEc4yjGOc4KTnOI0ZzjLOc5z gYtc4jJXuMo1rnODm9ziNne4yz3u84CHPOIxT3jKM57zgpe84jVveMs73vOB j3ziM1/4yje+84Of/OI3f/jLv0W+AAQkEIEJQlCCEZwQhCQUoQnDf4QlHOGJ QEQiEZkoRCUa0YlBTGIRmzjEJR7xSUBCEpGYJCQlGclJQUpSkZo0pCUd6clA RjKRmSxkJRvZyUFOcpGbPOQlH/kpQEEKUZgiFKUYxSlBSUpRmjKUpRzlqUBF KlGZKlSlGtWpQU1qUZs61KUe9WlAQxrRmCY0pRnNaUFLWtGaNrSlHe3pQEc6 0ZkudKUb3elBT3rRmz70pR/9GcBABjGYIQxlGMMZwUhGMZoxjGUc45nARCYx mSlMZRrTmcFMZjGbOcxlHvNZwEIWsZglLGUZy1nBSlaxmjWsZR3r2cBGNrGZ LWxlG9vZwU52sZs97GUf+znAQQ5xmCMc5RjHOcFJTnGaM5zlHOe5wEUucZkr XOUa17nBTW5xmzvc5R73ecBDHvGYJzzlGc95wUte8Zo3vOUd7/nARz7xmS98 5Rvf+cFPfvGbP/zl3wJ/AAISiMAEISjBCE4IQhKK0IThP8ISjvBEICKRiEwU ohKN6MQgJrGITRziEo/4JCAhiUhMEpKSjOSkICWpSE0a0pKO9GQgI5nITBay ko3s5CAnuchNHvKSj/wUoCCFKEwRilKM4pSgJKUoTRnKUo7yVKAilahMFapS jerUoCa1qE0d6lKP+jSgIY1oTBOa0ozmtKAlrWhNG9rSjvZ0oCOd6EwXutKN 7vSgJ73oTR/60o/+DGAggxjMEIYyjOGMYCSjGM0YxjKO8UxgIpOYzBSmMo3p zGAms5jNHOYyj/ksYCGLWMwSlrKM5axgJatYzRrWso71bGAjm9jMFrayje3s YCe72M0e9rKP/RzgIIc4zBGOcozjnOAkpzjNGc5yjvNc4CKXuMwVrnKN69zg Jre4zR3uco/7POAhj3jME57yjOe84CWveM0b3vKO93zgI5/4zBe+8o3v/OAn v/jNH/7yr7gnAAEJRGCCEJRgBCcEIQlFaMLwH2EJR3giEJFIRCYKUYlGdGIQ k1jEJg5xiUd8EpCQRCQmCUlJRnJSkJJUpCYNaUlHejKQkUxkJgtZyUZ2cpCT XOQmD3nJR34KUJBCFKYIRSlGcUpQklKUpgxlKUd5KlCRSlSmClWpRnVqUJNa 1KYOdalHfRrQkEY0pglNaUZzWtCSVrSmDW1pR3s60JFOdKYLXelGd3rQk170 pg996Ud/BjCQQQxmCEMZxnBGMJJRjGYMYxnHeCYwkUlMZgpTmcZ0ZjCTWcxm DnOZx3wWsJBFLGYJS1nGclawklWsZg1rWcd6NrCRTWxmC1vZxnZ2sJNd7GYP e9nHfg5wkEMc5ghHOcZxTnCSU5zmDGc5x3kucJFLXOYKV7nGdW5wk1vc5g53 ucd9HvCQRzzmCU95xnNe8JJXvOYNb3nHez7wkU985gtf+cZ3fvCTX/zmD3/5 V9gXgIAEIjBBCEowghOCkIQiNGH4j7CEIzwRiEgkIhOFqEQjOjGISSxiE4e4 xCM+CUhIIhKThKQkIzkpSEkqUpOGtKQjPRnISCYyk4WsZCM7OchJLnKTh7zk Iz8FKEghClOEohSjOCUoSSlKU4aylKM8FahIJSpThapUozo1qEktalOHutSj Pg1oSCMa04SmNKM5LWhJK1rThra0oz0d6EgnOtOFrnSjOz3oSS9604e+9KM/ AxjIIAYzhKEMYzgjGMkoRjOGsYxjPBOYyCQmM4WpTGM6M5jJLGYzh7nMYz4L WMgiFrOEpSxjOStYySpWs4a1rGM9G9jIJjazha1sYzs72MkudrOHvexjPwc4 yCEOc4SjHOM4JzjJKU5zhrOc4zwXuMglLnOFq1zjOje4yS1uc4e73OM+D3jI Ix7zhKc84zkveMkrXvOGt7zjPR/4yCc+84WvfOM7P/jJL37zh7/8K+oNQEAC EZggBCUYwQlBSEIRmjD8R1jCEZ4IRCQSkYlCVKIRnRjEJBaxiUNc4hGfBCQk EYlJQlKSkZwUpCQVqUlDWtKRngxkJBOZyUJWspGdHOQkF7nJQ17ykZ8CFKQQ hSlCUYpRnBKUpBSlKUNZylGeClSkEpWpQlWqUZ0a1KQWtalDXepRnwY0pBGN aUJTmtGcFrSkFa1pQ1va0Z4OdKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZ wlCGMZwRjGQUoxnDWMYxnglMZBKTmcJUpjGdGcxkFrOZw1zmMZ8FLGQRi1nC UpaxnBWsZBWrWcNa1rGeDWxkE5vZwla2sZ0d7GQXu9nDXvaxnwMc5BCHOcJR jnGcE5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGfBzzkEY95wlOe 8ZwXvOQVr3nDW97xng985BOf+cJXvvGdH/zkF7/5w1/+FfQHICCBCEwQghKM 4IQgJKEITRj+IyzhCE8EIhKJyEQhKtGITgxiEovYxCEu8YhPAhKSiMQkISnJ SE4KUpKK1KQhLelITwYykonMZCEr2chODnKSi9zkIS/5yE8BClKIwhShKMUo TglKUorSlKEs5ShPBSpSicpUoSrVqE4NalKL2tShLvWoTwMa0ojGNKEpzWhO C1rSita0oS3taE8HOtKJznShK93oTg960ove9KEv/ejPAAYyiMEMYSjDGM4I RjKK0YxhLOMYzwQmMonJTGEq05jODGYyi9nMYS7zmM8CFrKIxSxhKctYzgpW sorVrGEt61jPBjayic1sYSvb2M4OdrKL3exhL/vYzwEOcojDHOEoxzjOCU5y itOc4SznOM8FLnKJy1zhKte4zg1ucovb3OEu97jPAx7yiMc84SnPeM4LXvKK 17zhLe94zwc+8onPfOEr3/jOD37yi9/84S//NvMEICCBCEwQghKM4IQgJKEI TRj+IyzhCE8EIhKJyEQhKtGITgxiEovYxCEu8YhPAhKSiMQkISnJSE4KUpKK 1KQhLelITwYykonMZCEr2chODnKSi9zkIS/5yE8BClKIwhShKMUoTglKUorS lKEs5ShPBSpSicpUoSrVqE4NalKL2tShLvWoTwMa0ojGNKEpzWhOC1rSita0 oS3taE8HOtKJznShK93oTg960ove9KEv/ejPAAYyiMEMYSjDGM4IRjKK0Yxh LOMYzwQmMonJTGEq05jODGYyi9nMYS7zmM8CFrKIxSxhKctYzgpWsorVrGEt 61jPBjayic1sYSvb2M4OdrKL3exhL/vYzwEOcojDHOEoxzjOCU5yitOc4Szn OM8FLnKJy1zhKte4zg1ucovb3OEu97jPAx7yiMc84SnPeM4LXvKK17zhLe94 zwc+8onPfOEr3/jOD37yi9/84S//NvIFICCBCEwQghKM4IQgJKEITRj+Iyzh CE8EIhKJyEQhKtGITgxiEovYxCEu8YhPAhKSiMQkISnJSE4KUpKK1KQhLelI TwYykonMZCEr2chODnKSi9zkIS/5yE8BClKIwhShKMUoTglKUorSlKEs5ShP BSpSicpUoSrVqE4NalKL2tShLvWoTwMa0ojGNKEpzWhOC1rSita0oS3taE8H OtKJznShK93oTg960ove9KEv/ejPAAYyiMEMYSjDGM4IRjKK0YxhLOMYzwQm MonJTGEq05jODGYyi9nMYS7zmM8CFrKIxSxhKctYzgpWsorVrGEt61jPBjay ic1sYSvb2M4OdrKL3exhL/vYzwEOcojDHOEoxzjOCU5yitOc4SznOM8FLnKJ y1zhKte4zg1ucovb3OEu97jPAx7yiMc84SnPeM4LXvKK17zhLe94zwc+8onP fOEr3/jOD37yi9/84S//NvEGICCBCEwQghKM4IQgJKEITRj+IyzhCE8EIhKJ yEQhKtGITgxiEovYxCEu8YhPAhKSiMQkISnJSE4KUpKK1KQhLelITwYykonM ZCEr2chODnKSi9zkIS/5yE8BClKIwhShKMUoTglKUorSlKEs5ShPBSpSicpU oSrVqE4NalKL2tShLvWoTwMa0ojGNKEpzWhOC1rSita0oS3taE8HOtKJznSh K93oTg960ove9KEv/ejPAAYyiMEMYSjDGM4IRjKK0YxhLOMYzwQmMonJTGEq 05jODGYyi9nMYS7zmM8CFrKIxSxhKctYzgpWsorVrGEt61jPBjayic1sYSvb 2M4OdrKL3exhL/vYzwEOcojDHOEoxzjOCU5yitOc4SznOM8FLnKJy1zhKte4 zg1ucovb3OEu97jPAx7yiMc84SnPeM4LXvKK17zhLe94zwc+8onPfOEr3/jO D37yi9/84S//NvAHICCBCEwQghKM4IQgJKEITRj+IyzhCE8EIhKJyEQhKtGI TgxiEovYxCEu8YhPAhKSiMQkISnJSE4KUpKK1KQhLelITwYykonMZCEr2chO DnKSi9zkIS/5yE8BClKIwhShKMUoTglKUorSlKEs5ShPBSpSicpUoSrVqE4N alKL2tShLvWoTwMa0ojGNKEpzWhOC1rSita0oS3taE8HOtKJznShK93oTg96 0ove9KEv/ejPAAYyiMEMYSjDGM4IRjKK0YxhLOMYzwQmMonJTGEq05jODGYy i9nMYS7zmM8CFrKIxSxhKctYzgpWsorVrGEt61jPBjayic1sYSvb2M4OdrKL 3exhL/vYzwEOcojDHOEoxzjOCU5yitOc4SznOM8FLnKJy1zhKte4zg1ucovb 3OEu97jPAx7yiMc84SnPeM4LXvKK17zhLe94zwc+8onPfOEr3/jOD37yi9/8 4S//wjsCEJBABCYIQQlGcEIQklCEJgz/EZZwhCcCEYlEZKIQlWhEJwYxiUVs 4hCXeMQnAQlJRGKSkJRkJCcFKUlFatKQlnSkJwMZyURmspCVbGQnBznJRW7y kJd85KcABSlEYYpQlGIUpwQlKUVpylCWcpSnAhWpRGWqUJVqVKcGNalFbepQ l3rUpwENaURjmtCUZjSnBS1pRWva0JZ2tKcDHelEZ7rQlW50pwc96UVv+tCX fvRnAAMZxGCGMJRhDGcEIxnFaMYwlnGMZwITmcRkpjCVaUxnBjOZxWzmMJd5 zGcBC1nEYpawlGUsZwUrWcVq1rCWdaxnAxvZxGa2sJVtbGcHO9nFbvawl33s 5wAHOcRhjnCUYxznBCc5xWnOcJZznOcCF7nEZa5wlWtc5wY3ucVt7nCXe9zn AQ95xGOe8JRnPOcFL3nFa97wlne85wMf+cRnvvCVb3znBz/5xW/+8Jd/wT0B CEggAhOEoAQjOCEISShCE4b/CEs4whOBiEQiMlGISjSiE4OYxCI2cYhLPOKT gIQkIjFJSEoykpOClKQiNWlISzrSk4GMZCIzWchKNrKTg5zkIjd5yEs+8lOA ghSiMEUoSjGKU4KSlKI0ZShLOcpTgYpUojJVqEo1qlODmtSiNnWoSz3q04CG NKIxTWhKM5rTgpa0ojVtaEs72tOBjnSiM13oSje604Oe9KI3fehLP/ozgIEM YjBDGMowhjOCkYxiNGMYyzjGM4GJTGIyU5jKNKYzg5nMYjZzmMs85rOAhSxi MUtYyjKWs4KVrGI1a1jLOtazgY1sYjNb2Mo2trODnexiN3vYyz72c4CDHOIw RzjKMY5zgpOc4jRnOMs5znOBi1ziMle4yjWuc4Ob3OI2d7jLPe7zgIc84jFP eMoznvOCl7ziNW94yzve84GPfOIzX/jKN77zg5/84jd/+Mu/0K4ABCQQgQlC UIIRnBCEJBShCcN/hCUc4YlARCIRmShEJRrRiUFMYhGbOMQlHvFJQEISkZgk JCUZyUlBSlKRmjSkJR3pyUBGMpGZLGQlG9nJQU5ykZs85CUf+SlAQQpRmCIU pRjFKUFJSlGaMpSlHOWpQEUqUZkqVKUa1alBTWpRmzrUpR71aUBDGtGYJjSl Gc1pQUta0Zo2tKUd7elARzrRmS50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY wxnBSEYxmjGMZRzjmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhaxmCUsZRnL WcFKVrGaNaxlHevZwEY2sZktbGUb29nBTnaxmz3sZR/7OcBBDnGYIxzlGMc5 wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGbO9zlHvd5wEMe8ZgnPOUZz3nB S17xmje85R3v+cBHPvGZL3zlG9/5wU9+8Zs//OVfYF8AAhKIwAQhKMEITghC EorQhOE/whKO8EQgIpGITBSiEo3oxCAmsYhNHOISj/gkICGJSEwSkpKM5KQg JalITRrSko70ZCAjmchMFrKSjezkICe5yE0e8pKP/BSgIIUoTBGKUozilKAk pShNGcpSjvJUoCKVqEwVqlKN6tSgJrWoTR3qUo/6NKAhjWhME5rSjOa0oCWt aE0b2tKO9nSgI53oTBe60o3u9KAnvehNH/rSj/4MYCCDGMwQhjKM4YxgJKMY zRjGMo7xTGAik5jMFKYyjenMYCazmM0c5jKP+SxgIYtYzBKWsozlrGAlq1jN GtayjvVsYCOb2MwWtrKN7exgJ7vYzR72so/9HOAghzjMEY5yjOOc4CSnOM0Z znKO81zgIpe4zBWuco3r3OAmt7jNHe5yj/s84CGPeMwTnvKM57zgJa94zRve 8o73fOAjn/jMF77yje/84Ce/+M0f/vIvrDMAAQlEYIIQlGAEJwQhCUVowvAf YQlHeCIQkUhEJgpRiUZ0YhCTWMQmDnGJR3wSkJBEJCYJSUlGclKQklSkJg1p SUd6MpCRTGQmC1nJRnZykJNc5CYPeclHfgpQkEIUpghFKUZxSlCSUpSmDGUp R3kqUJFKVKYKValGdWpQk1rUpg51qUd9GtCQRjSmCU1pRnNa0JJWtKYNbWlH ezrQkU50pgtd6UZ3etCTXvSmD33pR38GMJBBDGYIQxnGcEYwklGMZgxjGcd4 JjCRSUxmClOZxnRmMJNZzGYOc5nHfBawkEUsZglLWcZyVrCSVaxmDWtZx3o2 sJFNbGYLW9nGdnawk13sZg972cd+DnCQQxzmCEc5xnFOcJJTnOYMZznHeS5w kUtc5gpXucZ1bnCTW9zmDne5x30e8JBHPOYJT3nGc17wkle85g1vecd7PvCR T3zmC1/5xnd+8JNf/OYPf/kX1BuAgAQiMEEISjCCE4KQhCI0YfiPsIQjPBGI SCQiE4WoRCM6MYhJLGITh7jEIz4JSEgiEpOEpCQjOSlISSpSk4a0pCM9GchI JjKThaxkIzs5yEkucpOHvOQjPwUoSCEKU4SiFKM4JShJKUpThrKUozwVqEgl KlOFqlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrSjPR3oSCc6 04WudKM7PehJL3rTh770oz8DGMggBjOEoQxjOCMYyShGM4axjGM8E5jIJCYz halMYzozmMksZjOHucxjPgtYyCIWs4SlLGM5K1jJKlazhrWsYz0b2MgmNrOF rWxjOzvYyS52s4e97GM/BzjIIQ5zhKMc4zgnOMkpTnOGs5zjPBe4yCUuc4Wr XOM6N7jJLW5zh7vc4z4PeMgjHvOEpzzjOS94ySte84a3vOM9H/jIJz7zha98 4zs/+MkvfvOHv