(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 12.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 347061, 6793] NotebookOptionsPosition[ 340951, 6692] NotebookOutlinePosition[ 341285, 6707] CellTagsIndexPosition[ 341242, 6704] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"getData", "[", "dir_", "]"}], ":=", RowBox[{"Dataset", "[", RowBox[{ RowBox[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"data", "=", RowBox[{"Import", "[", "#", "]"}]}], ",", RowBox[{"metadata", "=", RowBox[{"ToExpression", "/@", RowBox[{"Rest", "[", RowBox[{"StringSplit", "[", RowBox[{ RowBox[{"FileBaseName", "[", "#", "]"}], ",", "\"\<_\>\""}], "]"}], "]"}]}]}]}], "}"}], ",", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"metadata", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"\"\<\[Beta]0\>\"", "\[Rule]", RowBox[{"metadata", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"\"\<\[Beta]1\>\"", "\[Rule]", RowBox[{"metadata", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"metadata", "[", RowBox[{"[", "4", "]"}], "]"}]}], ",", RowBox[{"\"\<\[Beta]s\>\"", "\[Rule]", RowBox[{"data", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"data", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"data", "[", RowBox[{"[", "3", "]"}], "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"data", "[", RowBox[{"[", "4", "]"}], "]"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{ SuperscriptBox[ RowBox[{"data", "[", RowBox[{"[", "1", "]"}], "]"}], "2"], RowBox[{"data", "[", RowBox[{"[", "5", "]"}], "]"}]}]}], ",", RowBox[{"\"\<\[Rho]s\>\"", "\[Rule]", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#", "/", RowBox[{"Total", "[", "#", "]"}]}], "&"}], ")"}], "/@", RowBox[{"data", "[", RowBox[{"[", RowBox[{"6", ";;"}], "]"}], "]"}]}]}]}], "|>"}]}], "]"}], "&"}], "/@", RowBox[{"FileNames", "[", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"dir", ",", "\"\\""}], "}"}], "]"}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.778948155736003*^9, 3.778948220094614*^9}, { 3.778948251774682*^9, 3.778948445776267*^9}, 3.7849915996103563`*^9, { 3.784991674882406*^9, 3.784991676833317*^9}, {3.785001256798332*^9, 3.785001295499127*^9}, {3.7850013404547863`*^9, 3.785001375744542*^9}, { 3.78500144259391*^9, 3.7850014923774643`*^9}, {3.7850917037659607`*^9, 3.785091718086301*^9}, {3.785804403591153*^9, 3.7858046033535*^9}, { 3.7858046959527397`*^9, 3.7858046963435593`*^9}, {3.785804895089408*^9, 3.785804919668272*^9}, {3.785870396919524*^9, 3.785870421125996*^9}, { 3.789742875252179*^9, 3.7897428826827908`*^9}, {3.789745855694088*^9, 3.7897458585723753`*^9}, 3.789745905309957*^9, {3.789816778074827*^9, 3.789816780007482*^9}}, CellLabel->"In[1]:=",ExpressionUUID->"6ca216e4-4a7b-4e5f-a718-f4e70c77d6a2"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"c", "[", RowBox[{"\[Beta]i_", ",", "\[Beta]j_"}], "]"}], "[", "A_", "]"}], ":=", RowBox[{"2", FractionBox[ RowBox[{"(", RowBox[{ SuperscriptBox["\[Beta]i", "2"], "+", SuperscriptBox["\[Beta]j", "2"]}], ")"}], SuperscriptBox[ RowBox[{"(", RowBox[{"\[Beta]i", "-", "\[Beta]j"}], ")"}], "2"]], SuperscriptBox[ RowBox[{"InverseErfc", "[", "A", "]"}], "2"]}]}]], "Input", CellChangeTimes->{{3.7789451133983593`*^9, 3.778945185413146*^9}, { 3.778945446992125*^9, 3.778945447478743*^9}}, CellLabel->"In[2]:=",ExpressionUUID->"f756d73a-4921-45d7-acd1-44fe21438a02"], Cell[BoxData[ RowBox[{ RowBox[{"Ts", "[", "dat_", "]"}], ":=", RowBox[{"dat", "[", "\"\<\[Beta]s\>\"", "]"}]}]], "Input", CellChangeTimes->{{3.778948523412203*^9, 3.778948610089134*^9}, { 3.7789486512266293`*^9, 3.778948654153482*^9}, {3.785091924316422*^9, 3.785091992968083*^9}, {3.785804631517852*^9, 3.785804644235256*^9}}, CellLabel->"In[3]:=",ExpressionUUID->"c91e85b2-f90e-40d7-bf19-7a03fd9499bb"], Cell[BoxData[ RowBox[{ RowBox[{"Cstmp", "[", "dat_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"ts", "=", RowBox[{"Ts", "[", "dat", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", RowBox[{"#", "+", RowBox[{"ts", "[", RowBox[{"[", "2", "]"}], "]"}], "-", RowBox[{"ts", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], "&"}], "/@", "ts"}], ",", RowBox[{"dat", "[", "\"\\"", "]"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.7789537137281647`*^9, 3.7789537203664207`*^9}, { 3.785804654584515*^9, 3.785804658431868*^9}}, CellLabel->"In[4]:=",ExpressionUUID->"1b068f0a-fa61-487d-893c-5b00f279e758"], Cell[BoxData[ RowBox[{ RowBox[{"Cs", "[", "dat_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"ts", "=", RowBox[{"Ts", "[", "dat", "]"}]}], "}"}], ",", RowBox[{"MapThread", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Mean", "[", RowBox[{"{", RowBox[{ RowBox[{"#1", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"#1", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}], "]"}], ",", RowBox[{ RowBox[{"c", "[", RowBox[{ RowBox[{"#1", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"#1", "[", RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "[", "#2", "]"}]}], "}"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"MapThread", "[", RowBox[{ RowBox[{ RowBox[{"#1", "+", RowBox[{"{", RowBox[{"0", ",", "#2"}], "}"}]}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"Most", "[", "ts", "]"}], ",", RowBox[{"Differences", "[", "ts", "]"}]}], "}"}]}], "]"}], ",", RowBox[{"dat", "[", "\"\\"", "]"}]}], "}"}]}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.7789479000625353`*^9, 3.7789480157738333`*^9}, { 3.778948503834503*^9, 3.778948518745183*^9}, {3.778948666921554*^9, 3.778948688346896*^9}, {3.7789536224795513`*^9, 3.778953623110043*^9}, { 3.778953673879937*^9, 3.778953685238799*^9}, {3.778953742582839*^9, 3.778953745606895*^9}, {3.7850922784387903`*^9, 3.785092334045607*^9}, { 3.785804672596216*^9, 3.785804675153932*^9}}, CellLabel->"In[5]:=",ExpressionUUID->"83b164e2-d1bf-4be5-bf92-d3645cb950ca"], Cell[BoxData[ RowBox[{ RowBox[{"logZ0", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"n", "/", "4"}], "+", "1"}], ")"}], RowBox[{"Log", "[", "2", "]"}]}], "+", RowBox[{"Sum", "[", RowBox[{ RowBox[{ RowBox[{ FractionBox["k", "2"], RowBox[{"Log", "[", "\[Pi]", "]"}]}], "-", RowBox[{"Log", "[", RowBox[{"Gamma", "[", RowBox[{"k", "/", "2"}], "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"k", ",", "2", ",", "n"}], "}"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.784991222937964*^9, 3.784991266472834*^9}, { 3.784991403570047*^9, 3.784991404177*^9}, {3.7849915386807756`*^9, 3.784991539440803*^9}, {3.7860403579487467`*^9, 3.7860404711525*^9}, { 3.7860406298600283`*^9, 3.7860406306484127`*^9}}, CellLabel->"In[6]:=",ExpressionUUID->"f81a2199-caac-407b-95bf-2211d7b265a5"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"logZ", "[", "n_", "]"}], "[", "\[Beta]_", "]"}], ":=", RowBox[{ RowBox[{"logN", "[", "n", "]"}], "+", RowBox[{"n", RowBox[{ RowBox[{"(", RowBox[{"n", "-", "1"}], ")"}], "/", "4"}], RowBox[{"Log", "[", FractionBox[ RowBox[{"2", "\[Pi]", " ", "\[ExponentialE]"}], RowBox[{"n", " ", "\[Beta]"}]], "]"}]}]}]}]], "Input", CellChangeTimes->{{3.7860366301695232`*^9, 3.78603671133499*^9}, { 3.7860405792534246`*^9, 3.786040612454341*^9}, {3.786040708688937*^9, 3.7860407113402042`*^9}, {3.789830910073181*^9, 3.789830910887369*^9}, { 3.789831116169219*^9, 3.789831161489019*^9}}, CellLabel->"In[7]:=",ExpressionUUID->"a0e3da7a-9e7b-466f-bc4d-cb0b0d8819f4"], Cell[BoxData[ RowBox[{ RowBox[{"\[CapitalDelta]Ss", "[", "dat_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ts", "=", RowBox[{"Ts", "[", "dat", "]"}]}], ",", RowBox[{"cs", "=", RowBox[{"Cs", "[", "dat", "]"}]}]}], "}"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Mean", "[", "#1", "]"}], ",", FractionBox[ RowBox[{"#2", RowBox[{"(", RowBox[{ RowBox[{"#1", "[", RowBox[{"[", "2", "]"}], "]"}], "-", RowBox[{"#1", "[", RowBox[{"[", "1", "]"}], "]"}]}], ")"}]}], RowBox[{"Mean", "[", "#1", "]"}]]}], "}"}], "&"}], "@@@", RowBox[{"Thread", "[", RowBox[{"{", RowBox[{ RowBox[{"Rest", "@", RowBox[{"Rest", "[", RowBox[{"FoldList", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"#1", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "#2"}], "}"}], "&"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "ts"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Cs", "[", "dat", "]"}], "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}]}], "}"}], "]"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.779561994673626*^9, 3.7795620342479887`*^9}, { 3.779700498628436*^9, 3.779700513292344*^9}, {3.7797005747090063`*^9, 3.779700575188902*^9}, {3.779700627710291*^9, 3.7797006535654173`*^9}, { 3.779700716133662*^9, 3.7797008200306168`*^9}, {3.779700857824486*^9, 3.7797008584386597`*^9}, {3.7797008994884863`*^9, 3.779700901055118*^9}, { 3.779700939144706*^9, 3.779700939215414*^9}, {3.784991004834445*^9, 3.7849910388807697`*^9}, {3.78499127505939*^9, 3.78499130611341*^9}, { 3.784991358538706*^9, 3.784991380665337*^9}, {3.78499900310424*^9, 3.7849990048956738`*^9}, {3.7860344496890173`*^9, 3.786034449949182*^9}, { 3.786034500347063*^9, 3.786034500511032*^9}}, CellLabel->"In[8]:=",ExpressionUUID->"cfeba3ce-dc48-40c8-b8b8-f34cf59a253d"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Cf", "[", "dat_", "]"}], "[", "x_", "]"}], ":=", RowBox[{ RowBox[{"Interpolation", "[", RowBox[{"Normal", "@", RowBox[{"Prepend", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{ RowBox[{"Normal", "@", RowBox[{"dat", "[", "\"\<\[Beta]s\>\"", "]"}]}], ",", RowBox[{ RowBox[{ RowBox[{"Normal", "@", RowBox[{"dat", "[", "\"\\"", "]"}]}], "/", RowBox[{"Normal", "@", RowBox[{"dat", "[", "\"\<\[Beta]s\>\"", "]"}]}]}], "/", SuperscriptBox[ RowBox[{"dat", "[", "\"\\"", "]"}], "2"]}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]}], "]"}]}], "]"}], "[", "x", "]"}]}]], "Input", CellChangeTimes->{{3.78981937873456*^9, 3.789819402196154*^9}, 3.789819474816937*^9}, CellLabel->"In[9]:=",ExpressionUUID->"9b0c3339-71cd-41f6-9ef3-ca7bd5b2e440"], Cell[BoxData[ RowBox[{ RowBox[{"oldSs", "[", "dat_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"ss", "=", RowBox[{"\[CapitalDelta]Ss", "[", "dat", "]"}]}], "}"}], ",", RowBox[{"Thread", "[", RowBox[{"{", RowBox[{ RowBox[{"ss", "[", RowBox[{"[", RowBox[{"All", ",", "1"}], "]"}], "]"}], ",", RowBox[{"Accumulate", "[", RowBox[{"ss", "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}], "]"}]}], "}"}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.779700960584425*^9, 3.7797010023114433`*^9}, { 3.7849910515540743`*^9, 3.784991075832299*^9}, {3.784991369146078*^9, 3.7849913764007483`*^9}, {3.784991547938244*^9, 3.784991556568716*^9}, { 3.7849917900181932`*^9, 3.784991803720964*^9}, {3.784991863633103*^9, 3.784991884800845*^9}, {3.784992068826951*^9, 3.7849920762732773`*^9}, { 3.784992122226707*^9, 3.7849921237610617`*^9}, {3.7849921543708973`*^9, 3.784992167089695*^9}, {3.784992239922765*^9, 3.784992242761147*^9}, { 3.7849989835196743`*^9, 3.784998984447055*^9}, {3.785000974761281*^9, 3.785000975480179*^9}, {3.789830929032741*^9, 3.789830929207098*^9}}, CellLabel->"In[10]:=",ExpressionUUID->"a1830ef0-911d-442d-b5d2-b62c202fce89"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Sf", "[", "dat_", "]"}], "[", "x_", "]"}], ":=", RowBox[{"Integrate", "[", RowBox[{ RowBox[{ RowBox[{"Cf", "[", "dat", "]"}], "[", "x", "]"}], ",", "x"}], "]"}]}]], "Input", CellChangeTimes->{{3.789817903707137*^9, 3.789817918665738*^9}, { 3.7898179830831623`*^9, 3.789818070963172*^9}, 3.789818128172594*^9, { 3.789818328048049*^9, 3.789818328991467*^9}, {3.78981865828652*^9, 3.789818665814815*^9}, {3.789819419187801*^9, 3.7898194204672337`*^9}, { 3.789831192249136*^9, 3.789831192735342*^9}}, CellLabel->"In[11]:=",ExpressionUUID->"c5d823f9-e85c-4b3b-b05c-3154ec28aa66"], Cell[BoxData[ RowBox[{ RowBox[{"ff", "[", RowBox[{"dat_", ",", "\[CapitalDelta]x_", ",", "\[Delta]x_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "x", "}"}], ",", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"s", "=", RowBox[{ RowBox[{"Sf", "[", "dat", "]"}], "[", "x", "]"}]}], ",", RowBox[{"n", "=", RowBox[{"dat", "[", "\"\\"", "]"}]}], ",", "\[Beta]", ",", RowBox[{"xmax", "=", RowBox[{"dat", "[", "\"\<\[Beta]1\>\"", "]"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"NonlinearModelFit", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "s"}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"xmax", "-", "\[CapitalDelta]x"}], ",", "xmax", ",", "\[Delta]x"}], "}"}]}], "]"}], ",", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"logZ0", "[", "n", "]"}], "-", RowBox[{ RowBox[{"logZ", "[", "n", "]"}], "[", "\[Beta]", "]"}]}], ")"}], "/", SuperscriptBox["n", "2"]}], ",", RowBox[{"logN", "[", "n", "]"}], ",", "\[Beta]"}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.7898311955449543`*^9, 3.7898312093030577`*^9}, { 3.789831243231729*^9, 3.789831244079329*^9}, {3.789831294191235*^9, 3.789831426152293*^9}, {3.789831478986567*^9, 3.789831485824489*^9}, { 3.7898315199939957`*^9, 3.789831522392721*^9}, {3.789831606978533*^9, 3.7898316137600183`*^9}, {3.789831690098496*^9, 3.789831713568328*^9}}, CellLabel->"In[12]:=",ExpressionUUID->"b26da0ea-b484-4f10-9733-25392042ef58"], Cell[BoxData[ RowBox[{ RowBox[{"d", "=", RowBox[{ "getData", "[", "\"\<~/doc/research/hadamard/code/monte_carlo\>\"", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.778948447393362*^9, 3.778948476191824*^9}, { 3.7795618755287123`*^9, 3.779561880399358*^9}, {3.785804692431429*^9, 3.785804692864304*^9}, {3.7858129014364243`*^9, 3.7858129030771227`*^9}, { 3.789743002867009*^9, 3.789743004777854*^9}}, CellLabel-> "In[156]:=",ExpressionUUID->"3b7ef50e-b362-4da3-b734-818bb17a7c2f"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"d", "[", RowBox[{"All", ",", RowBox[{ RowBox[{"{", RowBox[{"#n", ",", "#N", ",", "#\[Beta]1"}], "}"}], "&"}]}], "]"}]], "Input", CellChangeTimes->{{3.790500857951195*^9, 3.790500873614827*^9}}, CellLabel-> "In[198]:=",ExpressionUUID->"1d9176bd-3b77-4ecc-9453-1c9a125a6eca"], Cell[BoxData[ TemplateBox[{TagBox[ DynamicModuleBox[{ TypeSystem`NestedGrid`PackagePrivate`$state$$ = Data`UnorderedAssociation[ "RowCount" -> 7, "Length" -> 7, "InitialType" -> TypeSystem`Vector[ TypeSystem`Tuple[{ TypeSystem`Atom[Integer], TypeSystem`Atom[Integer], TypeSystem`Atom[Real]}], 7], "Shape" -> TypeSystem`PackageScope`Limited[ TypeSystem`PackageScope`ColumnShape[ TypeSystem`PackageScope`RowShape[{ TypeSystem`PackageScope`AtomShape[34], TypeSystem`PackageScope`AtomShape[34], TypeSystem`PackageScope`AtomShape[60]}]], 7, {}], "InitialData" -> TypeSystem`PackageScope`CacheHandle[2088261021], "Type" -> TypeSystem`Vector[ TypeSystem`Tuple[{ TypeSystem`Atom[Integer], TypeSystem`Atom[Integer], TypeSystem`Atom[Real]}], 7], "HandleQ" -> True, "RowTarget" -> 20, "Data" -> TypeSystem`PackageScope`CacheHandle[2088261021]], TypeSystem`NestedGrid`PackagePrivate`$path$$ = {}, TypeSystem`NestedGrid`PackagePrivate`$pos$$ = 1, TypeSystem`NestedGrid`PackagePrivate`$grid$$ = DynamicModule[{ TypeSystem`NestedGrid`PackagePrivate`renderedGrid = Deploy[ Style[ Grid[{{ Pane[ Annotation[ RawBoxes["12"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[1, 1]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["64"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[1, 2]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["25.0"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[1, 3]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Pane[ Annotation[ RawBoxes["12"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[2, 1]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["128"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[2, 2]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["50.0"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[2, 3]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Pane[ Annotation[ RawBoxes["12"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[3, 1]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["128"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[3, 2]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["50.0"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[3, 3]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Pane[ Annotation[ RawBoxes["16"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[4, 1]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["64"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[4, 2]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["25.0"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[4, 3]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Pane[ Annotation[ RawBoxes["20"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[5, 1]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["64"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[5, 2]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["25.0"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[5, 3]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Pane[ Annotation[ RawBoxes["8"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[6, 1]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["64"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[6, 2]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["25.0"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[6, 3]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Pane[ Annotation[ RawBoxes["8"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[7, 1]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["128"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[7, 2]], "Mouse"], ImageSize -> {{34, Full}, Automatic}, Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes["50.0"], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ GeneralUtilities`Slice[7, 3]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}}, BaseStyle -> {ContextMenu -> { MenuItem["Copy position to clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], MenuItem["Copy data to clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], Delimiter, MenuItem["Paste position in new cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic], MenuItem["Paste data in new cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic]}, FontFamily -> "Verdana", FontSize -> 12}, Alignment -> Left, RowMinHeight -> 1.5, Dividers -> All, FrameStyle -> GrayLevel[0.85], BaseStyle -> {FontFamily -> "Verdana", FontSize -> 12}], LineBreakWithin -> False, ContextMenu -> {}, NumberMarks -> False, ShowAutoStyles -> False]], TypeSystem`NestedGrid`PackagePrivate`initialQ = True, TypeSystem`NestedGrid`PackagePrivate`self = $Failed}, Dynamic[ TypeSystem`NestedGrid`PackagePrivate`setupViewPath[ TypeSystem`NestedGrid`PackagePrivate`$path$$, If[ Not[TypeSystem`NestedGrid`PackagePrivate`initialQ], Module[{TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = $Failed, TypeSystem`NestedGrid`PackagePrivate`tmpData$ = TypeSystem`NestedGrid`PackagePrivate`LookupCacheValue[ TypeSystem`NestedGrid`PackagePrivate`$state$$["Data"]]}, TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = If[ TypeSystem`NestedGrid`PackagePrivate`tmpData$ === TypeSystem`NestedGrid`PackagePrivate`$NotCached, TypeSystem`NestedGrid`PackagePrivate`renderedGrid, TypeSystem`NestedGrid`PackagePrivate`renderGrid[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1336641171][ TypeSystem`NestedGrid`PackagePrivate`tmpData$]]; If[ Not[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]], TypeSystem`NestedGrid`PackagePrivate`renderedGrid = TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]; Null]]; TypeSystem`NestedGrid`PackagePrivate`initialQ = False; TypeSystem`NestedGrid`PackagePrivate`$pos$$; If[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`renderedGrid], TypeSystem`SparseGrid[ TypeSystem`H["(data no longer present)"]], If[GeneralUtilities`$DebugMode, Row[{TypeSystem`NestedGrid`PackagePrivate`renderedGrid, " ", TypeSystem`NestedGrid`PackagePrivate`formatState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$]}], TypeSystem`NestedGrid`PackagePrivate`renderedGrid]]], TrackedSymbols :> {TypeSystem`NestedGrid`PackagePrivate`$pos$$}], DynamicModuleValues :> {}], TypeSystem`NestedGrid`PackagePrivate`$posCell$$, TypeSystem`NestedGrid`PackagePrivate`$topBar$$ = Dynamic[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`makeFramedBar[ TypeSystem`PackageScope`Pathbar[ TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1336641171]]]], TrackedSymbols :> {TypeSystem`NestedGrid`PackagePrivate`$path$$}], TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$ = Framed[ Dynamic[ Replace[ MouseAnnotation[Null], { TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][Null] -> "", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1336641171][ Pattern[TypeSystem`NestedGrid`PackagePrivate`path, Blank[]]] :> ( TypeSystem`NestedGrid`PackagePrivate`$lastPath = TypeSystem`NestedGrid`PackagePrivate`path; TypeSystem`NestedGrid`PackagePrivate`makePathTrail[ TypeSystem`NestedGrid`PackagePrivate`path, TypeSystem`NestedGrid`PackagePrivate`makePathElements]), Null :> Spacer[10], Blank[] :> Spacer[10]}], TrackedSymbols :> {}], FrameStyle -> None, ImageMargins -> 0, FrameMargins -> 0, Alignment -> Top, ImageSize -> {Automatic, 14}]}, DynamicBox[ ToBoxes[ Column[ If[TypeSystem`NestedGrid`PackagePrivate`$path$$ == {}, { TypeSystem`NestedGrid`PackagePrivate`displayScrollBar[ TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$], TypeSystem`NestedGrid`PackagePrivate`onDesktopShow[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$]]}, { TypeSystem`NestedGrid`PackagePrivate`$topBar$$, TypeSystem`NestedGrid`PackagePrivate`displayScrollBar[ TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$], TypeSystem`NestedGrid`PackagePrivate`onDesktopShow[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$]]}], Spacings -> If[TypeSystem`NestedGrid`PackagePrivate`$path$$ == {}, 0, {{}, {0, 0.05, 0}}]], StandardForm], ImageSizeCache -> {157., {95.5, 102.5}}, TrackedSymbols :> { TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$}], BaseStyle -> {LineBreakWithin -> False}, Deinitialization :> TypeSystem`NestedGrid`PackagePrivate`deleteState[ TypeSystem`NestedGrid`PackagePrivate`$state$$], DynamicModuleValues :> {}, Initialization :> Block[{$ContextPath = $ContextPath}, Needs["TypeSystem`"]]], Deploy, DefaultBaseStyle -> "Deploy"]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("Dataset[<>]"& )]], "Output", CellChangeTimes->{3.790500873928317*^9}, CellLabel-> "Out[198]=",ExpressionUUID->"94444a82-e2b3-4106-a108-782b27727f6c"] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"sample8", "=", RowBox[{"d", "[", RowBox[{"SelectFirst", "[", RowBox[{ RowBox[{ RowBox[{"#n", "\[Equal]", "8"}], "&&", RowBox[{"#N", "\[Equal]", "128"}]}], "&"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"sample12", "=", RowBox[{ RowBox[{"d", "[", RowBox[{"Select", "[", RowBox[{ RowBox[{ RowBox[{"#n", "\[Equal]", "12"}], "&&", RowBox[{"#N", "\[Equal]", "128"}], "&&", RowBox[{"#\[Beta]1", "\[Equal]", "50"}]}], "&"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"sample16", "=", RowBox[{"d", "[", RowBox[{"SelectFirst", "[", RowBox[{ RowBox[{ RowBox[{"#n", "\[Equal]", "16"}], "&&", RowBox[{"#N", "\[Equal]", "64"}]}], "&"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"sample20", "=", RowBox[{"d", "[", RowBox[{"SelectFirst", "[", RowBox[{ RowBox[{ RowBox[{"#n", "\[Equal]", "20"}], "&&", RowBox[{"#N", "\[Equal]", "64"}]}], "&"}], "]"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.789831908881502*^9, 3.789831945703508*^9}, { 3.7898604011843967`*^9, 3.789860408737005*^9}, {3.789864913402884*^9, 3.789864920183464*^9}, {3.789865009416779*^9, 3.789865014802567*^9}, { 3.789892804356556*^9, 3.789892813604467*^9}, {3.789893714396906*^9, 3.789893716106145*^9}, {3.7898968668142767`*^9, 3.789896872979452*^9}, { 3.789932602730394*^9, 3.789932608991914*^9}, {3.7905000270031652`*^9, 3.790500027298358*^9}, {3.790500832505785*^9, 3.7905008364464607`*^9}, { 3.7905008834877453`*^9, 3.790500908670889*^9}}, CellLabel-> "In[199]:=",ExpressionUUID->"965aa541-441e-48ee-b9c7-6c04093a0d42"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"c8", "[", "x_", "]"}], "=", RowBox[{ RowBox[{"Cf", "[", "sample8", "]"}], "[", "x", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"c12", "[", "x_", "]"}], "=", RowBox[{ RowBox[{"Cf", "[", "sample12", "]"}], "[", "x", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"c16", "[", "x_", "]"}], "=", RowBox[{ RowBox[{"Cf", "[", "sample16", "]"}], "[", "x", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"c20", "[", "x_", "]"}], "=", RowBox[{ RowBox[{"Cf", "[", "sample20", "]"}], "[", "x", "]"}]}], ";"}]}], "Input",\ CellChangeTimes->{{3.7860306193210077`*^9, 3.786030620479714*^9}, { 3.786030896792254*^9, 3.786030897100741*^9}, {3.786380888045945*^9, 3.786380925007681*^9}, {3.786381157019925*^9, 3.786381157479299*^9}, { 3.789745775534863*^9, 3.789745775611329*^9}, {3.7897469477345467`*^9, 3.789746974292004*^9}, {3.7897497620872917`*^9, 3.78974976216495*^9}, { 3.789816756139023*^9, 3.789816807097396*^9}, {3.789819433657423*^9, 3.7898194634932632`*^9}, {3.7898319317305803`*^9, 3.789831978527664*^9}, { 3.7898649246393833`*^9, 3.789864928959545*^9}, {3.789865019225033*^9, 3.7898650248002462`*^9}, {3.7898928173005323`*^9, 3.789892817580557*^9}, { 3.789896880637479*^9, 3.789896886211711*^9}, {3.789932613953886*^9, 3.78993261910413*^9}}, CellLabel-> "In[203]:=",ExpressionUUID->"0885a315-6bfe-4916-87e6-8a66c95472da"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"x", " ", RowBox[{"c8", "[", "x", "]"}]}], ",", RowBox[{"x", " ", RowBox[{"c12", "[", "x", "]"}]}], ",", RowBox[{"x", " ", RowBox[{"c16", "[", "x", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0.0001", ",", "10"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Beta]", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"n", "\[Equal]", "8"}], ",", RowBox[{"n", "\[Equal]", "12"}], ",", RowBox[{"n", "\[Equal]", "16"}]}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmViYGCQAGIQveXA9HOxNm8cBbfxXwXRSRekHoDog4/DXoDoE1pT 3oDoV4wb34PofheJryC6K6YUTC8s6ZGJA9LbCvrAtNi/5DAQvSqnNw5EL5Kt qGsA0gJh4Z0ges7/W+cagXTJx5MXQXRDcvmLdiDddqvlFYh+dHL/LxCtbPfg D4j+XLJBqgNIJ65YpgCiz0Zc1wDROh5huiDaIOj3ialA2s31H5hm0qz5Mx1I M//K+guib6wr5JgBpPc0rwLT+xM3z1oKsr93F5jWO1yyEkR/Llq5FkSzzXc8 DqLX6KicANE80frTlwNp7n99YFpUs2oOiD4WVAOmUxw3cO4E0jMthblA9LMN /4VA9CvOkyIguo7zeMh52zeOQf7MYSC6oIU1CkTzKJ4H0wBokcHO "], CellLabel-> "In[262]:=",ExpressionUUID->"b9af9737-77db-4699-8144-d484234a5c9a"], Cell[BoxData[ TemplateBox[{GraphicsBox[{{{{}, {}, TagBox[{ Directive[ Opacity[1.], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwV13k4VO8XAHApS5aMuWRnxqikJH1bKDlHaZE1qST7TrYkpI02IVtClCUp kkpKouwizDCWZJ2RNZJIpIjf/P66z+d57vO+5z3n3HPvpdp7mzpxc3FxPVjG xfX/q8qrR3/v6ErDG1L3bEXs0u7Dv/98+zflBhm4yO1amKp9zVbk7reb52BD tFZJw7MS7bx+kpyH0FVYIzKy7XoQU1teXNrL3iwM7BgY85Xo1b51gFZmfj8a jO6/GeNKHtb+p7X65rqft8F7R3OvxPZJ7a3tyXmKqxMgSCvM+9fijPYpb4VO uZ1JYGa3+/nFzAXtDP7MZVLW92HCXEppD8ENHQ+UVcSupMFx3WWp/Tq8cDPl 2BO+Iw9g0ctm5FKvANDG7u7mGcqAAtqfD2eHRKB0e3czd0AmiCy6iMblksHi qpwz18rHYDxJuv77njjEymZEzW98Ao8WnuXSpGVho9ug4p/SHBConq0+lK0A HwvWFs6a5ILAtRl1twIqLBo9ZU/5vYC+SLcXq2rWAJ0xWxRwNQ/uXQ0WFJ9Z B9K/JK75G7yEb3sK/At3q8AbtJD0Y+WDd5WPAMiowQqX8/2+Wa8geX0iMfF5 M5hG3s897fMamjLfpVRu2gLfO1nozf0Gsu+cEStctg2Uzji4ua8tAqMBJ/mR nbvAN+naf24/isCVmrzx0ogWlJc9+ufythheHnO+I5quDSeFvsY6HXoPPEwi 8ay0Dtx+5FFs61UGy2b90pkzujA5tL/yhUw5TBY9m1Se3werzx1fpxZcDjoF rDFt3gPgmBY4papXAedOzvdfU9UDrvHi6xu6K6HZxrzpYZkhrLvcMJYDVaAV sjBA/DQCI3KPsUpmFTRLrCjkFjeB+xr/pNZ7VkPXYCaf8tHDsOM6PF+79AGS BuiVrJkj4CVf3U6l1YGsHIvF9eYEKDX6HhSPqYPl+5Y/0Qi3gK6L1GL+f3VA FvQAT7uTcKD3UsqP9nrQGnuiUSJpBZT7mo4l4XR4unnL8P6jttAi9WLK/GcT XNfOWvyywRGqB5+rP1ZjQvr5qGzeZ46QrnVjTMGZCYpLtZqRak5wbHyrJdHK BJmp7MoiDWeo1L8Nf3ObIbPobJTTSVe4J2DI+9G2FeqEe+5U93mAv71SmU5i K2Sulc8/FuAJpsXzAe8YrdB86oLKVhEv4HfPGX2+sw1eT+ScoO/xBr86Pka8 2Cfg+3g8JbvHBwxvVsY5fGyHt7DJzfr0GVji0aAuqXWBstSZOVfSOci/uudl j30X/Ce7Jo/mdg4clxnqFMd3gURB6IJ95Tn4uGBnd3a+C+7cC4r18g+CmOmI B99qukHV9nTv68HzQPnCpnZY9YK09b5pVucloLD2xnbs64MFjxNvibgroFP0 LfblmQFw9H2bM50ZBl49RRnptwagymjyb1ZfGCQvhb6KfjQA7aEbnqbKhsOv fUqfPD8PgHZcS9+R+HB43GIpqbJrEES93Jr6wyJAcJyRmsE9BKXyy+6VXY6E T/J5T+Nih8E5r2P58bcx4HbN78PZF6PwcIvKd6dvd0D3lrfdbs1JcLYejvwt nQYV/x0/8s92GlrPq/b/oGdCUZlajhV9Fiz8L6elfs0BpXYl6dp1f2G4Mlr1 fFoeLOoZ/PPU+wdxU8+PH3r1ClQO52dYHOdCgzCByO2qhSCUe5xL7vsy/MSr PVOXUgzKBhFjA0HLMU91/IGaVimEWO/gO6/Cg6IqkjYqhhVw40wM68NmHnyj LhHcd7QCwm+OFpB28CBxvcv7nnUF3M6/5/h4Lw+O7WjoUvCpgExerspmSx68 9uN6kUNcBdQ8/3hBOZoHPXrbbrK6KkBg6cTPT9M8aEFTVe/0rITbaRd6N5fw 4qzaXudnj6rAJiFthruaF7VaXwzn51XBxshK4U/1vPj99fZ75e+qoDaIX/tc By/aD5i3/GqugoWjd1IrpnmxvN3+c8ViFTgL5dqYqvChHG+/0Z8T1aB5rvvL mUQ+3NgSdVpD4gP0me4cfnOaHwdD91go5dVA5ZVoklsgPx773BVqW1IDmfmD O2Uu8+OvRO6GrPoacCVHR1++xY8xxJqa40M1MNU8oHEwix/PUFwXtWVqgftw ZERnDz92ru7j2R5WC0rGfZsXDqxElZmhS0peH8FV/8Z5HXkBnG/n4Zu1qQee vgpKsJIAVmiXGh7yrocMv38fSlUEcCI1pDTnUj30pPiRtHYIoPaf1N0xKfVg Mmn/aLuJAJ6LHoia6K4HjXho2nBFAIPzyO5LFg3Az55TXD0sgKKmMgEv7OmQ 5XuqfuyZIHbzkJ1eJTeC0KhPXt5rQZyyeH+D9bwRfG38E/zfCaLlrKKIVFUj aBuE2HPXCWKIX9jR998aoX1N4l+pQUF0TpareLe7CXg7K1X0pIVQbnS9Vc5g EziDdETWDSG8GbfTTCyNCUpCdfqONsIY7K5/eCepBczbym4sTK/CEHudQ/58 n8AxVCJoy1ESbkg54m18qgMcrgiaRZuTMKhY1+hGYAfYX1xSHT9JQotpJ52i 6x1gd2bkyyN7EgoFEExyegdY2xTqSfmQ8ABJ+0JMWwec2HFciiuChGc+6FLj tTrBaCThLaOchCw7C4lZ3i4w6g+/rVJNQufSk0PHiS4w7L3kEVpLwiqdh6Ev FbrAoNWZotNIwkMzMz36Gl2gV7b95utuEjKPvWyRcusC3cT24/dmSRh+cscM d10XaB5Y/dt1oyiOzQiJHQjphgS/i6tuqYniqnvjec8juuHng8E1L7aI4sqL D9cJJXRD7kK+2YyGKN5Wz/mUm9MNlHzj/JB9omjU1nDvbGs38MqFeSZbi6JP hG/OnGIPtPycH2iIEcUac9engkU9oEZxmJ+IE8WTsRJcXJU9cMuwnkxOFMWH F4iB4foe2Jd9V8c8RRTlE0jDET098NZqW9rgE1GM1J7oVlvqgdSPXhb/KkVx k/HfHbU6veCe+oW5aYazH/kQ2764F56+f3Yzfk4U6x8aFPyo6IXxrnO4MC+K /eVa+W51veAtQc6r4yZjqYvutFJHL/jF7Il2JJFRY/0F08JfvXDpykPD5A1k fLBLKUxHhQVl6d48y9TIWHc6w+/eZhZwle0qcdlCxqEJL+aX7Sy4Ot+6cZsm Gb1+7Xn6314W3PRbIcTcT0bK6PyzMQsW3HZ2quexJ2M6Ifn13g0WtF5Tv+Lh RMYmmdrVryJYIPbwn2arKxn9p/xGH8ewIJEd/yTdm4xrZ0T6TZJZcN+85uau i2Q8+aF7y/NcFvT638aMYDKGbhxdT37JAvl46zn+a2TsX/k1wa6ABQ+aZ13a w8kYab21vbKEBY8PrTtw+i4Zz5rqrYhmsGDEdXrx8z0y/l42Um3UzALl0LI3 2mlkvLHHaPnfNhY8rTq+VugxGV0GBRfJPSzI07rJk/WKjHYr1YSNR1kwZWFW IlxIxqQjtb3u4yzYco5y1q+YjIpv1Lf7/mBBQcHbQZ0KMi53XXdt7wwLijeN VvU0cuIx31A6ucSCE5eVi1a2kNGab2s2cLNhrsnl+fZPZIxW/1h9YQUbtp0e vhvTTcZpZ9K9Cn42tFWsiSphkdGMHne8ToANvmSnq2NfyOhup2NQJsSGvFcD nrpfyei2bPngWRIbjFbQHE5/48SbIRO+ncyG72b25qkTZFRLc/EaItigMtu3 Z+4XGasFxn8LS7Chbj9FY80cGa/oW6eHSrLBNdFG1XSejP8iAiJ/SLHhkQZL IncZgX79J7XCZdmgGyYn3LmCQD3ehGUlcmzo77Tk5uUnMGrfUTJLng0hKvd/ bxEkcLTOzue7Ahso57vHbVYRGOQYLveNwobSBun+W6IE9kZmynymssFK1uJz kRiBas63PF4qsjnv6ST6sASBywuUyEE0NiSXdFQQMgR6jh5bpa7EBs1VkoUo T+CSFOHQznGH9fFcTyqBFStMyO5r2OD/IuFBshKBKCIoP86xOFd7Qu06Ai/u P3jTci0bXpuI3/qlQuCiNfnIO45NH5iFUDcRuFfKo2SG46mpOH8jdQLZ2kks 8XVsiNnTeur8VgLj+li+ShxviiPbZe8g8KWpQSiVY8bA4WOfdhLYWr6oLMyx x9ZYfW5tAvtUqU4jnPUErjNRTYdAIb/xg3kcP/kkst1Sl3O/btYXF44PrjXe EHaAwH/Kj7VWcTzsH0V5c4jAlGB9l4ec+K/XMsQHDAkkX+XzXsexkqSwIOkw gSvA3C6Zc/5KVwOu3WYEuiTX6S9w8mVXFDHjdpzA86Yzuww55hJoGEuwILBh /gpEcvKbaiHQV2VFoAq3suN7Tv53P9X7NGlLYGF2VmEXpz5BBh/LDrkQaCkR pjjEqadUCl9BgDuB65PfHG3m1Pvt9/05mZ4Exm859iOX0w8zUR/uLJ4h8PsJ magt0my4w14RviGAwDGr8y96OP20ZbPuZfMgAjPsKr39Of3m01zplh9MYPpt Mu85MTasUuS2YV8l0OhH9dwXTr8+89UxEwol8HpOXtVOUTaMEeXazpEE3uuW l30vzAanYyWEdDKn/km13ks8bIiqEifvSCFQ9Iesw/RyTnybvUhm6QQOy3yF jmWc/AsqCEc9JnD1G9EJv38seF4WzMv9ilPvuc7s+WkWfN7YuULhDYEtibln Aqc48y1ZfblWEYFS3zOThidYYOrXv3S2jMCRuObNiZzn/7ey7p/RBgLPNPjS 9FksoCTc/83bRKDh7dPWZt0sOLR8ZobWQuCdzYFuxh2c+dX76KdVB4FnJ7k2 yLSwAG/zjTcPcvrJ4eaiwAcWhM3Xs4r+ETh5LMz6bxYL8l1pve1cYti33ddE NJMFPZ/Od08vF8Njb9JoMuks2JS3sUNVQAyH18k18t1lQYtjVPOD1WIYLPGl 80AoC2QaD1eHqYnhxLEIzUAHFjxL73hywk4MFd/dV9cjOPNoMf5gsaMYOge7 mQUIs+Cj5ZERaVcx/JGp8z6JjwWDko1KPV5i2NqZ/OXdPOc7OrYqzfqCGK55 Smw/N9ALN0KexzskiuHD+Z+TM3m9YGt/LcSTIYZ62a32qft6QUxp84kQTXE8 37JWrO5ED1x+bbstW4tjr8RlgaY9MKYbK9oE4lh0ESWp+j1Q7vSzTna/OBrP hfyw0+oBj6zXO9+aimPcq7JuR/keqFbRlP1xShxpJ/2Wb/vSDWfV97AtU8WR q/SSlrlDN7RrmzlpLF+NgZ0p2wRsuqDw9uvwz72rsci4jKqp0wHbVlrOBr6W wLtHC11cj7SDR+fFoqRCCWysDJVIN2iHzCdpF4qLJfC93IFj3fvagXxogHuh XAIZCcWJlhrtMBnuLnKZIYG7S37Qw+XaIVfonPL1YQlkftktfe/rJ1AkJVjE Skqi6oHz4UpXPoGIBLP0yQVJXBXccCW/qg1UOo4prgqWxCOF8qTQkjbYn9R7 3feqJBp/MDtpW9gGl2S+GewKl8Tkn7uUqU/bYEKBt5ueKImxL/Zc777dBgxl rd8/8iVR5lRu9BaHNojYma22fVQStdIc4hz42oDPOji98qgUnspVL3ls1QrB h4N0vptLIeOac+qceSv81fXrl7CUwvj9TFsjs1YY3+Cq5GkvhQYNGtd49Fuh 5Y9xtoS3FP6wfEfN0GiF+/EKeR43Oett+HYnTqwV1BmlZavfSWHhg/QJw6YW OKn1j+VOkcY1d16ypU1awNqAFHadJo2RILjZ26AF7C1p/6Wvlcb+CtfGmoMt 4H5BL/TTRmlMY6V+u6zTAkHv49VQUxpV4+86Sv3XAne1NgWLm0pjsmKg2sjq FmjTsqGWX5XGsQueRT19zWCwu8JBfEQajVRK8zwvNsNWbc3nZ8ak8XVXjNWu oGaQhZdzzd+lUcfLar1QQDN8xweRUb+kcS2RIVbo0wxRuiGFfNwy+N4leU7d sRmY+jqCf2VlEIarhor0m8HMoiKfZSqD5dYU12VyzWAZULEsu1QGl0p2S3+p ZUJGTm4YvUIGZTRIryM/MOFrb6LoVLUMfr0gFKBVxYQzul7UnQ0y6KVt451e yoRwURkd+mcZ/NijOBpSwITCp37Bk5My6GTR/if7IRPIfeuWNGiy2L/N/dy+ ECaYE0So1VpZPMWtGq5ymQkp+xdXXVkvi15qcSGiF5mg/KxNvkFNFvNybisM BTIBgkK0rbRk8amP8u8MHyZ4iHVfDDkqixGLY3yBtkyoPRi1UBcqi/YHdCQv 6zDhpwdLaUuELFbUp5j5AxNkYzcZJkfJopW/Yar3bib4dDamuMfLItVT4Iir JhMk3UVA8KEsGih4E77qTHCPiAkxKJVFjQWdgCEqE4Qab/M2/ZJF8mRVBaxg wuEjiaQ2Ozm81PZ74NT9Juh4YuHP7SSHyrMx33yTmsCWS75ns6scLjXsrb2Q 0AQ+zzKzIr3kcCqUNn03pgmi+PK1D5yXQyO/gqGf15qg/h3do/iOHE7XlgRu 8GoCXSXuuvRaOTxzuUbhwZ4m2DHjEeKpKo9s0m8e5elGOOSqNxmxWR4/9C96 sycbwbJ7jU3Of/IYGzm5KmmiEYIrWFojmvKY5Pu5nzzWCB8jTeZs98tjzb4j jyhfGsF87VZvMxt5nLV8/CijqRECj89b7orlrFemQPBy/qfC6z83nLgjj62+ H5Z+PW2E+7tf7wxMlEfJjnrG0JNGKKd5ShakyON62UF+xqNG4J9ktW7KkcfT bTmfX6Y0wt2blYcUq+TxoLh/YWtkIxQVhWmsnJHnzCPJw97ejZAn13Dg1Jw8 Dm05Iejj2QiPQ4SOM+blsb9lU73vqUa4oxd9NpZbAfmrYowuuTSCV+edfCmS Atq0FeAzm0ZQ/JO2UWWDAj6VfbPTzYQTr8Ybir6dAprgXI3Bf41gUdjPH8lQ wPYPT/TMFxnw3DDxaAFTASsV+X8PLTCAe1A/o7dVAXPOb1vwm2dADqlg16Yu BQw2P8iXOMeAP26hXk3DCihqvn5q7CcDDFatHuPnoiA5JyOROcKA8fJiY30p Cu7aIyMX2sKADWtXyDD1Kfjum+NeoxwGfByNEb1hSMHo+Bo29xMGOD6T49cy puBpuPTybRYD7m/dMZNlSkE2xWRy3SMGCO11b7p8goLhxO9isXQGTNgwr6q5 UFBFJOHi2gQG5CfdH4+6QsGw2eUWilcZoCm8rdSwiIJ5tPD5bbYMkLYxKpov pmDQvI3SfzYMWMhzef3kPSfe3KMq6tYMKDVLzuEpp6Ds1tCPapYM0L2/lFBS Q0F5g/UqO8wZYLKh3lu1jYJqqv6Jp0wY4KJnQxX+QUH/idxr8joMiL8edo2u RMWRsFq3NiUGPPaxTLVaS0UN4/fPhTh+c1Lt7cQ6KtptFbizj8aAdvVP30gb qOh1Vky7iMqA1SzKkaPqVFTaFLYiW54Bd7e/pbJ2U7Fzm85ShiQDkkeGS38c o2K1FV+5oDAD0vR0/5DDqMhKksry/U0HxWd6Ax/CqajJTHtZPkuHTJIxI/AW FfmHik6KcJz9+cQDVjQVr+dqRz7/RYd8J2+9nAQq0oYiT/6aokNNSHKSTiYV TwR6maWM02G8aFLTp4yKghn5VPt+OmiopAQxZqgo07si5kETHUbXWl51+E3F ndkpfXIcJ9Nkbv2Zo6KwRNrj5EY6LMgmpaxZoKJbzLnYeAYdKkTiyy9yK6J/ IbMjpoEOh2Zu8W4SUUQH2mn2/Vo6WJZfuB2lrIjxIsXXJcrpcPmYZY7xSUXs 28LTqZtPB/8vWYW9lor4Slg8gPWSDh4e09WnrBVRcdfZU4Ecm18JZ4faKaLv Su2jz/LosOX5W7FyF0Xc3ntTQeYFHQZ5xC9v9lPECNqCIm8uZ/8CxhHRSEVU zZ8NXP2YDuJi8K+lVBGd7NN2rbhHh50TZZb1KjScKfZz8r1Gh+bw3+ZWG2lY Y3CtisKx6zq1o5OqNAx+tcak6SodEm1TDVer0/CSb/rMRo5/tVzQtt9Bw0FH 3rNjIXR4UahJ+buXhudyyPZel+mgFPJqYL0VDbVWvOpIDqLDO7lv7PfWNDTY yHPQmGPTYsUeY1savi+bG13Occh0bNtZBxqORe2r8TxHB5aTz4cKNxp6KS0N 7A2kw91Dqlkn/GmoP7eN+ecsHYTFstzDomnYGWBvGHmaDqnEF139WBqaRvUY IMebCBkF4TgaUroCYqZ96GBCjm6NSaDh96TqQQuOb5MCtO6mcM7/PrFmozcd JIUPrMp6SsOtM9SEXg9O/LwjL6traVicn1WU5kqHAh7qrRt1NCyivh625ng/ z0nngw005Hr8/qg8xy4rmqTpjTTc639+LsWFDjnchVdbP9FQPeXtgXRnOmxe unG0f4CGQcmd1XmOnH5ZLFfLHKLhi4Ll385wbLr4d6XzCA31cv4a7uD4zD+v 0tExGkqzFz6WOtDhzfyxdVNTNMx04A9n2nP2n49Z9mqahn7BJpHxHH/+W9/t N0NDkY3v6y04nvujHTM3R8Negcc/h+zoEPYn0L34Lw2bCwJ6nnIs/Sdf98IC DWXZxNJpjnPmxuW1F2lYR6dZaHC8a27tn6UlGlbHm3xftKXD/wAizQ8x "]]}, Annotation[#, "Charting`Private`Tag$1824223#1"]& ], TagBox[{ Directive[ Opacity[1.], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwVl3c8198Xx41SiYzP8LHHR/FVZgmFc0SDNLRQQlaSUVGiZZSQFIUSQior ycgoe5TxGWb23uSjJYX8Pr+/7uP5uO/3Oa/7uueex72ydh5HHLk4ODgmOTk4 /j8q5b78+9hIDNYdT5zN7f+nZ/b7z/Tyt3Pgu6aCeI+QoH/bVuDJdLAPuKrY 0deLlOhnDwlKuvIFwkx7VLC6ElNfiiTmbncsBHp1bLclh/boh+2lllnEPYAt jQoJcepj+su65GCF75FgWnQtV7CDpb+tPTZbjhwN1kXrVuye/dI/7yHdKbnj KQQo7VCf2bikn7w2hVPUOg6q7C5UWNZwQkeSohIx4Dlc4vYgOI6shuD4E2lr jiaBXJra1SQPXqBOPdFbPZoMW3y8/nvqJACl27ubuLxTAIIePjnvIAwnAyWd ONa9AppWct4PExJESCSHL25JA7uw+W8WBeKw5dyI3J/SdPjUk/arSlcaPudv Kpg/nAkjv3WnLa/Jwr+DGf3fvN7CD8uo7UmBG6GRNl/kHZgNJnN81KIsBRD7 KXL7iuk7UN2/ZSb5x3/wHk9SvPpywJRX9a9/vQqsOntt6NLrXNCsj6yVyVKD I/fjMi9eyIOTlvmEPG4N+NrZhx5c7+GHbNyh8tZtIO9pf85lUxHU/KfpxcW/ Ey49vb31HKsIPuzWYwoW60J52cvls4XFMMB1y/28pz6c4puIcDT5CKSAxI5z qw0g8qVrsa17GVSf21QfNmoEc6N7Kt+Kl4PVuz6TpzO7gexjrqDqVw6XGoe8 nv3ZAw7Pr35TNq6A4B28Puc2GgPHTPGdzd2V4IwGP+5VHQCFWw1T6VAFT01M RF7+OQgHhXsOKaVUwR7OLpMqscMQp70s+p9bNRgWCFfttDEDrTuQtWmlBkRt F9OMeI+Bu1R1uyy1Dgo5jhicGbMEefqlfaSHdTCvqxmkWnYSum7IFq9drgNa DU1Y+dkp2Nt7M57VXg+UULurqVanQSZOx6EktBHObD13MSnAFppF336z+M6A yyMfF0mXHaB6JEv9lSoTLkof59b46wCJukFT0k5McOKw7G3wc4QTM9usCC1M 4Fnhm78U6QSV+yPhb2YTaM04dYV8coZnvAd4Ptu2gPArw0qqtxtcsZMvM4hp gY55dVcfgjscKV70/kBrgbdK1a6a79xhrUv6ZNaOVsi7SMztmvMAr7o1tChi G7RwZOy1xItwILjykf3nduicsFqTPecJK6u1ZVdUu4Cxrv9mPd0HcgJ3veux 64LpjHd2Vzb7ggPnAYPiqC4ISd60MTPYFz4vnTlzebEL/prvM8w1ugYPf9xL mq7tBikKzy/ZqusgM9gv23G6Fz4G6dQSOm+BTJ9hRMfuAfCTTg5a0QgEg6Lp iHeew7DBcfYe35VQcO8pSk4MG4bEZ91N8TmhELtyN/fBy2E48mBzhz0rFH7u lm9z+zIMQ0G55++fuwevmq0oSjtHwDlO5YWZbRisn6ElJHONgkeL+fe75uHQ JpWd8ShiDHZb8pbGaUbAudteNZffTgJHRt1ieHgUGIV5nNHTmYMDEyVujesS oWKr+dFl2x+QtvLmb/Ctl1BUppp+unEeQM/tulp/Bsi3y4t9UvgLHA/+bhfU ewf/jE2X3YyXget1N+eKex4omeUknzTnQE0l8e2jCwXAl2nOIfmVE2vGLXMy zT6Aoum9qWFfblyzdPkQ/Vkp+FtrrbmmtBp7xHQOjBArIPL59V61Eh4cDesd oRRVwsCRHWPvL67Fb2v+Gcr7VoPz/qBrBlK8mPVy4u/i5lp4fel8/dSb9Wj6 0KYipeQTyPPV7Xew4ce+TN84hSt1YNFaFrT0YwNSBLdWVSs3wK6Iy4rtfzeg gxAHX7pmA2w5uLn+LacAzpxrrn+s1wArn6L57QUE8N3gziXfAw3w6oPb4zol ATz40dUtzK0BfiaLJ0efEUCf1935bVkN8PCid4kaQwCPfFJS27i9EXxVlG14 2wWwOPX143r9RnCYHuIY6RFAgrea89W9jaDleNAoZkoAh7na5r9aNIJHZuTo Py5B7BllfjO63gjkxHOujlKCuD9Nv6i6mv3/XRFfjeOCmKHtflLemgb2AeuP PbAQxMC3r7/8OksDuxsryjOnBDHg3XOz1os0OOM5PvjSThC3aeV0F96hgbVN gbHoBUG8Nxf7Rj6LBpZa5qIc9wQxQjd0PYmTDgfHowtp5YJI0ikhKueweSg0 UqlaECskot16SuhwoPem691PgjiY4/X1eR0dTFucZAzognhknuXpMEgH47Lt wXndgthEeSc7LcQAo5h282fzglgVZFq72ZsBOnvJv523CCG3qD70/seEaK8b G8JUhTBpVVHqKzUmfE8a2fhWQwjv014J3tBiQuZSzrFf2kIoWen/wGw3E2Ry DuX47xbCEKcp7YQz7L4gGeIWay2EfQ0OxNk4JtibzN0uOSOEix9qM+NSmFDu bR434CCEDMfvUqcymeDTvLFh03khbJU/tn/tRybM3K1UzPUWQvU06qhiDxOa vy8ONzwUws16O/wypZtAVcZ+cfaREF7yy2G4KzZB2IF6YeEYIfyo4DhnqN4E u1OfGFjEC6HQMeWzCoZNUHha8/lImhDOpVhc7zjbBAmf3U8uV7LnhbuMIvKa wCVhkKnySwjnuQr2FFg3Q8bHN8FRC0LobXusfeP5Zpjp8sGlRSGUsTSIzfVu Bg8R4ew6LmH0CBuXVIloBq+Hux44CArjnV/HC1NrmuFmwIsDsZuFcZdG+Hou zRYoS/RYzakqjC4WMe73DVuAo2xnyVkNYXzPvTpW70gLBC62bNHUEcain37v +S+0QLDXKj7mHmGMGLg6aPqmBSKdHOtX2wljnm2pmIBqK7TcVg9wdRTGrS/4 uFZhKxBfLOu0OAtjSZbvXnmzVojpj0pL9BDGseyHbyY8WyHOojZ45w1h5Nhp svP+h1Z4ZaKw9+ITYayY2daXerQNilUmq3rowmh0+Gnd/vR2sLylWLSuWRj9 pN89XyxrhwXG2aztbcLIGyO90NvWDpoXx5487BbGAB+o3sn1BbJzh92MJoSx ee+XIafTX+Cldp9IJicB17w8/65VsgOMQiT5O1cR8HtSr0/P9g4Y6rTi4llL wPrEOGXJwx0gc617xmYDAYkW1xZMAjsgtqSjgiBOQLeF5Aj7mQ54uKvl/LVt BKwWv6oyWtcJKo+Ez6RqEVBh9Xqp2rFOoA2bnWjbQcCyokrxae4u4L3DRFUD Ahq+cWr/od8Fdz7RSMMHCHjGc03AmsIu8DX9XGZyloB6/ZbNF993g+OJEoJY LAG5px/rbh3rhfAqkrBWPAHXp3PNjPD2QaGau+CxRAJaP5UK6VLtA9710vzh rwj4KiDqUYRvH2SV+fFw5RLQsdWaokroh9+KRn8mGwhYx3U54rHiAIQs1vcV LRPw2SqVyy/8BiHHmdrbzkHEm5ZPivfFDEJP27XuH9xE5JAWENyQNQgq2Vs6 lHmJaPa9h2+hexCaHcKbkshEPEQfUTPUGQJxull1iCoRec6NUUP+DMGbxI40 yzNEPBZ3xbn4wQgU/4vaV+xARJ1XqQLUzBH4bHV0XMyZiOoa35pSPo/ACIUu 3+NOxB/br5/9xjkKYhFVz62vE/HPjHrv+8ujEOSfFWUfQ0S+xhfaO8+Mga3d bX83GhEbfnle4jCYAPdyAxk6k4h+n3gDSTYTcE1qpVSllYiVzj3/yd+YgOgu nyVWFxH3MrUTFIsmgHbEw/vSBBFnxh9xv1SbhB2GJ928uUmYfeP45B/xKSDK q1n665DwtoLKcG3vNNzKs9VM1SXhaM7UPGN+GqaMIthdi4Qc45HUtwIzUO74 vU5iDwklHC8OTOEMuL7O21F4hITOfRruKkkzUK2kI8E6T8KyeVLjovlXUP1w boHkQcKGNWJtrW5fIXZ/bKvuJRIujnyVvxj4FS64LoaFXiXhmu0RjNk3X0Ei q2R54x0S+lPEbL6sfIXL6rv6rRJIqM4F3ArRszBQcelDYBIJfQtvtgW/ngXT Iy9i0lNI2CZ6aDK2cBbkPFcdXkgnoflQ/y5a5yzQ82rLHxWQ0PiEXLoFhQU6 u3/HFReTcM+pI95KCixIaVPwGSwh4UjsosVrTRb4zgerq1aTMKMypeS5GQs2 ae9PrmeSUGGXHly/w4KIz9dufmshIdX/PjUqggVLFpknKV9IqOpNzjsaz4Jm H36CUy8JU/aFCJXlskCPV58VNkBCevhdH5dSFqTGujfkDpMw6Mx4VeFnFtz8 wAjknCKhjUiIxs4eFkzu57BV/ErC0GI7ltsoC471qOkemiPhURdaGc6yQGk5 4mfcPAkxNp/73T8WRN2vZFb9YfsVl5izmXsOOKR+ZE4tkXDBJ1yczjMH7frH HLW5yZjDGztwi38ONpVPDibzkDH90FtDuuAcXDa4Zc3PS8Z1m+T8hghzUF1J 7PbmJ6Nf7OKpj+Q5IBqlmw8JkpH8Qj3+lOgcONRAqymRjBTp1+vKxecgd0/b 4QIRMrteSVcnJOeA67MLTVacjJvp+/QY0nNwxJjDJEyKjBalKixf2TlIro+q nZcl4zvz4qxpuTn4tn+z4ZmNZOy9zR0vKz8HSCsva1Ak43rbvd0SG+fg4cET utu3kPG7xkRoL5sHGNOFiapkbLniRrPfNAeqZv6a67eS8WprYPVbNt9sJudc 3k5GdfnliAo2049mqgzokLHLjWn+lM1SbQYZJnpkVA37T0WLzW4nvijkIxmV qSMrsez4H7+4pkgbkfHZG2HNGrYePksu2dC9ZAzLIP7Mp86BVVdM/E8TMurI X7R3Y+vPOKUsZnOQjMsv29OmZebgb09ldJ0ZGa32iM+qsddvYm1B2HacPZ+k a67H9ie2/+uDBAsyvumx4RNi+zdpG8i3zoqM1klN2zIpc6A9RAnxtCGjghzP wga2/8H2Wav77Mgovev7am32/nSMGAbscyJjoEFfK5W9fwpOnf9yzpGx+Lvy +Be+Oah1XrVw9wIZcVtNYuzqOSBPPfX67knGfPu9Kumcc+B4XvWblTcZH/Ps jlmzyIJV7ien1G+SUUZveb3KJLveWCynOH8yfsurFHnRz4IXF+4M89whYz9/ xdjbNhbs8szu6b5HRvq/HT6Py1kQ+XO35Z4HZMzTlTp+IZ8Fg5e727Ijyah1 /dfFiTQW+F3lYdx5SsZN7R+4stjnpfSGVYXqazJGlw0bvLRiwYaVb3qx6WSM F89453mQBaf97havyiKj3ugunhFgn6+AnNzOPLae5waZb2RZsCN47avASjJq CosvfhyYhYLIvNAvvWRsTVdrnzs4Cw/V7AU1Bsko5HJYq2jnLLjQhaLDRtj1 p0J8q6s4C1K8HkkG02SslNOwS+GYZffb/wozFsgYJ/hY/U7WVzhxIWH0FkEE e702Dbb/m4H5A8GoaCyC1+7sDfvmPQ2a66zmr+aJ4K7kbaddFCbAtfNG0dMC ESxaVydgvWECUtKeXy8uFkFlut+pE7/GQdhkmGupnM0+CjzmVeMwF+oicIsm gn7a6m9TbcYhk89H8c6YCO4T33FtQ+wYyAlGn4ygUDAuUvOcj9gonBwokMwR p6Cg02ixOPcoRGR3DjRLUfBNelNR8/QIcJhJniVupOAfDYarX8kI9EakeMao U/DC1Z0hY2dG4AkhNyzehIKHb+RdVMoeBgERZmnadQrybTkd6mMzBEodJ+Q2 +FHw8oOOLTHGQ7Dnae+dS4EUXHsq7H3r1iG4KT5tujOUgnX5T4Wz1w7BrDRP d2MMBaEn7sVg7iDQFHV/s3Io6NeUPb1PcBAmJitPHntPQRVBLjvnpQFYlWFc WlhEwXFDn8+pEwOgq2x+x7+cgoaach1hFQOQqX6JQKBTsKmiizrqNQD3dqSq bp+kIG+tQ/iGmn54tajyKHaGgtz9+yXbk/qh8mP+/D8WBb0CmMWDN/vhr35V yad5Cqr++tlSpdMPLoZ9+y1XiSJHY8nh9Jw+MDYlOl+XFsWA+NLt77N7YY21 X2LlcVHsKuSPN+7uBj8zX4OvFqK4d7faw5yKbvhr5DUkYiWKLy73nj2Q2g0z m53l3exE0bZdvFbkSjc0/zmUKuIhiu2uH/QWCN0QFyWd7RosigK99aFvLbqA FCJqFnNPFBeS0h9TdnVB+HXC94pwUYwmT3i93dwF/vZrtolEiaJ7mdxbx5VO cFJnFVQkiSLPlp6ymdROUKeVlpE/iOL7J9svKq3qhPTyQluDUlG0eR15wWyu A+TzcjhdK0QRh9P4k3s6gPzslWHFJ/b3qgT+svwOWHIO/3S+VRTtxbZbNJ3r gNpV1ozyr6Kov1fIp7vjC5zSXe5zkRHDhPOn0mnN7WBtKhhyhyqG8iopqSNV 7WBnRd2auEkMux9d2iyR3w4u143vtm0RwzunjnRNx7SD78coVdQRw/XzeTFr bNrhia6KH+mIGLoIP1xY/t4GcaYGSmrHxTDsrLIO11gbJFodazWxEMPX5aus qZ1t8Pq6r6KftRjyzFec/VDWBu8/1jKnXMSQsbd5cWd4G7Tq2siWB4rh6cgs y+eqbdBheqmhK0gMaXKp9xTk26DH6s7lXyFiOOqX+v0zpQ2Gr2fUKT0UQ70P 3SUnuNrg+8ffF6PixLC3Lb/9aXsrCOo9rHTJF0PZEBmN2MBWMNWrsCeNi2Hw 5/eFNrMtsE1fJ8tzSgylLu04wD3aAhLwbqHpqxjWXMk4U9rdAl8x6X74TzGU I1tv8a1rgXAj/4I1XOIozCemxvWqBZj7Ddb/lRDHo927SuXsW6DQtOi4hYw4 eqlN8MqfaoHEA+qJ76ni+PF5w2Gdoy1w8ZCspqeSOF65pDiUwH6PCB/ltJnR EsdoZWLdoY0tcOxkRU7fEXG84JApQZ1qBt1TOsu6J8SxNa947+JQM8hbvdv7 zFIcnxwmaY90N8Ov00k95rbseB8O/hynNUP0GX+eJjdxlFY0Ts3NaYYOZ4OT VcHieFIxW3XXrWaw8q7gTC0Vx5YNJYnnqM2QnJ4Z0lghjnlvC5Z8pZphojdG 6Fu1OD5OncqIEW0GTyN32R0N4thRhAnfBZohVEjcoPGLODJGM9ZsWW6Cggwv v7k5cXyD285FdzaB8IDCijZVAik/+RYsnjaBBYFw9/QmCby0vNLrENUE8Xv+ bQj4TwK5Oe++uBrRBIpvWqUaVCWw5/RsQkFIE4Cvv/5pXQm8Xc4pFOnbBK7E 7hv+xyXwNHx8lnW6CT7tC1+quyuByXLfyjT+a4Lvrn3yGvckMMFMVWJoYxNI RKgciA2XwFpO6V9P5JrgQic93iVKAlX/1fdKSDQBxUUA1r+QwMAZe9o1Afb7 895Df9NSCbT0c5QJ/s0EPnokD+OnBGbyB0Q4NzJh+/chFa0FCdxx0Vpjoo4J tuSt5s8X2fksLxm5fWJCnnXLaw8uSVQf87x6t5IJp1kEY0FBSfy4ysTwbyET sgSj7pltlsREXqH78a+YYHY0RrD1jCRalNfMvwtgQkfayStcjpL4Zt318SI/ dnwOqR41Z0ncpKx1qOYmEy68SXl9310Sv3657T7my4TwNTn6e69JomeopbmZ JxPqPzS6Fj+WxMIT+6RrHJhgJM9Vl/hJEjXuHT31z5gJjb41Kox6dvxew7cu +5hwtCn48TJNEvsKFus79zDB7qaA7clWSSTdoBiWGzLBv0PiN2FQEhOiK6Lf 6DGhNExr492/kvh8SvnzKg0maP1y9XdTlsIbCU4J1yWYYOJsPHdPTQq1ZHsp euJMsOreaJO+VQpja3nCVkSZ4FfRpzuuI4XH0rxSgkSY8Pn+4QXbPVLY9zAq 8pwwEyw2bfM4ZiOFJ7iUDwetZcJV80WrnRFSuP3Klm7iDANC6780WD6WwmdC +0wGJxkQp5e342qMFOYNXBvJHmdAOdWNkh8vhYmKUkGWwwxYO9fXopIuha7X Tn1jdDHgSXCliVyVFHLm5v82rWdAUVGI9rpfUqi7EvTRPoMB2ZINe88vSOE9 UcZn+zQGvPLnM6ctSuFIx9FGp9cMeGz84HIElzTusmiNv/yCAe6dj3NEBaVx C1k9I/8ZA+T+PN+itFkaySYvzhaFsfVqv5fZf0YaR0YvuydcYIBf3G/VNw7S qCHV+K7XnQHeHDog4CyNZ301T5DdGODw+cPpFndp3Fp7reH+OQboW1TEnrou jdVH1qpF2THgu3cj0TVGGgWOukmtOs6AkwVDa+/TpDGCK3/7sZ0MyDoQczyf KY21iivHhnUYwDWyP7m3RRorPyuv8dJmQLpg/k6VLmm0MgKZWE0G/Dl3150x Jo2R7zf/XFBlgOkG8tRaDhncdzsvZkWeATPlxYf2i8pg22FVfXlBBpD5SFf6 xWSQMVvqOLSBAWjuEecpIYNE25DxJH62P1+pk8+kZdA53vy7/HoG6IrdD5jZ KIOdEbZzO3gYEOZpk39fQwZnL8iNpyzRYfOmVeLM/TIYP4oM8yk6fJ58KBR0 QAaX1I6pyEzSweGN5FrdQzKYqNvZPTlOh7htWr9eH5HBLI5LEv6jdOAzdGHc spTBVQV668sG6DBrwwxUPSuDHS+MzL2/0CHnadxMeIAMhj/7pcOooYMOv2bp gSIZ1JZb/FDzkg7sy3rRYrEM/hsT39iVQoel7LN5aR9lcD3WXGC9oEPpsdj0 1eUy6GBgmyaRTAejuJXokloZbIw/6OmfQIfDm+s9lFtl0Go3zyrPGDqcNbaR 5Wex9Vc2LX4KoUPUnZDbjfKyuMg4rfjFgw6vLlglnN4kizG9SS+k2fz+lGrh rIIsbvmlkensTod29bZpwc2yGBWbbL/kSgdyn8zR4+qyaHPosq2SCx2ebC+U 7dOTxVjF+e2JDnSIHR8rZZ2QReWe8YtzlnR4bmz0RzhEFkVie4nr99BB7o3x cE2oLPYWZjc57aZDiuAh2tUwWTxuIkCsMqJD6hfLpL4Hsvilnl/hhiHbL0cP 4/RoWeTeKpI7h3So9Y99apAiiy5adgOsnXSYKZrTuVAmi2bheR9MNeigrRTv S/sli7u53/acl6HD5CarQPvfskj+lyPxVZqtjyoe9meBrV9b54M7m5cknsZv XJJFbc5rwp5SdKgQiCq/wSWHdcnhMn4SdDD5FcajIiCH+o2yFzIodLAqvx4Z riiHB3myrxkJ0eHWCav0Q6fkkOdHWoExNx2uDL4u6LWSQ457JKUBLjq4uv6o Pm/N5mnZ0StstggI7b97Rg7jCh9te8lJB42sQmL5WTnkVidqruagw8hq0i01 LzlUF2XFNy/RwCSfdlTovhxWvz5OTJ6nAYkIy82lckj087FZP02DmyIlXQHl cvjPMsQ8Y4oGY2I7CzUq5XB1NuvpfjYXymp5RtbIoVLI9FLYJA1OqqpOmjXK 4Uu9Ok3CBA0STKTbmJ1yODY2bKg8SgNF/5VM+k85vHA77lB0Pw12zJZZ1StR UZc3opDaRoOm0N8Wp7dQcVO11Z3OVho4K6gen1OmYr+q490HbI6xTThAVqfi kWN3lZZaaPCz+bq+nRYVs86GTHxppsHbAh2Zv4ZUTHKbk3rKpIG8f+7wf6ep +KhGZL9BIw34ia9dQh5Qkd9Cd16qmq2PMGi0P4KKQRdHAjqraKBCEJfmf0TF cbUVw8dsPiz8oOVhNBV/P/C342VzpKC37pN4KjKl7Nf9qaABhX/vhtcZVIxo sKzqL2Pn4xl/V/2Jimn6lEP1H2iQv1o2LKiOihpKvDtD2Lxn9SmnfQ1UNJJ+ dHQfm8+uYog10tn5rxB5PxXTIJ2rILCljYr3Sr1Da4tooLYSdHxomIq3DINr aAU0qPhXrpoySsWo5TcXHrD5yL+/65zGqbh19bq9Zmz2XHYvnZyi4jdd7stt 72nwfvGEwrdvVIws82vpz2fnX3zImfuDimUc9W3JbP7yt77b6xcVo5+Eczmx eeGP/sOFBSrOcm/unsmjQcifqy7Ff6kYu70lKJvNYn9yjK4vUfHgzRgrLzan L8xI6f9j+0OzsdJm886FTX9WVqi4j4MYtJRLg/8BEmgsng== "]]}, Annotation[#, "Charting`Private`Tag$1824223#2"]& ], TagBox[{ Directive[ Opacity[1.], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwVl3k8VO8Xx6VIRTFmDLOYsYQooiTrOUWLvZWSpSRJRZakKCRly5dKIhXS ps1eZE8qy2y2LFnSZktJsve7v39mXu/Xfe59zueczzn3uQqu3jsOCQsJCf0i fv7/r553b+qaGQ06LsmNuZFGjLf/nRyc/XUEyLs/y8HROJML+5fdGIw8DWbp TuzR+Kcm2Z8kmcfEw8ExY+PqqPMVJvIUmpfrrii4p9ojO8+ywSR2i1L5ntT/ 4HWQTFlIX4vJrJFMpOroFVB9MfFtLKTHZG1LSraizHVYQbfRzQ75anLUm9XG NEgG1Y3rb4PfsEmGWOY8OedUuHHzwFzAs1GTD+lq6uTzd0CcMXw9jPXXJPKW 3aOFO9Ohpv2u2CeJGROlgRvGIl8yIHvX8QzHUiEoW9fBFz6VCZcm1V2u5s0H h3Cmu9Ci+2DXlblWeUAUEhgZcdMrHwHHu353LG0prDzyWXGyLAus4jOGyhZL wbsClRfj255Asnjk6LkV0jBn87j7l/9zaHOI/TpQR4X6hvGiU+HZkN3r/Zu9 jQa0MeqFAKsckB0XOZ87zoBCdJD178qF80v6FGd2K8CCw0GffB/kQYyIBSf5 oyLsuJz6xOdEPohqajoOBSjDcFsXegsXQr7bkjW63aqg7HfwiKdKEQST/Xt+ RGmBb/KFNUdGiuC/1z+EDvNXQ0X5vdnDL4uh7W3TwzXftGGf+PeEQxYlkJjw qVZJay1cuXeseL9XOQg+1f+R0dGHn182Vz2nV0Bou06EaowByJy2V9UKrYDr 64JapX4YgtudwF+rzCthWBN3ZfNNQGioOEKjowrSbptkd0RuBNWQuoEseA1y fHp2qpMp2JA6bdUzX8OOPwoDEXpmkLp+Vm7F8Wqo1O1uHp7aBHoR8Ezl3xvo b6F7t1eYg5d8dYuC0ntoiWGb3lTdDsoc362U+PfwpsO597/326H9rEKx2Ox7 +Btip9jgtQO2fDx3a6SlFl6J2vzVfr0T2Kn6bqXR9eBXPbdY5podtFh+b87+ Ww/3l52UqdxmD7HT17dkujWAqtmz102Se2DSYUw9xoQDEt+XuG+6uRcEcs9/ 7RnlgnlI6LOCNkeo/vxM+74WD87Sv31ZlusEaUYXB1juPCjOvv/052VnsBta 6yjdyIONlVbK6mr7ocryCkw94YPdgKvGfCFXuLnYWvTd/kY4+1pUTGyhOwS4 KpdvSGqEgssX3dfHu8OO4ulTrxoaYXkqvW8z/TCIeWb1PzNoAoZC6L4Feh7g /35hQyK5GWzC2t00IjzBOrLq6sF3LSCqxdA4ftYb1HqSrT7OtYCOpGxKEukE LFjvI2Kv2wrnolaJ+R0+AcXfWKcsMlrB1nPfczrZB1S2nHXQDv4AJ6/Xp2w6 7Qv/RNYr/NNqByVZ+4ehfichN3xjTqdrO0ifsXJ6zDsJbvOsNxQntoOoVHbA S80AeDdz4MDJ6XZYtC8vNGg4AOJ/x6QP1nSAiZg7ZJ8MBHZvt8IHp4/g+sDy +YqcIGB3mSZ82NQDj6z30x2OhsEkw3zvFpceGJ6Tl/Z6GAaCfTYKhYE9IPxx 9tDElzC40LYn5+rjHqBeeXj5hOt5+N50nG8j1QustOT6X/vDIbsuSepNZy9g ikKBlX8EbCgaTMjx64NgyTdbTOujwKuzKCMttg+utQUvFFsWDSn/LuX9d68P DjbWK8xuj4axTcrNx1v7wMFgU1PAh2i4L3CUVTf8DL92zR249S0Glgw13M4Q /gIHGk2PHVwaB83y2Y+vJnwFLe23vGzjBDhywf/Nyef9wD7gwVjVmwhmsd4H jPV/gtNkUSZ5XxpUrrHfObv/N1zKfkYL6b4HReVaWU714+CZ7uY4s+MJKLco 096qTkGullBZYEQOzJlbzR43n4VtO6Qukd7kg/r23AwHeyHc4rzyQcX+lyD+ xF6IOTwPDc5c/Q61r0DNKmag78x8VGkYVH24vBzCnPUWBqmLIHMpKzHCrRKu 3An+uLpUFBtEJUgq5NfQs8Pga6GPGA6ZmVTO760GD8uLQRvkF6Mp58k3ods1 8MD3aO3A0yVY/NPpWI/uO1AWf2/p5iKBlaHig25f38OepvKLM7+X4tzyZW5F 3nXgdol6Rme3JGrdCqpQlWgA/S0yfz1WSuGVrY9nSdc4cN3/7NJYLSmM9i9r j0/mwGj65+XPdaTQeEFhwNI7HHgyk7vrz3opDAzcvXBRFgfYuba5YZukMPNs 3LaZcg6IMqOOpzhL4aTQi9LeQQ4IRqf76uKlcOe7hv52Uy5osQ9O/7gqhWIa 85KczbkQa11LIiVJ4eLF1OFPNlzY9PDGhj23pDCmNCJ3eC8XXjrp3vn8SArL lQWnxU9w4fY7L4fZKinUF9paczKVC563e3maf6Swb1LjneY4Fx6XPI1MnJBC 3pHZd9tmuDDUfhpnpqVQXtLW2WAeD7yppOz3wiS0UNy+88BCHvjHb/zPTZKE h+7Wt76S5sG583etUzRI+DR3bPbBSh6Up3mLzNMiocYFY2odMUeEyg1LD+uQ cN9LvdARHR6ETzeu1NUnYajBNnsjfR5E+i8Q520moZuURcHXTTy44n6oVsSV eH7Cd0q4Cw8aL2ifP3aIhL1HrrwtdeUB+e6sfqMHCdcdbFCcOsSDpO7ER2ne JKxdMTR06hgPUvfURBqeJSFnxNIn8jQPPgZcwYxQYv/bnyX5wTyQT3SeELtA wj2xdpH0UB6k88cPt0STsNVeU6bwIg/uW6hu8blBwn9NtjuEr/Hgm8fvudab JFxz2XC3QxIP1C6VF5rcISFdSdMlP4UHnvdivO5lkDDoODNA8jYPHr+2VxG/ T0Jym3CaVzoPhnqVunwfkTDTo+MTJ5MHmkI/E9uekFBqt9fI4qdEfuVLrDGb 2K/i4JmFL3iQbRQp8iCPhH/+zHflV/Dgl8OuUokXJLxBGzI8UssDndPsk/7F JFyuZXibS8zhgoKXnzdUkrDfQ9p+8VcejDdeSH1YTcIEzsHO7h88WD+6bdey dyRcfO/Rlot/eXBakikeUEfCyJWXtef+EXNds/91J4eE7efWr9kqxodDdqXS tBRpHM86Rf4tIYC41xSS3i1plD0gpNexTAAvV3tJ7kqTxsFWPeFyKQEsXsKS iLsvjYWS9rVBFAE8Kw8VFc6TxgnT18VtDAH8VTOb7K+TxnKnetI9DQGwr6f+ FeVK48wyLeGYVQKwmP/nj5JAGt8NMDNOagkg9eO9UacP0hjySGLjvjUCwCsL h/ifpVHvsrJhoKEAoqZru4pmpZEsVL4g2FoAuR5KH1uEyNgx6D0waiuAzuag jt/zyZgalt13aocANLNXfli1mIxtFdSAZ/YCELjF8dNlyNgc/HO0y1UA0/yv 3DI5MqqnkixbDwlAGYDTwSBjubd/9CcPAQTI/aylKJGxSPyq1lpvAdA526uj tMhY4ept2BwsADPDrKr7OmQ0dzb7fTJUAF4PhStf65Kx8rYgWPOCACrO55XO GpIxP5oe1h8jgP6RJSU0IOPlg8UGw/8JgOTkVqy3kYySne2mS64JwLC25OWu TUQ8AwIjsxsCcNOjvPDZSkYh66e39G4J4HLm8YI4SzLuFk5sMH8ggEKpmrzH NmTc9tS+e02OAMSGArK/7CLjlifrL12vFsDTtA+P9h4gY4/0GeOafgEUzyVu LXYj492lBlrRvwXwznHnN5oHGXsr1rppzQrgsyxHudOLjN0aSjEqko1AS3h9 xzmYjON3Zd+L6jbCxbBniQeTyNh6zOBLTHAjXOs+urY6hYxJnx7l+UU0Qrrx ikbl22Sci57aeCCuEUom70p+zSSjifTghF1aI/z2SY7xyCXjVPXPwz+qG2G/ 64Ww4w1kfPBhJqSb1AReFRvYHB4Zy75TvE2YTRAk/69Ms4mMEpkbFN+rNsH1 9tMzI+1kVAzqjj5q3AQNO7xP+X4no1gWN1/taBO0Z6+UaRwk9G7yXaR+qgm+ Lx3IXzNCxg0eTQWe4U2woM5tdOwPGUX+XZ/JS20CA1OH46fmU1BJKvrrY0ET bE2nin8QpWBD9viV4Z4m2P2vKWv9Ygre9NGJPT/SBK5OV8yTJSi4d/1L++Nz TXDile33SUkK8vwjg7MlmuGcnMQlBzIFJUW+xd1nN0Psqdrlr6gUVNx8LqJj bTM8WLPpYLA8BdHYWSPCqRnyE4SFPyoQ1/cW+Qv7NkPVSHma8XIK/g6zCEy7 2Axdjw265jQoKCNkLLQtuxnIyqv3hulT0GPu8uC4SAuE5O/XfWhEwQ07L+af prXAgFmCFBco+DVmUFlPqwUqDo2+Z2ym4L5bEbtP7G2BYw/yDV7uoKCf5rNO zGmBVr0vMt27KZj9wKxo9m0LbHxH+S2yl4IrLbRVSN0tINsf8HinCwWXKbZb bVvaCtXq+oyRoxQMn54Jj/RpBa1XRyYo3hR0KtgT4xHTCimWKU1GvhR8pBgc X3qvFU4cm46NDqQgc7uGb3NHKzCelc4uj6AgvT5FbrkNcS7T3tjteJuCquuK /sbZtEFPpe+r8HQKXndiaoT5tIHVjrtJWZkUZNHfVCsntoGi34JtE1kUFCe9 1R/sagNOfk3F1RcUXLR9nvH02XbQ3/Q3tbiYQrzDntZHPGiHzGbV072lFNzf FbOKy2+HM+OR2lrVFBzL2+CXrdYBKustM2p5FPzA/71oZU8HJLwLOverkYIk CJBYKdkJM3ueOMi2UrC91Hnjsg2dIDgtIe3+kdCvL7idcK8Tzr3ihs8boGCE z1dYeOYjtJjsOrR+vgzeNT0g+XZXN6hU9PdmiMrgtuOW8skp3XByQ4izxGIZ 4vzhKc/p7QayWZb9J0kZJL4l4o0MemCHuZBFrLwMil9Mjilr7oGM2sSacQVi fZbSpsi5HvhlqWF6YLkMolwVh67WC/E2dkbrVsrg+QWrd54/2wucnU80e/Rl kPLommBk9SeQb97w2MJYBuMNV1bq7P8Ex+1aVQtQBl1C8pd6xX8C8b3CCtFb ZHB40VmK4PcnsHDeI712twz6ixZIetX0QY3HgolLJ2SQ42sr0n/zC8gMJPuP +slgE710fE3HFzh0VOuX4ykZ9KWa50TSv8ICL4cB7XMyOPd698DOO19ho192 Z0eMDN70++0cn/cNys46Vmo9kMEZmT97zywbgKX/fhmnZMngHrMVip9dBsAp 9FLxgmcyGCK6d8ozZwBmzufmteXL4JpGMZNm+0EwiBS7H14lg6+9Fn7fkDsE L67kR7d+lMHaIcH3wPQRiF99UFKnVwa/bvddOSb0Ezw5UtdjP8tgEPdm1nXt nyC/2Dt9w6AMDqQUNz25+pOYZytePp6QwbdXz+t82fcL7E7c/hIiTUXdcsbz snm/Ydw6EtXMqWjiNNNuEjEOvMF1NeetqEg7Hh7gXzoOWVFfLD/aUpH1+e7R i3/GwfnNRvsrdlSMuwo9Iof+Qo3R7PGZg1ScXPhLLwQnIK398W+7w1T88ZFX 5BUwAWcCHU7neFLR4a99+PDjCdDMf3HB3YeKhrMRmf6USbiu4XuTd46KpV6X rZ73TsKJ92wFjfNUrNSpe8uUngKLw9z7ERFUdBV1aWs0nYK5jJW5BrFUFLdm 3CrMmAJ32rd3mclUHOn8omdhNw34MtHmXyoVZymSInOh00CzM2vam0ZF3mRl 75usaeAkpHcvfUDF6vk5OWemp0F3keN4YD4VBwyTNtomzMCxtrNFyS+oWHOZ ElyWMwOZj+4EFxdT0dvU45sGfwZIFn3CMxVE/mTamj6Lz4IFTaSGUU1F6uK3 SxVXzELYgEqU8VsqunGLZzabzcLPaM9lIQ1UFNY6NU4/NQtq+2IFd3hU/Gm+ Q6IobhZcNJ4lVjRSUb7u9wj13ixcn+bu6W2h4ucYi3uri2eBU/eLLtxOxTGh vaunG2ZBNFW6W/EjFbca6MZ798yC8THdDNMeKtanRQmZ/JoFfyP7Q259hL4f gi2RQnPwRPy0WsRXKupYm3aeXDoHnztTBu/1UzEq3oa5iD4H9Kclz2qGqLji 7o+jZipzsONsl8+3ESLfEXfV1VfPQbS1kK7Ybyp6WPuVlqyfg0qm4oTaOBV3 qg5EzcEcTAybvjKfpOIOaWNR+uY5WF126JznDBVfNe9hj1nMweG4Sxti/hF6 q80unbGZg9vOjxY8EZZFrezu44+3zUGLZt3behFZXFjdKnJh+xxI/BuKHhaT RZvorJB5BJtxl9osFZdFvYHMxQq2cxB8Z7WU1jJZNFDra+q2nIM87x1NtiRZ vNrvnDFvyxwMgH/SCYos6jpcSCjCOVCUvO6QICuLjy4PgrT+HDj0vGDm0mWx 3ffAIhKhLyG7rUcgL4su/i8si5bPwbvQ6bu/FWQxOPC1uzhtDoS2Mw+Tl8si q9elZKnEHOgpgLqumiz+jjma/XpuFrx+7R/erSGL5clOm+gjs/AxIdMvSVsW E7bybEfrZoHsWrPu5VpZ9Aha1Hjh5SxY6Xyf/KAni5nbU1733Z2FYoFGKM1E Fr/oWlnJE/4YzbA2NdwgixW1O1JFXGZhhZ+3qKOZLOb0hL79uGkWbkjnxd6y kEX5Td5vfCVngdfXZFtmLYuOQ0xnxbEZWJg/TureJovNjwbWV7fMQMAug2S2 vSz2eLzaMXhjBnYlVt67e1AWa2wzVyVJzkDsoT6PandZpLoYVo8PTsNrXZGV X47I4j13ByG/mmnQadmaq3JCFq/U6yR/DZyGZVRe2aNgYr+FSozvTVOg/sFO cWmoLBqr6szl3J+CzckfI3zDiXrc2PG68tQUnKMPWhlGy+LB6sMuTdQp+MES 7ahPksVS5xi3vG2T0KBm9HckVxb9b1pEVz35CzEGD7XW9cuiRurhxMqNY3B/ WvNqypAsSroy7/iLj0FVScH43IgsLs7XfRbc8humTF6Xvh0n8lU+6sA7+hs8 Tbss9y6QQ9uSQw39yaNgbkX2CGbJoaPIonXPRH/BQufQtKrdcrjccctGg71D ELr9zIbhPXJ4b8+lwZLFQzBl5v+J6iiHDawjuaKlgzCk4aF83FUO/+r6jv5R GgTBpO1Dqrcc3rRv+LB2th8sh83NN/rK4bdv+7Z2FPRDdY/pwLGTcninp/6b j3c/vHirt7IqSA6zNFLzgr98h9REVvaxSDnsOVn26uDHb0CJktueFCOHsSt0 Pn699Q3igqVHK+PkcGujho2/yzcIO7hwLTVRDtc9v2X+6stXcNceeVGZLocT Ia2Kdv++gHZDWbnMKznc8rnpOsv5M2RVvNy/oUwOHdqfWkxpfAbl/Nx5xyrl 8Ned/Zz/pvpA5uZ908q3cnhhxfqhT8l9MOMR9/Zokxz+MbnB+9HzCU46Rnpc b5VD56SdDofyP8EP2/OLKtvlcD1vX19E5CfoXRdgKdMrhy36vf4lOp+gZoEz t2JYDjsOW3e/jusFmLA/MfhTjjjPqBXYHO6Fl4PbpWTG5LDTWsbbF3vhsWDT zqNTcnjC9tBg0FgPxKetaqUspOH95//MHQ72wD6j2S5PNg2HPxm2FeR3gbOV ZFSEEg0dlm63IwV2gauj0po0FRqaLF3ICDLuAs9g80vNK2m49MzG5WF1H+FM SaIW6tNwb1VZwMAocX6pf9jmYETD40/Oui4r74Tzna/CTwINf/WfM5CN7YSo md7WrE00jJD9suadWifcMNIMpeygoW/l2eiNxzog1WqD+urdNGTpcRTVoAPS HHc1WeyhoYo0JbyF1AEPgs+ohTrTMIrG+B5S0g6FJTW8AU8aliTLT2XKtkOT kYtCRTgNHxDHgtW/PsAHK9+69os0rBBSTJ/P/QCdjhEn/0TR0C28aIPH0w/Q F/z4vXo8cb+ozHDL0Q8wWvLXJzGVhul39a58/dEK4/WLGdl3aBhjZarVw2uF qU5mTW0GDS31SZds8lph3qwpTegRDWuUgpcEnW4FSeP4Ks8CGlLjF0Q8W9wK ZOu7xyJe0vAK86dC/whx/nUqlEl7RUMLmnxiUHMLsM52ejZX0nD+4lLP5PQW ULw8Qv5ZTcMF1ktCmJEtoHJLuHzxOxoa3bFrGPBqAc1SNWnkEPUq3Xe1z7QF dBoMSx34BAckZuqsboF1H20On2yi4djlv6x5zBYwnvV/ldVOw9ogKyvpiWaw Mq48SPlGw59nXs3W5zXDWhP9Z34DNOQ8d9kbltEMDMiZ4A8T9TnJohYmNMMw pl+OGyP8YDwwd82nGVo2yH0Y+ktDO6VFW/Vdm6FsY4Ki5TQN+w8c1d6xsxni zMJeLBSm4wGRn1It65ohYNPkPHcROoZQ79ENVzSD82Yfq2oxOmZ0Vg2IMZpB a+uB3tBldNygtXJYINwMPMsNS6YYdHyxsbWwvqkJXloV7d7DpuN588/qyrVN kGatnVaoREfHE7cO1pc3gY+tgq6fOh2FfwuLzH/SBKSd81yG9OjYLZ/yMe9S E0ztPP3IwpCObyIn7I1CmuDTrl+/H5rQ8UGtkc5sQBPk2fVGHtpEx3je/kL6 4SbY5VCZ27WDjo3GY/4nzZvAaJ/+rJEdHc14tj6eG5tA2TFny829dDxnXLkg xLAJ/jild9rvp2P/21qvqVXE9+SBMFH+cTpem15z5JN0E3zw2ODwOpKOa44Z ZOb2NELFkaJMhVg6Ss44Xldpb4SHntojIf/R8YfVhwOXGhvh9DGFC0bX6bgq Nf+2cA3xvXxi3rOCu3R8vy9IIuJRIwj7nJ6QfkDHKK96HZGMRhjw+bXRN4vI 1/Iooz0pjfDKr7dVM4eOllKML0eiG8HxVOW8h2V0DLKZjeo+3AgZWU+i6ivp SPJ9NWvo0gjfPyZJ/aqmY8EuEW8Hu0bwM/NSMKijYxs7LkRg2ggvT+195Myh 464PIYUqBo0wl2WmHc4n4hlwpemsboRoKfqG+lY6PlbeF3OQ3gg8M9H3P9vp qKv3SOUC8b1PCfy1jdJFx4kzDku2izRCWtfb/c6f6ejRtK3i87AAXjz2D/35 k45zNizhB8UCmOlyEaOM0bFKyo328YkANpIs4/X/0nH+AXLwo9sC4AQqpJ2f pWOHvYHIVKgAPm/ilJMXM3DYrs1mJQpA/XTRFn0JBjKbhDtqNAVw4kkm10mS gbqKfLdehgCmSUHd92UYeHnP37Uxf/mAm90P18kx8HapSjv5Mx8unt4+MsJg oPbwIwNpHh/qnxidIrMZyIkbPx/+ig+kHtV/65UYeEdiZ5frfT7skZa+5KTC wPkWe7rEbvHh1ua5pedXMFDv486CDII/ne6/fn8lcb9GWIb9bT6oPW2Sr9Mi 1o9HD6rc4YNXT/n9ER0GXq+rbl6Wxod86cea5HUMbFyicV8qnQ9Tm68Xrtdn YOQX13SNDD7AmTATJyMGLrUvXuJ0lw8Xnh6rCQMGbtJUW3Evkw+1PfY29zcy 8JqYlfF8Ij67LZrOI1sZWGweajf3kA+pZ+S+SlsxcMEkvTc5iw+9Txd4rbdl oIXRheNbn/DhGLnjbNhuBkZMSV3teM6H3C01Ivf3MFDNYNHzshw+TJzJuVy7 j4GKSScEOXl8CO+9dEvalYHWTH/tNy/4kPJsbek9LwbaDp+xiKngw9utcTPv LzHwg0rzzcFGPowe61LWiWEg2bbX93ELHxgJmtYpcQzM8iM3eLfx4UQb55Zn IgPFIwflhbv5IOu5DJbcZWDIre+PtAf4sDHO5bDffQZWWM5fNjVExJv7/L+O RwzE7/Oky0f4UDll2/M4m0HMv+QZgz988IyJD7MqY6Bh1wHnrn98uPa851F+ JQOXrJWp8RYWQFnjagHjDQMvzdte+2eBAEgMvuJwHQPX+hje7lgkACNUsNzN ZaB61bPD+uICcHfz8SsVMHDnd63KS0sF8OqJVPXlNgbyLxWSRkkC+Mo7MPSn k4GdriVC4hQBSP7JITv3MPB8C8+TRBWAm/GOQ5rfCP2Vk8k9NAHEHci4fH2A gfesLLffJ/z5MmK0YG6YgfSU5Ud2yQtAnHNFlDtG5INWlXxIQQDrRj9p6k0Q 18lzaTWKAtgvs8b+zjQD9V0KvyxRFkC0QXjIwn+E/1unnNYuF0C+c+MDb2Em dgy7/jNREUDXeSVeqwgTPz2WKFdXFYDYA78JWMRE0ez0hHGCdepesx+KM9FH y/poupoAnEakzSUlmZj75w2orxBApLSbT6A0wW7mwvEE5+rlJ/fIMLHIP/Ue n+DOfQuqttKY6JW/hPGDYNHQXQPZTCY2bT1q/5ng1ZmZJDkFJtoMy5jnEezw bswgTJmJt37/6t1L8IUhs4P9qkzsNj1MaiX2fyaZGLNdg4nxjkdqVxD8Ye2X vCJNJsbs8J3cRsQrvFe3U0GHiYv54XGWhL6VZyMWROsyMUNONVCW0G+f3rxy dD0Tty44nlmoJIDzb5bvdjBi4rZ/w0LLifw96T95tgqY6Lms9owrWwAtEjX3 1E2ZeI/7cO44kX8hHRnOlc2EHp+iwM1EfdTt3MenzJmYUJLbNCAngF1nCuUP WjNx3bLG2b1Efc/dFt1St42JX5x6uq6QBfCwys57zS4mXlij5npNSgCCr/eT btozcVdOiI8T4Z+ZxX/L5+9j4lSc6fjQYgFs35kk2XSAiXLrV8zfN5/Q+8gh QPgQE9nfF54IIfy7X0i+c7UHE++eZv86Pk30y9PMB5e9mDhw/2nqvVGiP+d7 SJT4EPpuXJsZGuZDiIOG34A/E/1kUjqmvvMhbmGuyZYgJjoeHD/r3sUHGeeT mSfPMZGk3udX9YGYX/nrF2eGMdHjOM2mV8CHJwfKm4UimTi9556kWw0xX17V Hyu+xkTfUp6rGzE/dpDiBd+TiPqvXUcqI+ZTm8fO9dSbRL5bpF0aU/jwndI+ 3z+diVGS81VXRRPxHrt1JCOTicxISr13GBFv1X4u7wETS7+lu3oG8mHhiW8p q54xkcEwzA8/RMRbkyXkmMPEpb7HrqftI+JlerlH5xP+zN3/0mc7H1Rqx7S/ FTNx5digyCojPpgpC79Pe8vE5vGZV8MSxPw+80aTW8vE4mHdq1fm8WEnP/La bAMTG9KTdT+P8cD13LL9Dk1M3FL/nhbdzoOBJsGbyFYmtmQtD+6s54GvxnWN F+1E/8jUfWkt40HYB8Zf6V4mctwVl9Sk80BMq8dx42cm6uy+9KnwCg/iI+5W nfjGxMkvNyetwnkg2+mudmeAifTKXU6X/HiQpqMe1zBM6G+/Edd8hAdqUcO/ p38yMfSMJv8/Tx48787eqz7GxAXVnm02R3lQFqu3/NIUE68ryVS1H+PB5r6p 6IJZJh7rF3Z/cJwHDfplP/uE5HH8RYJdoBcPOr+aleBCeTztNXNX5QQPpnDH zilpeVTu6kvOIfbX+3Ms7PgqeWxUvUd2D+KBhYf5z5jV8phYUifuFswDx47l Lllr5DHGZ6mN21kehFZ2GX3Tl8fHgSrrjobw4N3lbRP7N8vj1ncpB/4j9O1R Weu9y0UeX/w6p0yN5YFnsmSXr6s8Uvq/vNW4zINg8WGrhEPy2ORa0opxhP7R e+qco/L4NPbD66PxPPheRv26JVAe8x9OBFde40Gg/bSjYYI8xiVbvt5+iwfR ta11e6/J49yF3H7n2zxINc43CEySx0CW+1XPOzyoUDouW3BLHg+EF44F/78e P7saNbPkcbPsnsjoezygHXy10fop8fx3ra6R93mwsiUp52i2PHp7ur8Nf8CD bSXb/ntYKI+jnco5vo94cCOyykLxNZEP9s3EVU95kDV9uwhr5NFU39mW/IwH JV5Bai7v5ZE10XT9L8E9u9aKpnLlsX2myjYvm6inwv1KSqc89u/WHJ7O44HB tfOr13bLo+Qyvxuv83lgtdDlzo5P8vglcZR/sYAHJ4apZ//7Lo8H2ye8/hXy oKgoav2iP/J4eP679wVFPMhm1m05OkGsf7ay+GAxD+6Hids3TMtjMu2I0ZJX PLhm/t/JBGEWqoZrbdtcQuTrKe/CbxEWxl3yiWsjOEyKdG33IhZa7Jt+caiU B15t13LlJFnIL7mx3IPws5txS2WQNAvHbNspXQTvS6fyP8qwUL603NyqnAc7 RPb2AI24/+vapFyCtx5JGUlnslDjOLlJsoIHJg0dc/MVWKiTp9riTrCuNnOp uzILL7ap+OUTvDLRmflOlYULK1+GThKsOHlnpboGC20X+zXpVhL94dRrGKvJ wjxKu+kRgpdVKlr+0GYhzD+QeZVg0eVuDtt0WViUe6Qun+CZyHtHctezMP21 WVw9waNDXwPJRizUStSuaie4f5taZACw0G6zs1E3wT35R5I+bGRhZcE3fhvB LbKP7xtsZmFTWJt9LcH1wUMFqeYsfC6meTeb4Nc9q97MWRH59OBExhJcbObd tH8bCzlnr3x0Ijj7YXZf1U4WDn/FAGWC74uPjirbszBK6D/VHkLfrRNrhC85 sNDxG7smnuBrTf5S/U4s7D4VpbKO4Oj1hWzLAyw0sbFg8oh8hqb+1XrqxsKD NY3nnAk+JaQPyzxY+HP6AquXqIeX2xkbn6PE+trHjfb/r9e7V06NXiw8VH/B u4qop8PK2WO6vizUdjJ8yyZ4e7xJcNJJFqol9T/zJepvsqcyZV8wC3dqwbmf hH/WlghnlYawUDesWoJBsAbbrIgVzsKbB2eDDQi/yX6vae2LYuHmuUvmti94 sNRK7Numyyyc93CVzSbCnyLZ5uMP4lm4+o1m2CrCv6On6snHklhYe3pVRWMu 0c8dEsqcFBYGCv3xTcjhQTfYrll9m4W0tsfpSPRH/ULB9rFMFr66WVruS/RX 1VHpA3YPWfjGd8/uP48J/3N3nXj5mIWdJ13zPLKI/Ca1xgXnstCUepGsQPRr 6rTs7a4CFnqk7S49RPT3VReHp1jEwq0aQmdS7hL5VP1Yt6CChR17rp1uJOaD w4tPYpcbCP9eLLhxLokHz6yTdhfwWGg1dq7lUCIPhD9bZnxsZKH1wvEp46tE v0sWGGq2s7A5tta1gphXk0cueXG/svCSuknSogiif4WMXv3tZ2Gf/7wxv/PE PLv+cyF7mMjv7w9LOMR83Pp6b/qJ3ywcUvjXvO0MsX6pzICYEBvTHb/kxBLz OWDvCclb89hoNef65gQx39Mya9dpz2fj8BPKIVMPHowZhITvFWXj/sGc7LwD hN7D3xlZ4mwcE1lmWbKTB0MVxbaWcmzcHJbz23ItD2TEKQHdNDZqBWk2iq7m Adp7p/ox2EiT2t76VIPw37BS/00WGyUobTnlijwwol0+P7ScjVUpu4/+WMYD 90PfHoaqsvGXdomG6BLi/ZW9gUtewcZtdNkPYqI8+Lx5nG68ko0m9LJnqX+5 EOvnUnBZh42/WavwcT0XCsuKOhTWsnHtz56e0Eou9CwiCxfqsrHC7WrvikIu LN7tpWahx8ZRLf7ovSwurE17Z9O1no2nWsTfjN3mgvOg4klfAzaqT89TOprM hch1Z2+KGrHxxeeCs5tvcCE3rLUyxZiNKWu0SxSTuNBZr/1dE9jYLK/S9S+R C6KysUtfIxsTL2/u+3iNC6sPfl1rv5GNalSzupKrXLgwmRIWsomNtVtvbjyb wAUNlQV0niUbDbctrhG7zIV3/fFSF63Z+NaFr9cSwwW3p0wxI1vieQ7iOZnR XEhdq/fnwQ42KoriS7NILoibenJD9rIxrG7N0oRwLvxw4YVrHWajlHd8kMMZ It7k1KG482yUF9x1eerBBRunFX1mFwi9uw1GUg5zYYBd2DYVwUbloPOBUe5c UHrIrXGPYuOBKzsCjrhx4VqhcLpJPBu/0EVJuvu5ENDosfvHLTZGZ4zun7Ln gr6Ebpl1ERt5/uJCBlu5QHOxKZouZmOsfpSlxRYuzGQfzn9UQvgn6H3gvs1c KNuVkiVSwUY4mxkQasYFs9R/10tr2LjGXH60CbmwTaPWe1UTG8ve3zn9QJ8L h81dFCRG2Oh+tnnDiAYXtt4MZLz6ycbjSRMNNILVhxOoR0bZ+MQlVWOLOheG 4qsl3vxh4672jXsz1Ljg+2HFVPAMGwPX/PNyXc6Fc4fHBEOLFPDKzfDFi1hc SIyIulCvrIAdW7VZQyQu3D/heNtJRQG/LPq415jgwn1aL3+oKmCk7G7D/6S4 0KLdPCipoYDX0qp/rpXkgkwXe+dubQXc9tdcNlKCCzfWvVToMlbAwiNrf1iJ cSHl29eyETsFrLnWvsV6jgN3zM0mSVEKmBBXt1l8iAOKT8373kQrYIReQeWp QQ5kSto2BMYqYFGpXnvfAAcetu5N7/pPAS+f0e8t7edA7iFv86zrCjj2J2DN 6W8cqAlLSd6QqYBd1/LNxfs4MFT0U/9EuQIGXJLTvNPOgfXqt840/FHARXot R9xqOdCv4hh+8K8COjRnC396z4EUJXrs5IQCPi9ymHUheIaRfGv5jALef3We 6vSOA5XLEivOCiuiysXv7ftqOGDxJ1ZUc5kinmC+CjpaxQHHiuArcWqKOHQw aomgmAMhdo5ZtvsUkfRsGTPvCQcCeh+8+OioiA3ZNv/MCT527Hf1UWdFvBxv ptv7mAN7zkd3XzqgiFb/0m9KEqzz7CW54rAiMob1rP0eceCzCCVktb8iGqQs YGy9T+xf0LBT6rIiFpK+KGqmcYBChllBmSLKPmsx7r3GgXPU0vbzFYrYtWzX 7gsEf6UZvtSpUsSB8okKVYJfKuj5XXmjiJSMh1e9r3LAQUurf3u9Ik67r2TN v8KB2xasZl6bIr41Crqi/x8H1ML+PeGMKWJFm8dcbxQHDH6UO9aqK2EwI31M MpQD/Oi/e5xWKmGe9LGmuhAOeKhq7f65SgkrXoYOXyQ4af9taxltJSxtvVA7 e44DY4JgE1c9JRQy61X7cZYDz1/os6dMlVCTVGbcFsQB5bC8vhVOSvij6fDf llMckCA/8Iz6TwkLW8RIuieI+KR7zSwTlDBn2CP8uzcHNKXpLImrShiw4JdK KsHbSP81xl9XwurEvQsWEHxF8pTRjVtKuONQFrXlOAdkJbYsffBYCUfWjd8I P0rsJ/otp/qtEhbcNHw7/zAHCkQUYi++V8LnsSXHSt05sFlkn/vWOiVsMEfT UwQfXsCl1XOUUHFiefjgIQ5kCb8Ib2xWQikdE+sWNw6s/ndx96c+JWyXmhUq cCX8M1ehlflFCTdYXc7xIXjH3NQi929K2Dx1/IomwX6zXmX9A0rYqv/r88MD HCictlP99UsJb5s+q7uzn9h/On5e3m8l7HrhM+tEcOtUbYf/HyV8c0HZhUHw xKRJ/MSEEmaLqeQmu3AgajLQs3hKCT+f2Xd3D8G0yVyz4BkllCuxrqYSnDUx JG8yp4Tz/oyQW505YDihMvnvnxKy9XUTrxP8P8L95Bg= "]]}, Annotation[#, "Charting`Private`Tag$1824223#3"]& ]}}, {}}, { DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, AxesOrigin -> {Automatic, Automatic}, FrameTicks -> {{Automatic, Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, Charting`ScaledFrameTicks[{Identity, Identity}]}}, GridLines -> {None, None}, DisplayFunction -> Identity, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, AxesLabel -> { FormBox["\[Beta]", TraditionalForm], FormBox["\"c(\[Beta])\"", TraditionalForm]}, AxesOrigin -> {0, 0}, DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, FrameLabel -> {{None, None}, {None, None}}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], Method -> { "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange -> {All, All}, PlotRangeClipping -> True, PlotRangePadding -> {{Automatic, Automatic}, { Automatic, Automatic}}, Ticks -> {Automatic, Automatic}}],FormBox[ FormBox[ TemplateBox[{ RowBox[{"n", "\[LongEqual]", "8"}], RowBox[{"n", "\[LongEqual]", "12"}], RowBox[{"n", "\[LongEqual]", "16"}]}, "LineLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, GridBoxAlignment -> { "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "Columns" -> {{False}}, "Rows" -> {{False}}}, GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, GridBoxSpacings -> { "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"LineLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.368417, 0.506779, 0.709798], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.24561133333333335`, 0.3378526666666667, 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], "]"}], NumberMarks -> False]], 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.368417, 0.506779, 0.709798]; 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.368417, 0.506779, 0.709798], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.880722, 0.611041, 0.142051], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], "]"}], NumberMarks -> False]], 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.880722, 0.611041, 0.142051]; 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.880722, 0.611041, 0.142051], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.560181, 0.691569, 0.194885], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], "]"}], NumberMarks -> False]], 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.560181, 0.691569, 0.194885]; 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.560181, 0.691569, 0.194885], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2, ",", #3}], "}"}], ",", RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", "}"}]}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), Editable -> True], TraditionalForm], 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, ",", "After"}], "]"}]}], "]"}]& )]], "Output", CellChangeTimes->{{3.789892956413993*^9, 3.7898929737838*^9}, { 3.7898931796488657`*^9, 3.789893185478931*^9}, 3.789893717676383*^9, 3.789896892805759*^9, 3.789896932602099*^9, {3.7899326251012287`*^9, 3.78993264237978*^9}, {3.789932679168812*^9, 3.7899327107492943`*^9}, 3.7905000315139427`*^9, 3.790500838648793*^9, 3.790500910351964*^9, { 3.790502567475996*^9, 3.790502576644142*^9}, 3.7905026149063463`*^9}, CellLabel-> "Out[262]=",ExpressionUUID->"fcf23027-c302-44d1-9d27-16acc04f8948"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"LogLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"3", "/", "\[Pi]"}]}], ")"}], "x"}], ",", RowBox[{"c8", "[", "x", "]"}], ",", RowBox[{"c12", "[", "x", "]"}], ",", RowBox[{"c16", "[", "x", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "0.0001", ",", "25"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Beta]", ",", "\"\\""}], "}"}]}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"Italic\"]\) expansion\>\"", ",", RowBox[{"n", "\[Equal]", "8"}], ",", RowBox[{"n", "\[Equal]", "12"}], ",", RowBox[{"n", "\[Equal]", "16"}]}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"Prepend", "[", RowBox[{ RowBox[{ RowBox[{"ColorData", "[", "97", "]"}], "/@", RowBox[{"Range", "[", "3", "]"}]}], ",", "Black"}], "]"}]}]}], "]"}], "]"}]], "Input", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmViYGAQBWIQveXA9HOxNm8cBbfxXwXRSRekHoDog4/DXoDoE1pT 3oDoV4wb34PofheJryC6K6YUTC8s6ZGJA9LbCvrAtNi/5DAQvSqnNw5EL5Kt qGsA0gJh4Z0ges7/W+cagXTJx5MXQXRDcvmLdiDddqvlFYh+dHL/LxCtbPfg D4j+XLJBqgNIJ65YpgCiz0Zc1wDROh5huiDaIOj3ialA2s31H5hm0qz5Mx1I M//K+guib6wr5JgBpPc0rwLT+xM3z1oKsr93F5huWL3jNYi2DM79BKJTIjfP XA6kw5YzzgHRe4NcRXcCaRXrajDd8+XD1HO2bxwdLn4D0wwTRHeDaKWmtwdB NABGYa4s "], CellLabel-> "In[222]:=",ExpressionUUID->"d80acc58-e355-49f5-8e82-b7a019a31499"], Cell[BoxData[ TemplateBox[{GraphicsBox[{{{{}, {}, TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], GrayLevel[0]], LineBox[CompressedData[" 1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAZm4ys7FrIsAYOuJop54owMKKYA2+ aSLAdFYQw7OcKMAep45nymciwNByPh3AmijA1t/qG+NjIsCIq5rR2JYowEdR o4QUXCLA+RxTOgqPKMAoNBRWd0wiwNr/wwttfyjA6vn1+DwtIsCcxaWuMmAo wG6FuT7I7iHAIFFp9L0hKMDUSP4EXWchwIYUrrpSmifA6oTeIevoIMCcUI7X 4BsnwJX1ujb0bCDAR8Fq7OmfJsA6JaoM98wfwE/eBDxxGSbAqlAVWfjRHsAH dDri8ZslwNbU+xr2wR3AHbYtw/ATJcArwtrM6bYcwMgsHZxqjiTA4KDwK9C9 G8AiHKjL3REkwFHYgQCzrxrA2rfwNc+KI8AhAUqCiLMZwELM1Pa5DCPAG5MK 9FO8GMA/FbWvH5EiwNF9RtsbsBfAmgpTowMLIsDmWblv1rUWwKV4jO3gjSHA t46neY2mFcAOk4NyPAYhwLIsjnM6nBTAC+J27xKBIMAMvKsa2qMTwLipBcPi BCDAIqREN3aWEsCGO6SiYfwewJh9FAEFmxHA/BR0bPAAHsDKr19AkIoQwC5H v6t78BzAS5ZG3yL+DsCK4gLb/OQbwMKvO5gKCw3ARW99t3DrGsCxeic86+0K wLxUcwnh3BnAXyiBOrH0CMCTK6AIROAYwF+oyxhjBQfAk2vF95zoF8DY2Qzi DewEwFAEZlzy2xbAEO67BZ72AsBsjj1uOuEVwMCzYRQn1wDARHGQ9X7RFMCE l/AFOIP9v0W922y5xhPABo35l+yf+b+l+l2R5s0SwHnl7/+SaPW/wpBbKxDA EcBqA8IcBHnxvz4YkHIsxBDAAIzr8pk667/IEXpTfZoPwAzXLVgP2+K/i6TK rJqCDcAsWk9ONBbWvw0aiWCdjgvABEjiD0WYtL8IQT7/mHAJwF9A3uXNVcU/ wkph+Hl2B8DNP1AqgCzaP84mddFGhgXA1en9BCl/5T9TtH+VDGwDwMYoHIt8 WO0/liT4s7d1AcDs0K8y9uzyP6SMznq3qv6/0OjvX9YZ9z/AdI5N1336vzU7 VNjr/vo/WyIq1cGY9r+qKst6Dzj/P+YyszKeX/K/UCozNLSUAUDfETCKitzs v/jsD8t0gwNAQQe9Logh5b8o/vV2PJwFQACFSf7SfNm/mSxuyB6RB0DsIhDl gKvDv7D7o1TbmQdAfzGzIbgfw7/Iytngl6IHQP4/Vl7vk8K/9mhF+RC0B0Ag XZzXXXzBv1SlHCoD1wdAfC5RlHWavr8QHsuL5xwIQAAXgl7p3bW/iA8oT7Co CEDrn4/LQ5ORv6DeXdtssQhAvidQYftpir+3rZNnKboIQCERgStvrYG/5kv/ f6LLCEDW/nDxXysav0SI1rCU7ghAOb6sC+1ekT8AAYUSeTQJQAWOdPGOKKo/ GNC6njU9CUAGVOj+sVesPy+f8CryRQlAtRlcDNWGrj9ePVxDa1cJQL/SoZON crE/vHkzdF16CUCJXomu09C1P9RIaQAagwlAhkFDNWXotj/rF5+M1osJQF0k /bv2/7c/GrYKpU+dCUA76nDJGS+6PzKFQDEMpglARs0qUKtGuz9JVHa9yK4J QByw5NY8Xrw/YCOsSYW3CUAIk55dznW9P3jy4dVBwAlACXZY5F+Nvj/Fc2Cm "]]}, Annotation[#, "Charting`Private`Tag$1818274#1"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.368417, 0.506779, 0.709798]], LineBox[CompressedData[" 1:eJwVV3k41PsXHt8Zs1jHWAdZpmKIkiREn28qW8p6s0SrrJXbppDbIlkSXVsq u0jKlqV0xdGN69quCokohRBiZBbrz++P85znfZ6zP+d5z3PUjwU6nsAIBELX qvxfe5/WLy8LYMHUm6V93BQ2vI45Il7rx4J6jzflWDIbVB7F+TT7sEB0dwpT MpEN3Z/Hlb4dZ4GCrsewZjwbLB1yb8h4sOBT5pkwt0g2sA1kDly0ZcHAYGtJ zUU2jAvm+Ka6LFCbSF4T7sqG0xHVO5qm1KG+U02NrsiGTqtlkqePOriK7wt5 nKAJ4zcG1H+MqsE7VydFMxlNSJ57afjrpBqYO92S3peqASbrC8V4rarQ8Oz8 Sr+UBhTay7rx36qAkztX1z9pPXR3Lihy69fAKe/TmsFi62HD697WsSplKM6K CqVEroMvWdMbOl4pQZSWnlqiyDpw6LlGKC9RhG+9OyLyw9eCupDN9ahyJiyG W3+uFl4LSokiv5xqFOCy9aNBhxgWvA2z6FMqlYeRk0vKoSQWjLhVB3ZXyoFF INuwMFIdnsc9Cr6dLwsbKIO3LxDU4ZlO3DmTNBlg53bu6w5VA7GaJ4q9udLw MeE0voegBqyHu7cFpTBgs7uPWMsvFUgNkxESfiAFDpip6saFNdBcchi/E0OH EluLLOKkMuxNsfjMWpYAZlwxkzykBK9LtqeKiIrDqdwztaJTilAWomn6Y1IE +Fr3SkOHmHCYfc2k7BcVyk55HBubVIDDBS0Kx4UpUBTrwe9akoeej2JfxSdI MMrUC7i7IAf0qb+EM7gYjNX7jVmKywGUH5XR/ECAhm11B4okZOHG3Wlho/Cl Om6FdqwbUwbItwV3JzIFdY4/X2yLN5aG4OGfKwm+c3WasXkhTvsY4E98rUwK nqnTNBt9EHZRCgixPzj3TH7UXbuxTuPnEzqIfdB1lez7WqedNUgYzJcEHXe7 /QZy3XUaXy+/nGZKAMnqq+Se1Iq6M4S2Wa8kMTiMDwy3/daA/rtayX5lKQpt yF77qk4vUvsW2GPBFoGusSWS1pVhJPdlX+WKPA06jsk5xWUMo0LrN2rbZWjQ 2rcxe/bVMBoxk/YNotPgTdths9rFYWRP1NSfoNKgoqz+glPICLpVk234TkCF hOCIkbAL35GPG7n9bB8V9tPEm94FjKEjFv/0m6ZTweb6ejmjW2Oo6VX43K57 VLBYMPNKLxxD3TGxvyyTqWA2eZrgOzaGtjiwG/fepoLO2w6jJe9xtLtwsGhb GBVE7iU91jz2A/ne3Oy2xYMKjWzlW5ddJ5HUrKjGogwVCg0jbK6HTCJ53bkj XZJUiNs9RYtKm0Q87/I1OSJUcDkCUYlfJpH+7ftPZQhUGL3rdbPQdwpR/27t dhqngCil6FrPpZ9Ir70+kP8XBaZl5HYO3P+J6O6t/f2VFOhkXSEM1fxE9bfn 35eUUGB/ZkHdRcI0uhZgvUc+lwLyf4XsCN89je7odIQMR1GggKNier91Gq2L XRMpbk+B+8HvldL7p9E/nckxoVYUiCVELWROTaPWe77qbTgFfpeYeZlHn0HF F83yFDZTwFj7b+My5xmUkFVAx+kU0Cm7yKw4MYOc35n1V1EooGKkI6gKmkHc vR3nxVbIgFkkv6hJnUH2Eowhh0kyNB/12db0aQalgZ3AsIkMNaNK8i2Tq/Za ho7JtWQoDuzgti3PoJni4V3tFWRICDOueq/GQY1By9/bsshw8J7o1s9eHHTj ToseN4gMEx0l+twJDhpxkBUxViKD7Vuv8sdLHOQWLpxiJkmGJ2+ZBp4Ss2hf nYCtSCSD/7vwrW82zaIj1a6uB8eFYfS9i1HC2VnUIB23baZKGIa7V8w28mdR 6Iyn/xMrYRj4ZGftTZxD24ue+cw5k2BHP6mZKTOHls8XOlL2kCC9v9qmbd0c aknKNpHdSgKPgbW2BhZzSI80dU5PlgS9n3n7seg51JdmnVneRYQPXzOdMyS4 6KbMLkVrdyIYfnPuclDlIsmz1hWn9hIh5RvtgLAeFwkUvp+sMSXCgaFzLicd uGhd9SlytSoROoct3U2SuOiQ/+5011EMDEYWeycfctGB6zHrNvZhkDhSdjC7 kotSzF4MObZj4PhdyZP6gYuyXuy/WlOJQcfoz8PdTB4yx7Sj10djoBjyttJf i4eqH55qenQFg+Oi5aIrRjx0YELOIjIIA65u0HNNVx76rnakwfcEBnidi3iN Dw9NNp1t9/fEINre+Lj9RR76c19RStdvGCifW5QITuGhDzNusxxLDLxJA17i +Tz0C+u9/XQnBiXJdS+zK3ko7K47/9N2DPga2XTDBh46ozq8HGmIgfmL697N nTxEv9IcV7YZg1hrr5pDQzykIqxR7amLQXfvHsbsLA/FVyc/y9fCQO2kpm8k kY8+i46bx2lg4LdErVWS5qOYgdDB5bUYPIsbly5l8ZE2zDwWqGOwqNrqt1uf j/TDN3VfUcPAoqyormcnH3nUb6pLUMXgjnm87CkHPtoWN9e/ZRX3vv89QOgo Hxk33G31WsVrTzjWJ//OR3rqX2UMVv1PcrfIa1/lo7EhpeK81fhVkbKnauP5 iF26ce3T1fwEJu+1YyYftZMc/7Zcrc+6sEfhezEfpeem8y6t1p+w/eXp0Fo+ sjuquQtf7e9T64M3ku181DigtytjtX+NQ2GKD/v5KMjlREni6nwCfx763WiS jxLbNd3VTTF4cRVvbF3kowTBjJ6VOQYYg6V8VEyArDzfmNKsMbDNJZ6dUxIg NY1pvzB7DJINhv+J3iBAFI51f4YrBgMNjWtUtgsQmf5A+eBRDNguBeee2QiQ b5qNVZk/BmdHo/+1cBegjvzcG1nnMagJDlDt8xOgwN828DVX98UubWMLMVqA 1EvuqC4mY5CqS1dPTRUgArtSyTIHg6+1M0E6BQKUPF7Tp1GCQdBgBeu3fwRo v+zjC+3NGKRpbA/JF55H260mpReoRBh5rtxhIjuP5iKP5XUyibDJenn9f+vm kX99mrzOBiK8Dqh/y9s1j/Q+6laY2xFhtNRSy/r6PAoocS+cfUCErdude34s zyM7c9fzBdYk4MgNeHdILiDau9snthwnQSnHZ65CbQGJOn2tVw0jgU5hKOMP 8wXk+0mdISgjwTpmri395gKSnggO91AWBgZvBgzEF1FAotmuJp4wdLwLtWOq LKKH0Tvj8qTJEFcsPLC0cRFdaDe1uLOJDCLezIVG+0X0kZf/x2UfMgh14Vvd khYR52HJ3NoPZJh+Fv84TGkJaRTRXLRX+bo4jml0TGcJkU82BDn+S4GT/rmN FmZL6EBVgZ3FNwp8V3/+TfLwEtowOeoRIUeFgTsDa3JyllCtsjx9UwgV2k7r JjRqLaOnOc1dgQY0iLF5rvbEZBlx/WXj/G1oYKWxsyR+7zLa77Nco3Rk9V72 O7e6nlpG8jFBz3NjaFBje5n8o3QZNcs7F/79iQaF2i0hkkYr6LJ+e4X3eRFw vHttoNNyBWl+kd+xKUIE5olG5vddVpCplfzc62QRsOl/SFt/cQU9bTRMtK0S gbH4P1JNqlYQ10+Bw/klAknzCn36igScbDMfleAnCqN6v2JlWQScBJXBnhdF wdTnvx18LQLe9j5nZPGGKAy9j8h5ZUzAA4KbxmoyRWFLEcfPyo2Av6q6nFfx XhTeHW7le6YS8PC2op1mW8VAI+VRIZ5FwN3DJOU/42IQ0nrdY20BAffLMsnw shUDlrExjD4n4Hrd7ICNx8XgLCM/8twHAv7YTtRiKF4MpBquyEXLCeE9O6Tb LIfFwF57i0FFkhAugcUmD4WLg3t6nGFgmhD+X2TUBrXb4nCCPm6k/VAId1pg sWxTxCGEm2WWVS6E14Zs/vePAnHIey1hGftOCM9O+jV0qFUc5t3H3bzoGN5e 4XJ1giEBD29lX5GJxfCWY2emeh9IAH9CsuV8OBG3z8pbEMuWBPbyXJBpmjAu wtATkfhCh3s6p5tU/qTgrvEye8/1SUHpQq5z3z0KTjsw6PfqsxQ0NX/8cjeH gnMnS0nkISng+u4R0CsouOPH6qmUCSlwzlPWJn6g4Ke9LtiNLkkBXaXl1ndl Kr6oHv0gUJ0BUZJsu9ICKq5hLss09WFA1oBn38kyKi55dW96RgADnhcl+mi9 pOLm0tQdK4EMGNm7ciWnhYrL5059rr/EgN1R3aVJU1Tce2I4zCuGAQShCEaw AQ0Ps605srOIAQodLzO2mtHw/G0l9S/KGLApc1qbs4eGLxwbnN5YxYBDZh67 AlxoeMf5gwZDtYxVftly3jOEhl/wf1oh0sFY/S/8CIrhNPxSS5yTcycDfshn xnbfouH7LN11s3sYoFglkmeXTsO99/Zo7h5kgH4Evlksn4aPfey8mTbMAGvn oFdNxTRcn2MauTzGgCNrn1pHPKfhZ1NcMwKmGHCJM9i1E2i4zIefnH4OA/4H CbFrGw== "]]}, Annotation[#, "Charting`Private`Tag$1818274#2"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.880722, 0.611041, 0.142051]], LineBox[CompressedData[" 1:eJwVV3k01P0XHsvMd2YQxr5kS1mi3oQQfb5JSAtFWV6UJXu08lJSSvTaigiJ bCUpRAllrlIJvZayZCuyb0mMYRY/v7/uuefe85x7z7n3uc9Vdg86cpKXQCCQ eAiE/1uvQJ3yMn8VsK1RsnfNVYe3/54QqvVVAZndnpV+D9RB4VGCd6O3Clyv eioVkqUOnd8n5X56qEBa+pHuxAx1sDicd13cWQXGqocd65LUQV1X/FjIARVo fbnVVfWaOkwuLzKNtVWgOyjWf9JDHQKjqnY1zCoDKL/PCN6oDl8tufwu3spQ szm2QShLDSavDyhPjSvBAwWbpixFNUhZrNZfCFACeu7wlSd5m8BoY5HgUrMi 3C1/NLhj/SYospFwZLYpgNBycXZt9kbo/MqSZdStB/esfOyD1EbY/LaneeKl PPTuTqy3SlKFHw/mNre+kYO6nGv8TRKqcLj7KqG8RBbqtm8q+y9hAyjzWEXG lMtAlfbewBaRDSCXTF2wfS0NOwrHC2xSVKAt3LxXrlQKqva7LTsJq8CoY1VQ 5wtJCOdhOnolKUNlwqPQ+IcSwNPXas0roAzPtRLOGWWKQ+/jTrbmDSUQfP1E tidPDOwcHHe5UJVAJd9sR3AqDUKc7tv7khUhLVych3hPFG6Z/jEyXacAjSXH 8Vv/igCYub3NWJWH/anm31W462CmK+mnN0MO3pbsTKMKCIHn0e97763KQlmY mvHUDBX49xdrf1+QgePqV43KFsjwj7wwtZstDccLm6Q9iBj05B8c+kmVhu5v gkNC0/yw4qy0W54kBSKzNcQsBi9svW5MeycuCVDuJq7WRYA5nsbBaVEJuH53 jmhwjUMXdMCrTKTEgRS/fHc6e5l+J67jktM2MQgd+bWa5LNI9y5MkXAxoYEf 31t5/tDf9Pmsw38ij4sCIW5qPt1oil5Q0CE2HicCgl3aDsK9Q/QnnRtEd3oI g5aT9SFdyU56SPpzv3cDQsBvOSS8N62CfjlxICvsqCAcxwdGPh99jxTtXKbN iQLwGdloXtHqQVn+8heEvlNAfva/Mx+DelCBj56+dw8FAjIPVq0r70GbLxHX 13dQgLpsZXnfsBcN/rKpiWmmgOXzvV7V5n1I8abTB8NqCtSr7sxdODGATI4K G+umUmCAXyy+wmoQeckpS0fYUIDk3P6XQ8AgorgvvNh1gAJbym9/ZcUPoqib vMk8lhQIdxOR39M2iM7P+ojdRmv11Ao9abMfQtHGH7ntWyjgFEL+NOv5E41u exq8IESBjgkOv0bECJocP33fvYUMre6StglZI+jZThJxoIkMzb1bcv68GUH/ EIRrnBvIUP/5uEktewTxiJf+9KgjQ0VZ3QXbsFE01saz8VY5GZJCo0bDL4wh J/+8oJA0MhyiCDW0+08go8+Nd2Y9yWAVuVHSIHYCqV26uKfTjQzmLBPP+0UT qPTa4+E6VzKYzAQSfCYm0AVtL2aBAxm02loNOF6TKKRgm2D+ATJQ0+88VnOf Qtviht856pHhg7p87CWHGbShTVYukEKGIv0oq8iwGeSRmRyeTSJDgtksJSZz BtH/1Fp08pHB/gTEJP+YQdVftg3acjEYv+t5o8hnFhmaMCri/2AggD292v3P LzRN4xP/OYDBnLjk7oGMX8hhwV/HvQ+DryoRhOHXv5DLXFvg6DcMDmUX0kMI c6gkOj6B+xUDqZqwXdfM5tBISFRSUBMGhfMKxhnNcyjxrw8+wVUYZIR+kbvf P4fYYTXC1pUYxBFiWNmzc+jidFm11gsMTq/7XV0g8hv5rNgZM0oxMNR8Z1hm 9xtpiYhmVhZi0OjmvaOh7zd6JjIhop2OwXRriQ5jeh5RYm3KvodjcKDNs/wx Zx6J/p3YcuQSBk/aZHRd1v1BAtporiEMA7/2a3r1W/8gj6zUijcha/1/sTdI OvsHEUpeDn86g8FI56rJFuYf5FjdvvSXFwZmXRW1g+QFdMTzqxzdE4P8Ll+U IrOAxIPOXLH1wMCz+wvONlpA0d3rxUJPYDD07dGexvAFtJ7HRiDDCQPTHuf6 8IQFdH+zc4O4IwY5PaJ7t2UvoEPFSkEx9hic6L1ongYLyKPyUqujHQYDfdb7 vPgWUVuoRGn0QQx29fM3yogvonazTouy/Rjc76+y+qy6iPCTAY2N+zBwHthw QNd8EVUrk6wb9mLweqC7eezYIjJL8cl5vAcDue/xB+95L6LER6+qw3ev8c73 pUO8NxfRr8fG1WPGGBj9KG55kb6ImtSJx84bYZD+w83Gt2gRfdUzZw7twMBh sOlwa9Miipg/N++sg8GrwSvt1/oWkcLQmeseWzGQHtKz3TGziF4kxt821cKg ayjbLmsdA+W8WXRP2oiB/k+7jsOKDCR4V7tRQAWD1J+UY8S/GOis1fPbNgoY MH7Wdr7CGcglXUXYWRaDY8Pn7AMOMxCPV/hNDUkMXg6rdyu6M9A6xT1GFaIY SIz0O3w5y0CZ2VWHlgTX5nHEwsnoDgO1OhpuSObFQHeU3TOTz0B6LiyhITYJ kkfL/s55wUCnZN+/XWaQYH7Uq8/uAwN98u7c/nqOBEfG5FzIXQz0RMXPXWyS BM/HWvtrxtbiGcxZxhAJRMejXIOYDIRZCAe79pKgdfzX8U6ZJUTt7Zm920gC 2bC2F34aS2ghUniVXUcCD4FygVWDJQTYxexvr0hQnHnHLdlyCcl9uK+hX0IC hnZwpZrDEgqZjZJSKyABTrcXeu29hH6ovy86n0GCmzaGHjYhS8j51kEz8UQS yJ9jrwtNXUKv7vH3KQaTwIt/wFPo4RKqPpcVFeJDgpIUenXOiyUU3X42m+lI AtNXkV6NX5fQ5ZqyU/8YkSBun+dr1+El5H/7YXGQBgk6e/bS/vxZQl3K7Kce UiTw5ZBr5cSYaMpxb7rIHBGeJ0yKlaowEVU++MTzHiKwFZt9zXSYyFlE/51K PXHtLiZKnDrMRC1iph3Hk4nQ8+W0P48bE5VpyxuqhxJhw8kjdSmnmWhz8ZaB FBcivIyWOFWbyERZH6UqjFSIQJBZenskm4k0KqSq3HiJsK+oW3rsGRP9qEuu FRrkh77me/XC/zFR8ybxXePp/MBLU5F3E1xGAbTD+vuX+eBAHt/ZRblldJL5 +u/9n/kgRXfk483Ny4i0wiy4l80H6vaF555bLSOfK696OYgPrDO3NPHdXEbS t+IDtp/hhTRtEeW0tGW0KDjvUWfEC0O1v4O1CpdRemjRl1A+XggerFA5+nEZ WYTdvhGRxAOZm3aGPSSuoKu3bkiTnhJgtFK+1UhiBQVHRGVyzhFg6z7uxhbV FeQ8STp7dicB3vrXtS3tWUGCJzH9E+mrdEFOrlqc7Qr6LsQg9muv0o8mXA9X 8lhB7falXrLvufTxUguNfZEryLeZbt/L5dB1TDUi+m+v4TXMcg/ncugXv1A7 zuSsoAuu6gpXrDj0es9pTVLZCioXnpZsWmLT1zE+X8mAFeT5wmiprohNd4gu 6dzSuoJ2PLq4pd+DTc+Vvq317vsKepxQ5Bm1gU2ffnw20v7XCjqoH2+hOcmi 6+20657irqAfgga+x16x6POSA16twizU/6njjW8si146771YocRCu2XOaS95 s+iB//2+lr6NhXpSttftPsSiaxVdpF02ZaGR1OhPFbtY9MkoYo67LQuta6+7 nGPIohe6JW618GQh+ZdkNWvEonuZyNRuvsBC3Qo7pgutWXRVmbwDIjdYyEO1 oynNj0UfWtDqXUhloTf51CrDWyz6g9aXvt8esRDBu2Q0AFh012Kc+eYVC+Wf HyzuW2HR5WIab+R+YqGKqx81/BCb3u1hJxHdw0LjBNfDuxLY9FQ0kOc/xUJb rQY1b4+y6XZyPjo2bBZ6VzMxft6CQ6ct/QZdITZa0ql/qlbGobe2X7SWUWAj uxElAlGVS094RhzgbGGjs6piEWeyuHSqlwzrgw0bXb5w78RYwSqdpwPXc7zD Rjbpv6W7VtZ02vPEx+FyHCRpfwalRvDBswQZA3ctDtqud2NLbQsfBPjlfTA3 4aDqZr60Hwr8MKZc+VP4OAdVaAvMzFfyQz4HP7sQxEG5luevyq3th/u3RsK3 KxykHWxvetOKCAO3Btbn5nIQdZLowN9JhMwAn+Ib5Rx00sxusVGaBE6W80b+ 9RzEalm2DVvjg85VooPuKAeR712gxn8lwedA7aQPGlz0cDIoxnjtvv5rVan0 xIiLIvNEzcMHMbDctLskcT8X1cQ72cmLrumdfrtmh1NcJLLdu1jajwyRVQNO Jpe5aKfjxl0XksmAp/hMKCdyETt2Av9cTYbXBy6Rpkq56F+d7NoPfBQIUyel tNRx0Y19liMlmyhgwH9rQ0U7Fwlf+3VSYE2vldfk4eELXKQ5rx8tf4MCp+9q t7gRV1ENVtoyk7um785VuphLrqJ5WaUS51oKFGk2hQkbrKIDU59UH/ymwJG7 Vwe+Wqwiu67z3GEyFVb4DEwz7FeRUEGfr4UiFaz68ykbQ1ZRiGCOX+Q+Kkwk Xk4zermKAtS4bT/uUOEWW5e9+n4VXcph9Mo8pIKB79Tx9x2rSNbNtsinkgox pg5qNotreIEbR6GbCndWpHt1ZAl4txnvGwlJARj/ayFOQoWAV3UGiQWqCoCx d8supgYBv7oYFhWoIwDDX6Jy3xgS8LflmhrUQwKw/em8r6UjAb9lmnfKK1IA 2o83M13SCHgHpd/afkgANqU+KsIfEPAnrx0WGmcEIKw50nlDIQHvPO/ktH5Z AFQMDWG8koCX9CZ5ewgLwlnaw+hzXQTcZMBPqtpIEETfR0jelOTBzRXrtI7G C4KN5nbdijs8OMMVrruoC4HT/QT9oEwevD1TOS58mxCcFJk00MznwSN+dbCS jYQgjPHA5EE5D76tKTqz8IAQFLxdZxHXzoP/s8l1/aXTQrDiNOnoKcKLb/7G n1v4UgjyY3MixON48fBGx9WIXeuAOS3cdP4aH56cE/942FQY1LmLwcaZRHwX iuWllolAulZgg8JtDO/DED9vsSiUsvLsetMx3LHk7R+XUlFoaPz2424uhscd jiNWV4gCw2fvskgFhid4D58590YU7ArkNfm6MNzuciSNp0UURBSaYsfkybiM bcxR2rwoxAirW5cWkvFfehmLZAMaPBhw6Q0oI+Pd2QTMx5gGlU+TvTWqybj+ Ti7hI06D0f2rEblNZPxFWC/7+j4amMV0lt6ZJeMRnCufyX/TgMATRQvVpeAG T57s4b1MA+nW6iw9kzVf/pSxSyQNtmbPac7vpeCpJ0TkX92ggauJ8x5/ewr+ NGiTT2AiDV6Hbj/vEkbB70n+eDr3gLb2b/sSZK9RcHXmKZZtAQ2mpLLjOmMp eHVK1uXKxzSQfUktsL5PweOexB65/JwGOlH4NsGHFNyrXl9v8CUN9tkFv2l4 RsEtJ8Y37a6hwYkNxfuiKtfy9Yq/ZtFp8M/8YMduoOBz1lt/st7R4H8RkRpa "]]}, Annotation[#, "Charting`Private`Tag$1818274#3"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.560181, 0.691569, 0.194885]], LineBox[CompressedData[" 1:eJwV13dcT98fB/BP6zP6fFqfipY0NCWaGnJuJGUkCSHSIBH5pkFJ0pSkhZAW bdqKpPumkAZpaWgv7f1pf/p9fn/dx/Nxzr33nNfjnHvfR9rOxeICO4FAcGMj EP5/vXhNvSDvigw47z/yYpVNGb6Enucpc5IBS4vhQTJBGSTTwh2rHGVgQcJd XZipBM1dI+J99jKQ+cH2x7ZlJdh/9FWAkLUMXAp+yDg3owSKmkInPA/JgOCq jNnnXiUYWZpf3LVNBhSTOqcDy5XgWuCH3ZUT0sDbqk7mC1SCRhMm51lHadgg FUeNX1OEkYBO6dF/UjDA0ast56sIj+dLtOecpaAN0p/LcSiCnlwmbaFmM5zo LP2WeFsBMs2FTy3+loSHeEYjfV0emhtXxBifN0FPuo3pmoc8bP3SVjNcJAEM 7wTes9Ny0J04tbXukzg4KOkv5rrJwdEWP0JBjhhMy33N9RjfAtJsB+6FFIjC 5JxGu4rLFhCP5p47VioCAllVLeazsvDbx7hdPHcjFPdXbW51loXBUx9cmt9t gA+hZy6bTMpAcXjarYepwqBt323OzcotXyX8hl6cEKzrDOzY1CMNtNIssbZX gpCd26nJ4SANMq+Ndno8ocOfWtfv1L9SEOsjxMb1QgB2L+na1VpLQVWODRYR yg9npZXQ8OvNcPCJcZcMkxdsRuf9qTGS8CVHP5abygP0h98dNsVsgjwvhV2j 49wQIivxoOy2BNgo+unlzZHhy9Wzgnnu4mCTXi1iz0WC1c3nOnb9JwYtrbRe njFOCGopF916TBT4Jz5yxTPYwflclqO+kQhAga2Qwh8C8AnTNl0T3QgBT6e4 dPzX8PSaQG/KhDAQHy49HUtYwl9rdYnjdUJwa2ByPerSPK6eHyJ0OkYQLnN8 keC8NY03JDadv3eRDoSw0ZlneqP4tNlP4VO6AqDy+G6luOgo3uD7GNfUFACr eOH4lwsjuBH3KSX+7QKQl4tMkwpH8K3eSti3LQJg1xSdkK46gjtGlUVt5xeA csldh4plhvGm74ORC4P8EJQXltLIPYQfVOrMtI/hh/wSae8Tw4N4QF+4pO4j fugsLzJv+T6IB5s9+o+XlevO5u6V9oBB3F9FouS9Lz/8W9a06GMO4Lx8lgzq FX4wNepgTs/04yjcWyXbkB9of7ZZ8bX34jgqv93UwQcOZU7+vz724g07sfuq jXxQmpKS/SiuF6/sMksLruIDZ7dNXPznevGyZWMZvWI+qBXgyefv6cFfVP47 kxjBB/JLJh11n3tw8590g+UgPrjTHUCOTO7B7wrnGFn68IFqzuo5AYceXG9q Uz35Mh+EHxqj0oe6cS4lIw23vXwwqKG4s/57Nx5/qvHGVn0+2C3uYBeV3o1f 9F0Q4dXgg8nh9vf0y934MXZj238yfJDA+7Ravq0LF7XU1Z5i5wOZgOO+SoMd +JpF+d39FbxQb1HblJHWgb/PepwVUcoL96T3qSg7deAnfgje7i7khb4yzVbl sb+4JK/UQnQKL7xeEtRQmWnH9bPWi0yDeUHBpX5QldmKh40+Cx49yAsqp4+Y aW5oxj+2C6v1tfIAdV3uy436JjwnU67Otp4HRl6tahWEN+HcyX89hqp4IGM8 Y5M6qQkPPRP8mVTKA/J+nOPbFxvwyLTapy/ieUA6/cODrW2/cbf8sFfcF3hg 29j+qH27qvGXkm3yLQwacJr08u2LLcTPvEETz1Vo0FNzI0zrRQF+9bvcBooC DcqOclHk4/PxhiXFXG9pGtw8o8hOep2La/Pqbby2gQYtHX//Rdpk4EacngVB BBqYnRyx19gUjVf+0qu400SFEp22jycEU5Hzm2JbdI8KNljnQO3xr8i9TIXD sIcbapG58l2VNvQqTaWUVkYBiYmf/313aUOcU1o0hw8UcI47/IG3oA19/aVs WFZIAe6lAyYvdduRQvacs3cWBUzy910sMf6LjIuqLUSfUaBii37y3PlOZNPG jJt0o0Anp+DDwgM9iGum8AjPdgoQret3WDn3oGDbCr1qZQqoFkQ2rjzsQV8Z K4Fh8hTwseWX2Pu7B+3y22kqKskaTxlP1u+Tvci0kN5yhocCpz3JPyYc+lBT UFZ28BgZmobXOJV8B1BoeyCb21sy1NltOBYeP4D878cO9maQoaZdNWn20wBS OnpT/HgqGSpqbQzKVgeQvOlu/70JZCjM++x+zGsQCYYs5JpEkiHqVuCgj/sQ 8rZ6mbvgTgYzCk9l/ZVhZLSjtI59DxkO3JPboPNgGP08s9TZt5sMxisGDi8z h1G8kkNWpT4ZDMavES4NDyP3zaLBL7XIoPK7Tmft4gg6Zc30c1MiA/ezmAwF u1GkfYW2uVWADN8UJR7cthpHTamXJ4MGSJCpHXjgntc4gldenpm9JAg3mqCE xI2jnKA9MfVdJDh5HkKiu8dRpOp/YTvaSPDvqUNQ5qUJpFgyQhD6RQIq6a1f y81JdIdio13ygQRTQhsMO59PouTD3UNbiknQKONL6C+dRLwVoRExhSQwS0jH PQlTqJUrtf9eDgk2fvTa7W80haLH3S/EpZAgfUZy1/OaKXSpa3n6RxQJnt9q EH/ZMYXWyP3roREkCCOErCRMTKGMykueR8NJcJ13uiSFfxrZ+3xPmrhPAl3l ct08y2lkfYG/zsmPBFW2jjsr/06jgJtu1nb/kaD0n/jG6vFp5D+75dYtFxJk u9QxapnTKEZVvP/xVRJE+egWNUjNII+gjCedTiQ484yq1eUwg14Ia69l25Fg rC5HnTE2gxIsquq2HCfBod8OBRlrMyh/eUIm8hgJsn6Lap7lnUU+vXcesFuQ 4HK9v1bF9llUrC77Yc6MlV/DSZ0o11nE9qNca6MpCUwaaR/2+c+iy/vzR97s J0Fa42fdpehZ9KKpdmi/MQkuNm3VP/9uFhF2V9U/3EuCgeZ1A9XFWVR37IDg 6d0kMPpTWNZDnkPxM0fzxAxI8PqPE3osOofeHx/+1q1PAoeWBmxVbw7d+R7l 4qNLgt7WtL1VPnPIkHsHx7ImCfa0WVf4hM+hJO5KpSENEiS1CexTS5hDohmn ZlrVSXC+3ds4FuZQ03Xz23U7SND594jpRY551L0sPMu2jQS7OzirRIXmUcjw wwwJFRK87PhwoHbLPKpO85Uz2EoC607ZQ5rG84h3sMTnkRIr/86WmqET84gW XGj7WZEE4l0PD79wnEcj3kFiSwokaOtaMGO/P48mWutEvORJoNf95te7Z/Oo aJ5yoVyOBM+6bc2dMueRQffzaDrLVj3VR+uq51GAduurL7IkeN9zt97/7zy6 oq/7QJZlkV6tYzvH59FuecvzoTIk+NObYBnPy0D77r9z9pQmgXafZdPRzQwk yBD4ypAiwZM+ygmuHQz0u+FhtDfLJ/pvnHQ+ykA1ccflH28mQVG/YstmOwZK 0NLPV2JZeKDDqsGVgQbHnPaWS7LW+8D+03oxDLQ3ecMKJ8uag6tt468Z6PzA Ws+bTSSIHsw7k/SOgXLuMsxOsTwzePGv5TcGauep3czNssWQ+FnyHwYK32am hkuQIH+oruPjEAMVihja3GRZ4F/gOZdF1vs22QVosXz9n16XDGUBkalnvRji JKj7N2nTLLqALtdskxtkWczr97vLSgtIaUhwYpVle2oBdV1nAdVH95qIsO5/ ExdjG22ygDy2mKjuZJmxzaNYwWoBxf3MjrBiGcNP8pQ6LiDZJElrb5bvm+va m3suoNnLUh7xLNf3iH3oD1pAhJykT8CyxI1V3ltPFtDf8lbuHpYvcnY68KSy nrd7x3YmyzmP8ZKkdwvIpGrL/AbWfBflk/i1vy6gjnAdKWWW97y/d7GqcQFh h1qdtVkOM3UoPde/gHSOmEXosdzcto8+O7uAOC6l6WixLOWscCmYYxE9o2bT 5Fh2WiOXiQsuIoWqliwyy/nhI4K5Mouo2Ngwu1Pi/3VdjZOR+iI62RH3OoVl 47y3eIvhItKT1xGxZjlizyPhq0cXUUTgfCiB5baG61fYbBdR+aKZZyQrP9kL Fp8fX19E1RZnzHlYdmZobFS+u4gGRP/4uYqx1kew8NWyR4soXVftOi5KAoLo wheLhEXUXvri5owICUwzW0SGshfRmKTqkQke1vdGv+Sad9kimkq78y2eSYS/ NS8q+H4uoradgvpT00SQP+cj9rpjEcUmFwVlDhHBZfLcdZ3xRfT0REP+0y4i vL+LfatZZc33DtXav5UI7HQZCVvaEir/U6Kg10SEQ684XOfFl9D7mTyT+/VE eKw58P3+1iXkH7RbYPdvInR+/bZJUp/V/lI3Uo5lxZPpN/IPLKECHztEY/V3 /Xf/h/HpJWSuUvX2UwMRSm9d2dzutISk390z5WwmApF62N3l1hKiRyjKZ7QQ 4UicajXH/SWUMKbRfKOdCLHb+KVjY5eQS53pUeVOIvSWTXuopC+hll3rwxHd RFAxb6iB4iWkz5lmebmXCB49hTLHvy+hY0V14NlHBHB9cnO4eQkJ+PGSbrFM 4bz502dwCamcth9TYfW3eHxqC52xhNS4z94+ysojTl7fK5VrGXWd9D5Y/4sI g8USdXrCy0gm//2QAk6E7aZMuV9bllFT2E5OlVwi3Gzr8rbXXEaub3jMhZOJ 8OXK598Le5fRe/zssngMEWhryQphx5bR8Tya2q1AIhwPD/CRsl9GEdlfbB3d iRC/+WJDoesyGnPq1pG1J8K/3P1KpveWkXDW5xPjh4mgvkfJtyNyGbXLxL+h aRHBu4G76b+kZeQ5u9YvLECECocxZWLeMuqecU0OHeYCXkbt3eewjN5cDXne iHOBVXBOs2rdMsrtvbC5KIoLkkUiVcq7ltG13Uc0uG25YCzD9d7JyWW0Uzht 7w8lLtDSt2wZZS4j96JoP17WuWVmQ+fFOr4V5K7B7OFK5ITcGcf5QqkVtEIL n6s4wAnXfk77P1NbQa4/bMqqxzhAJdObfmfPCro8f90mPJADRgK5kuyOraAD KWr2NUIckG77aPt+hxXkMcg//fA5O2wRfXWIP2gFXUkP+HHlARv0zqm0zz1Z QfHp76d9GARIrCtyak1bQZ1ReRFCZwggHlIVlPxjBf1oPa1+V5WJt9hbCge3 raAeQ/3ESz2r+BPU+erK6ArK1nnz6WjMCk5fmAZNnlWU+uzpu1CBJbyu3vuI qOQqOjP5YPXS3wU8PJurc011FeUqL06olTLwQ6GPnHvRKrqvcaftbeE8zn1R dOWb+SqSV0/6j1E1h1cavrqfZbuKHNkTXN9yzOFBm7aJRLiuoh8/2Q+fsp3F jZaKUt38V9EW/6GrYgMzOFsTpnUqZhU9kCeH5UfP4GW5VeUGKatop0WFi/6N Gfx2mKWFTNEqqqDKOKjdncH1LnV2E7+voiS2q1zDn2bwxb2XXEb/rKLZo8Xa z5Vn8aLNM2u//q0ity/3mGzls7jbindY4dIqupZd++FgyByu/odL/Bn3Gvrw 4pC9iNs8PpX/KMNHfA3lJbSmTN5j4Nnhojp2KmtoPe5vQGTuAu58+dU3Y4M1 5Ojxy1dqeREfki7u47NZQyfspvmCv63gnRGdm5KT15Cg6ludqH8EiHO+9Cao YA2drT/YpprKBqdNZvSuVKyhdlmLq+5W7NC8zmWlObiGtu8S5hnK54CY9keD Igtr6I2NvtAzS06wKBZ1XyMxUYHmm1LiBCfwR7/i6BVhoj8rk3rq3lxQe21b 1DclJlqX6CKur3JB6IFiqSw9JioL7w/PuEEEE3nDnEcHmSiXcEKrn7VfiezV Bm7WTPRlqEiMl1XfVHRY1lhdZaLTWC0nXwIJ7n3oPG1wh4luXT/4w7uf9T96 fGlY+hETpY38iZOTJAPz+ownMZGJNs4MbU47TIbSQ7eJo7lMFIz98uBh1dNe isTHvz4z0aSNt/73J2TQ4YyQLaxnogNSy59j3pGB0SWaH9vHRBLUujKfRjIU fHyF+cwx0YtrKfx1DDJcf7rtly3XOsq0SHDeKsU6P9woPmu8YR1ViulHx1tS YMzMcExZYR2xhWid7YilQKZytRefzjq6lKX49PoEBSye+nU27l9HEjITXo4z FFjm0Nnz/OQ6emgduWY7S4Hk6xMpNo7r6Lw1r8cBVvuBjtcUOc911n4MuEuf osCM6ZmrI0HrKECDUyNvnALPiwR+5zxZR5wE8mWZMQrska3UdE9dR34Vz/Y6 sjz86E6sXtE6ejfZ3xU8SYGIVc3V9a/r6PH2yKAnDAroOI3afG1aR6p+hvaF 7NzQ3ZRUHjqwjpI4lVVEhLkhZI+Vgvn8OhI76ay7cTs3xJ4M/hrKTsAmD8sO qFlww9hDO8+r3ATsEG/Owy13uQGrMFAypxMwEQddp/USbohZFmlXFyNgssKr 7/+ucsO/HXNhwjIEjGSMpITYqLDL8dfuRSUC5mPuLv6WkwoRLzOn2tQIWIhd dkgziQr9DYHJn3QJmIARsxq4qaDDbWuZaEjA/BkmX17yUCEM20X0NyVg/HoH 8ER+KnR7bHx/4SgB+2wjGssUpILG2xknk1MEjJjl9XF8IxWC+mrFt9oSMJUN N06lSlChTTSjlseJgKVx/XphJ0MFVfMA36nrBIxQlzJ9TokK94Js1BpuErC9 gnbX29So0Fyq1/fuLgH7I+1/eOMuKijPCj+ODSFgO29puJ8xocIdpWlj7wgC Rvfj2jt9ggr1NjWLZ2MJGEdShb3iJSrIP0nLxBIJWBnVdfjEbSp41dyzlk0n YO+7XF62RVPhJ/s5XmIuATsd05IolkMFGV1d+FdMwKDP9/r9n1TwcBFyrcYJ mMWMn035FBWqUiZls78TsC30yE1hK1SQ/FvVFPGLgBXLNKYZEmngSk8NvvGH Nd6WEGYfPw2+mfjpnugiYIlVJxVuiNNAzNd6VGeIgD2RC9w2KUeDL6P0I0wG AdMeNZDI1qOBwFffDfc3sGFNn74OHLCngcPK6corkmyY1MS6ptFVGrxX0/Yy k2fD5u0UXm71pMH5+LEOQW02zKjRt+1rKA1yPU+lxB9nw9DB6Fy1PBqYK2to FsawYQ8unBMqWaHB6Zfh2i5xbFjN7mX9v5w8cIF/REf5NRuWz2eE5nh4wIuR aJBYwIataForEqV4IOUL7/6wejZMbeN3t8K9PLB8euSUAz87dieoapPNfR54 /SDJVyiMHTP0tH6kJsALi2N81W7+HJi2it/5Q8J8oMic99gVx4U5vEu1cnvO D89UrlVKRpKwj/2TN84+FoDclVeW7c9I2IdKhaiPzwSgsqq1+2kyCVvrU3kt Gi8AjEv7lvgLSVj6SLVJR6oAWKZIKHP8IWGp+wKSL74XAH7J6gdDEmRM/4iq m2u7AITwKR7JTSdjrvIcCiek6ZDYebbdOY+MmYbnt+bJ0aH4bbSjUgkZKzz4 woxHmQ6DB9d9k6vJmNVAbmy5Oh2MQppzYybIWM5t6yhVIzoQ2ALptzQp2L7P s3fIjnQQqSuJ1zKgYK2/b1teuEKH7QlTyjP7KFjJ57DKLy50OGdgvffKSQqG CrQmfG/SWfWahttZLwqmtHlcnRhKh0YTJ4KYPwU7d9accTmcDqMbE8KaH1Cw XMOr+35H0UGsiDvlyEsK5nHGWvLVCzqoB2JqtFQKllBevcibSAdTS49PldkU LM7nCMHnNR3Oy74xDSymYIKpVnbj6XS4OdPTZAgU7DMh0Oz8Wzr8D056ceo= "]]}, Annotation[#, "Charting`Private`Tag$1818274#4"]& ]}}, {}}, { DisplayFunction -> Identity, Method -> { "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, DisplayFunction -> Identity, DisplayFunction -> Identity, Ticks -> {Quiet[ Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Quiet[ Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& }, AxesOrigin -> {-9.210340371976182, -13.003880361011134`}, FrameTicks -> {{Quiet[ Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Charting`ScaledFrameTicks[{Log, Exp}]}, {Quiet[ Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {None, None}, DisplayFunction -> Identity, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> Identity, Method -> { "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, "ClippingRange" -> {{{-9.210340118318708, 3.2188755712107273`}, {-13.003880361011134`, 0.1193447048649078}}, {{-9.210340118318708, 3.2188755712107273`}, {-13.003880361011134`, 0.1193447048649078}}}}, DisplayFunction -> Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, AxesLabel -> { FormBox["\[Beta]", TraditionalForm], FormBox["\"c(\[Beta]) / \[Beta]\"", TraditionalForm]}, AxesOrigin -> {0, 0}, CoordinatesToolOptions -> {"DisplayFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, FrameLabel -> {{None, None}, {None, None}}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], Method -> { "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, PlotRange -> NCache[{{-9.210340371976182, Log[25]}, {-13.003880361011134`, 0.1193447048649078}}, {{-9.210340371976182, 3.2188758248682006`}, {-13.003880361011134`, 0.1193447048649078}}], PlotRangeClipping -> True, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[ FormBox[ TemplateBox[{ "\"High-\\!\\(\\*StyleBox[\\\"T\\\",FontSlant->\\\"Italic\\\"]\\) \ expansion\"", RowBox[{"n", "\[LongEqual]", "8"}], RowBox[{"n", "\[LongEqual]", "12"}], RowBox[{"n", "\[LongEqual]", "16"}]}, "LineLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], GrayLevel[0]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], GrayLevel[0]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.368417, 0.506779, 0.709798]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.368417, 0.506779, 0.709798]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.880722, 0.611041, 0.142051]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.880722, 0.611041, 0.142051]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.560181, 0.691569, 0.194885]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.560181, 0.691569, 0.194885]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, GridBoxAlignment -> { "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "Columns" -> {{False}}, "Rows" -> {{False}}}, GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, GridBoxSpacings -> { "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"LineLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { GrayLevel[0], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> GrayLevel[0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"GrayLevel", "[", "0", "]"}], NumberMarks -> False]], 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]; 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], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.368417, 0.506779, 0.709798], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.24561133333333335`, 0.3378526666666667, 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], "]"}], NumberMarks -> False]], 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.368417, 0.506779, 0.709798]; 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.368417, 0.506779, 0.709798], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.880722, 0.611041, 0.142051], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], "]"}], NumberMarks -> False]], 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.880722, 0.611041, 0.142051]; 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.880722, 0.611041, 0.142051], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.560181, 0.691569, 0.194885], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], "]"}], NumberMarks -> False]], 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.560181, 0.691569, 0.194885]; 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.560181, 0.691569, 0.194885], Editable -> False, Selectable -> False]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", "}"}]}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), Editable -> True], TraditionalForm], 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, ",", "After"}], "]"}]}], "]"}]& )]], "Output", CellChangeTimes->{ 3.790500033011464*^9, 3.79050084055266*^9, 3.7905009114756613`*^9, 3.7905010403939533`*^9, {3.790501365461398*^9, 3.790501391778983*^9}}, CellLabel-> "Out[222]=",ExpressionUUID->"f41cbe29-ba97-4889-a68f-a761c37c429b"] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"s8", "[", "x_", "]"}], "=", RowBox[{ RowBox[{"Sf", "[", "sample8", "]"}], "[", "x", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"s12", "[", "x_", "]"}], "=", RowBox[{ RowBox[{"Sf", "[", "sample12", "]"}], "[", "x", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"s16", "[", "x_", "]"}], "=", RowBox[{ RowBox[{"Sf", "[", "sample16", "]"}], "[", "x", "]"}]}], ";"}]}], "Input",\ CellChangeTimes->{{3.789818072879238*^9, 3.78981807590705*^9}, { 3.789818340608953*^9, 3.7898183589082117`*^9}, {3.7898187403625097`*^9, 3.789818745944372*^9}, {3.789818811197695*^9, 3.789818811385725*^9}, { 3.789831546161499*^9, 3.789831546839629*^9}, {3.7898320404262114`*^9, 3.7898320553038607`*^9}, {3.789864943007975*^9, 3.7898649514318943`*^9}, { 3.789892831115396*^9, 3.789892831435464*^9}, {3.789896963511537*^9, 3.7898969690204773`*^9}}, CellLabel-> "In[209]:=",ExpressionUUID->"09f155dc-a270-465f-83b4-5452a9d3c6a6"], Cell[BoxData[{ RowBox[{ RowBox[{"fit8", "=", RowBox[{"ff", "[", RowBox[{"sample8", ",", "1", ",", "0.01"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fit12", "=", RowBox[{"ff", "[", RowBox[{"sample12", ",", "1", ",", "0.01"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fit16", "=", RowBox[{"ff", "[", RowBox[{"sample16", ",", "1", ",", "0.01"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.789818955879264*^9, 3.7898190417484913`*^9}, { 3.789819085394668*^9, 3.789819091758133*^9}, {3.789819628723962*^9, 3.7898196362971153`*^9}, {3.7898199879787416`*^9, 3.789820000838752*^9}, { 3.789820614022482*^9, 3.78982065862674*^9}, {3.789831005306398*^9, 3.7898310300074987`*^9}, {3.789831442674109*^9, 3.789831462231441*^9}, { 3.7898317830894527`*^9, 3.789831783399386*^9}, {3.789832066674664*^9, 3.78983207936756*^9}, {3.7898624522781687`*^9, 3.789862458686954*^9}, { 3.7898649576818438`*^9, 3.7898649685188828`*^9}, {3.7898928388527813`*^9, 3.789892842756661*^9}, {3.789896975455278*^9, 3.789896979805492*^9}}, CellLabel-> "In[212]:=",ExpressionUUID->"faf27222-05ad-48db-b551-d6176fd5d567"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"LogLinearPlot", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{"{", RowBox[{ RowBox[{"s8", "[", "x", "]"}], ",", RowBox[{"fit8", "[", "x", "]"}], ",", RowBox[{"s12", "[", "x", "]"}], ",", RowBox[{"fit12", "[", "x", "]"}], ",", RowBox[{"s16", "[", "x", "]"}], ",", RowBox[{"fit16", "[", "x", "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "1", ",", "25"}], "}"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Beta]", ",", RowBox[{"(", RowBox[{ RowBox[{"s", "[", "0", "]"}], "-", RowBox[{"s", "[", "\[Beta]", "]"}]}], ")"}]}], "}"}]}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{ RowBox[{"ColorData", "[", "97", "]"}], "/@", RowBox[{"Riffle", "[", RowBox[{ RowBox[{"Range", "[", "3", "]"}], ",", RowBox[{"Range", "[", "3", "]"}]}], "]"}]}]}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"n", "\[Equal]", "8"}], ",", "None", ",", RowBox[{"n", "\[Equal]", "12"}], ",", "None", ",", RowBox[{"n", "\[Equal]", "16"}], ",", "None"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.7898191382164*^9, 3.78981915322369*^9}, { 3.789819203381546*^9, 3.7898192055038*^9}, {3.789819326102756*^9, 3.789819347009884*^9}, {3.789819591195232*^9, 3.789819600655766*^9}, { 3.7898196738325663`*^9, 3.789819677929298*^9}, {3.7898197611734333`*^9, 3.78981977649758*^9}, {3.7898322181303864`*^9, 3.789832224367557*^9}, { 3.789832474001747*^9, 3.789832488208096*^9}, {3.7898326615380707`*^9, 3.789832728584391*^9}, {3.7898604327260637`*^9, 3.7898604328817043`*^9}, { 3.7898649731597443`*^9, 3.789864977151291*^9}, {3.7898928942783813`*^9, 3.789892895301448*^9}, 3.789893744798514*^9, {3.789896988834631*^9, 3.789896988839439*^9}, {3.790501199339796*^9, 3.790501228605167*^9}, { 3.790501312814767*^9, 3.790501318389104*^9}, {3.790502626780437*^9, 3.790502637745879*^9}}, CellLabel-> "In[263]:=",ExpressionUUID->"511fd1ec-10b6-4e80-beb1-748a7f18c95e"], Cell[BoxData[ TemplateBox[{GraphicsBox[{{{{}, {}, TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.368417, 0.506779, 0.709798]], LineBox[CompressedData[" 1:eJwV0Gs81PkCx/Fx98+2ZFkWlVq7NTVli6Ny6PuzJ1TkkiSXibV5aVEZimrd yy1tjKEcy6y1uWyLkB1E49ZOZBWRu1amfyQOGTMuyTl7Hnxe7+efTb7njvrJ MxgMv7/7v5/nRbva5HP237yy9Icni4vcyWiL9ywnpB1fylUz5YIPyUIfywfM oG9rhP/kYsNkiauIFYxdT6Nqd9pxcbIh+eoDVgzcKB0NswAuVpmL+rWsNOjI OExxMRcO3nfHBaw8LKl9PNGwNR2ypWsdv7PKwTyllPJ4Nw/3y9WGBgcbIXf2 k09jCzIRb7uGl7umDSLD5+lyu7IQ8FE8Iz+pE0F9/evEkmy0ffdEUVXcAyeP uIOlNnyULUoC1CX9cKFyda8O5cFuxZfP9BhB1b7+Q9RUPjIcvuv16B1F+qry sdHtBfhjT+oNzuAY5I0Z/ryIIrgMuZeuW0Mju1bw3MfqDm7f0oyM0xpH5KTl AKVfisx8O/MSrTcoHVN0cfu0HGJ/5klv8hYaCWEHQqYqMG8t3S22mQZPyZ2f 1HUPPi/8zs5enIFS1kf3t+kJIPD9zc6zcxaNZnGqVj/VgD+WXVPY9Q7NZnW1 123rUNUw3C+YmEO5zpJ69y0hPH5puN86NYeE/d3lZgVCMBLzcwZn5/BDYgcv v1IIe4fTPquLc7hHPz/A6xBCPCwZt6YkmN3xu9uAQgM0l9cs9DAlKC5lZjFC GhBsuk9bEiBBhlZKZsy2Rmz/NdPZeFoC41nVDWsNmmDTa22T9U6C3MAdOllG TfBRkJnLySTQ/WQqlLmjCTfZx426VyUoCAm84L2/CQxNnYUwjXn0j7zx++yb JvRczsoRmswjhjoT1l7UhCj7H8ePXJ5HxJh6rZd5Mzpn8iKDVKSQbfG9O3Gh BUnrWa8a1aSYzRVzdWNaQOyqD2trSBFkPhXrdK0F5YUdOkJdKW5c3FbUz29B Knu5Qn2bFC9to9sOt7bAod3ldaW9FE5VsTvrDR6ivVDZcYkrRfrE0KHl9ocQ sYMMEwxkMGqLusiwFqHc331rmqEMBQ9co685ifBvjs1X2UYyjJm2/mjgJUJQ vCEpY8lANxdvdA8VYV1pj3evhQxfe2RwTfJF8Fqx+OlLtgxJy2Vd5+QeYS57 7YZHuTJox50fXit6hPX9ZfqqGxdwJ/wUL8K/Dfl3//XYYc8iIntSbmUe7UAS z7Hrg8USUhdy9D/83IkGvr5jsuUyYnZNMtdffwYjFfOYAZf3kOMLpU2hPZj8 /imV7raCerXBkP8wevHiSLWNOucDvha8G3oW2ofPbb2XT8evItroScTRyn60 2Ucpb0/8LyIMc1ptGwfwtG9h7IQjg5wQOpo6PxtEgPrU2c4uBrmDL8/5PBpC qQcxEzjLEc+y98ejK4aR2GPpFjUsRxrfVkzb/zaC9J6w28tsebI6W6+1wn0B UwV3O/dJeRJ8clAYeO0vqNSEbQg6o0CSreu2N+0dRVzMPGt6WoG0ldRYNf86 ioxw/UynS4qEo1E4YWL0En3zkczT7xWJ0utNp7xuvkRFXrKOb5IS6T68Gqas OQYTHyl5rKlM9stbJPqmjOF1Qc7N1zxlwjE/9u2NlTF8pTdtTW9UIV3xI3/a hItxR+vSpqx8FZLMNur8840YHZv99tZuViWCkVBLPY9XSPReLq4vVSV7fKvd JrtfgbO53fq8MUUakpVd06xppPkHR1Tvokis5bMnKbY0ykq07y2bUAQpKwcS D9GYNPMxjN1LkfPanC+ijtA4ZSdd/sGKIp3fBwoCXWkcP7+xvMiFIlea1nJs /GhYiEL1hsIpssJl2364SsND7TPnDZcpohdPdS0m0LjkJEz8JoIiBw1KPOeT aAgGVaXjMRQRH1wf+vY6DeOZ3KfzyRTxvDJaO5BBY7Nu69WPcyhyzKu6SnCb BmGfqXPmU2RHnJ1XZSEN73zNuYw8itz/ZUGxrJhGDovtrV9AkS3Hzp0oKKGh bTW3b2sZReyb+au8KhqmCbeCA8spkr4loSBVQONou0VRWSVFZhQaDqfU0Ljh mqj1j2qKjA+cTo2rp1GSzbK7WEuRKufonVFCGu1/dcXW1VGE7bO7/VLj33+M wmtWH1DEvPqE34VmGqoBBjNWjRQJqX+8EvyQxv8A18YT1w== "]]}, Annotation[#, "Charting`Private`Tag$1824337#1"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.368417, 0.506779, 0.709798]], LineBox[CompressedData[" 1:eJwVkX0803kcwEds+1WXTnO15DGvsrPXeahLdfT5qtC1WuQQjsnVVU4iIiVU NFSSh1mlNXvlKLa5ipGHyZVXI9lkHkZP+NnS7RSTLOm6P96v9//vt03Ekd37 DQkEws6v/O+V/FR/L0HsJh/1hStKf670+liq2ye6DyAC1WaDBVfKg8npXno4 bKOWlhePFEktxyr9W+kxYM9olPwWVyQNk2alN9LTgCzWKt/ncqRztI/mdfRc kCcwTRc9KZAyWWJ1DZ0PiLj4vNfmy9IPM9kd1fQqSNu+aiY6NF16v2rBgErV DEjJqy+5GQ8Z3vPzr8+Xgb077tSYnA+RCzMIgkw5NB27s97pIR9kh54akYe7 wbbfpTkiohxEHycjTSb7wCVfd+dIihgYsxE8WvBzaIk62Rp95S4UMA/1BPe8 gjNUC79beyXwyPVSTqxqCLixLDOF5j74DQQJv52Pg9xkM4PW0AQ3i0xPnaGo QVwZEeK6+gEUChgbKylvYCtH9ypE3QLDB2hhLPQWRgUBfG7HQ9B5TrkMe2nB 1ThLz8hvhfAX+6PfHR8HTvb5nKWpj6EmooIRIn8Hzb+ETYzsbQPe0NXaPxXv gRNv8N7e7gnckw721Wgm4IQknpax8Ck43Cr0ddROwgKf2tnA7k6Qj/NPRZGm oMd4NN3mtRxaQ6Osz634AIuIeyaLninAok9kTraaBqqzi1hW3QUC8ZY2putH EB3WsUkVzyAzf5fis9sMLFNaigi53SDlme/KcteDJsy54USMEuxIG9P6/T4B 0juoCft6YOxkJ5YXOAtRzTmszd698GKnxMsk9jPYcvt1l9z7YKU3S38wYw42 5S08GubYD7IdKUQH9hdwkpS5aRaroLN3emjPLgK6rf3eLsV4ACJN/omWKwhI z/wuqPPNAAiD0boaXwMk7npzrEQ2COxu98CUQQOkPVAqTm14DnndCTf1oYaI YC9bR73xAtbOC2IEjRmiazPdqqaCl0CqTbCMOjwPEU/ajZq4f/2apqNrtfPQ 0eyurjThKyhINC/0STJCAoGuI3H1a+jVnaId/GSE3ORtR3ZceQ1/8bOWRmQa o2tEM+syyhCsCZ9CbaZE9APTb2vLxSEYLS3mjOYTEa3C06R+bgiclms9cSsS GltcqdmQNAy3KUk2XAEJUS60HuS8HYYO2/3r62zJKG6Z8te7ISPAZunLG4Rk xBEGsgKUIxBr2+4Z74ihlXtyyL1eOOQeiEmWOGOIpwvrU2zDQVRpdle/BkPU y47lT7bjMLYu3Pr0egx90yb3bmHisI8xpb/ogaHpn5awhQE4BMRbVZX5Yajd imuc/jsObq1xywcSMRSvLjF0PodD8AKqr+UJDI2fPdrlkIlDkk8Te28yhiKt twhWZeNQoyJPqdMwxAoa8ViRg4Pj+PVOXRaGfm5fdZrEwcF22eP0RcUYshRX fHleigMKPVzvy8MQl5Hc2VeGA0tgOlHAx9ASzY4bz27hUEwPZZmXYohs8+8m mRAHM4+JDfYiDE3kOaXcq8Zh7bmimD+qMBTtaMAUS3DY3e5WJrqDIU27wuJ2 HQ45/mzKjxIMDRrFNd5oxKHyKp1xvA5DASVbLl6V4tD+UnG6vh5DXe6U0MIH X/vYJdbONWKIqRqh5/6NAzlyxbhHM4YeJ1TPZj/C4T82ClZQ "]]}, Annotation[#, "Charting`Private`Tag$1824337#2"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.880722, 0.611041, 0.142051]], LineBox[CompressedData[" 1:eJwVkHc41YsDh5GLk5vGbd0UIpWckpbK+HxLRkaZcUhGJLIqSRnRNXJDkVBZ SVJmxglFKOPYq6zI7MRNIjn7+PX7430+/73P53k3O3iaOAkJCAhk/eb/K5d2 w1w7/aKGv9GMwqFnMUieuqHGIRshato4dGt+DFLwk9FDtoNqqp7aulcxkJrK Ma8je8FARq5GqD4GZ95GhFSQg+AbG2UsRI8BX4EpWUa+C6m0xscZ22Jxwjaf TiWngayaceBGdiwWWP+2lJALIOjzxKen4h7KC8QH+vurEObiF219LB6hOkvv JS+lgbPLhGY8kQjXP0MF0m+1w++HuvalqkegubQKi411QyXCzEZOORV5zJ+u y3/2ItggPzzE7jH0uQ4pClaD6Fm+6aBVyBPEnXD5aPVxGOZ+WaJhfU9Rq3In +mL/KHhnznnrEVkwHaDkrlw6Ac25rg/m0tnISFgVcHM1Hay76plNq/JwP13/ cM7qSTgk77+ek1KAMWeFM7bEf9iTIk89H1SIea1fe8a0p4HsRYqIWzHshpw8 fvjOwLFwX9nwSyqoDtn61u0/QCbvm0ndXIaU0YelmR2zOFh01qA38TWK337q pX6dw+XvybALrITi8/vGStM/Ufd4S8L5kiq0z6QFuIn+QoDTbaeGCzWos3GT Cdu4gNwfpA/f8R6bevMkxaQZuLIOchkydfBXdDngIseAW6uwkJZCHfoD5Ywb tzHw4Pnw4JRyHeLlE8MidzOQeRA1Wpp1kLgcPLviKAMRTHrVoXN14C8zq//b 6bdvVn3H1tw6DGuyLilmM7C202X+PuqhkVAUFZnPQJbtJ9aCbj2Sptyzpot+ +6JhZ2tSD8uY0cH8Nww41Bwu0XaqR/tQk+6+VgZ8T+41vXS7HtXXUqTUZxmw krB8btZXj/R8zcYTKkzsL6LpHvRvwJ7PtmFOqkzMmrskSoQ1oFrC/6g/mLj8 3EBu5k4Dht2Ly5/rMOFmGRjU9qQB0mT5bGFLJh6Iq9ivbG5AUpZIZLkvE9uv 0jdXStFw/zHNcGs5E5M2nXzRVhq2dEyQ1CuZmNB0HvLro6FYQKjOtIaJbupd GYEJGrptD2sENzIR0epRephLwyqp7F2f+plYMdhcGajYiOiHkctjOUzkBmy6 5RfViFv3Tnbw1FgAhXfGyr4JJe+0FxcJFpKazkVt9GzC6E/1nUJaLOStr09i +DdBzYwcIWLIQmdXHpWV2ISZ1aQjy21YOCN8JkSlswmn4msKZAJYkNjAiJs6 3ox/6sqGZINZ0Ln5wN6J0oyChYI/5UNZ+M/cpY5/vhlLLVLPK0SxsKY7tyH6 VjMq1vnL7Elm4fPdZ+t20Zqx5cH+u5oVLHz88p5ZZdQCYxq5UquahaOSj+pM HFoQyJL7plPLgpN2616Sdwt6Kat0DVpYaDrbYD2R0ILbG2YWzQZZeKwcsMRp pAVzj7I8z/FYsPGyr+z0a8XbFMmTEepsMFOVdGLa22C3fvjO6BE2tk82UI9P tkEoNqNdVZsNjevK4hsF26EdutPk+wk2WtjVxdYb2tF8AeamdmwIHso2kT3R jt6DZ603/cOGaaBvZFt5O+Y6Xzi/bGDDLX/ThGBWB+IMPLOWtrAx8SCoMOtV B/bX7Z0828HGKCc/61x9B3zL3riu7WfD831czFZ6B/ipre5+/7Gh+0ji+4tt nRB3n7usJcHBo10WZVY5ndgiejioz5SDop2loruqusA4befw1YID5rfybWHt XWgsDDvGsObAI+T7k5HhLnid6RJb48iB0uKQfJpgNypK3GKMvDkwx9l3Cprd OOWYml4fxwFlcP7kWG03wquFa0s+cCDmdKTmRe0HWK1TfPa+j4Nm8YvBGh8+ YJe7cUTXIAdqF3Te1Ix/QPf6FMPZCQ6mhwqbHi75CBkvlY/kBQ6MN2aXBhAf USrlSn+ylou9gpaXyqgfMeXXRoq14CIqKfGPttge7JF8x2dYc6FLcZUfSuvB 9XLqTxs7LtJ/SLxrz+sBiZU8qODChcbko3V2jT3Y7uP2svo6F0PVhXPyAr1w 9iJRZpO52B1/ytz0XC/ylvMMLdK5MLp6a8eDS71YyPtxtCKTC0etzu81gb0I m+4hR+Rzkegm11oT34tM10yBzdVchEqeFPet7cW4o2aW0TgXq2QrVwxv6gNZ WCWZ+pULZRtBlWvb++D9ZEfsxmkuPJdWObP29GHJ6Er/r7+44G3wpeXr9EHW dvhkkCgPf7FSVdmefbCnBDDyd/DQ/0ovUO1NH4YMX2kvv8jDStR2WWr14910 aK7dFR5s5D2UFA37kRVltrrwGg9nn9VHTJv141LL7IjZTR7i7udzjjr2Q8SQ HPDwHg8JVxzjVG72Q8ngcZE8lYdlHTZtfq/7EaR3W0aNw8PkymKryS0DcJqi hEct8hCuV5SxVXEAev9u/z60hA/T6dPeVsoDWN1Y+zr4Tz6ip24aZaoP4Plx AYv6TXxod6142GU+gE7dK1EmBB8ap9dQskIGIKdjyz4fykei1lZrhcEBHH53 R8grgo/xHF8/udEBGKFq6dUoPnxmIf43fQCBKpslQ+/zwefVdC/8GEDvtjHV x0/5yNmSGX9D+BMixZwD+mr5OODr8axnxycs0DwE9EQWMb1Q4szx/gSaQaCI YvgibmiMFLUKDqKthzFqeVKA+HJnhDImPQTX5d882jsECHIfMbdM+jNyrYgD VGNBojj8zsZi0jDCu9UtAj8JEhpCBqcMI4cR2+2TwbYRIl7Hz2SyhEewbwlF nzIlRNxIKqTwwkYgWuoj5ea+hOi40YjpxRHcDJonT08vIcb83g+r+owi7qrk faNrwsRorve408IoeuYDFM5zhIkV305FT7qP4WVaxDqHW38QGfas0/YzY9hr 94toXCVCeDTpRlz2GMeXp0nxX+6JEL6ZBu8Z4+PYvWFaa0JalIhRSpG66jSB F6uvbU5MFyUi6OOyFwYn0CLrdLBMVow4pu65WcD0C8Jt2VlvcsUI/WUbdtzp /IKLsk1a3kokYkfY4Z7Y43Tcdfbyf6VMIu556Whk6tORl7OmiL2XRCjLtj8t M6Rj6oCdTPBBEiGi6uszbEyHo/4vdtQREtGbMCC1y4qOU97SBc9MScSKztZI misdanWXNwxcJRF2YqxwgUg6rMT/Npa6TiKcVqjP/xVNxzWjynB7fxIRQ31j u+0uHdR+sV/0IBJRcpHYdyKODqWZ5Lb5iN9/jp3rfJREh+z6hhCJJBIRtffz yIFcOggb99fGKSRid8NOQi+fDtv0VXNxaSRCbf9kss1LOpLINraST0mEA3ut ZUgJHWuOzB3ankcilBosGjsq6NgXluB1oYBEtFMTtk68pcOkSe1ZXiGJ4Gs2 32RW0xFtHr56/ysScRxGqtJ1dOQ8JOv7lpGIgM/lCXsa6Gj63BH8+jWJEL9n NK/V+LvPlqul/AoSIdcgaUxppkPMdePMkSoSsb9UPs+tlY7/AUw6RCw= "]]}, Annotation[#, "Charting`Private`Tag$1824337#3"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.880722, 0.611041, 0.142051]], LineBox[CompressedData[" 1:eJwV0H881HcAx3E/qruvrIvphx9LKMtc+kH6Mbw/MayEUAvtOjEJZYxCIVpc XDPrWEXO5SGscU4/pCksJUJ+/+gI+XFfLA/lR3Gprf3xejz/f+l5/+jqq6Sg oOD4qf81EJ3Zb5cdYvUmwH1sxPAUMsfOWLxn78WgKOsbA43TEGLqXSfbC+0d MiFHMQqrxgr2V7ODEWt9wq2lOxqHKhLPPWDHYk51Vy+nJhYfjWa177FTQIZ8 7e2jz8GJW0SXsEX4SpClqUXz8XYuqeEOWwKvCKqPy0nDX5LF3VJpJS4Hau1Y W5qNeHsVQaZKLdbVVXlbb7+BANV4hezzTWg/VW/g/lSCWv9nC5iDbQhc6uva /+Q2xLNTAaypLnwewwi2iCuFw7y30MjzBZa+6qz1T7qPVCf/Ds+OflTp9lVy SSUeb/01OUQ6gIQtB1LDNB/CrdujUE1lGKEOsoU/aT1CziX16LMaNPwc5UEe c4+Rlu2wo0BjFJrWmoz2Z08w6Gd0iEv+wYy5s+X2+lpM285sHrQbh3SFSiAv rw5evb5BryMmMDbbbV5+owEl3n86HGx6jVv1pZsScxohHEgvzW1+Axu7z9R1 y5twu6Knq2RkEja5u6TjD5ph/Eeay4bxKdhGfSssLmhB04Qo+hhjBt+3uBb7 F7WimnNsdYLOW7ReG+gOLGzDF11ibabuO+yhzZR80tuRXWTz1GnrLHoKLoY7 ZXTgvMC5+YPFHIJHbo6Y8DtRIdR2TrSU43Cme4jHyS6sYeyIfe72HkdbqF0R J55j7HQjdfHAPE5ER+tc8JGi1/GuHSvkAwT581apvt0wsOfKj8Z/hJqjYqTM uwe1e2IWGfP+RZpfjXi98ws0dr4bcHdWICZKGab+zr0IYL0KampWIPXqG29f sepDoScxL3FRJD5Oaw2TNPrBa7M8ENOjSALcSq/8LejHxbaTOXKOEgkTsPmh Ki9hpuzh4DGmRJIEhjm6/JdglJ5cdey4MhE9U/zaTnkAZ2On2ePjyuRIddYL tcgBpIZrp+2NXEC2xlTldc4OoHM62ujo+wWECqmZWBE8iGJR4grv8wsJbeDG dX0zCFOvGfJUfREJFYikm4KHILt+9XeZYBFRtGps5cuGsFFr3HZYl0Ey8n+e 7jsyjBsakXqXsxlki5OmQNw7jAZ932339JkkThJiqb9PBh5Xnn+/kEnaW5xZ Ka0yhOjX2YZtoAh7I4sbsZtGil9w1N1NFEksMnTh76EhLlh2S25KkSETKxuh E40xc6/Vcdsokr7++JePXGn84DAj/2UnRVSM6yZYB2l8F6YryXOjyOhaXmxe IA2L6lCt7nCK5Gr/e63jAg3PxZouq05RRDFjeepoMo3IveW8w1EUOaRlkjCf QqNEypyhYymyXJMToJ9GY8NEZuN0IkXil5dtDsqkob+y5tySqxTxUQuvWiim QTjHy1yEFKlISb6zUkKDm60+mSqiiPbS3DzjmzSusjlc7esUaV3SzncpobFs 5+T2dWKKWKua7sssp2GWcCk4UEKRLP5uO0klDdc6izzxTYrIVby3VT2kkbyf p7HlLkWKqd90RqtpFKSzHSLuUUQ1MX/JfA2Nur7muLIyivgzKxVYdZ/+rAkv /fiAIo95nZN6DTSYAToTOysposeYGDJrpPEfzgFJKg== "]]}, Annotation[#, "Charting`Private`Tag$1824337#4"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.560181, 0.691569, 0.194885]], LineBox[CompressedData[" 1:eJwVlXs41AkXxy2FoWWzIpSELmq6bdtqrfr+aKk3SgjR636LLkaUUqSWJqQm idYikZJKyCUkrORuhqRhZsolTC7J3Vx+0+v94zznOf+c7/l8n+f7nNUeATbe 0lJSUqUL9f+ul37JzjwjcPfiMtkTcecZSB2+ZCyiHoJ7zgWrzMsMpGFq7gPV De0Of/39KpoB7eGndm+pNNTHLPER/M2AS2V0ZAU1AivunpROKWNAYjCvVUpl QCPD0u6qmIGDrs+Hiqnp8FzJHJi7cguzgpiWImoeApn0WwnJ8SjLU+R0d1dh a5Lrzxqb7iBqr8LtVIUGKOyarqB0J8F/SZRUxjUW2pvfp0VVJ6PBr3WRfH8H XJxtb90k0pA7P+WvPMWGa16NY8p4OizEHmkGTjxY95i5eK/IRMJBv06nzh6Y WP2Q7nIhC7WGN28EdveBzih8bzr6CLYcx2dLFQaQqF5+7PiHHDxIUgm7ojqE //6TnRz/4RnuZFgYPVX9goSf920T0vPQ72vg4kqM4OQtGlXpdAGmzWZ+6Tcf Q+1nC8eDPoVw++h96tu5cSyJWjyeUlyMYo8nFkdZ33C8p9VP+pdSpPUlv3zY NoENLvO84KJyFFZy2cX8SZyuVHYsevwaGx/fsd4yNgULh6injPYqsMbTw07I zYC+OdtpmvEv3jqf0Lm6YhbLne28s/3eYCU7V0t+1RyWhm4g7E3fIuP5nsaD hvMYNE/uUPapx7XbVm2ksQCcMCll8nYjimrMv38nBLAOla6cSWlE39SuTdJm AjgeUGr7mtUI48PUaNkDAnQdMf7aW9KIcVWKibKzANz3VU5NnEbYJ/6bpxMm gFvvuPQzvSbo/72DsadCgHSres+1hU2wbqC+NqsWQOZ+i/3uiiaEC/RG99YK 8KsvU8fxbRPYjir7LFsEYPsODCexmxCrOf79ME+Ax49sj4BswuQ/2QE+pADX qyID3fc2ozJNyyp6lxAs34aOJb3NcFvec7PPRIg1loRS4UgzpOMfsP4wFyLK qSrQY7YZ5lGbbL4eFMJz7XnivWILmo/DztZNiPB/zyzSMGwBe6fn0ZV/CdFz 3VPr2M0WhBasSzlLF8LP79pkVnILtKijXGasELqSpl0TWS1wWXXG5UqCEEbS K2sKXrVgYDHdfShLCI26BnvZkRZMtuf45tcL8f0hTdvTohUJlgHZCi1CWMfd 1mM6tGLH2+1fPNuEePzn0igbr1acK33lr9YthB7D1jUjrBWSe60nL4ws8LDr 8sLzW6F4cjLITEmEH1+rxmiuYuLpYHFhmooInjKPaoM2MXHQ7cLMnJoI6w6r 9sz+wUS87aKQnFUinIj71nzZkYnlRmqhyttEkFufNM1NZEJfziiiy1YE1r5B 6w1KLMz9182D7yCCidq54DA1FhoLrv45d1QE5/BLrd+0WaC5vJNf5iXCJfU3 dsZbWagoOnHrULAI0fml+6IOs8BQvB3kek6EjPrvOwXOLHi5l9qduihC6dhL qSRfFhR+lNW8HinCXfmgMrsLLNh73cuoSxBh3GOpmnwWCwZltZGdd0XY4KT3 ZfI5C2LlUZ+BFBEG8s8Y/VzOQkb5zo0yWSLUdicECttY+KrS/mJ3kQglOYbd N6TbQK9eVFv0XoQiDXrnDlobnNQ3PnrTJcKVGJVRw0tt2HzSOvodb+G+Kfah mBtt6FiedmBiQARfayGxNrcNOjTDTuqsCP4vzqi7TLRhqtb55R9CEbJ0esPl ZNrxVisyeb9EhIf+FYqKy9pxoo7lckxWjPSB6xHrjNrxUtt/KFNNDPmwsLjB a+2IDWY0FGiKkTkReOBGajtcGoufVGuLweDUBiQXtGPRWRnap7VirJvqye3h tcO6JWVe01C8kB/KxjW/v8PwBSYl3mFhX/R/+hWkO/CLVo1k7qgYF6yS+uVW dSC0rHjK2U0MLYW4V8eMO0ARpPIM/MTYUcOT7D3XgfVnT+RXhy7oq3w6oz7d AV8axXEiVYz3y9jBs3PvkatMHnDIEKOZ3D2xVqMTs7nfTCseijHONP/iZ9SJ q2MfqNHPxYjKistXCutc4H4otbp6gddDN1lD+gM+e+3JPvRZjNjd9xO8F7NB XWSYWswX47cb/5q+1GcjOHND/IoxMRr0h/rK9rAh07f0In9GDOKLl0l5BBu6 rj1WEXIkLudMuBvOsuEveffnoCIJTtZGy3iVLhSk1v1u+ROJYMtGj0ubu2DK zdVbrkGCmbnVSM67C+6OYXPPN5DIvre9N7W5C9nztNFlW0gsZnopOQ504VuS V++F7SRMamz2/EN2IaLTommvMbmQn1ipF9RupNtq3vt0gMQ+i81aO6K6wZ/8 McHMhsSXAVNTanI3tsb/EP3EnsSVHYdNn+d2o5LFPx3iSoIMCGA6d3bj44ES c+VAEhiqzKDrcFAzFvXM7QyJ4sF1M0XbOMiOO6xacJ5EZ5GXR4QpB6dbJnoP XyEho+aQ+M2DA9kD1LDk2yQuKnPW0e5xMDIq7B9JImG0q/lF/jMOWNcb9u9K IWEjkilKK+cgudlnec8DEpqZldciOznYYnn/xZpiEtNf9R/WynOhOhqgGVJG Ilw2xzVblQth7O7L9a9J5OxR1LTQ4eJNE+fg8ToSb3L7u7p+4+KIhdpwHpvE 2nh9/i53LiL2x+oYi0h0myXaeT7lwnvYkR73ncR2V+8VkkIu9ses//pRRgID D/fOwIoFvcba8stLJNj9urVnpIWLx/+RcqhbKYFFUxXMx7ho33cmzoaQIGD4 1nzKWh5K+HumM/+U4I0bu+voJh5SrqkcndknQXncjZrFv/LgU/98/V1rCVhV avkrTXgQ7h2u4XlIEGkQXxKw8Lf19roKj0VJwHmsm2AQw4NRzU1pWrQEL8Y9 J6/d5OEQqhRC4iT4tH/L+p4EHsINV2tF3ZFgVJurd+4eD+x1/X/cz5KgaJJ2 9WghD9flfcO6aiWo3nonzZzHw2zDKan9st8xpZ27d4T6EQ2W4bIb6Qvz0ZgH glcfwfww13fESorIunJdXXf4E/yVR0+x2qQI9QFuQ9DFHjxzIn4rtv6B8E/K d4yc7wG9Y5dDOPcH4uL9d6kF4b2I7zj7QOgsTbw/EluqKuzFrzKOFo7D0sSD R2qPpC71Qe7lWe0TJ2WIS8b6JZnCPlyJmKaOjckQ40cSQpKD+pEQonXn0PlF xPH8xSvSZvvxYTrM4JhoEWG47adtTbTPyE+PVve4tpg43ZC9ec3MZ2x3myEa VWSJbfRtgT+FDGAwKyVx8LYsUexTth3fBrBVc8xsYJUcsbZip15q0CByVM+v vpshR5x6OmSPr4No0fXeWaorT6zZxGcH+wyB7irMfvVMnjDcOJfO5Q8hULfJ LHgLhSh+MvLppgcfDF/axZJtFOKvQtL+uRcfuU+XvRBupxCV09atrT58DP/m pnN5J4V4tj634sfjfHhZzAjjTCiE0CgrLTaID/vgVXmPbCmElKuDFz2SD+O3 QZqcEAqxaUViffhDPpwUNay1QymEV2WQUVo2H+cPvaa7X6QQcfP0JxU5fBR3 y88MRVAIx+U6seJcPraMpzKnoymEM5WxO7SED93l9ZFKKRTCqt/R70w9H4Tz yXLrNAqx2u1dXUIjH64ZKpMJ6RRC85dY/cJmPlKozq5aWRSimufPnmTxscxk 8vf1uRQiRr1uHa2Lj1+vJtGO51GIg0UqZ29y+LBpMn6UW0AhmPri6lweHzfs 6Ko7SijEW6NDNmO9fDxNplqcK6UQtMdxiUs+89H0qe1yeTmFSAhRYm8cXPBH P+SlpIJCJA6XqVnw+ZD3XzFuUkUhXraH2vgP8/E/dMXfAQ== "]]}, Annotation[#, "Charting`Private`Tag$1824337#5"]& ], TagBox[{ Directive[ Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.560181, 0.691569, 0.194885]], LineBox[CompressedData[" 1:eJwVkHk41HkAh6dB40eLLG1FRIdV89AKSfh81UNb5GptsctYOylSy2ZDKKSG LtaRSB5NUllEW46kbGm2KEdZx4gY18+UyIxG49i1f7zP+9/7x2vg/4vHPiaD wdg1z/9elXfC05EfahcU3v7ydd0lXBGfsJlmu0HPKuJI1IIs5EIia2f74cHU 0mWr7LKgJy7yFLBDsPqYN/fXiiz4PkpKqGHHojW6W65RmI054ymdKnYKrOL7 jVySc+DCuT1czs7DeYGMDMz70+czL++xS+HfonDZV3YN90tVu4TCWgxcVUq5 aFqEU9tV0q6oPEee0dYLJh/KELToFIOf2IyHi1/97lx2D88DGxWV+1vh2Nlm sUhQhZIpSZC6pAO26tlrvsyogdOMf66xdzfcFo8Iu+e76S6Bbd5tvSjnFscl 9z3G003JF0KFInw35tbIfVqH3V1exYtVBlFIm7xTeSVAfqZmTLzWMCyXvS9u rX6GDL6TdZHWCCLT3JumL9ejf7+xL4e8Q2j0x1pJ/gtIHSbN+h1Hwc8J2at+ thF+PfsOj0eMoU5bu3fWuRnl/n84/dA8Dk2m4xO+awtyRdmVBS0fIU8KiOwk r3D30ZuOcnoC2JGfGeH4GutvZbibjkqgn9+SeMu6Fc1jeTHBrEl4WeqKtm77 BwKf4JWndT8hdPS+WGV7G1Z0lOgo68tgQHYIuJvbwb+9rd5l0xRM66WUEelA Yppry6zNZ7SNJa+MsujEo1wd1yRbObysTwzNrhFiNcs6tnP3NKwenNUaWdcF cVQTlbpnBnc6edoBem/Qs6vCUT10FjyTq8ed1nZj1XaO/MCpOWy6qZbJMe7B c+fjC9fz/sXJmoPxSjpv0dQuE+11ZZAlShJxkkYvgtTfH25uYRDLz0ZznWd6 UexNLMvdFxDBvwsD/2L2gddqu+f4mwWEyZeyuhP6kNp6NF/uwySLNL1T7Of6 YK7g5eQlZpK6FY3OwjgRWJVH9YIPKZCdsqqJ6hkR4mOl7NFRBWLX7zpu/ls/ 0sN1MtwiFUlPkNRAJOtHuzTG+MC0InGu1bDtCB1AWV7SV/6JSiSobMs55qcB bPSbJPWaC4n0rsbGuvBBDF3PuTiUtpDsPO3zpHF8EBuWjzoM6rOIm6SS90XY EAq1Ig0u8VnE0OScRcaHIbw03GdVZahMuFHUlrsBw+Bx5DcfFCsTD25GGGtk GKGGDQ5hphRR08nKvOZPI2V/SHTFNxQRqrZmP+bSKCnS/lO+kSIFM2q5fQE0 xJZ+K+OsKGLXk5Cvf5AG12lSft6eIiFXQ8ouH6HxfZh+6Y3dFGk1+rYhLYGG jeDI8q5wiuSYy+ZOFtDwVl3mrneMIgfWmDGv3aQR6faQ91M0RcyXHFJ6XEij XKg8ORxLkUaZSJVxm4bp2JUmaRJFGNWNS6MraBgufZaglkMRrn2BWdgzGsTn ULV7LkU2mPVZpNXT4PA1J9LzKDJjqLv5zgsaOWwfjs51ilxUTMV4Mw1t+4nN X5dQRPB3jHNwJw3z05khB0spkl5Z6Xq2i4ZHg82NkjsU8bsl8SjspnHBk6dl UUGRqTOBXnQfjaJstlNEFUXqovJ/ZA3QaHjbElddTZHU4LectUPzf1aHV87V UMTXZ/nPDjQN5SDdMftaiqxz8Qzgimn8B5z7V54= "]]}, Annotation[#, "Charting`Private`Tag$1824337#6"]& ]}}, {}}, { DisplayFunction -> Identity, Method -> { "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, DisplayFunction -> Identity, DisplayFunction -> Identity, Ticks -> {Quiet[ Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, AxesOrigin -> {0., 0}, FrameTicks -> {{Automatic, Charting`ScaledFrameTicks[{Identity, Identity}]}, {Quiet[ Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {None, None}, DisplayFunction -> Identity, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> Identity, Method -> { "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, "ClippingRange" -> {{{6.569134336465715*^-8, 3.218875759176857}, {-0.023764932152722296`, 0.7786151514943276}}, {{ 6.569134336465715*^-8, 3.218875759176857}, {-0.023764932152722296`, 0.7786151514943276}}}}, DisplayFunction -> Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, AxesLabel -> { FormBox["\[Beta]", TraditionalForm], FormBox[ RowBox[{ RowBox[{"s", "(", "0", ")"}], "-", RowBox[{"s", "(", "\[Beta]", ")"}]}], TraditionalForm]}, AxesOrigin -> {0, 0}, CoordinatesToolOptions -> {"DisplayFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& ), "CopiedValueFunction" -> ({ Exp[ Part[#, 1]], Part[#, 2]}& )}, DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, FrameLabel -> {{None, None}, {None, None}}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], Method -> { "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, PlotRange -> NCache[{{0, Log[25]}, {-0.023764932152722296`, 0.7786151514943276}}, {{ 0, 3.2188758248682006`}, {-0.023764932152722296`, 0.7786151514943276}}], PlotRangeClipping -> True, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],FormBox[ FormBox[ TemplateBox[{ RowBox[{"n", "\[LongEqual]", "8"}], "None", RowBox[{"n", "\[LongEqual]", "12"}], "None", RowBox[{"n", "\[LongEqual]", "16"}], "None"}, "LineLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.368417, 0.506779, 0.709798]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.368417, 0.506779, 0.709798]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.880722, 0.611041, 0.142051]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.880722, 0.611041, 0.142051]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.560181, 0.691569, 0.194885]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], Opacity[1.], AbsoluteThickness[1.6], RGBColor[0.560181, 0.691569, 0.194885]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #5}}, GridBoxAlignment -> { "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "Columns" -> {{False}}, "Rows" -> {{False}}}, GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, GridBoxSpacings -> { "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"LineLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.368417, 0.506779, 0.709798], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.24561133333333335`, 0.3378526666666667, 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], "]"}], NumberMarks -> False]], 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.368417, 0.506779, 0.709798]; 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.368417, 0.506779, 0.709798], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.368417, 0.506779, 0.709798], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.24561133333333335`, 0.3378526666666667, 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], "]"}], NumberMarks -> False]], 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.368417, 0.506779, 0.709798]; 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.368417, 0.506779, 0.709798], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.880722, 0.611041, 0.142051], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], "]"}], NumberMarks -> False]], 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.880722, 0.611041, 0.142051]; 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.880722, 0.611041, 0.142051], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.880722, 0.611041, 0.142051], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], "]"}], NumberMarks -> False]], 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.880722, 0.611041, 0.142051]; 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.880722, 0.611041, 0.142051], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.560181, 0.691569, 0.194885], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], "]"}], NumberMarks -> False]], 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.560181, 0.691569, 0.194885]; 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.560181, 0.691569, 0.194885], Editable -> False, Selectable -> False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"Opacity", "[", "1.`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.560181, 0.691569, 0.194885], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], "]"}], NumberMarks -> False]], 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.560181, 0.691569, 0.194885]; 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.560181, 0.691569, 0.194885], Editable -> False, Selectable -> False]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6}], "}"}], ",", RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", "}"}]}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), Editable -> True], TraditionalForm], 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, ",", "After"}], "]"}]}], "]"}]& )]], "Output", CellChangeTimes->{ 3.789819154559926*^9, 3.7898192058383102`*^9, {3.789819328973916*^9, 3.789819347233488*^9}, {3.789819586510404*^9, 3.789819601266243*^9}, { 3.7898196317659693`*^9, 3.789819637118384*^9}, 3.7898196782312527`*^9, { 3.789819743383521*^9, 3.789819776802191*^9}, 3.789820003836022*^9, 3.7898200483861856`*^9, {3.789820594030262*^9, 3.789820707787868*^9}, { 3.7898224631465263`*^9, 3.7898224693046827`*^9}, 3.7898317351153708`*^9, { 3.789831769123528*^9, 3.7898317873044233`*^9}, 3.7898320868229*^9, { 3.789832219182062*^9, 3.7898322246789417`*^9}, 3.789832488485786*^9, { 3.7898326687007637`*^9, 3.7898327288395452`*^9}, {3.7898604293463984`*^9, 3.789860433244069*^9}, {3.789862454221322*^9, 3.789862459724276*^9}, 3.78989284423855*^9, 3.789892895680129*^9, {3.7898937316741867`*^9, 3.7898937451922913`*^9}, {3.7898969827585917`*^9, 3.789896989637113*^9}, 3.790500048307528*^9, 3.790500844463442*^9, 3.790500913757571*^9, 3.790501318999692*^9, 3.790502638211178*^9}, CellLabel-> "Out[263]=",ExpressionUUID->"f62a50cd-fb60-4044-88c1-f71ceba66716"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"ns", "=", RowBox[{ RowBox[{ RowBox[{"Import", "[", RowBox[{ "\"\\"", ",", "\"\\""}], "]"}], "[", RowBox[{"[", RowBox[{ RowBox[{"2", ";;"}], ",", "2"}], "]"}], "]"}], "/", "2"}]}], ";"}]], "Input", CellChangeTimes->{{3.78982026538109*^9, 3.789820353900846*^9}}, CellLabel-> "In[216]:=",ExpressionUUID->"5a1efa6e-dfe2-4d60-ae14-3a6c7a1d321c"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{"logN", "[", "8", "]"}], "]"}], "-", RowBox[{"ns", "[", RowBox[{"[", "2", "]"}], "]"}]}], ")"}], "/", RowBox[{"ns", "[", RowBox[{"[", "2", "]"}], "]"}]}], "/.", RowBox[{"fit8", "[", "\"\\"", "]"}]}]], "Input", CellChangeTimes->{{3.7860347589391937`*^9, 3.786034815522037*^9}, { 3.7860348927276173`*^9, 3.786034892871313*^9}, {3.786034938992958*^9, 3.786034939228087*^9}, {3.786035027428249*^9, 3.786035027598805*^9}, { 3.78603612665457*^9, 3.786036174521947*^9}, {3.786036298387973*^9, 3.786036298558413*^9}, {3.786036391518311*^9, 3.786036392481715*^9}, { 3.789817322122814*^9, 3.78981734350443*^9}, {3.78981904967447*^9, 3.789819050028948*^9}, {3.78981989295175*^9, 3.789819900229203*^9}, { 3.789820346352702*^9, 3.789820358949071*^9}, {3.789831035088595*^9, 3.789831035495175*^9}}, CellLabel-> "In[217]:=",ExpressionUUID->"90d2bb91-ba31-44f8-b0ca-47994c701e88"], Cell[BoxData["0.011589513818897623`"], "Output", CellChangeTimes->{{3.786034765393785*^9, 3.786034815805835*^9}, { 3.786034880548635*^9, 3.7860348931752234`*^9}, {3.7860349290857697`*^9, 3.78603493955373*^9}, 3.7860350281548758`*^9, 3.786035066093541*^9, 3.786035221700058*^9, 3.786036062003336*^9, 3.7860360946394253`*^9, { 3.786036127322308*^9, 3.786036132430464*^9}, {3.786036162798462*^9, 3.786036197237939*^9}, {3.786036258065976*^9, 3.7860363091693296`*^9}, 3.786036393224642*^9, 3.786036435908414*^9, 3.786036506475976*^9, { 3.78981732702774*^9, 3.789817367917185*^9}, {3.789817799899253*^9, 3.789817828202737*^9}, 3.789819050485126*^9, 3.78981908819144*^9, { 3.789819607127367*^9, 3.7898196375034018`*^9}, 3.789819744075357*^9, { 3.789819893666527*^9, 3.789819900694466*^9}, 3.789820004964889*^9, 3.789820359137393*^9, {3.789820594929513*^9, 3.78982070858637*^9}, { 3.789822463806806*^9, 3.789822470222951*^9}, {3.789831035829953*^9, 3.789831039712731*^9}, 3.7898311296448107`*^9, 3.789831173331883*^9, { 3.789831771607078*^9, 3.7898317882862673`*^9}, 3.7898321075130663`*^9, 3.789860441009506*^9, {3.789862455358055*^9, 3.7898624604158573`*^9}, 3.7898928491271963`*^9, 3.789895378453265*^9, 3.78989699519963*^9, 3.790500053288452*^9, 3.7905008466582413`*^9, 3.790500915366055*^9}, CellLabel-> "Out[217]=",ExpressionUUID->"e1195010-cc94-47f8-88d9-a44426afb4c8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{"logN", "[", "12", "]"}], "]"}], "-", RowBox[{"ns", "[", RowBox[{"[", "3", "]"}], "]"}]}], ")"}], "/", RowBox[{"ns", "[", RowBox[{"[", "3", "]"}], "]"}]}], "/.", RowBox[{"fit12", "[", "\"\\"", "]"}]}]], "Input", CellChangeTimes->{{3.789820082827054*^9, 3.789820111656827*^9}, { 3.78982037403331*^9, 3.78982038294141*^9}, {3.789831775865436*^9, 3.78983177611141*^9}}, CellLabel-> "In[218]:=",ExpressionUUID->"24a1235a-0106-41db-84ea-024b7cb0822c"], Cell[BoxData["0.014766150260207188`"], "Output", CellChangeTimes->{{3.789820091591922*^9, 3.789820112136485*^9}, 3.789820384157509*^9, {3.789820595407804*^9, 3.789820619979476*^9}, { 3.7898206520168953`*^9, 3.789820708977715*^9}, {3.789822464040449*^9, 3.789822470632036*^9}, {3.789831772132658*^9, 3.789831789119802*^9}, 3.789832108205226*^9, 3.78986044212982*^9, {3.789862456024865*^9, 3.7898624608924503`*^9}, 3.789892849403596*^9, 3.789895378722474*^9, 3.789896995440785*^9, 3.790500053923429*^9, 3.790500846700687*^9, 3.790500915950795*^9}, CellLabel-> "Out[218]=",ExpressionUUID->"c8e8618e-dea4-4e8b-ba15-191c5ed897bf"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Exp", "[", RowBox[{"logN", "[", "16", "]"}], "]"}], "-", RowBox[{"ns", "[", RowBox[{"[", "4", "]"}], "]"}]}], ")"}], "/", RowBox[{"ns", "[", RowBox[{"[", "4", "]"}], "]"}]}], "/.", RowBox[{"fit16", "[", "\"\\"", "]"}]}]], "Input", CellChangeTimes->{{3.78986498754324*^9, 3.789864996472858*^9}}, CellLabel-> "In[119]:=",ExpressionUUID->"6c35788f-083e-448b-82aa-5d86bb96b55a"], Cell[BoxData[ RowBox[{"-", "0.22130204511049142`"}]], "Output", CellChangeTimes->{3.78989699778589*^9}, CellLabel-> "Out[119]=",ExpressionUUID->"8859f4d2-839c-4aad-be80-f128e6490cbc"] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"\[Rho]8", "=", RowBox[{"sample8", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"5000", RowBox[{ RowBox[{"#\[Rho]s", "[", RowBox[{"[", RowBox[{"All", ",", "5001"}], "]"}], "]"}], "/", RowBox[{"Sqrt", "@", "#n"}]}]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]12", "=", RowBox[{"sample12", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"5000", RowBox[{ RowBox[{"#\[Rho]s", "[", RowBox[{"[", RowBox[{"All", ",", "5001"}], "]"}], "]"}], "/", RowBox[{"Sqrt", "@", "#n"}]}]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]16", "=", RowBox[{"sample16", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"5000", RowBox[{ RowBox[{"#\[Rho]s", "[", RowBox[{"[", RowBox[{"All", ",", "5001"}], "]"}], "]"}], "/", RowBox[{"Sqrt", "@", "#n"}]}]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Rho]20", "=", RowBox[{"sample20", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"5000", RowBox[{ RowBox[{"#\[Rho]s", "[", RowBox[{"[", RowBox[{"All", ",", "5001"}], "]"}], "]"}], "/", RowBox[{"Sqrt", "@", "#n"}]}]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.7905019043473682`*^9, 3.7905019700870667`*^9}, { 3.790502002763351*^9, 3.790502012968639*^9}, {3.7905024679717703`*^9, 3.790502472800358*^9}, {3.790502738458009*^9, 3.790502748395129*^9}, { 3.7905028635862017`*^9, 3.7905028895420027`*^9}}, CellLabel-> "In[288]:=",ExpressionUUID->"49fe8588-a840-4740-82fd-06e6920b19de"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLogPlot", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Rho]8", ",", "\[Rho]12", ",", "\[Rho]16"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"0.0001", ",", "0.5"}], "}"}]}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", "True"}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"n", "\[Equal]", "8"}], ",", RowBox[{"n", "\[Equal]", "12"}], ",", RowBox[{"n", "\[Equal]", "16"}]}], "}"}]}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Beta]", ",", RowBox[{ SubscriptBox["\[Rho]", "0"], "[", "\[Beta]", "]"}]}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.790501877407139*^9, 3.790501891324082*^9}, { 3.790501974222625*^9, 3.7905020566343613`*^9}, {3.7905026457917023`*^9, 3.790502688930539*^9}, {3.79050273258263*^9, 3.790502736403462*^9}, { 3.790502791574119*^9, 3.790502816300976*^9}, {3.7905029000440617`*^9, 3.790502900230397*^9}}, CellLabel-> "In[293]:=",ExpressionUUID->"63c8922f-d24e-46ca-a537-602acfdc4822"], Cell[BoxData[ TemplateBox[{GraphicsBox[{{}, {{{}, {}, { Hue[0.67, 0.6, 0.6], Directive[ PointSize[0.009166666666666668], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwBEQPu/CFib1JlAgAAADAAAAACAAAA/Knx0k1iUD9Kyvf2hGjwv6Hgvf5/ 93k/3c6Hn95Y8L8P4hRnVgCVPwpTQ4mjVvC/qCEFqtrJqz9+kLwr7Zfwv80E w7mGGeU/7qsDbTHg9L8xlumXiLfqPwT5xGavIfa/AcCxZ8/l7T+XPElapcf2 v64q+64IfvE//m8yLmvn97+GG/D5YQT0P4B0B43RGPm/+kSeJF2z9j+zftQX cUf6v34dOGdE6fk/og3e3K2b+79HyatzDMj8P5cjo9Gy1Py/xOv6Bbvh/j9k oYcBc7f9v9biUwCMpwBAst1ME9zY/r/rxVBOtOsBQDMlgRe35v+/h4px/iZU A0CWhAjVoZsAwIE+kSdJ1wRAD6v0WwpFAcA0aOif4CIGQDlh8cp22QHAOIQq NXugB0DIdK2tCYwCwHnpJjEIbAlACz7d43Z4A8DB/1ayY+MKQABKAkqbPQTA gosVNZgGDECNqGf9F94EwC+Lic3H9QxAG9uAwCBxBcBcOBCSBcwOQKVea7Sr qAbASKeufJYHEEA2uDMt85UHwGN/2T15mBBAMwPMxYt+CMC+9sySADURQCiZ cD0QlgnAnnsPlxzXEUDwRtjsFswKwGoYPiKmZBJAZ67k+UTdC8CyEYjX9SsT QGkWCPovlg3A/3ivWpnwE0BpgmF5JGQPwHfWbrvQvBRAjj5J28KyEMC2Z5YE qEkVQE6E3J08WhHAoUrNHmgFFkCLdtXiTEwSwErvG197BhdAJX8r0/mEE8B8 1cqEXwoYQD/zC58k0BTAWW5pNSTuGEBRuPOhevEVwLCPTl35zBlAhpkXsyTr FsBZbmk1JM4aQL9g6nUFDhjAqrcGtkoQHEDir/GpHoMZwBqLprOTQR1AJZux 3WLHGsAUP8bctYQeQFJI3FzRIhzAboYb8PkhIEBBkhtulA0ewIguqG+Z0yBA SISkrWWOH8AWwf9WsmMhQH/Lb4ezMiDAVMa/z7gQIkBUwbiNvQYhwOlg/Z/D 7CJAoYOhh4nLIcBWrJ6aaYAjQBVVtbuxayLAA9F1xQ== "]]}, { Hue[0.9060679774997897, 0.6, 0.6], Directive[ PointSize[0.009166666666666668], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwBIQXe+iFib1JlAgAAAFEAAAACAAAA/Knx0k1iUD/IIVFX4Irvv5maqbXV UYo/aSTMNV2077+l7D4R1aWwP9tpUHvCM/C/zM8NTdnpwz8HAJW54dLwv9RJ trqcEtE/ass6VvyS8b9UOlj/5zDZP510jK4vbvK/t+7mqQ654D+3cHSZSE3z vz3VITfDjeQ/zi2tbSUc9L+wjXiymxnoPwP5EUCW2vS/JH1aRX9o6z/8ffLT cY71v0DbatYZ3+4/45lnZstI9r8GnnsPlxzxP0lquVi5/fa/veMUHcnl8j9E jtkf1rv3vwZM4NbdvPQ/xHWGz/iE+L9DxTh/E4r2PxrsJyboRvm/XI/C9Shc +D+frJG2gwz6v2wJ+aBnM/o/sUd5FSzW+r9EozuInSn8P+Hk4dasqPu/vOgr SDMW/j/nlKv/MHz8v8U9lj50AQBAkP8rywZN/b8PKJtyhfcAQCXN+SbWHv6/ bTmX4qryAUBT3Geo9vT+v6A3Fakw9gJA81b0wd/Q/786kst/SP8DQNsp73JA WwDACAPPvYcLBUB5cp5NCs8AwDygbMoVHgZAM/CkvtFEAcBgWWlSCjoHQOjN nfJNvwHAJEVkWMVbCED6w2XLgzwCwNmUK7zLhQlA00vUjmu+AsDmXIqryr4K QCc2VimNRQPAkGtDxTj/C0C3UUMTh9EDwBzw+WGEMA1APXiSmAtXBMBHA3gL JGgOQNVQpNHa4QTAraOqCaKuD0CYTqhblXEFwJM16iEafRBAlH2tH8wGBsDH 155ZEiARQOHqd1+4nQbAOKEQAYewEUDOV36M7CcHwOXQItv5PhJA8C+Ey7G1 B8BM/bypSMUSQJ+3qNgaSAjAokW28/00E0CeCpFXBswIwJs90AoMmRNAkdVh S7xPCcBqMA3DR+QTQM/jdfXbvgnAO1PovMYuFEAPbPUQzTcKwA/W/znMdxRA 2n7Bkaa8CsDDKt7IPLIUQGHNXGSsMAvAgPEMGvrnFEDB1djFdaYLwPJetTLh FxVApd4iXEoXDMD1LXO6LEYVQIWiqwlxjQzAG0zD8BFxFUAR5Ulo0wUNwGGJ B5RNmRVAb3UG0G95DcBoXDgQksUVQGo3jod6/g3AqvHSTWLwFUBiK3Y8uIkO wIE+kSdJFxZAGTfsXioLD8DN6bKY2DwWQAPQgcEGkg/A4IRCBBxiFkAxYJ5v bgsQwAYv+grSjBZACjONPdBaEMDVlc/yPLgWQEjSfpNzrhDALlbUYBrmFkCr biY4rwkRwA/uztptFxdADoFWmfRqEcAVkWEVb0QXQJAbel/7xRHAEsKjjSN2 F0DVXnvqAywSwHkB9tGpqxdA4Zl6KUWWEsCYwK27eeoXQKlm9kC1EhPAqOMx A5UxGEDtdngWT5wTwOCEQgQcghhA2tjR6Sw1FMBcPSe9b9wYQLheRhIm0hTA s++K4H9LGUDquJ7GgIwVwBlW8Ubm0RlA8lLn9HpaFsCcM6K0N3gaQFORvIxW QhfA6LzGLlE9G0AshVfDKD0YwACuZMdGIBxAM3k5dyxBGcAr3sg88icdQBdw xhmoYBrAKCfaVUg5HkCaH+TFO4EbwN8yp8tiYh9ATj1yIB2rHMBGsdzSakgg QBqekmbn3x3AZcdGIF7nIEB3zxAqWhMfwHKKjuTyjyFAylNHypozIMAgY+5a Qj4iQOorNxRj3SDA9RCN7iD2IkCjWbQYjo8hwKm8HeG0wCNAEWoDTRdYIsBL +Q/akNQjQBVVtbuxayLAmSZp0Q== "]]}, { Hue[0.1421359549995791, 0.6, 0.6], Directive[ PointSize[0.009166666666666668], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwBcQOO/CFib1JlAgAAADYAAAACAAAA/Knx0k1iUD8Ee/UOppr7v3c7sT1p l6E/S6OGJ/Cn+r/dPxaiQ+DiP8z5oCQ/0/O/l3FTA83n6T/LH63CtAb1v8vW +iKhLfE/FWh0rnfB9r9RMc7fhEL1P9WY+lDacPi/lIeFWtM8+T/IiFVTiwH6 v0BqEyf3u/0/DTnbIbDj+7+THRuBeJ0BQJ7Z6fchNP6/vyuC/61kBEBcA2ye YEUAwCzxgLIp1wZAwP1Kq1hRAcAc8PlhhHAJQGgYJMJgbQLAcXK/Q1FgDEB0 08Hp77IDwFGlZg+0gg9ALXvLr78NBcAp6PaSxugQQAA6dpWDEAbA7ZklAWqq EkCSOoW0qZsHwPLvMy4cSBRAho7dr2YPCcBvL2mM1hEVQBbfgqJCzAnAfXkB 9tGpFUCs9zq+wWcKwEHxY8xdKxZAy+zMTcQJC8CI1/ULdmMWQIwzl2vyWQvA FXR7SWOUFkCe1pC+T6kLwIlBYOXQwhZAs65OIXgHDMC536Eo0OcWQGhfnPBJ WAzAP5EnSdcMF0DqfDU/Q7IMwMxiYvNxLRdArew7gMMSDcDRrkLKT0oXQFOJ 6oG6cg3AgCvZsRFoF0DsBxjn1uENwA6hSs0eiBdAdHH4kQFgDsDWHCCYo6cX QLgT59K/6Q7A2v6VlSbFF0CHLi1jz3APwHU8ZqAy3hdAMvAm3HnvD8AtQxzr 4vYXQIKzB7GTOhDA5EnSNZMPGEBwas7wMYQQwGL4iJgSKRhASFwhmZLSEMDC UfLqHEMYQHBnamfiIRHABFYOLbJdGEAjDIV/lHgRwCmzQSYZeRhApdREVlbT EcAyA5Xx75MYQOcYZvSMLxLAAKlNnNyvGEDLTpC+zosSwHOdRloqzxhAydE3 d7r1EsAeFmpN8+4YQE7Gpc72XxPA3UHsTKETGUAAZW4wy9gTwIGyKVd4NxlA qqMMj/ZCFMBqpKXydmQZQJALSvfKxRTANpNvtrmxGUDVCQwg948VwN3Sakjc IxpAAChyonp/FsBhVFInoMkaQNQc5SpsixfAMbYQ5KAkHED6Nz1goSYZwJT2 Bl+Y7B1AdUV0HZP6GsC2EOSghDkgQCNNZpVHiB3AL4uJzcflIUBh6EkSom0g wO9yEd+JiSNA/AGdC04PIsDBP9pPwvMjQBVVtbuxayLAU2CVcQ== "]]}}, {{ Directive[ PointSize[0.009166666666666668], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.009166666666666668], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.009166666666666668], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]]}}, {{ Directive[ PointSize[0.009166666666666668], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.009166666666666668], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.009166666666666668], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ Directive[ PointSize[0.009166666666666668], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.009166666666666668], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.009166666666666668], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { DisplayFunction -> Identity, GridLines -> {None, None}, DisplayFunction -> Identity, DisplayFunction -> Identity, DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, AxesLabel -> { FormBox["\[Beta]", TraditionalForm], FormBox[ RowBox[{ SubscriptBox["\[Rho]", "0"], "(", "\[Beta]", ")"}], TraditionalForm]}, AxesOrigin -> {0, -9.210340371976182}, DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, FrameLabel -> {{None, None}, {None, None}}, FrameTicks -> {{ Charting`ScaledTicks[{Log, Exp}], Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], Method -> { "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Exp[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Exp[#]& )[ Part[#, 2]]}& )}}, PlotRange -> {{0, 10}, {-9.210340371976182, -0.6931471805599453}}, PlotRangeClipping -> True, PlotRangePadding -> {{0, 0}, {0, 0}}, Ticks -> {Automatic, Charting`ScaledTicks[{Log, Exp}]}}],FormBox[ FormBox[ TemplateBox[{ RowBox[{"n", "\[LongEqual]", "8"}], RowBox[{"n", "\[LongEqual]", "12"}], RowBox[{"n", "\[LongEqual]", "16"}]}, "PointLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, GridBoxAlignment -> { "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "Columns" -> {{False}}, "Rows" -> {{False}}}, GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, GridBoxSpacings -> { "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"PointLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.368417, 0.506779, 0.709798], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.24561133333333335`, 0.3378526666666667, 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], "]"}], NumberMarks -> False]], 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.368417, 0.506779, 0.709798]; 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.368417, 0.506779, 0.709798], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.880722, 0.611041, 0.142051], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], "]"}], NumberMarks -> False]], 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.880722, 0.611041, 0.142051]; 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.880722, 0.611041, 0.142051], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.560181, 0.691569, 0.194885], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], "]"}], NumberMarks -> False]], 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.560181, 0.691569, 0.194885]; 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.560181, 0.691569, 0.194885], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2, ",", #3}], "}"}], ",", RowBox[{"LegendMarkers", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"False", ",", "Automatic"}], "}"}], ",", RowBox[{"{", RowBox[{"False", ",", "Automatic"}], "}"}], ",", RowBox[{"{", RowBox[{"False", ",", "Automatic"}], "}"}]}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", RowBox[{"{", RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", "}"}]}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), Editable -> True], TraditionalForm], 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, ",", "After"}], "]"}]}], "]"}]& )]], "Output", CellChangeTimes->{{3.790501975959618*^9, 3.7905020568911247`*^9}, 3.79050247396424*^9, {3.790502647200412*^9, 3.790502689232744*^9}, 3.790502749273424*^9, {3.790502792035192*^9, 3.790502816523964*^9}, { 3.790502872347569*^9, 3.790502900553187*^9}}, CellLabel-> "Out[293]=",ExpressionUUID->"7ce3143a-014a-4c43-92bf-fb28b22193ae"] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"E8", "=", RowBox[{"sample8", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"#Es", "/", SuperscriptBox["#n", "2"]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"E12", "=", RowBox[{"sample12", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"#Es", "/", SuperscriptBox["#n", "2"]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"E16", "=", RowBox[{"sample16", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"#Es", "/", SuperscriptBox["#n", "2"]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"E20", "=", RowBox[{"sample20", "[", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{"#Es", "/", SuperscriptBox["#n", "2"]}]}], "}"}], "]"}], "&"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.7905019043473682`*^9, 3.7905019700870667`*^9}, { 3.790502002763351*^9, 3.790502012968639*^9}, {3.7905021289101*^9, 3.7905021961735163`*^9}, {3.790502479326455*^9, 3.7905024854037313`*^9}}, CellLabel-> "In[255]:=",ExpressionUUID->"666e65f1-8d79-40dc-9b3a-fee9e9d2fc06"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"{", RowBox[{"E8", ",", "E12", ",", "E16"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "10"}], "}"}], ",", "All"}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", "True"}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"n", "\[Equal]", "8"}], ",", RowBox[{"n", "\[Equal]", "12"}], ",", RowBox[{"n", "\[Equal]", "16"}]}], "}"}]}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\[Beta]", ",", RowBox[{"e", "[", "\[Beta]", "]"}]}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.790501877407139*^9, 3.790501891324082*^9}, { 3.790501974222625*^9, 3.7905020566343613`*^9}, {3.790502159523988*^9, 3.790502162452405*^9}, {3.7905026513955193`*^9, 3.790502656361638*^9}, { 3.790502718545635*^9, 3.79050272132894*^9}}, CellLabel-> "In[269]:=",ExpressionUUID->"fdefbdb5-3432-48a1-ab56-2911aa735797"], Cell[BoxData[ TemplateBox[{GraphicsBox[{{}, {{{}, {}, { Hue[0.67, 0.6, 0.6], Directive[ PointSize[0.007333333333333334], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwtlQs0VfkXx2/+7vXI5JUQKSKh8kqJy91X3klGYZpQeUTGaKKH6jYqChlN KMoqSYnSXw+v5LFDUd70uAhJUe7rh2gQNccsZ62zzvqs31r77PPd3+8+mn77 3APFaDTaCeqefU7fHmnf7OfGuhTK7PDz4OH1vorvUf8cYVU9O7vYxYuHsv0L gzxpF1l5B/vDy715mKtJv9P1Io/1OXTe9fFgHjaJ15SeUR1gqZpnZhus4KNx 6lBaXAmP1Z7jMRa7jY/znjwIahkQsnpppu+qfudjvv63fMk/R1iSHxUcNC7w 8Yza8ORu8TFWW8PK1B2P+Dhlm6HtU/CVFX7T1Gi0m49/LjEPsh2aZG3u1o87 yRCgw4u8CJnn06xj4yOth/UE+JQ/RS97/5119bSVcJgtwDf9W2l/5dBAcXfN SwMfAfKfubkW8ufB29ODFomRAow9u//7im3/g7GplInuiwI8aZ2k68QVh606 9b3uhQJcG/z5Wp8WA5bsf85obxKgeYy+2bFMCUi4PabYzBPgkaEVxpKhUnB9 j6PSs5+EWPXD86H/B2mQ+n1DWr++EE8lKJldYshAt0Jpn4yNEA0T4pvqxmXg a1pPSqyHEL3N5ZLpjQtgJm7ngzPHheiYk89JlZCDqZf2By3Shegf1Wl15JIc nLXs/VhSKMTKr43JNDN5sHzKCh1qE2LGMdk0da48eCja9kgMCzFExVrrVoAC oPRwz6CUCB/Kx3HHDRSh8BD1xatE+CPy3q+XhxXhNdPhY5mLCA+/CStrLV8I NeMrvf8OEWFxUKp4rpMS/MEPy+BxRHjduUkjmL4IPH4ur+9KFqEzUdt5jKEM Lh+UfZ3uipDzuj5mp7QKcN1CDLOqRLg9bK+ZtkgFYk65F4a3ifD+364+k42q 4FnqNsntnTtvXgxMY2oSAhHeKWEUO8upgw6Pfm1wSoSLE24VpLCXQHpL6dtx BsGFrNruohgNoLsWn7RUIBg2axDNZeAbXTn2dSnBuDW5+y6/XAZJMhuKM/QI LvpvAJqwK99ufqsRwW212PJITgu2h6acrTUnOLRr5lqNQAuSvb9vnGITnJX7 04PlkJd64EK0E8FsV8oq/trgZxR1unELwa30G8kWbB1YGnOCI+VFsDmuvbdv 0wrwikxLmPAlmH74StZyVV2I56S5pwUQVBxlt+wp0gV7nYNi6cEEK9xTNc8p rQR79vDE1xCCTZaubUlMPZhe9zSyaT/BycygAp6pAcjvj9BX5RDULp2OHbNc BSFTghP8EwR9Nz2XsHq7Cv7R6jp3O5pgSRutV8xpDWgXDnifjaf6P1KnZxFu CMuDG7V5iQSNL+urXBQ3gmrjhgzx8wQPpqiIe1obgUfFtGtKEsHHTjJiBjlG oNvJC3e+QPDFAOvmO2tj0LE+fGomjaCR/m3F1kJjUIqQO1CYTrDu8aNEBphA 5ZqaqMdXCZbpys4vKjaBmTPxDL1Mgj1FMZzWFFM4ukFQ6X+TYP/QxYcy8mvB KqA+NvPWXH+n1kLLjf4f53IJqnN2m3gsM4NgxsjJJXkE3RLTwhRemkHA0Ebl V/8n+K5vfsptv3VwY3un9cd7BCXvqv8akLcOJOnZwQP3CbJH/Bt9DNbD5aix zekPCf7lzBNfm7QevnwwXM0roPxxY1453cQcNh0KFe8vIsik5PauNIct9y4E xpUQvFyWel7WYgNIjxYk8R8RnFaJ4CpUb4BOtk6+/2OCZr6UQlkW0BN5OOBu OcGdEs2qPy+2hNPLHbM7KghGBCcJOVGWcAltBusrCcpeMc0qlGBCkdrxRokn BIu/zLyKjGcCryl3Ur+KYH7HzkNbRExIiPMbZVQTFDOIXdQZZgXjnfO4SjUE cQFV4KkVaNsF/PKM4kdwqr/O0RpWS7ltbXhKMJ6y2/wP1sDd8mP7l2cESxMZ w4vMWZBWa1ieXEtQIbuiSrmYBRw9ZvChOoKz7axXAXAzLytyeU6dzwbICuDK wkGrZopDyg+kqBwA+PS83jD6BcGr8lSBFgCampxmfj3BdbMGlWJDWDZ3j38D wdgcr3oTFzaUflNfurqR4PrFT3Ysi2dDX6dGxXuKnwgymKvK2WAZNtFzoIlg 3+rzmROqNmBSN5p/tJngWKjn8XxPG+Ddr169tIXgf3smywa2NMh6D1CcZ+21 48EnG9CYEnmmthJcMmtI3Y3gpnJh79o2Sn+9Brm68I3AiP5N9Lltbp61G2F2 7d5tJ0ibveRsgZ6lG+j+kmCgav8vyixb+DyuO1JKcQEvokgpwRbStZ4M+bwi ODC6tH1fnS1o5G7V6KFYlyqjLm0HV6reGe55TdWfDaynHRTWu+ydoXiQikfl OTsoGS7fFvqGIJUO244OO/Axa5GfpPiVAfXGlfZAN721K5FLUO0nSoFd9hCj V589QrH5RHXAnfP2EBBBbdwOgpzR+26/VdvDsoKCz1cp3kTZV/67Paj565aL dxJ0CJ+UHWI5wJ69OYPhFFN/rUDVZAfoYi6Inuycy+crB5hWlhQL6CIoMJxN pCMEBX47X9I152dnR5D3au5VfUv5z+H90YVnHIGZZXMwguJ0SbUM3xeOcPMP K2nu2zn9aE5wTE5sVKeb4L/nUiX8 "]]}, { Hue[0.9060679774997897, 0.6, 0.6], Directive[ PointSize[0.007333333333333334], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwtVAk01fsTvyJbZb+urZBe11L2bOEOcl2lovcqCU/on0opeaHFmld/T6EI aZHyL5Q1lKVRUpKIsqaiJO7y+8aLJMvjf96cM2fOzOecmTmfWTR9g7bsXkCj 0aLmdN5O5Y60bfR1ZY0wwzvpclzMuJRb1u4Wz1LdtWDrHkUu5vBtZdtzilj0 0NwZfR0uNrUs2dg9XMcimoYWyOHiG+fyystyrSznBhXx3gNc/M3KffaLYTfL /MWWLuOLXKygBnOlHvSxbF3+TLGp4aJNu6Z53dkBlpTS47HuD1wsOhtWkqk8 xBr+T2B75gwXV5z0cIwM4LGyXGl+dio8hLf7OpQ/UKwzJY2/m5rxUPTqcek0 tRGWwcthoa2uPKz5pLD0+edRlmla0+Y1++dwl76Od9XfWMz3rh7f4njoUG8R KR8/ztp0PfmC1TUeeiY+HtP2nGCFhqRH8Cp4GCjxI2uPySRLmxMYKv2Kh+tu rD1zRWeKlbLpsQx3iIfVQ3ocE8UZ1nSNX88RGh/rbS7ahgjR4GCXUpEJg4/S 2pnBcd9pUNShEG64mo8HLNM+5o0KQbDv4ZABez5mmdNzDccXQMe1zpJEdz5a nX8RyZkVBnHqxLmRA3wUF26pOb1oIRSE9jt0xfDROiuwkb5MFG4zAz5GpvHR Z8feLZJWYlAnfJyrdoePKxz93et3ikNgTuYf/rV87E7Rq34RJwEJtY4KUW/4 OOgZn9/4UBKK6xcrtQ/xMWn/HAOzi8ApbmVX/xQf1b7+2HXKcAmcszsKm6QF 6CQctmhFgBRcDi+wjdIU4N0beRLZBdJgYefiM2MiwAtruJoqJ2Wgc0+k7Va2 AJ91Xt0hpyEL57wSC3XdBWhxXUbodJEsPJI7XKgaIMDPr5a//WErBxV5s3/6 hQnQZbo6l1MvBwVVDK26MwLMdiz/e9pUHg7l+Cpkpwkw0+aV5OIMeZiMVffx /p8A9xkuqXMakAf3iUmPtBIBrv11qPqpvgKc08+fbUcBSnfMWjaFKoDDze3X FzcLsE73fYN1iQJEX5rQ39YjwKiRxSqTXxSg4Gi97t5BAY56lxn3M+hgq/20 Jm9EgGOrj1SuYtMhSW9slfi0AFVd6r7KHqZDsvwTkUExCnf9VyxlYwYd3Nj5 1TvkKAzwtJA5X0+H/koafl9KYd78uXylQ4KxeIabDoXRtslMZ4YiJE03SmWb UPhyuCS9y1oRFrKlVeJsKOw7ZS+i5qsIY/UqJ/WdKBQ1mJRsS1CE0MFcnHKj sD21ZdT6viJwz9dybnpSqL/tjY/KoCJMrU8XC9lDoTTV3HOAwYAeuLUkJJhC evIuetA6BjT0xdPGj1Mo9/jGWa2jDLBDvdaqOArDhcZbc/MZUFZ1Xy8ykcL0 2rtV4VwGyEZ2xX7JoPD2JyPhVCMlOC0/2b7/5r/9xShBxYTrSH8BhZ42zJqg XiU44SiqKv+AwlIS3xe5QRksJIMTSusoVN42wh5sVQb+VMOliGYKL5tk3zMP U4GFuSWlGd0Uzk/LzUYVplq9ZjMHKKQV+D9ja6iBj/qs3RFCod7cuEaZS4Ev XvkqaJJCbWbPVo7lMnhffdchTYTgB+NbL3x91YGzrVLyLymC7OLetn0cDfis KRLzhEFw91w27y8akJPuVHhTg2Bw/LmB0URNqCxlqrN1CGr4UR72tsshoLD3 YrgRwTGZs5TG+HLoXJgrdMiSYG710v57tVpwRnh9ZIQdwRG/Jq8NZ1bAnRD/ tiYOwU65UbsW9i/gKS7z3G4zQf1Zzelx+koY22gR+WQrwfii/uHU0ZWQnO7W aOBJkCtiKmvWywTmN0/VcF+C7RIBywO7tMF796KmqgCCy24NcfQ/6IBWccWt hwcJmuXbbt/ZqgtW6byJviMEnecLdOhBWe/PJNFwgiq1OzXsRlaBXXDKhF7E nO/Wo3pCSB+eVe5tfRpDsM4/z+c3OQPozDymrHCaYOLAqHqbuiHkmHnfiviL 4KklmwtT6g2hb2z995lEgm77L4Ve9jWCaOnhgL8vEJz49VNOpogx5EUpMzCN 4PrjsQYu5cZwP6Vv8komQdb2ncUYaAKB5o/MN14jqDee9u4CwxRU0l73xGYT HNo3F3lpCh7ql3TLcwh+dGdUtCatASHLWauh2wRD2CnjopvNoF9Ka7A5n6DW 2x8R+xabQ49peWdMAcGwYzmrHHrN4dDra9OcYoLEwtEp+IEFHJaTOihxj6DO /INOt4RQiSKR6+UEDauY0ov+sIJoz48Nwg8I+nv1soXd14KkVexP1yqCe2lB 0SKO1mAi9NM8uYZgsvQxs3x9G2iti9bPQYLNynMErrIFqwHG1KNHc3zNv38D FliH0a4+qyOYZBS6WlMdoNPLv/RRPUGjDF2l1JsA5ofEuCnPCGpHJDzYr2MH Cb/33HF+TnAeflNsB3eCvxaQRoKl3CNldAd7cPVf/i21iSBKzV1Ekz28Xpu1 VKqZ4NPeslMnAhyAmSrseq2FoPgdNQ//nw7wOUjUULiVYKyb85Woi+tg02dF g91tBL03NIjZ6DnC9y7NwpzXBLNUDN6teOgID2NM/VrfEPQ6UD9TspMN91ut W4Q6/t3/72y4EE9PU+8kOFjwy0DsRSfYdb7C2biLoIMa76OZPQcCfDS2u3QT pP1fnMHQs18quIfgP7J2EnM= "]]}, { Hue[0.1421359549995791, 0.6, 0.6], Directive[ PointSize[0.007333333333333334], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], LineBox[CompressedData[" 1:eJwdU3kw3HccXWep1BGxu1jiCGuLqEglgtmPbGJCqaOdECri2iANIRtXxhVM HI2k1pZMaK0g40gzK8ZUTfKZSFPUkZAUdTYhFXZ/319Is43SpOTNvHl/vHlv 5v3xLKOTg+NUGQwGbHJLN5pXRv2jA/n1RO3KpNEyprvLPBOqpPz9BRjpZ7aM M3xmveDPZ/zgOHa6mmwZq1K+UBtaXOLreSsMgVrGgbF/raSOK/yGQObdu85y DHIenis8+JpfejmgbzhJjpUXi8Iee6zxvTPO66s2yRESDbn/dP/HT00yJJI5 OYrNTPMzalWg987aR4YWCkT7C+9uxqpDdtjh3PhwBTqs5LXzxjVhxvpaq7BM gZyXa1GFZ7TB18ZDGvKzAlNSURB0YhusHzgzrCVXYFCjUK/jgh6Mur49FGdC Ie+FsuLXF/rgScJvig9QSF21UUls2Q59mqMPmk5SuEq77OYc2QHs4z6r05co THZK+GbMwAgy5RtTcXUUZmeqKEeajaCeGxd8/xaFXisxgxH2TOh0TusZQAqL x1/rpMUw4c4voU2RfRQaic77xFQywaEuMGDnCIUlXieeP+phwu9yZr5sksKu Oando0Um2OlERp6ap5D/LddnfBsLeu31PXkUhYPR0a9SHFlwqKEpYlBJ4ciP B38L8GXB/R+eDpkwCObZ/yEziGcBl/mmNOlDgrpS3yHzYhZYnnNf92USHONY VF+/wQKpNPdCmRXBybcSie0DFjQqrSbLdxM85yGs2zPLAvXLybSJG0FHAUf+ TMmCStbVvEgBwQWf0U/FemwYSAjo7/InGP2muHo7jw019+achKEEe4JWlzkC NvQWOKatRxNUP6rr2B7BBiES0cnTBHm3vWyNM9kg4k7k1qYT3KMmWaHFbMi6 oUrW8ggymv1rpm+xoUI0tGBaSvBsrXfYxw/ZMLbAa00QEzRnJvq/Imw460C3 fFBDcMZL4Sc1NAaoc0l43EAwv50XkrHPGJwlOT3H2ggmNjSupsUag25hrIq4 g6CrOLmzS2YMvlGz84O4mR9NPDJtbQJ7i4ZPKQYIRn0ZzK3rN4G/MjTquRME nTv1F+p2cWB/YtHS+hLBSqVmZLXCDCQ/lacc3iC4ZRe6WQA9H1/eZkCjU1nJ UO9zS9AS2Z5usaORTjWYKymxhg6RxpSWO40h4TJUmNvA+90+NLZs3esTLmRt zDbxw2hkS55ox6vyoDvnXlKokMbmhs/BMN8euqOm6v1ENH6dkdXoUOAI32nj k4fZNMa6zwVcGneCz/hPFUcv0rir6t2VnGvOQC/uWFisoHHi5d++x1xd4KtW T4VGDY3apt8f5w3shfkyZYb0Oo2bbQKOzj6ImJFNNLXRyHgPN6j3tux3uE3j /5XQCLo= "]]}}, {{ Directive[ PointSize[0.007333333333333334], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.007333333333333334], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.007333333333333334], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]]}}, {{ Directive[ PointSize[0.007333333333333334], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.007333333333333334], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.007333333333333334], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ Directive[ PointSize[0.007333333333333334], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.007333333333333334], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.007333333333333334], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, AxesLabel -> { FormBox["\[Beta]", TraditionalForm], FormBox[ RowBox[{"e", "(", "\[Beta]", ")"}], TraditionalForm]}, AxesOrigin -> {0, -0.8046567982253087}, DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, FrameLabel -> {{None, None}, {None, None}}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], Method -> { "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange -> {{0, 10}, {-0.9956235625, -0.8147076805555554}}, PlotRangeClipping -> True, PlotRangePadding -> {{0, 0}, { Scaled[0.05], Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}],FormBox[ FormBox[ TemplateBox[{ RowBox[{"n", "\[LongEqual]", "8"}], RowBox[{"n", "\[LongEqual]", "12"}], RowBox[{"n", "\[LongEqual]", "16"}]}, "PointLegend", DisplayFunction -> (FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], { LineBox[{{0, 10}, {20, 10}}]}}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, ImageSize -> {20, 10}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, GridBoxAlignment -> { "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "Columns" -> {{False}}, "Rows" -> {{False}}}, GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, GridBoxSpacings -> { "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], "Grid"], Alignment -> Left, AppearanceElements -> None, ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), InterpretationFunction :> (RowBox[{"PointLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.368417, 0.506779, 0.709798], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.24561133333333335`, 0.3378526666666667, 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], "]"}], NumberMarks -> False]], 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.368417, 0.506779, 0.709798]; 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.368417, 0.506779, 0.709798], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.880722, 0.611041, 0.142051], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], "]"}], NumberMarks -> False]], 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.880722, 0.611041, 0.142051]; 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.880722, 0.611041, 0.142051], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.560181, 0.691569, 0.194885], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], "]"}], NumberMarks -> False]], 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.560181, 0.691569, 0.194885]; 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.560181, 0.691569, 0.194885], Editable -> False, Selectable -> False], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2, ",", #3}], "}"}], ",", RowBox[{"LegendMarkers", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"False", ",", "Automatic"}], "}"}], ",", RowBox[{"{", RowBox[{"False", ",", "Automatic"}], "}"}], ",", RowBox[{"{", RowBox[{"False", ",", "Automatic"}], "}"}]}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", RowBox[{"{", RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", "}"}]}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), Editable -> True], TraditionalForm], 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, ",", "After"}], "]"}]}], "]"}]& )]], "Output", CellChangeTimes->{{3.790501975959618*^9, 3.7905020568911247`*^9}, { 3.790502162871426*^9, 3.790502197077286*^9}, 3.7905024866172*^9, { 3.790502652323476*^9, 3.7905026569786167`*^9}, 3.790502722784449*^9}, CellLabel-> "Out[269]=",ExpressionUUID->"011cfe76-5e46-4695-9c02-f9b1d9e2513f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"d", "[", RowBox[{"All", ",", RowBox[{ RowBox[{"Thread", "[", RowBox[{"{", RowBox[{"#\[Beta]s", ",", RowBox[{ RowBox[{"Range", "[", "#N", "]"}], "/", RowBox[{"Sqrt", "[", "#N", "]"}]}]}], "}"}], "]"}], "&"}]}], "]"}], ",", RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}]], "Input", CellChangeTimes->{{3.789860752342498*^9, 3.789860770758177*^9}, { 3.78986147356671*^9, 3.789861534004075*^9}, {3.7898617800836077`*^9, 3.789861835680109*^9}}, CellLabel-> "In[177]:=",ExpressionUUID->"6bf8aea7-b7b9-4d5b-a161-210bee9bd86a"], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJw10H0sFGAcwPFz3q5zzt1xx73fJVkiL5Fo8/xShLpIE2uNaLe1Wl6muKaF scno0lg0yvrDy5lFm9goXUNbKUzFXX8Ihxk34ZByvUi/+23Pfvs833+ePfK0 jHgllUKhwPb5t82alVFFWhyh7IyWsPVn5vw0tegR0jM20dQyokXrSEX93QvB DaPoScK+1z/4McSAniED1+Xn8osX0fMk8di05KR0GW0kJMMrPtW4il4m4rlB h3anDfQqCZDlvdwybKLXSL5irLnkshm9QaJ+RD+Ptd95/vZsElbboqvxjRX6 Jylez2ealNZoMymt4USvBdiifxNVR1b/ebMdmgKPxnUeLV00tBWEh83rW7vp aCr01DaFzjQy0NZQL42k3cthom3glPpIQ1ECC20LUdemZ26XsNF2kOYTZqtN 4qDtgck1mBU0ZzQN1PDiaUq7xbtgPPDb4QhPFzQdpAdClqrUFjuAqrps87TR Ygas1631rgRx0Y4waeqjTWVZzISkAeHDE70WO8HXRrJ1n8pDs0DBLY9ZOI4u YMEDm2aNsszS2eAlbv2TrbN0Nmw45PR1erhi58Cl6uYJgQpdwAF9bsTyq8+W 7gzeXR0CTqIbdmegszNpCXQ+dheYTX0yFjiMLnABzetAhnRFgJ0LUx2TESmF Iuxc8PSntYoEEuw8+CKrLK+zlWHn/f8Prhy7KyymP16ouLobuyvUz97MzM1x x+4GmSn2Q/xne7C7gX7o+1mDx17sfOg0/fqk0nhi50Pp0YuzI9R92AWwv4Sn H6r2wi6AUPeYvCJfb+xCeL/0ti/8gw92ISR3RzOoZb7YRbB0iwQld/thF0FN OqdI+84fuxgkvCsKU28AdjFU+Of6yIcPYpeArjA7ssouCLsE1DeyhI5xh7BL IbatSnmnMhi7FO9DcMvgL25oCW4= "]]}, {RGBColor[0.880722, 0.611041, 0.142051], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJwtlQs0Vfkex4/3I4/jvByv4zzlNUhRCvvrdTxK8opKV5cYRan0FsMSqcvF FTPKpBmzZkZJHimkUc3KTRQNalHjelQ35arERMfj0vnvtfba67/2//H7fb+f 796CqMSgGEUajZa2eC89Zys+/OEftYl6uO6b2AsXr1P1QeovGN6pZNxKWX1S rHMv+JHqS/hPx+HpLqqlseX48xtN5P0TSnaYoTfv9YC6rWlKa/V5TgmHX4XY 03rJ/EFqLm5NzN7fBqjgkKslZzpGqCDPrNBmvRdk/Suqn1+YU6rympKKAlbW Hhylwlx28OxfviH7jVERbf/MhfM45TQx3tFn/I46pHhO3ejCe7L/e2r1/gMt HoETVPEO77q0qAnKiPEp/POmSXLeR6or9adsLau/KLqPftpZxynqp0saP44r TZPz/6I0nzed/6Vphjpt+98Nv2pOU9JIt3M1cbOknhmKr+X8iWczTynp3zBo HvhM5S5Tc69No0Fe3yzlZmW381C8Ak7MZ73qrJ2jOravv6+Wogh5vQtUmlVf jV62EmQHLvft96BBGFLRp3RFGfL6ach8FD/G6FVBQyzzdvIVBdj+mljS/VIV 8n4UwTyfF+9xTw2Htib/nKmvhNSKstVsCw3I+1NCPVvWPn5aEys2juTkpSvj 2ySLKsubyyDvVwU5P5TGhQ1pYdxtfVLJWxWssjFWb1PUgbx/VeTHWp97tFEX lx3qtpSHquH+dzeL8xPpkOuhDuEg/VKPtR7iLIxwpUUdFxMesAfu6UGujwYM Nn+QvgpkQGKSYXbDQhMTf6u3H7rBgFwvTWzVPp1sbcLEEP2t1p3CZUjv1BWd PMUk+mnBZUJNqXOOiQvKwR8fzGlBRd9qt50/i+ipDafHVe4P8ljYNt3U1/O1 DmQqN//+7C6L6KuLopQw5QUZC9wx4e2Bx7po/zg4XmnCJnrTcfDd0L9GNrLx JtErePJ7Osx7XU3yjrGJ/nT8w3DD7+9r2GjbdUw6E6SH+JSCruJuNvFDD1un GvvPzLHxS/QVp3m1xb5cqRw6j0P8YYBb1KMRF8VB5vYha6VbDNDXBb9uzuIQ v5jYV9Ids6KGg51hbL76ASaaYiceOj7lEP+YKB1SPZE6zYF7oC9TezkLjs63 gooF+sRPFpJvyUZu+elDsD5FlfF8UYdI8bWXpfrEXzZm+leuV+zRx4JnzQyn gI3y0bGd+1hc4jcbr8sGo7z2cPGn68sxIykHrCVDr3GJ/xw4FiZeb9QzQPMa g0G+jIN5Ha901wIDwsPiOeFO1+5zDHHO3r9bUq2PI0sNzhoSPriozJ8o3N1i hGPW6a2WMVyE2llWMLuMCS9c7Mp5Etgr5iHMrL7R1tAAfKl6nqONKeHHALZL E9h8OPBHK1d1GuB0/TSLVs4nPBkCsgKhvbMALEOTi04nF8d9Z62a3woIX4b4 MOm3JStbiAlmYKGrkxH+FKumF4lEhDcjjN12EvnJRHisnZnlMW4k92tYTPgz BjvH743yNQmuqjUe8yk3RlFMdvT2UjPCozH6Kz9H7MlcjlyF/yX4h5tgablw gznh0wQiv+QMW2sLJMj4O4K0eagZGi2qtbYkvPKIn1bwmwoJDrvLg96/mxpy zawJv6bw/T7N7K70K5i/y5ZGHDHFQfG3C/mpNoRnU1w/eaKrrsQWGQcHSu04 fJSLGmdPedoRvvmo8h46zhq3Q9L+o5y6fXxQYdtqWkpXEN75+PK5dLVH1F5G vkM7Hz9rSiWHhu0J/3wc+UpgOpmzEoHxlRoNEgEm53qOjkpXkTwIcHO57rJ6 VQcgTpqxNk2AM9WLDf7hQPIhwNolAa46wjZmcLa5XwDbveUKzZmrSV6EuPTl 97IGplHHD1MOQvRFHg7gqTqR/AihE3D1bEyDE3QiWe/v5AlRYrnoUMVakich JhM2p1S1rsPctqpdnm/IuNiZ5EsEWcSee/NBLhgL9xlp9RSh79Gn4BEvV5I3 ES539m4ei6TwLHQ4wrdMhCV1ZfYg+RNBSeOMaXQV0B504kn7jAgLtckT1eZu JI9iKPif1A4oc0NTAGfTxhAxpp49TU+ycSf5FOPpqndrvDrdUbGhuq2rSowX GRceXgrzIHkVI0Fj5uLXMg985+vnEawhQcd42+/uuZ4kvxJ0+0fRwzW8cEr6 ork3WoKUrrotUz94kTxL0GMVYzBsLsURj1TH8N8kCGrgZb69IyX5liBOmHD0 eKg3YsGt7ueaIYDH2e3/zJvk3QzqLudDy6J9EOpSa7E9yQy0L5cvyb8Z/g9r T2rQ "]]}, {RGBColor[0.560181, 0.691569, 0.194885], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJwtlAs4lPkex0fkfp0xM2YM5mJcYt3v4f0yjBG2dWkpdCS1ko4TbehGB1vr yVGbLrodJ9u2EolVaVU2D7tFK53YJRWRkCOmZanksPN/n+d93uf//v/v7//7 f7/fzytITIvYtIxGo+Uu3kvPDxVTj8ISP6MerMzZfK7sGlV6qqK+K7yQjFup C+O+Bl0Xaqie1OftO2cfUu0dOmE9o81kvpt6HHzt5hl6J9WkaUZrlfVRUV4x C68cesj6fur6xHCFbkM/FRl1pbSwfZDy6RK4NxcNke+HqZqirNrTnBFKKlrt XLtjlDLfuy4wJ/k1qTdO4UlKN+f5BOUpn2jv4b2hVM/t1jvBmyL1J6lbg4Ym 917KqeMJQXW5iXJKNbS/+2njH2S/t5SkxSOHUThD6cvYuSVu01Rc8d1pq7hZ sv8MlaoxV/aF8zvqa/tXod9rzlIB5SsPnrX+QPqZoxpHbGTOrI+UMvs6p/HZ O6rF57jvDiUaFP19oPSsTqcX/EnDno9fDXfUzlPbPE+8uCRXgqLfBarMnVnh MLMM79Mre7ZLaPD6pi1HtqAMRf80qCt33DqgtRw3NjOadlcpwbss9T7TVBWK 8yxDwtotEZpeavhy3e7vCtjKMA9MimmJVYfifIt1Smwa2wo04Pjp4KHi/SoY jiusvH9bE4rzLsfhrYsKLGhhwi8ko/T1cvAm5zbkO+hAcX5VBClnaZkn66LS tW5t+Ro1VJVf0jhfrQeFHuo46jom4O7VR7K1MaruqOPn386tpfMNoNBHAx7/ 0Vc6UGMAsUmexXVrTbx8KHwy50uHQi9NhM43Vsha6BjQf63901EtnA+89nbe hUH008Zpn4ea2qUMnFOJfHt/XhspDjrNQUMMoqcOVkaONLbaGSJ29mbP4y90 ode94NmeaUj01UPzime/eNcawmhc2PSsUw+5U9rcd68Mid76kK+vdxpgMzGW Fhj5x1l9TH+ScdNWyiT668M4tHnSYDsT97ZkS+ciDLDha7WSsFIm8cMAyXEe +t+0MHFxY5XnRzU6Li3hMskk/tCx3/eIZTCbhYL4AVvlW3Q8GK09+bs3i/jF QH++vwovkYWkaCZfPZ0BVft3mo8OsYh/DHQd65B732DBPzyYoWNpCLvPHydw h1nET0PoTfzau43NhiBkryq9zxDMIxuYaQFs4i8T9LvlRaKdbCwEXJ1jHWEi W2mms6KSTfxm4mRT1Y/ZY2w89X05bixl4ftBR+VjjkbEf5aiv38aodGD089/ z0Kcj+WttD4jkgc26t4U9ueEcHDKKey/4ho2OJ9PSYc7OSQfRjjjfP4H9ywu sm33t67YZIQlt8J9jElejECrTvpZyuch2qK+wZ7Lgc2iXXJLE5IfDqwse9fI PE3hyh+97NLBwXOni22JiWYkT1xIr/Y9SpHxYcg1KfPM52LTYrX1r/gkX1yk F/5rSF4sgJwRftTX0xj8jRPr/H2FJG/GmNYvmuDPCNGpU/CVZMIYFY0mAz80 iUj+eJja2B4fctAcV9QasmXlPPxGl/t1SMUkjzzYLQjmZ5gWKFL6X2pYjAkK awZGj8ktSD5NMKbiYuDWZ4nU9/yECB1TdGkkC1N/tyJ5NYXpxRGZ3XNrrJqO ioy+awq3St/o2M4VJL9mCF7aoNsGVm8OSuMyzcBtiuX7TdmSPC+Ow3uN9yjZ IW/HszMOLD6aky4lRNHtSb75KB6Smz0yc0DG9ixW3T/4yNdZfaWkxYHknY/w racyzyQ6IvHv9MOubXzMRg5eOK3iRPLPx6rdefah15wW113WuCEWgIqOvXon 1ZnwIIDNzImnR9kuQLI0zytXgJGUxTcPXAgfAryIYV/vPOwK+039Hxp7Bdgh LZlRXe1GeBFC9GRuX4q2O8wSd+2kXIXI2nXBVtLnTvgR4o1HYFB6gwd0/2Y4 +VOxENZLP+iTnoQnIRx+tNTT+tIL87HVWwLGhEiK75Mqx6wkfImwhZa2XyXQ G+MxssHWABGO6O1yq7TzIbyJ8CtnUUBbXzxZ8yIu+N8i/PX7t6cIfyIcdsz8 RGAGtEXs6W6bE8GxdIXRsW9BeDSH1b5DDVut/XBzNeuzT6PMsTT9+Kof4dMc dWMZ9UyJPypCa+49rDbHHd1FItr9Ca/maO2rz9+TLMHJ4FWSSA0x1C/z1iW9 lxB+xcgLDz6bezwAB6RDjV0bxVgf8ouaj00g4VmMMq79U/PbgciU7HOLuS1G /LaWj7WxUsK3WJH/P6XYDKOaXiMLDFeLh/KOBxHeLSDhvX7h5i/DGp9a6/gM C9D+uoIJ/xb4PzQkayU= "]]}, {RGBColor[0.922526, 0.385626, 0.209179], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJw1038s1GEcwPHvIXURd86d474O+dV1LqGY0Z7Pua1hSdSyNMWRcWsTlajV jrRYtVXnRivNFWtnq0bNZv2h2aoVCjWnRmfGqK64w4WJqM/zbM8+ez3v7fnv E6AuSj/hwDAMrN31uWy0DqSoDxDm33lJzsW17imsM6D7yAgRPVCNjqGHSF3x QcfeyW/oUdI9uLTVoLCix0laxHtzVcI8eorUXr2S+TF+EW0hoBGE/n7xBz1D dL6SirIGDvy3jXTKK1cf5zmh50iYVdsmMzmj7YSdWcypOsVFL5Dikk5VWrYr eomkNee7P690Ry8T2ZT99uspHnqF/LwTzNG0eKAZsE1H7WATPdEcKAovvD7I F6Id4GI5x95vpHYEpTW3J0suQjtBtWnepTSXegMIz1xIyq2ldoYaZfZEXxf1 RugwG7b1TVJvAnIrNMnk6oXmQo9aPVusoN4M/U8S3qUmU7uAVv65lV9A7Qpu huReaTX1Fhhk/esfPqJ2gy8ren3IK2p3OBuf3xj5lZoHChX7Y8yO1vJgPGlg t85djJ0P6oXqeg8ZWsuHrjTbd1ZFuwc4HXZTtGXR7gGyZ8oQ73LaBRDpqLdO 62gXAGNMuTf8lHZPON2wN3P7B9o9QSrSpMz+ol0II0rLPoPAG7sQKtpkGWUx aEYEmqZmW2ke7SKI1hW1d7TS7gUjA5rE4UAf7F6Qcyg9tPEtmhFDRDtvvDGI xS6GWrvz8XqLL3ZvWM9Vsf7YvSH8Wk3vm4kA7D4wXcI319QEYveBjKOtnRZp MHYJtKyv185Q7BIQ6z9xCxxk2FkwNu0HQYUcOwsny843h11WYPeFvDhz6g1T OHZfCKpbvXnpbgR2KQzNzCUfiY7CLgWu5P4xWfcu7H6w9puKdYnB7ofvsTj9 4S/zzwJu "]]}, {RGBColor[0.528488, 0.470624, 0.701351], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJw102tI01EYwOG/t9RpzrmbTp3loAUtSlNxlZ2XFBmFqGthUpKOIotihlQY 4mUomJofiggrbaNZaoYDMZrT0Eyx1BSjYXhJJW0yNW+ZDpXUznvg8PKc37fD OXvVGuVlR4ZhYGtvz/WahYE4dQJhdlYreSmVLeSFTlH3E70+V1vCX6QeJM4T tza0I07w32Pk/FuL0P0Nm/onqU1VKaWpXGorSWwJN54N5lHPELWlRP/Mip4n Ut0943gNn3qRKN+JC22JAuplMtz09NVRA3qFqPWWsN+r6FUiN/3Q708QUttJ eaXxo1Mtep0cNkvZHt/QmyQqR/P1+QiagWYXHx6ZQjtA0onupbE5tCMoiruM xX/RTnAzcum1nPGldob5tbSCeTe0C1QHbj6p46B3QaNqtCxDhHYF+6ytVS5B u0HW9L4QNxnaHeJWq3JGw9AsSL6qZDVFoT3APHsysyIW7QmZhXdMRfHo3RD7 5UPl7XNoLygdSmc0aWg2sE4f112/hvaGtoCtG8mkzvOGXget/G42dg4csrMG Sguxc+Czqq3aUIbdByo4VS1tj7H7QOd4T/2UDjsXojsic7m12LkgbLYeUDRg 54GE3ynQNmPnQUH+r9H2Dux8ECdETLL6sPPBK/RTV/IgdgEodx4QdgH05xiK PG3YhfBieuZSxjJ2IXRfyRIPb2D3BZniiCDO1Y92X5g4FmLr8KZm/GBu+7pF 2P0gPmVN1ifBLgLr9zr7hYPYRbAsMsf8icDuD5HvV3oeAHZ/aGy/+DD8FPYA MNyXWCbOYA+AbhMv6VEK9kCoL89u6L2BPRBSJ/uDh0zYxZAfXa1scBXRLobt 75WeRM0EgedkjJlVgz2Insvp3AP/AOc0BmI= "]]}, {RGBColor[0.772079, 0.431554, 0.102387], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJw10HtIU1EcwPHb8rGpmZubm3cPZ+lmvuZzKkr3p39IUpKJNUzC1BJF0VDC QovCZ5aPkAhTQ1GTCUL5AIl8pAguksXMR8+Jq2E6U9cUJyOa+usHh8PnfP+4 51zPzMLk6zSCIMC69neLckuTmJlEEQczTk3WMsR5lhr0B8qw3TRfkapEL1Kc aLJ674oevURxW99qZfp19A/qRtl6s/d9I3qFUlydXr2k3kYbqJ3ByfSmcDN6 kyrZzeuPH7GgjZQ6YYOfHn1wPeuYqE9xjeUsCQ29Q5k/h56lsW3Qu5RqOnVx 1tkOvUe99pfIPRbs0RYqX6LNL9Yx0H+ptFdjhucxTmgCwhZyu7qLnNFHYOYm masUuKBpYM5u4c/++e+jYHQi96TDTLQNdOdZPzDAQtuChtfX2at0RdtBPL1B Xn+LjbaHrMH6XkkOB02HvoLtVtOoG5oBYx/VLbUmLtoBapgTnXU6HtoRKnzD S9uf8NFOcFv0tW3oiwB9DO4MzNT9UonQzmB9zRuhpxh9HAKXo4PXKj3RLuDj YHoQE3Xi0PdcgK5f2Sr1O4mdCcZYdfacvRd2JlT3KN6F2HhjZ0FGSrK0PUGC nQVT4pdFOUwpdlfI+n057jTdB7sr6OTkeNoSmmCDdKKqR7F6CjsbtOfrnhb0 +2LnQFlGyMWgXj/sHCgtl517UeuP3Q0MF4ZFlQ8DsLtBkoVXvKAJxM4FRy+f u4/MMuxcEKwty8nGIOw8GIrYnbhGBmPnAV/2zcvuMZpwh9GgZl+ebQh2d9AQ 32mMZ2iCBOjSjjoLQrGTULhZqUrpQBN8mHlvHf8w7HwYTxPHbg2gCQHYTjUE lySGYxdAalXk/NQImhAe/o84OXYhjOjYQtUcmhDBmf0HKyKwiyCgv22jR48m POBnRsd8WGEkdg88j8JdDP8AlekKAA== "]]}, {RGBColor[0.363898, 0.618501, 0.782349], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJwtkws41Okex8f9EhlmjBnjMldyOeuSEcL/O4wxKAnRFikq2vXoRFtZtqtc ttqSk9LTytbZVEoit1Kp9rBK0WUrbStx1HFJUjoUOjNn3nmeeeaZ5/3/3/f3 fr+fDz9xfeQaTRqNtl35Vf1OnXn3YGFiBHV3/ra1pWV11C89V2e2/TeT/G+h THqZyTG0Q1RX6ov2TROd1Gm+ztlnbRVk/TF1V/tWYy6nn2o2tKW1KJ5TbsUD h/PrB8nzPZRG88Xkjv43VFT0hZIf2/uoSsfPlfpb35H3X1G53NHJVdofKLlw 0dzqjQPUJ1mpKL7mI9lvmNpq7ZUsG5ikvMdG2rus3lLBbRUZRr9Pkf1Hqd+G PulceTlDFa8MrtmeOEY97o2i7S2nQX3ee2roXxHhl4Y0QFdYbP+H5ziV9+OG GbtoLajP/0jt8C+0D3mijQKX1wtOG05QHin/Od4j0IV6nknKK8dRklWmBy2L ek5T9ycqc8DOTT/VAOr5pqgbX2Kqk/oMkT2T+6qjepraucdcckTXCOp5v1Au ewruto4b4XN6RdeGQBrivOgHddpnQz0/DYryyuxiPToa1jKas85rIGlbl1/m ETrU99HEtY/tB2kSU3y3LOvUbgstlGaZHLZ6Ykrup4Vv2P6CU6vN4Bbet3f/ Dm1Um+Y/GXdikPvq4MuWC8tKRhkYkYZllAzpYPPjtCudTUxyf13UJRdrnw4x R4Wk5uuTS/TwS+hdmxQdFslDH6FvuQlZuhZIceDi/HV9ZP9xOyfBkE3yMcDX aeskohE2xNa77OodDFG1Pzx+sp1D8jJUr9+zxEv6kNGNolk4W69bF0q3IvkZ wXLPqZoiqTVKtaPe3542ApNqeV6bY0PyNEaaChA+D8snLnc9Sp6N/K9Ory95 yCP5moD1/wL4YA8LmrvvmyC65XpHA11A8qZjYOX08VvDAgyuD4r68DMdqrhf XxSS/On4NRyMVUkitK3LlE9GKnPVOXnQRyomfZjiXv6D7p4wO5Qnnfee0TPD 0c3HTgg59qQfMzDGpB1ra+2xO/6ls9ZVM1yNLOb/ZD6H9MVQ5hx+v9DXAatj zXn66QxMliXXDM51Iv0xIGqcyvsw3xkBi0MYxvZMrAj7Xc/vT2fSJxP192nd miFfgR/2g67ZcybKM1sdfNJdSL/mcCtxZB/SdsUX2cVJVqE5vitia8f4u5K+ zXE5xEjTqdwVf/n3D3PlLLT1U/984e9G+mfB1fEMo/OSG5q8OD28zyy0Xm7Y pwt3woMFrtibzKqtc8dR94UPxVUW+Ks2J7uzaC7hg43egUPVRqYeyHTe0eK4 hq2eb6cH4YUNq+xV7kt4EsTa1Ta6WHIQse9wmtlDCeGHgxc9s4rOJHpCwhs4 59HBgf45q2WrKzwJT5aQvktqj3eaB6aldZl3jiX2hg5qexTOI3xZIu2kRpOO uxfGGIuL/L258FXGHXfNi/DGRcmV4gMmPt64b7w7N3CEiyl2xhOzm96EPytI VigTOuGDC3qNmYqTVkjQu8dZbDmf8GiFjJTCN9nb5mOfxpvUhUutYXJs7olL er6ET2vUvZ9+tKXAF6mfeSsjjW1Q+TRh06IRX8KrDTSd8lhdaX4IHY+Oir1p g+uzlRv85kf4tUUDdva2Kvwx522+PG6zLQqUuM3q8yc826Jxn+4oy4vCro3d x1xZPJj9evWGRR1F+OZBNc48NpCxYQur5u/KdZVAfiC88/BN08Yi9kYgMc3s gOQODz+bKjfoAOGfB08VoAZSLP72nEGDmI+88tjb7gukxAc+5lk2L+cVSIEU +S6f7Xw0D5f6OjdJiR989PztQNkEJwAua3qmmp7x8SE15ofKmADiiwC3xufE 7T8RANvE7zdREgEq/GOXX3wdQPwRwFoFpH0gZicwR2/sFyDB4Q69NT2Q+CRQ 99kSiOnlletkgwLQVB+6jPglxBpO71ILSobhpYq+FpkQNYMZteZ7ZMQ3IfrH bB+sb5XhzyW9cSHHhbB3UxJmGET8E8JXJWxMEO5EZj++MynEK6Ue134KIj6K oLRD9vRpEC4vYkWER4vwyEl54hw58VMErrEygZVynFlQ1dZZKYLXxM3VZw/I ia8iZI9VRXx7U44jIaGBUQZihCnxNZ2RE3/FCE6fNBmggpEn/3fTH0li3Hqo POBgMPFZrPbzUTA2B271XHpNjGEXlZEK4rdYzXOoAmvBrnrGtkNl8MvvmbkK 4rsdjupzS1e0KbDEr9ohPsNOnR8thPhvh/8B+XFmqg== "]]}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.880722, 0.611041, 0.142051], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.560181, 0.691569, 0.194885], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.922526, 0.385626, 0.209179], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.528488, 0.470624, 0.701351], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.772079, 0.431554, 0.102387], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.363898, 0.618501, 0.782349], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.880722, 0.611041, 0.142051], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.560181, 0.691569, 0.194885], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.922526, 0.385626, 0.209179], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.528488, 0.470624, 0.701351], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.772079, 0.431554, 0.102387], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.363898, 0.618501, 0.782349], PointSize[ 0.0055000000000000005`], AbsoluteThickness[ 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.880722, 0.611041, 0.142051], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.560181, 0.691569, 0.194885], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.922526, 0.385626, 0.209179], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.528488, 0.470624, 0.701351], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.772079, 0.431554, 0.102387], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6]}, {RGBColor[0.363898, 0.618501, 0.782349], PointSize[ 0.0055000000000000005`], AbsoluteThickness[ 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 50.}, {0, 11.313708498984761`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{{3.789860765434984*^9, 3.78986077096467*^9}, 3.789861476324353*^9, {3.78986152537943*^9, 3.789861534309346*^9}, { 3.789861781488509*^9, 3.789861835889407*^9}, 3.790500128363778*^9}, CellLabel-> "Out[177]=",ExpressionUUID->"34d6c5b9-6a15-4a71-8c30-e23185f77056"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLogPlot", "[", RowBox[{ RowBox[{"d", "[", RowBox[{ RowBox[{"SelectFirst", "[", RowBox[{ RowBox[{"#n", "\[Equal]", "8"}], "&"}], "]"}], ",", RowBox[{ RowBox[{ RowBox[{"10000", "/", "2"}], RowBox[{"#\[Rho]s", "[", RowBox[{"[", RowBox[{"-", "4"}], "]"}], "]"}]}], "&"}]}], "]"}], ",", RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}]], "Input", CellChangeTimes->{{3.78500344089928*^9, 3.7850035247242117`*^9}, { 3.78500355492629*^9, 3.785003581869154*^9}, {3.7850037263212214`*^9, 3.785003801241189*^9}, {3.785003858875341*^9, 3.785003870148059*^9}, { 3.7850040155105553`*^9, 3.7850040423493967`*^9}, {3.785006116081827*^9, 3.785006116167615*^9}, {3.78505689009816*^9, 3.785056917277814*^9}, { 3.785057246856258*^9, 3.785057285467389*^9}, {3.7850576509576273`*^9, 3.785057656673394*^9}, {3.785057728644764*^9, 3.785057728875795*^9}, { 3.785063505099409*^9, 3.7850635055000563`*^9}, 3.785064629891938*^9, { 3.789820922779374*^9, 3.7898209507203293`*^9}}, CellLabel-> "In[215]:=",ExpressionUUID->"57f24fa6-c961-417d-8040-d9f006e7bc42"], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[1.6], LineBox[{{1907., -14.0623706358958}, {1908., -14.0623706358958}}], LineBox[{{1944., -12.96375834722769}, {1945., -13.369223455335854`}}], LineBox[{{1951., -14.0623706358958}, {1952., -14.0623706358958}}], LineBox[{{1954., -14.0623706358958}, {1955., -13.369223455335854`}, { 1956., -14.0623706358958}}], LineBox[{{1964., -14.0623706358958}, {1965., -14.0623706358958}}], LineBox[{{1967., -14.0623706358958}, {1968., -14.0623706358958}}], LineBox[{{1970., -13.369223455335854`}, {1971., -12.96375834722769}}], LineBox[{{1973., -13.369223455335854`}, {1974., -12.96375834722769}, { 1975., -14.0623706358958}}], LineBox[{{1977., -14.0623706358958}, {1978., -14.0623706358958}, { 1979., -14.0623706358958}, {1980., -14.0623706358958}}], LineBox[{{1984., -14.0623706358958}, {1985., -14.0623706358958}, { 1986., -14.0623706358958}, {1987., -14.0623706358958}, { 1988., -14.0623706358958}}], LineBox[{{1990., -14.0623706358958}, {1991., -14.0623706358958}}], LineBox[{{1993., -14.0623706358958}, {1994., -14.0623706358958}}], LineBox[{{1996., -12.96375834722769}, {1997., -14.0623706358958}}], LineBox[{{2003., -14.0623706358958}, {2004., -14.0623706358958}, { 2005., -13.369223455335854`}, {2006., -12.96375834722769}, { 2007., -14.0623706358958}, {2008., -12.96375834722769}, { 2009., -14.0623706358958}, {2010., -12.676076274775909`}, { 2011., -12.96375834722769}, {2012., -12.96375834722769}, { 2013., -13.369223455335854`}, {2014., -14.0623706358958}, { 2015., -13.369223455335854`}, {2016., -12.96375834722769}, { 2017., -13.369223455335854`}, {2018., -12.4529327234617}, { 2019., -12.676076274775909`}}], LineBox[CompressedData[" 1:eJxc3Hs4Fd/7OHxJklSSJFFIkiRJQuKuHEoISZK8kZBKJSRJSJKIJEnSPp+3 KJWQJCEhRZIkCUk5JJWQnvl9972f6/rs/ul6XWtmzazjbWbW2mreh532iYuJ if2aJib2//7/v38ZN2GGbl/R0b5lpf/nLBGTbkJg3cbpA4t0BKbdBL1ze7ma bpjOEknniaTnijifOD7h74WkBC2BC0SuVyxyfKnI8eU3YfGZiLukdeiqm1Cl bFnT/RldI3J+/U14ob39nfRDbYEbRe63WeT8VpH820Xur1PEPSLX+3YTeElX Dw4XLhV4UOT6wyLXGxHx+E1YdmJHlvhZPF+M9L/p4qT/zV+C9L/1IyliKZHz pUlw6dOxkxt/4/kypP+9/5kix8uS/vf+5USOlyf97/0qiFxfUSRdSSR/ZZHy LBQ5XlXkeHWRdA2RdE2RdC3i/rtnuLOXorVF7l+HBG4HQsVyJjQF1iXBkHns Vo80tB4JZvQyTWVd0foixxuI1KchCajkx+e9TDHdiAS+EQMR+++iTURsSvrf /mZGgutie1UMnTE/IEGKbrmScwgev1EkfwuR8lqRIPZD4tniZkzfLHI9G5H8 bEXS7UXqy0EkfyeR851F6sNFpL5cRY53E7meOwmCvOouJLcsEdiDBGUdmr6L p2G6p8jx3iLl9xFpL1+R/PxF0gNEzj9I9IdNC3WeluPxgSLlOSJSn0Ek+Gy/ rbl9Lx4fLHK/oSQYdz/W5/gd08NEHC5yfgQJiirj6p9dR0eK3F+USH3GiJwf S4LK5n+2Z53QcSTIOLPwRNEGdDwJTr2MDM2YjE4ggU3fBpXj8ehEYrxaFcjo /NQQ+KLI8SkkUDtgndR2C50qkp4mcv10kfJkkEBi4uWuU28x/0wSfE9o7D0s h+lZIs4WMYkEU1qvrfgWg+dTSGDiOaOuQA3TaSL3zxA5nkWMz5u64+1eaA4J Tivnv9D4jOaJ1GeOSHouCb6uCjU1eYS+TYLdiz88uHIbnS9S/nsi5S0gwcZJ B006p6ELRdKLSfCnWjVPrwZdQoI9D848PHQRXSriMhL4Zzy4ov15scDlJHD6 3Fl44Ra6ggQ/7fe1rVDG46tIwN3i1Je6BF0tkl5DAmWNq6QuI3QdCbw2vlRg NGF+9STYZG7yXWMlpr8ScSMxXxWrZDeW4PFNJMh/EPaYXoFuJsr3QXfLmzZ0 i0j+rSSY/TjMVI6FbhMpXzsJHO5mVX4+jO4QOb6TBCVz05LOL0d3k+CL7bfa PzvQPSTY59ax7FooupcY30tXRdvuR38jwfOB2tf2a9H9xHxjxPk7VRU9SOQX UfFu63r0EAlWuF8qj9iCHiaBcVrFysBhdYF/keBszp/4vaswfUTk/FGR88dJ cFX7udeda3j+hEh+YmSgX7d5DDVocTKUyixri+GiJcjwdXFZ3q+HaEkyUPdE SIsx0VJk+BNzPkAxCi0tki5Dhg/fpfSWm6BnkiHhkmpfcSJalgzPhp/ts4pF y5Hh5IMt9k3H0fJkGFfUDRzcjVYgg6vL2Oo5rmhFkfyVyNC1eS3/5Aa0Mhnm pB9u23kFvZAMev+aeXtXolXJcPyqp+xrDbS6yPkaZKjtU4zYJYvWJAO/N731 6B81gbXI8Kjj8+6zn9DaZLBhj9+Y+wOtQ4aO7E4ycxytK5KuRwZj9Ufe650x f30yWElxfh58j+kGZHgbt4hmV4g2FLm+ERmaA+6lKN9Cm4jYlAyTt55e1M5A m5Fh0Cr5wMxTaCCD5IjbJff96I1kaIhtd6lOR1uQ4T/trP5PNmgrMtgZuS4+ tAe9mQz5Rz+GJ4WjbcgwEvdu1QtDtC0Z4luPJNZJo+2J+s57eqFWCu1ABo2Z NOPuCVWBnchgf8Pv5pJOtDMZcuYsvvRSBo93IYNEYWLLAgu0Kxm0HVvWeKuh 3cjgMTEp2v4Bnu9OBtlmRR/rOrQHGa5vCxx79xLtSdQ33frU1Ta0Nxm++Gx+ dbgd7SOSny8ZHIt6sxXfov3JkPRtYJrEMXQAUd4H0++0k9EHifrJ/++ggTE6 kAy7ZXeqz4hAHyHDTGsmLykdHUQcf/uWq/whdDAxvq5/eRayBR1KhsS+weyL gegw4vqs/pC4o+hwMjB9Cp/Gh6MjyODDTB4Y24SOJMPL5nqbq87oKCL/H8eu N9mgY8hQHq2UY/VqkcCxRH2FNS88tgzT48iwnZRnrjOO6fFkOMe5fDZ4NqYn kKFyN4W96hmmJxLjrUrnhvhn9EUycG6o/l14E51ChqLZlqWSHHQqGXgRifMo Geg0MjzcXvrbhoxOJ8OtBbz7r7aiM0TyyyTqI2qJB1sdnUWGz+cv5s2fj84m g8FQdVLDQjSJDOc747tap6MpZEiLybOYN7ZQYBoxfv2d/Cua0AwyHDSbuuPB DzSLDBbi0z9+IaE5ZLDVyL5nqonmEf0rYfPOle7oHDL4zT2T//ocOpcMwRW+ vtqZ6NtE/y+c412qjc4nxuMNR953T/Q9MuTONTpkEIwuIO5/QZzFtL8qAhcS /SM19vxEC7qYDFHrlvj/HUKXkGFV3qZbydPx/FIyeKVEPb4QjellZDj7Lqvx ZQa6nJif/5RH6JxEVxDzy9H3na890VVEe5/W+pawHl1NpLfLmzFWoWvIMLen 2NZHHV1HhlOJ+brvHdD1ZNjH2VSdIIF+RYZqs+OT5KehG4n5v+FwXX+5ssBN ZGg7Pzn87g90Mxm8r7/QsxhAt4gc30rEN418Od0QdBsZLlcHrvcvQreTAXqG FU7R0B1k2CmrbycXie4k4qEx5Y10LLqbDA+unCntWozuIcPUawU2NevQvWQo jrj20XEm+hsRnzRUHOgDCwTuJ+pzrerTBBlMHyTD7Bmyfz0+YPoQEd8e7+iL eYYeJsOW+TWO32+ifxHjNbVngJOHHiED6V/ytQQyepQMMZnrgt1j0eNkMPFS O264Gz1BBsP9+me0E9FiFHB401Bq4ooWp4Bs8QeDxAElgSUo4LVmu2z9P7Qk BZZtsX6X8wctRYEFT1XlJwktTYHDIUWupeVoGQr8CdIskx5Dz6RAxrX1Cj1c tCwFlpZwVy2vRctRYPEWsteTIrQ8BU6UkRzdI9EKFHgz+8fp60fQihSQlmo4 8UuYrkSBwJzAE0P6aGUK9N8z9nxgj15IgZNfF3t9nodWJcr7NdFvQhGtTpQ3 teWEvSxag0KMd4uU/ZPRmhSQOyM9R6p5vsBaRP5r+/89LkVrE+eT3rAON6B1 KPB17InUs0q0LgVmD/lmK15F61GAHf3eN+skWp8CVreGOE1H0QYUmMFICuG7 og0pkL4uaedlB7QRBY6QSj41maBNiPLb/LnVOgttSoGnP2amjU9Dm1GAuvuk 0ZTPigIDBVYNPDEPHkZvpMBQyMG7N7rRFhR4FXHAovoT2ooCegtSpF2r0Jsp sBIo2ebFaBsKvJOMNzRPQtsSjtWav+oy2p4ChecLH286jXagQNrpB/GVLmgn CvSennPvlRnamQJ+blurxjahXSiwuj46jGaLdqXAdAeXeQFL0W4UmGbXJr9h BtqdAuHyQd+Up6A9iPqOb5XI+jRPYE8KuNz82FD7Fe1NAe6m2X/gJdqHAmPS l20kaGhfCsyp7O3+7z7anwJid+Pa+46iAyjw88pty75Y9EEKVJvbJBqeRQdS QHnvrQuyW9FHKBDxu9xQbRs6iALP3Peu7jZGB1PgEuOG54kV6FAKFKWeG26R RodRgPKdlbZNBR1OpL+fXG38R0HgCAo8qpM+196DjqRAec4a8pxv6CgK1Fy2 rPovBx1DgQ+ZKhuP0tCxFNDaEHRlfwo6jhgPL6ZuunkIHU+BO2dDnUfS0QkU eFDts6H0IDqRaK+Y2z+b9qAvUuDA5RqtlhXoFArs4tbEam1CpxL3P1hl9XIz Oo1oX77hi0kz0ekUcGxTt5SUQWcQ9zdv7fcLo3MFziTmm9V1Ph860FlE/diN Ru5tQGdT4Ebmp4MZtWgSMX69dsd/y0dTiPruynRUYaBpFPjcuS9m7QU0g2i/ sAsXks+gWRQIU1Y4mRCE5hDz0dhnU+sNaB7R/pbhlsc80DkUSIX/eKPm6FwK SK20lkleib5NHO/bslRDHp1PAW1DmSPUyeh7FNh4ar/Y1X55gQso8Pru39as VnQhBczoPxwLy9DFFJhQjWzpf4YuIcZDY27YNhq6lAIKal/LS6noMgrktZS5 SF1Gl1OA5Nx3mRhEAldQwNnPyVwmBF1FgUXH+7+vcURXUwBqN/5YvQNdQwHX +Ozcd+vRdRTQOUAdvj4PXU8B+12fvs+QQr+igI2tcvcpGXQjBRpyFWNC/s4R uIkCpd6XjFe3oZspEBd+vu3TK3QLBdYVbM2cW4hupcAa9eUfxbjoNgrssDHN 78hHt1MgWybIP/gyuoMCS3YkrZeORndSYO6HvH+RJ9HdRLyqLQ4L3o3uocCt 35aHFO3RvRSI1jKfM98O/Y0Cda9/tNgtQfdTYEX5lKrNauhBCmS27LS+oYwe osC+fzwp9+noYWK8lGeJOX+VE/gXBWj73Qxzv6FHiOtPhD7JbUePUkAj6dnY ssfocQr803o4voWDniDKe5uiMTcDLUaFyeYDD8VT0OJUSG6OPVWViJagwiOG QXHEXrQkFYwveoT/CUBLUcFboWVytQtamgrn3MeuKK5By1ChMtGPmQvomVT4 PiTmKqaElqXCn/5Nh5YsRMtR4dZYUNqSP7MFlqcCxVA7vK4NrUAFan1d5c9O tCIVHF6rnf3XgVaiQuC17CzTSrQyFY4P24Wo5aIXUiF45O0etTy0KhVO/Zc2 6dB1tDoVHjSxL9gkozWoUBA3Q2P2cbQmFbxO3v/5dT9aiwpWK5WejHigtamQ 0EFeEr4FrUOFrGXXYlauRutS4Wqv7Z3A5Wg9KkgtIEWPKaD1qbDpT4nzRxm0 ARVqXtLFH/fKCmxIhX/knHV+39BGVFBV8Sk1a0abUGHqUZ2Kyy/RplQYi+6K UX6KNqPC8oXP1EapaKDC54ASCVcWeiMVwhZWuHrEoS2oMBKS+dTnFNqKqL8/ bkX9gejNVMgYahqQdEfbUOFTg9SCRTvQtlRoVgg58MMSbU+FFz3f0xpWox2o MEh9FmOhhXaiQrxH8BhvBtqZCtv0p+pwxdEuVMjcGvqxp3uWwK5UUFnRdSij Hu1GhaRJ523Gc9DuVLB+ui6JnoL2oALvEmjlhqA9qVAk53Rp6060N1G+JSED 3mvQPlTIk2iw89dD+1JB48irPIuxmQL7E/c3/eDX7NfoACo4uxw4P6kMfZCo v6Ru6Vk56EAqHNUZThxPRh+hwvllOp0fPNBBVMgdf0N9COhgoj94JRnn66JD qdDOC4i7L4sOo4LJUbW5MT0zBA6nwnTjQku/Z+gIoj6Zar2NJehIKtQpxF9T uYmOosKOn68cXc6gY6ggnv47l+mOjiX6b6mv3MO16Dii/k/tLCTpouOJ8UCu XRo6BZ1AlF8xx3tkQkbgRCpYhpyRWFWGvkiMl2XrTyRz0ClEe7Uuy8i/iU6l wpMsztS/J9FpRPmWvDszzwedToUQ+/xfJbboDCp0DFhd3L8CnUnMF/9evqHN QGdRYUNak8Ol79MFzqaCHXPyuornaBIVmCdaGIevoymEl4oZKl1F06iw/XyB U1QImkEFnT2xeWKuaBYxfrKvL7u4Cc2hwke7z/s6VqJ5VLh5dvq9IwvROVT4 MC1ucEWrtMC5VFh0ztqx4Qv6NnH9K87QSkfnE/XnvtXueRr6HhUka1v7IBxd QAXdr32JGe7oQirs7TR5QHJFF1Ph64Vy6RUa6BIquO/1+JMniS4l7vfDzmqL vmkClxH1pzTi/PUzupwK75UXTx0vRFdQIf2dgWEjHV1FhfXHu90/pqGrif5u vPi0yw50DRVIOdGOH+zQdVR4ZnAgvcAAXU+FnfN1eJIy6FdEfJg4JflWDN1I BXrQPrflbVICN1Hhr4vfDsX36GYifx/H13fy0C3EfGAwrvPqPLqVCifczWB9 ELqNCvc7mtcEe6HbiXgSP+bLXo3uoILm8a6j99TQnUT5km+tipVEd1Mh/Pep oK1fpwrcQwV23ay6rXXoXip4XjOY9oKP/kaFqB89Z/beQPdTIWb/o6yEU+hB KshfeXqP640eooKbqs6+FDP0MBUaszSTFVeif1Fh5t/JjgEa6BFi/uTaNm76 JCnwKHH9AHib1I4ep8KRld/37XiInqDCuxXM/jQ+WowGFncfqoklo8VpsJ9b y8qKQUvQ4P3hA2qDHmhJGqiYKG6jGKOlaJBXO2vBA3W0NA1W7F9dtFAcLUOD tKUOXMuhKQLPpMHAvhXbLF6jZYn8OJaXU+6h5Wjw97rG1oUUtDwN5s7aMXzh PFqBBttW6jdZB6IVabBznnefmxtaiQbyG8RcX5qhlWkQ/POS3hp19EIazLt+ QqNHAq1Kg5UG3u5GXyQEVqeB8c21K8Vb0Bo06OJYS6cVoTVp0PprNvNuNlqL BiPDW0LyzqK1aVAUct26wQ+tQ4PdqaWDP7ahdYn6rnKQu2mO1qOBek+Gc9Q8 tD4NaCW+ybZT0QY02GzkWf3j12SBDWmwvqTVO+wD2ogGB1csmKt1B21CA73t EWIL6GhTGjzeNi2qNhVtRoNpRc/nfwxCAw0quGkrqqzQG2lQv+vd0XgjtAVR 3+L7b79ZjLYirqf6NZQ8G72ZBjKaYffsfooLbEOD35dbTI61oW1psMAuJm1t FdqeBpUT7w7Np6MdaER8ytzYcxHtRAPP9C/lp0+inWlwyWrTuUpPtAvRHwZa nx5Yj3algX2j94sNumg3Gqw5tvV6y2y0Ow3Wvld/rvRnksAeRH84XquyuBPt SYOpJ6e9dHuJ9qZB9xeDua+L0T40yN9sqTz/BtqXBuUOjFmFZ9H+NMh1HDJp OYgOoAFJmdQ03R59kAYp5DMNu0zRgTTi77nE7GwN9BEaPJDpYh2cig6iwfdS g5dzhsQEDqZB6tXnTpR36FAaBO26eeBPJTqMBlkFxuXpPHQ4DValHD3Wm46O oMGvG4soXufRkTS4V7/15SJ/dBQNxnZlLlCzRscQ7cE4tm3WWnQs0b+/HDdS VUHH0UB29GIUfTI6nqhfyhwx1Zf/Hv2fE2jw1u9k3xUqOpEG96O5WUWn0BeJ 9lW5YG3rgk6hwU+djRWeGuhU4nqxc05Ej04InEYDqx+5G31q0enE+DVZ9yc7 Hp1BA0b6pEFfP3QmDSJevNRcuxadRQO+UTyfN/RX4GwaXGNvbU3sRZOI/rXs yxbje2gKcf5p26D3p9A0Gli7/vhxyxrNoAE37KXZZ200iwaTE0s3O42PC8wh xtcVSbWUCjSPuN6qLde1b6JzaPAvKT/uxV50Lg02/e5wJluhbxPz5UhYF3ke Op8GTGqw+a7uMYHv0UBuys++jaXoAhocCmG8+BGFLqTBfO9XDE0fdDENlj5R fZ+ujS6hwYGNdTf9JqFLaeASsfurQf+owGXEfHRUTS2NjS6nweKWysjCZHQF DZaMO3Fc3dFVNNAP1IOg1ehqGjT9q1huIY2uoYG71mCy9/s/AtfRwHlrViEp D11PzFdhU8QMT6Jf0eDDz6Cy4c3oRho8WTj0sUgd3USDrema0Xl/RgRuJsav hUq7bCW6hQa3Zm14rs1Et9Lg5fziinMR6DYa7H3/KcRrD7qdBvvuRzibL0B3 0MDxjx952b/fAnfS4PXvmzfyytHdRH9VE38RmonuoYEtmB+oCUL3Ev3h89zJ jtvQ32iwWjv66PRZ6H4aTJq17sDYyC+BB4n5/Vf+qedV6CEafNK7H6eZjR6m wcLmw14XgtG/aPC5K1+SYYoeocGprqJJtUroUaL+Ff8dedn1U+BxGlj6+EVV PEVPEOWrvL367HW0GB3shmMTn/uixenw9UW8mP8utAQdlLq/ujStQkvSgbeQ 97trYlhgKTpY9ry0+q8KLU2HjoJ5GwNJaBk6nDadcTXmJHomHdZvjo7X3YmW pUNEwpm3KkvQcnT4oDYr33waWp4ON9R+MJXe/BBYgQ78RysP++WhFelw3+py 94ezaCU6HA/lNh7fjVamQ5X1+blua9EL6SD+wEe8RgytSoeYAw/LJb8OCaxO BzPdX9xXhWgNOuyYmNg46zxakw4lvokfV4egtejw7M9as5EtaG06eJlNSelf gNahwwGjEzu/934XWJcOW2SX+QQ+ROsRlpBQ5N5A69PBcPEK44oQtAEd5k22 PW9qhzakw9y4ec/rNdBGdLg9uGr5m+FBgU3osPvYrxDFWrQpHWb6DkQn30eb 0cFnxpLslktoINpfInX/3X3ojXT4snMa7LNCW9DB/fiDpHkz0FZ0+HvOSdWk bUDgzXRoeHf9gvN1tA0dTEctuaFr0bZ0uPt3i7vut36B7emgUr+uvPg22oEO TS/ak+Xc0E50uDnt2p/n0mhnwg8cJK/d6RPYhQ7hje5M7YNoVzpELdvZGq2P dqNDD0w97/Pqm8DudCDXbz8afB7tQQcWJX5/uQXakw7jG7f66cxEe9NB7rmE nRTrq8A+dFBrNrD7fAztS4eBWWtTxRXQ/nRQ/eAfMu9xr8ABRP/eqjljLAh9 kA5tCuU2s1aiA+ngPWQR/qnti8BHiPvbHbWJzEAH0cEzsezKdVt0MB2MppWU s6agQ+ng4uh4mMfrETiMDr0SH+9FHEKHE+0rFz7UqIWOoMO2xUpd4/WfBY6k g4Hd/tnUaHQUHQIVtFPSDNAxdDhUoJ/1cTY6lg4VMsyj/g+6BY4j+qOWxNDC EHQ8HWyPyYfmq6IT6BC596H9kvYujP90CLWNo27IRF+kw7L+8AfLNqBT6JB5 cpxU8LcT4z8dwiyPeRU+QafRoWxgKIvqi04n5qNrfkcHjdEZdFB4+D5HsfUT xn86aCxP+RCQhc6iw4nI7KrtW9DZdJih+CPo5xw0iQ4XVnVWmz3uwPhPB4ud Ry3nH0HTiPF46Zzz8XVoBh3+hKeMZXZ+xPhP3M/1Pb0RPDSHDk89Lz0P9UXz 6BC/x+GryyJ0Dh1a75i/v/2zHeM/HZ7fq0jeEou+Tcy/B6Qlp1qh8+mQMjYi lzEDfY8O1d12pjLJHzD+E/W1r9J/3Rx0IR30+xM8S6LaMP7TodD491Let/cY /4n2Sp8yrc8HXUqMlwmZJ/KvWjH+0+Fyvt9GCX90OR3YZpl7/GvfYfwn+oe4 Q4OtIbqKmN+SSh41ZLdg/KeD7seywPPr0DXEfMGf2/qm+C3Gf6K/7zJdOqqD rqfD1XfGvTueNmP8p0Pw/XcFKrPQjUR9zvPPWn/hDcZ/or/cnHWKroxupkOu PPu+3dkmjP9Ef/87x/vYFHQrMb7h5PtzZ19j/Cf670Jv8fjhRoz/dNjX/SvK ex+6g5g/p3XfqR1swPhPh8c/tpxzcER3E/1B9rNRozi6hw5rKoIrOh1eYfyn g82JaQ8ju15i/KdDZ81pzx1e6H46cLw9Yk631GP8p0Ocb/NM8yD0EFG+msym k/kvMP7TYRG/wDKlqA7jPx2ObL0WXVpVi/GfDn5NXL1ieg3Gfzq8kN+xeojz HOM/Haz1VobZxVZj/KfDydZnG++/e4bxnwFFCTHNiiVVGP8ZMLnsiuqysUqM /wzYQapc/PhuBcZ/Bqx6d/b0ffZTjP8MsN/eSDedipZmwHzjd8FVOU8w/jNg ffiJ2sqqMoz/DDD9YcFO/PkY4z8DJPIrT6xRRssxQEnyavD4jFKM/wzgK/M4 pJMlGP8Z8EFC6099QDHGfwa0z9/8c21QIcZ/Btj8Z/vOM6gA4z9Rvh8amhM7 72H8Z8DQlWqX0jv5GP8ZUF7OCCxuvo3xnwENEm1Wx7JzMf4z4P70gN6Hs3Iw /jMgZp525OB7NsZ/BtTm3/thMJOB8Z8B7j++GR89R8b4zwCjCzzPocAbGP8Z 4DGcrPR+4jLGfwbRHxgab1QTMf4T13+zc/K1pCiM/wwo289Vdyh3Mv8/GzLg TvsdsyOt0QIbMaDvKdP7oXSywCYMuOz33Pet/1WBTRkwRb2a/DHvhsBmDDj4 n8HlU24UgYEB3NgGjr4vQ+CNDHi022RqazZbYAsGnK2xnz64OEdgK6K9nJ+p mLJzBd7MAMewDfOdom8LbMOAhPrHltuN8gW2ZYBF8fs1yb/uCmzPgD3f/eR2 Pb8vsAMDdJO3eTVnPxDYiQFzuxdOHoorEtiZAT6OK3/Xqz4U2IUB22I574LX lgjsygCNSXqhxzRLBXZjQNX+siD5aY8FdieuZ7DU9p1GmcAeRH++m8u4+Brt yYBRvcr01Z+eCOzNgDoL6+piarnAPgzo33+peTTiqcC+DHgum8L661UhsD8D Ihq6cludKwUOYICbqXZivXqVwAcZABPi5o+UnwkcyIB1d4utB1+jjzDgVk/x md/V1QIHMcAkTZJblvpc4GAGnH+eFXzbrUbgUOL+ND94m8+pFTiMAWndkYvT teoEDmfA07pIMcUedAQDaId91PSYLwSOJM6/0fPkk2G9wFEMmJ1vvSzoCTqG AfOah5M3K70UOJYBTa3Jt5ZEouMY0B3JNZb6hI4n+vfesZJ9/q8ETmDASLJh y+cqdCIxX9yxb7bc0CDwRQa8f5GtlHkTncKAa98te81+o1MZUHF+g668b6PA acT97hDTetqMTmeAmPTphZPVXwucQYz/ByvFmenoTAa83hS8bt93dBYDZP9W nbfzaBI4myhPnbJMWR2aRNS/x6ZPvUZvBKYw4MCN6Pm5J9A0BnRNe2U1bWqz wAwGbPI9lTpzD5rFgEOr9hour0JziP63lMfM03srMI+YD6eU0v4mo3OI828o tG7vQucS/Xsrbcnd/S0C32bA9rcXxE2K0fkM+H7uSpOh+juB7zEgUjYyiH0c XcCAYiiuOfccXciAN8kXnN3MWgUuJuYT3i/NoHh0CQNujA1WDP1BlzJA67yK xfSD7wUuY4DUoJ+Ywl10OQMuuTwOGtRoE7iCAaTKhXcPRaKriPk1bpb6tc/o agak5++8lG32QeAaBvjP9M57RkHXEfNN4N2/xzvR9Qx4mxOgJqvTLvAroj9M 8grp80I3MmCpNHOVbAq6iQF71e8y/hahmxnE37PPnlD60S3E/BR+eWWVwkeB W4n5bCDch74F3Ub0D5WKG18D0O0McLC51vvjJrqDASEqDVWV1ehOIp4MPDTM /YnuJubfrbfiZizuELiHAUlr9zUscUX3MuCvzo1Rn/PobwzQs1+ypywf3c+A sRiJGc+a0YMMkP5r5XtY8pPAQwyotEw/ZWiIHibiZ9hBmrMH+hfRv84orOhK Q48w4Gjy3NneBehRBjwJnuld9Qk9zoDkHK2InBmdAk8wYJKJl8lZa7QYE9J2 211090WLM8HGdwvp0hW0BBMeRIjr3nuElmRCYmaUQ0A3WooJTn1KG+aodAks zYRtlpwXmZvQMkygeDmMrTiAnsmEFc+szlReQcsy4eros+AVD9FyTDgfdPXy pu9oeSZ474n1LJ3bLbACE1xvjo38NkErMiHhjaT1Mj+0EhNGwXrb/mS0MhN8 1TekhReiFzLh4uLahyu70KpMCOmfeWParM8CqzPBY3VwcOUatAYTGjpsyXre aE0mSLHgpsU5tBYTDuy5/bqUh9Zmwubb+o+XtKB1mPCqwZ2nP4HWZcLnhvP7 ivV6BNZjglU+Vb15B1qfCb8UmqwHjqMNmPDhY6X+CibakAmDEwl95MdoIyK/ O7UylV/RJkxIXXQsepXcF4z/TFD8InbYzxRtxoQlDcsk9DzQwASDVRt6zeLR G5kw3pT480kO2oIJjA9vKLof0FZEe+gP714p3ovxnwnZy7eptqihbZhwt/a9 9jYrtC0TuqYUB/44iLZnAstG/l9WGtqBaH8b07+jj9BOTAj//P3sqXdoZ6L+ NH7VyE39ivGfCfoLydprl6JdifP/cabut0O7MUEz/Amv7ijanQndu+q3ZWah PZgQoPGRff8R2pMJL52sM3w60d5E++32tuv7h/ZhwvwBT9JNnW8Y/5nwODJX dv52tD8TOFPCjgYcRgcQ5T01abNZAvogE3xKpbRmlKADmXDmatYs6iv0ESbI ThvpNBPvw/jPhJHv43sV1dDBxHjce9c4eiM6lAnrZ0Wotvihw4j7nR4/4JeE DmeCkYH+CRsGOoLIL1O+Uus5OpIJ7xxfzkjoQ0cxgf2oYfMkmX6M/0z4EWRt L6uPjiX6X+vVksUO6DgmmLQtG608ho5nQlN19dzkNHQCE5pDdi1py0cnMkHL YlPA9Ab0RSYYP/I7lzyITmFCX6VHxNsFAxj/mUB6Hlg1yRCdxoSbkjfFvXeh 05kwrXTEnnUcncGErcPqd21I6Mz/l944ciUXnUXUR574v/JP6GwmPB+J/k9u BE1iQknbYPjRWYMY/5lQFfB4z/RFaBoTxPTF3ntroRlM+E935bl569EsIv8Y nkK9NZrDBDn66nYzdzSPCV4PC01rfNA5TDhy3HJDWRg6lwn3QpJdXZLQt4ny rG04Zp6JzmfC/SclBTuY6HtM2BJceeriHXQBE7K+Hdv07zG6kJhvmXanyK/R xUR901WP/2lHlzDhS9n257sG0aXE/OlhNvvFX3QZE4IG/50hT/+O8Z8J4s2B X8uU0BVM6BH3XnV6GbqKCbR91otdDdHVxHwS3X3zuSW6hgkuWWXP1rmg64j4 4Dfbss0bXU+09+/Ee9+OoV8xwf23kmF9FLqRCZu+7gyfkohuYoLZQefM4uvo ZiZ0vLrQp81EtzBhjKzYzryNbmVC/LbYsluP0G1McKM+usF7hW5nwnCA196z 79AdxPUf1d9f2Y/uJOLbgv3iKSPobibMPHUru0Z8COM/Ey5Vz2t8Og/dywQd 0hh540L0N6L9m1V2duii+5lwyKXasM8YPUjcX9eGz24b0UNMmFOTrp++HT3M hIXzH562dUf/ItpjbeKsWwHoESYUJn9j7AhDjzLBds/zB+fOoMeJ8Tynrlsr GT1B1GdxkkLldbQYC6hNXY3H2GhxFjyiLNWZuIOWYMEzDdfJyqVoSRbUnZ/+ m/MCTQTDZU7vo0ab0dIsiFdetCepAy3DgtWpVncm9aNnssDU5cecyHG0LAsO XlzWUjTtB8Z/FsjPC75zUg4tz4ILK2MNFi9CK7DgjVLPUfPlaEUWbFt6K/m2 IVqJBdI33qWs3YhWZkG443nvdVvRC1nA1i5vrNmFVmWB2dVKla69aHXifmJW 3dh4EK3Bgr3KNq6Gx9GaLDCpfj7V5SxaiwUczYmW6EtobRbwz25dLpuB1mGB pe3Y6890tC4L0umT7g1z0HosqLKvF58oQOuz4G2Y/bY7j9EGLLCjnbBm1KAN WaByLKTs+Wu0EQtekA7XTWtHm7Dgnu2kUO9vaFMW7L+a7/PpN9qMBRefSe9f O2kY4z8LArt9/1ZMRW9kwUKtEt39s9EWLGjcZ33NfBHaigUnM5v1/LTQm1nw p2KyfPoqtA0L0tRGljSuQ9uywF55ntRMc7Q9C/yXZ078tkU7sOCsZKbBkZ1o J+KPKymJdy570M5Efdfzv0n4ol1YMKPz2vTIY2hXFvwNWdvrcBLtxgJlf+eB yjNodxZ0NR5h519Ae7CA1XL1+7FUtCcL5MKf/v51He1NuH4sdoKO9iH6g9Tv YAoX7cuCPUFxtw/dRfuzIObwNrWmh+gAFliN3Sy5UoU+yIJ9+U9dXF6gA1nQ fixJZ1Yz+ggLOtzuH5/xER3EAqkeVdtlvehgor9snsdwH0CHEuVfvyzH5Tc6 jAXuJXUjuv/Q4SyQbFu19OG0nxj/ifb5Sz1rIouOZEF08BKKmQI6igU6OSvm ctTQMSzQWva9/JMmOpYF3f2pa4qXo+NYkBmcLn93DTqeBQVTHE7amaITWFCt nNh5zQKdyAJFKx3xDlv0RRY013aH3HZEp7Ag9VhXd+QudCoLCiVtots80Gks UHCMf+Pvg05ngVGJs3vsIXQGC3IOtJo/DkNnsuBdj+vO4XB0FgtapLQ/fjmN zmbBcmnTqcnxaBIxn72oWF99EU1hQVi8z6GHV9E0FoRqda4ez0IzWDBnEvWk NAnNYkFIsdULIzaaw4LZOacy5/LRPBb0frWRLs5F5xDz067rq3j30bkskPCT Grz5BH2bBby1pOaLT9H5LFCbrKP+thp9jwUlOy0e6b9AFxD9bULvdUoDupAY n/JRl0Za0MVE/yrdUrr6I7qEBb7b1urd6UGXsuCy+PnS773oMhaQy3du2DOE Lifau+M3V+w3uoIFP/K6v9waRVcRXmqnrjSBrmZBv9P673sm/cL4z4LFYec6 adPQdSzYoLS10WgWup4Fq3wNNw4ooF8R5YsxS41WQjcS/V9e/XC9MrqJKO+c qz0bFqGbiXgVfn2vpBa6hWjvOPsIJ210Kwvm7rO9vk8X3caC916rjtutRrcT 4ynHPn6WIbqDBSnsO1/eG6M7WfB8fvPJ9SbobiL/FZIRjzaie4j53fTCvjxL dC8Lzn/oWeJkjf7Ggq1i7y+a26D7WXDiauPSPCf0IAtuLBnyCBR6iJiPnanD LbvQwyyICP/TPO6K/kXk9+bz/gce6BEWOMosl2Z7o0eJeJRYsclpL3qcON9a 4XZ4AHqCBX4p7h6pB9BibHhwTmYF5zBanA3rtj7oOn0ULcEGHwmxJ29C0ZJs UOuNPzlxHC3Fhvued1+7nURLs2Gg0KhWIwItw4bpV95stI9Cz2SD48iW48wz aFk2sA5EOyucR8ux4aGS6526s2h5NvSpvMqdGY9WYMPycvcPmxPRimzQXDdt eV8yWokNJ/I2/bkrtDIbqs8WXVyZgl7IhmfnuSWqqWhVNuTf2ccLuIxWZ8PK DZ/O3b+C1mBD3Oj09S6ZaE02WP5b6nhGaC02qKyfTSUJrc2Gtldrw/yvo3XY 4NY1r/5HNlqXDSE6fxbIkNB6bFhmsv3bdjJanw2vch4WLRbagA2/LXVqvWho QzYccdx75bbQRmyIn3g896bQJmxo75JzbRfalA1N1gNfbjHRZmzITJhin81A AxuUG3ZtD2ajN7KB7+RypoKDtmDD1rK1e4uEtmJDQUMyb43Qm9ngH51rU5uD tmHD0xerDljz0bZscNnZ2th3C23PhpS5KuvzhOkObEglv3hjIkx3YsOZjAWz snhoZ6I/tp1dWMtFuxD9sThyTanQrmzoT9x87ZjwfDc2LJa42OouzN+dDV5G SRXZQnuwITx6Taq+0J5E+3v+fnxEmJ83G65Rt6z7Iby+DxtiTh2/2iwsry8b dm+bfWSZ8Hx/NsyaavedJzw/gA3OE/o2C4T1eZAN7qrpOUeF9R/IBkWbj7Qy FvoIG1aX1H5IE6YHscEm/PebDmF6MBuMh1/eSBC2VygbpB67pj4U9p8woj/w mRdyKOhwNvgqP4n///tPBBum+h63nC7sf5FsSC6w/fNVeH4UGzquvnwbKOyv McR4eeCm8kHoWGJ8Bc7rol9DxxHHR5kpsIWOZ0PZ0SUHg9PRCWxQZdv9fiUc T4ls6D7T2P4kDX2RDTqjq84xhOMxhQ3ky09Gai+gU9nQWP2deSQJncaGruuz DHfGodPZUOm6dXGCcH7IYAOts8l9gzA9kw2nfczfM4TzSxYb7K98brU+jc5m w6d+RXKL0CQ2bFu0L/VsOJrCho2UfSabhfMbjQ0378SHmp9AM9igm6s1tTMI zWLDridrHXYdQXPYoG/0aM2pQDSPDRfUxTz3+aNziPtpp5bN80PnsuHsv5+/ lviib7Oh2blYqlQ4f+cT/Y0z45i9G/oeMZ86tb75vRtdwIZ9pzyXnd2BLmTD 0NANlzU70cXE+Jxp02dliy4h+s8i91dyduhSNjCnkv0ebUGXsaFkYd22kA3o cjaYM496925CV7DB9Knsv4Nm6Co2PMob4DoZoavZ8GeR/LPl+sL4z4bJ/BWV 2wyE8Z+YD3uulMetEMZ/NjQELrEZF8bvV2zYM/VSmZuGMP4T/dcr5k+mmjD+ s+Hu3zXGqguE8Z8Ntoqm6yTnC+M/Gx43vk1ZN1sY/9mwyamI3iMrjP9s+DnH a2m7lDD+s8F1m92RpZOF8Z8NM6qi45jiwvjPhqVt3ZJHRvDvm26iftmLIhcK /z7qIfJXc158YhDdS8SLR+c2ln5Ff2PDbNLsTPsudD8b1m60yS9sRw8S/atO /65/M3qIDdEGlQUuQg+zwc/r+K5rL9G/2ODRUXr2aAV6hA01T2Yb0ivRo2yQ VpzsmF2KHmfDFr16l30P0BNsyL7yfJFtPlqMAwXU7ydO5KDFOdBZ3ze5nYGW 4MC8A/KB94R/70pywKvTco5xBlqKA1vd68yL0tHSHFC9QMn6lISW4cCM73eO Bwo9kwPvr9U43YlGy3Jg44+J6XeFf7/LccB55c5LPcfQ8hzIWPpYd/9htAIH FqvXXE/wRyty4Ey5jjTVE63EgdKm0UvKu9HKHFAeWJJ8Rvi8sZC4/oPmTlPh 84gqB6LKZE/kWqLVOXBlbcIhdzO0Bgeo7+eJFa5Fa3LAx/WixEx9tBYHDDOd 31toobU5YLT0XcjFRWgdIv97WxPaldG6HCh5Irb65Ry0HgfKaz7W6s1A63Mg adYYmEigDThw6kkbgzaOz3eGHNB/fzB6x0+0EeHUXoWP39AmhCnPJb53oU05 8O9erK1UG9qMA991NLn7Xwuf/znAHIiZeFkjfP7nwMqnX3fOfSx8/ueAZ8RB k/JC4fM/ByiPTZftyxc+/3PgidXqwjTh87ENB25Vaj0PJwuf/zmga6d3TSFL +PzPgbR1soqxl4TP/xw4HvuZuu2c8PmfA3P0wntORAmf/zmgww3UfSJ83nfh gLq51ErHI8Lnfw7kODLqScL3A24cmBwuu/mHm/D5nwN/O64nPHMWPv9zIEty yrYAe+HzPwfePSraSV0vfP7nwJfkncsPrBE+/3PAKsmye5mu8PmfA+x/czwf qgmf/zlg5jtoFCB8PxLAgZDsx2ts5gqf/4nxUHlw+Nc04fM/B6bVTL5D+4fv Y45w4GZmzdtY4fuZIA5I/7KLXdaPDuZAhf0mi5w2dCgH4r3Yxieb0GEcOOvb eeznC3Q4B9rOZ9LrnqIjOLBgQcbTPuH7pUgO6IVVDuy9hY4i+nP49KBOGjqG A4e1fRIibqBjOeAr2xUnfxEdx4E9H6013ITvv+I5YJDHeRcZiU4g6ndVvwcr CJ3IgeeR5+XeeaMvcoDzwvD7mT3oFA4o7SlKYjiiUzlAC1DMK7REp3Hgz3q7 lfnG6HQOqF08cWClATqDaJ+K7gCKOjqTA4p39U63zkdnccCiV7Z89nR0Ngdm rRyfGSyOJnEg87Tki9XC95EUon0qjyiNCt9X0jgQNtN21PgTmsGBH1/VZFya 0CxiPC1JfKLyDM0h6id7x0Xph2geB+zc5x+LFr5PzeHA2+ZhxRwaOpcD1s4t yblZ6Nsc+Lkgfm93AjqfKH/rp32KZ9H3OKB9c0H73lB0AQceHUjee1T4PriQ A6ll08OP/4cuJsbznkMyEtvQJcR4sisz+2mNLuXA3OlHY+yE76PLOOAQ+3R4 SA9dzoHTKspxW1TRFRywyf+hpjgHXcWBvj/DjSxJdDUxH+bmtxSOCt//c6BX PnW1t/B9eh0HPDYvdUr6KHz/zwGFG0yrskbh+3+i/eZ7OdyvFL7/5wD9qgf3 RaHw/T8H9n1SkffhCd//cyBG6+eZWzeE7/+J+eO+pWl3ivD9PwfyKe/flp8R vv/nQIBeZBE5VPj+nwOW8c9S1f2F7/+J9tl9c3P/buH7fyL+TE4+9sle+P6f A79ox/jzLNA9HNjGLG1J1Ef3cqBnexnlhgb6G9F/3JqndM1F9xPtW2cz+kIK PUjEz0GJsJ5x/P4yxIFVvKv1P4TfZ4aJ+1mTvPfFR/QvYvz38ww6XqJHOBDx PWSry1P0KBE/Z3W82HgXPc6B0J2bKtJY6AkOrBdbubItAy3GhdEcP6P98Whx Luw9dCFvvfD7lAQXrjrPXC0RiJbkwr9yJ83//kNLcWFNvZKYhR1amgvJ54y4 FYCW4cKOEdZA9yr0TC54X1068kAVLcuFXYNTpw7Ko+W4MJLut/zBZLQ8F1wn npYf7sfvdQpc+Lx/a1zUE7QiF95u2H6t/xZaiQvbf/5d/CgWrcyFtQGy/6hB 6IVceHeUz/pmi1blwpK8PlMLY7Q6F6YsvqRQpIjW4EKB3PPEa9/xe6UmF4rd dyaG1aG1uNDi42i6Ow+tzYU90e3VqcloHS6IfQ2v+3YIrcuFOw4vNhwVfk/V I/I30TZ7qInW50K2bMBCxzloAy78Lewg3fmE32sNuXBKOaCqox5txIWagtUJ DA7ahGgfi58/+1LRplyIO9rapHgQbUZcX/tKBc0SDVw4x0nbr7oMvZELWmYm 7JopaAsucOfV7U3qwu/VVlwIyGptfFKE3syFOt4p1VIa2oYLFZaLBp5FoW25 cNHtqvo9T7Q9F6grPkdpm6AduDB39adfs1TQTlxIlTv7Yv4Ifn935kKh5Irc 3tfC7/9cqNydIlGcK/z+z4XJ6pduTU8Qfv/nQkLRfv/f+4Xf/4n2vQPhZlbC 7/9csBHPF/dXFH7/58L6MoneRgnh938ujO2dfHLNR1x/4EPU51eTpW6laF8u 7Jx/d6QoA+1P9MflRx/aH0UHcMHunN7jEmv0QS6odajJztRCB3JhXtDuai1p 9BEuHHogLze9HddXBBHtuZiizS5ABxP9RzH34OVr6FAuUHJmX/M5gg7jgiN3 8PWybehwLti7L5PwX4SO4MLDP7eqyX9xfUgkF15W6TXEvEFHcUHj0Fr94AJ0 DBcuKJNCZlxCx3LBSl3lsJ4vOo4LKsMqDeKW6HgugLLM1hFtdAIxnt/nyB/+ jetdErlAO2i73eMl+iIXNH9vX6bORqcQ/U9tfsuiGHQqF4p2NHT27kSnEfNB z931q83Q6VwIVJE9vUMOnUGUL2SWa8s3XM+TyQVLv/4C8WJ0FhfUk8zb86+j s7mgcPLXg+9haBIXTHYHWl43R1OI/pDqczFMDU0j+p93hlPAT1yPxOBC57Cr 8bxXaBbRX7euVH3ARXOI/t0utc0iFs0j2j8zZFKKMzqHC+WTK5mLddG5XJCb Q9kgNhN9m7ifSK2tcR9wfVU+F3wlI+O+FKDvceF4YNnci+fRBVzQKV39aE8A upALrY1KX5+sRRdz4Wks1ztPHl1CzJcKt+bf/Yzrw0q5YGFBp0+UoMu4MHWB UbjvdXQ5Fwx6Ex5fDURXEOd/MjWWNUZXEfPF/MDXrbPR1UT8+J397HIPrm+r 4YJPrYqeQjm6jgvM7Q2cliR0PdEerHtfVvuhX3Hh2ru11TMM0I1c6GUkNloo oJu44FwfJcX9hOvxmon4NMW8LLES3cKF8XWVpseThev/uHB3WMvuspdw/R/R n1zzju+yFK7/40JXbe6zQ9LC9X9c4FTKOZ3qw/WEnVxwcTjZz7+L7uaCjIzV 213n0D1E/+CeY/S5oXu5sHzquownmuhvXPgTLQbOUuh+LryKVT7PYuH6x0Eu fDk+PvPuLvQQF2Lfmvs5/sX1lMNcKMv54n8gF/2LC57Ll9YP7ECPcOGTzL+9 jAFcrznKhaTz5l0HzqHHudD0U7ncWh89wQV605WllK+4/lOMB3unREurnUCL 8+Dy3h9mtbpoCR5MOWydoPYI15dK8mBWy5WcbRFoKR6suV/f6yGJlubB+h9+ cwLu4vpVGR4oXte+LLcGPZMHjyc2HKd/xfWvsjxoIVOlNK+h5Xiw64wWeakF Wp4HLnOcNaNacX2tAg90p9SuKkpEK/KANW3J88PT0Eo82MRWIy/OwfW7yjww jhkeeWCDXsiDlUuCi6N+NmH858FZ64XKv2lodR4U7tde0rsKrcGD53q66kXV uJ5Ykwf/TUv8FhCI1uJBz43t8s8l0do8cPSc9OctH9cr6/DgM2nDbqY5WpcH ewYyltz4iuud9XhwY5uXX3YUWp8H/hHXZ/PWoA14sK3XX1PhPq6nNuTBH0Zq 1zcvtBEPhoqjSVGT0CZEfYcOjkyi4/psUx5cc2AeubIWbcaDrkxadcEHXO8N PDjlc1Lu6RH0Rh5IhQwO+cxDW/DgTtlu2vdAXD9uxYOjS+ctMAjF9eWbeRAi 1duWcRvXo9vw4N/n6i1ZX3G9ui1xP9OnX2Kqou158Oz5U79Twbi+3YGo/78h ycfScf27Ew8ibx0erS7E9fHOPEhJMR81GMD19C48aHyfQHFYjnblgQR7zfSV 9rj+3o2o75Tw8PMXcX2+Ow/mSAyfJD/E9fsePHCfqLFI+4Hr+z158OnL+Mpi HbQ3D5ySlijaOeF+AB8eVFd5hilcw/0Cvjx4p7Jwpnkc7i/wJ/rv5mrZun7c fxDAgxnWDM6KykcY/3nQWnC+ZdpK3K8QyINccx/fjnPFGP95cCQ186OKLO53 CCL6H//QJSfA/RDBPNDiv/sTuBX3S4TyYJrsR8m4ftxPEcaDtO8X/ZRdcb9F ONH/502bMXgC92NE8MC0Z/OUjCHcrxHJgwMFdi1b5XE/RxQxXsXtnvsPcjD+ 8yBpbOLKMmcmxn8ehF6hpZ7+S8X4zwPav5fGi9JJGP95cGl1u6ab0nWM/zz4 ZaV2u7UpDeM/cf/5Y67Rthcw/vNA9XAYZ87RYIz/xP3f3r4hXGLXo/9zKg+Y 7mL9J85FC5zGg+vr5xxLl7oocDoxvgzGw24VpAucwYOxP1UV6xbi/ppMHniL HVLIeIX7b7J4cDromtnSO3SBs3lQcvfa0cO/WQKTeJB/WlqxsIUnMIWoryXX tdlJuN+HRsxvUU1Vb+rzBGbwINNr27vSiTsCs3iwc6ZZ2PAQ7ifi8MD1qv2y XsX7AvN4ANm1y3/fxP1IOTx4oL7tVs8m3K+UywMxtdAEj124n+k2D97Siz40 O+B+p3xifO3qz7/07ZHA94j+FFO57qAq7pcq4EHDv8vmTyLRhcT97p/S/iQa 91sVE/OfpXXGuhu4H6uEKP9vudAPJ8sFLuUBZ3HgKN0V92+VEePLw0r9y27c 71XOA/FK7eNTZXE/WAUP2lvb80Im4X6xKh7wcj/aFGvjfrJqHmRkzYCl39E1 PNAoDLQT68D9Z3U8OGguMz/6G+5PqyfG55mAiU3luH/tFQ+ir2RXnCnF/W2N xHzQqaLedxr3vzXxQJ8Ur8gOxv1xzcR4C9xTq6qH++daiPbTn9X3oBzdSrSv +2OPQEPcf9fGgwvZn7b2UdDtPOCeerV1wuSVwB086Nh+U/04Hd1JzP/LW+x+ Txbu/yPyP/Wso+SYcP8fD5pnfBBb9RPdywP6Kcr9GzG4n/AbMf8GJ6wqnIP7 D/uJ+YSiPs4/iR4k5vfo9SFfJuF+xSEeBG9Taax2RA/zYMmZNIOEb+hfPIiN Nxh8eQ73P47wYLlHlvnjr+hRon5YLy8Ee+H+yXEeHG5YteLVAHqCB8k2Sz59 +A/3X4rxwdrMLk/mNVqcD56ScROhK3D/pgQfdngGrzR/gpbkA33/GN/cAvd/ SvHhYAPn0MbPaGk+pO4KTfA0xv2jMnz4TN3/n2kOeiYffNf2JkVuwf2nsnyw X+8k5pyHluPD06lWf8W34f5VeT6UH1i24HoTWoEPMbJQU22B+10V+XAib8B4 RgVaiQ8PX3e6By/C/bLKfHDxfrEqaj96IR+Kf50m/85Cq/LhlEPG2voetDof mKY7lXiGuF9Xgw9dRjuKKgPRmnwwpd43YtLQWnyQX/UrR60Lrc2HUMMbgaeU cb+wDh9GdSf9zHRD6/JhztcOeRILrceHfa6zrsSOofX5YFexx5G9AvcnG/BB brigweEQ2pAPrwfMnq0hoY344OQm/ZveiTbhA2PrvbLLG3B/tCkfunXMNW8H o834MPP26fmNd9HABw/DC4b0f+iNfFBJcoo4sBb3Z1vw4eWLRc0xF9FWfHhV I9nkW4LezActteWn3Cbj/m8bPriJhy1esQFty4eCjopni6LR9sT96FWX/a1F OxDpz47fmr8Y95s78eFZ6X9Fq+zRzsT1a0P2bU5Du/BByiRvQ1Yf2pUP4gVF y1pm4353Nz6UhSlNG/BCu/Oh9lDGrbwctAcfBp6y+Jtb0J580HmmULjbEvfX e/Ph9FK/5OzDaB8+1C0eIAU9QvvyQcnHStVlDO1P9B/fE0Yu5sL9/3z4UP04 1j5JuP+fSP/QsTSgWrj/nw9pL1eMMofRR/gwOLbUUdIPf08giA9F8yY9r6Gj g/kQ1qPZ/2oEHcqHkv2QnaCHv1cQRuR/4Khy5zF0OB8mfB+H++SjI4jxZvmf ca8s/j5CJNHfHs+QmbQZHcUHh007G29fQcfwgb34jpZyCzqW6F928lI0Nfw9 hjg+8A4oLMrwQscT41PpuMOeBHQCMZ55s+9KDaIT+XDm6n8/Q8zw9yAu8qHB yaFU2gudQrT38dNNTXXoVD48njHhcmoa/t5EGh+u1f47PbYCnc4HUmlDUq4N OoMoj8lj3ocgdCYfKlcY7GtLR2fxwXm0SIpchM7mQ+7UFVudOtAkYj7YUzXp ziiawod22ZPDh1bh72vQiPY4HJzWZYtmEONngXz5f8Lf52DxwVHzc418BppD 9K+ZMwLHStE8ory08xNSregcIn/ju8afx9C5fPjVOfesnOoQxn8+VOyWY961 R+cT9Ul59HN9EPoeH9JzdudLXkUX8EHT+smjayXoQj6Y/H9d3Wk0Vt/bB3Dp VyEaVDQgCUmlNBHKRXOaSJpDaRRCaaRZg1QkKpoHDZyzT0kThQpJaUBSSZKh REWDkp69Vt97Pet/Xn7WHu599tnDud9c14Kh3ba9hpPiyahDp7O3/kO8k1u8 f+0omxIjOCWeTj0tSfsyGk7j60Fl+ovCAPguP08fuJ+YfQJOjye1/VamyTfg zHiatSLUM6sSzoqn2+0XdknXQPyW7Hj6c94yfrE5/IiPzy7P+/N0+HE8Rfeu tx63EX7K1+/xuYHzj8C5fLwVCwPeP4bz42nT4dfdZpTDBfGUeLxxypuuiE9T yOfLWa1nwAj4VTw9Fj5lLHSFi+Jpq+j44VswXBxPQWEHv/pehEviabhhdcyk Z3Apr/9n3pRvjXAZf57Wt7x8DRFvpyKeVPOyvviPgD/E097IP63beMJV/Pzu k+G4MBSujqei57rrMpMU8X/4+3dr4VD3VhH/J57+1j1c+FwD8YLq+HiUmr+9 Mgj+Hk/PAwTD/AXwz3jqmnGizZ1N8C8+vykhJcYi3MDPL81j9otuwo3xdNre vIOeGuIdKQlkeady/nddWFmgL84nXZZbwP8JdHitR/f2q+DmAn074/TZPhJW EWhcylVPu8uwmkCfctMPXiyH1QVaFfI2c01TxG9qJdCHisE5TgPhNgKVN+yo rnCANQVqmm1dPCUUbi+Q59LYinYirCVQeGzNzNKncEeBfK+kLm6jhHhTnQUq W1z2O00f1uH1T43R8LWD9QSq7Z5aa7cW1hdIv/Hgn+oo2ECgS9eevPmUBRsK 5E7+Xr+/wcYCtTyqLYqdED/LRCDtlfNb5djApgIFxmh+MJkG9xaou3JF5osd sJlAL7V9Xi8S4H4Cba50bJhQBPcXaMur3CwrXcT/GijQ7DKn0vc94cEC/dGa Ed11JmwpkIGOcZHnWtiKv8/clA+vzsM2Ar12bqFS/ggeJlBR4SHJrQ4mgRLu Hz5q2Q7xzOwFcrEse1SgiHc2gpdnW09J9oFHCVTq2c3aNRYew+dz67nAKc/g cQKlBNuWK1XB4/n7u3u6pHdXxGObKNBgrYNtNg6BJwu0v3DK3LjZsJNA22uf VNfshJ0FGm3xii7ehV0E2lftYJBQCU8XaNmX86rb2iN+3EyBLi/e92aBEzyb z8cLP0FzFTxXINtD959YnoTdBOq9MPzm2nR4nkCPP4X4vPoEewg0N1K39Ggb xLtbKFDiicSbggm8WKD1h9cpH+sHLxXoiMHWZ+Pt4WUCPf/q9cDIA/YWKLvS 2L3pCni5QJtOhg4dsQv2E6jFI8Fo6QFF/D8+/53XCpNuK+L/8edzdrbq9VAR /0+g5NDAloeLFfH/BOq5oqSm5Lsi/p9A75uUWC9XQ3zBIIHGn+vx53I3eCPf P45JqpP7wpsFOtP74aVMRfzCrQKNXdxmyDxPOJi//1+OPnab4B18v7ibXQ3e A+8SqP1RsdE1Bt4tUISXy5+B1+E9/PmclKxIEW9xHx+vlUfwixI4XKCM80dq 1RrhCIFC+9gP7dgO8RwjBbJXGTRnpyLe40GBriZ0CGpqAx8WqLJW/+mzqXAM X1+TFq367Qkf5c8f0MkmLQg+LpDddev65ZHwSYEqtq28pXMaPs33V9vjR/rf hs8KFNkQIhbnwucEStUJmdz0C3yB93ep8r62CuJjxgnk0WpExYsOsCBQ/oZ+ gQfMYCbQqZhrpbUT4Et8f+RE/Jk4C04QqHhTmdbxxXAin08qiNy7Hb4m0Mi1 w+uzz8E3BHp4L6vfhWtwkkAdi3Kae+bAtwRy1hTMRpXDKfw8Pjl5TYgivmia QG0T2xXs7Yb4o3cFCukY1krJFE4XaJfGiUOeivilmQLNn/dky6CpcJZAQ79r /cp0h7MFcnV1i/UNgR8J5Deizrc0Fn7M75NHEwwLb8BPBRpCpW1S7sG5Ault +5jUowTO5/vRsejA4t9wAd//O03rdndEPNdCgWqeu6k36wG/4vtnUknBDHu4 SKA0f7WdVY5wsUBr3+i6//WESwSqC8kM1dsMlwqk6bq51Y+jcJlA9QNSCzPj 4AqBxLYm+jOfwh8Emp6pMlDpI1wl0NRsWyPtcrhaoB2uyfMDtZr/82eBzvmW DLnZCf4q0B2906vaWMJ1fP02vh61eir8nc/vO5Mnh5fDP/n6tHx1oXAN/Ivv B1//0pX74QZ+HodUDFt5EW4UaEChwamSPFhJpLkHLre6lg8ri9SY8ya1+1/4 P5FW5bH2AVqIN9xcpC8V04P29oRVRIqek+plYA+riaQXtePHRWdYXSTdWYkq 2xfBrUTaMTMuJG433EakUs2vk3ROwpoiDXj8a9/Di3B7kT63Lb106AGsJVJJ vYW30Ru4o0gqGj9mqH2GO4skLOl4dZwa4jXriHR6pauhen9YT6Qp3YyaPbGD 9UWKXTlq+r7xsIFIm19fW5q8ATYU6Yi/sofDHthYpI1ud29anIZN+POaTVNb kAqbinS32/ib957BvUX6m5vRtKASNhPpj39MpWFTxLfuJ9L+9AtDNYzh/iIt i4m44j0GHijSs/XxvVqNgweLdLVtJnvjBluKlLRtdNylENhKpKlH7vyoj4Jt RFoebdxaugAPE2l7syTR4ClM/H228R9wuRS2F+l2t4tRrRvhESIFHBDbRrZE vPBRIrG6cWH3h8JjRHKx2D7n1CB4nEg55a8f5LrB40Va+6jV1O7r4YkirUxd Yly5G54sUljmrUtTBdhJpKwZs4OSr8HOIvVpWTSlZwnsIlLa1msJYTXwdJG+ t8iZe1cd8dVniuRxcmiBbx94tkjqb7Y6/7GA54rkHzJtWM4M2I27RXlD4hp4 nkj/hRW82rwV9hDpp4lzfJOz8EK+Hu712zwxHV4sUrukEtP8EnipSHNqe/W5 VwovE+lyysdeweqIR+8tUtyy0QdjdeHlIq3P3/S30Ab2E2mPkoV+ox28gs/f 13hfF084gLdf3jlZNxReLZJjZUjdBEX8/LUiRWn2qMpIgteLlOlZ/tXlHhwk 0tazu1dWFcIbRfrRNGVFTEtF/H+Rwos80nRbK+L/i2Snu/Buibki/r9IEa6x thZjFPH/+fp82r/wka8i/r9ILQ6ax708Be8WyevXkVvOl+E9IvW6ENlFvAHv 48+frnngfBYcLpLV81i3td/hCJFsdu0NdlBGvoNIkd6T1/q/uvBBkZz8kgIq BsKHRdq7TWfPhKFwjEjXB1qXJ82Gj4pkeCw20jcCPi5ShfcSzQGn4JMine8U v0b3KnxapKpFa7L1s+GzIm0LH72+uhQ+J1JwUcPK/Yp8EBdESt6/weiMHvJF xIm0bn/AyRJrWBDp7Y5m0TGzYSbSYjGj2mstfEkkg7f5Tc5uhxP4+q1d6jIv Dk4UqWWtilpjBnyN9xc/av3M1/ANvv5nmFg718FJIuV3fW/fVhP5M26JZLL6 6Vv1DnCKSNoeZapVZnCaSGvytarLTeG7IvX4al32zg5OF2m38fN0xylwJt+v WxYuvDgZzuLzVXDBPHYOnC1SkyHnc4RV8CM+3oPre83eCD/mz5/qsvdWOPxU pOfZ/TuEx8C5/Py0iVHSuQ7ni9TXu7XrLgEu4Odb1eq7/W/BhXz9jJJSjufD r0SKV//YPeElXMTLE3NXtK+Di0W6v1xzuJcy8q2UiGQ9bXungJZwqUjNqwJW aLeFy0TSuFe9e7EeXCGS6YCsln37wx/4+3v0oO8BW7iKj1dLz1xlDFzN53vE cvcDjvBnfv9NVtF4twD+KtLBvKpfH/3hOn4/f3tf8Xg9/F0kW4fElJSD8E+R XJV2uoyKgX+JtGjZkCkBZ+AGkfr1fHUjUZEPp5GP/+8a/aLLsBKj7J1ayWn3 4SaMrOe3+b6+HFZmNOzjlx77v8NNGZV7+2VO6KjID8To7vzSTtFqcDNGn1f/ OZrRSZEviNH7MvW0rWZwC0Zi7rXIneaK/EGMnM2V1mUMhVUZBWxpEHwmKvIJ MVqaoDpr5xK4JaPdcfNcShT5iNQZufTMiI5dBmswsp+UnfDDX5FviFG+T/Nj 7aPg1oxmXB+fuu+iIv8Qo58hNZrKN+G2jGJ+jn1cG6/IR8Trzw5+4J8Ht2P0 YF3u6L4v4PaM5tWP1rZR5GPqwCjFPvxHTAWsxeiXw4/e6U2Qz0mbUXPTZltr W8MdGekoU6VjD7gToxMXFr+vGwp3ZpSW1Pt3mQPchZGuhadL0CRYh9GLIVWT PrjAuowOn/QPHrcc1mO08eWQmRM3wl0Z+fY88LnDXlifkVn5fxu9wuBujGJr fjb0j4INGB1/euZ56B24O7fnfh/vRNiQkYNlvv7pJ7AR77/i50SN17AxX1/L V8zWqYF7MJqbFVD64QtswmhPpmWf4XVwT0YvvzjUG2sh/5cpozvpUQfmmsK9 GGk0CJZhA+HejIJeBdkdnQD3YXTNvk+m6jjYjFFp//Il72fCfRmNrHY2KJgN 92OU+7pv4a4g2JzRbJVSq9u74f6MqDhgoP4OeACjBmNrvUciPJCR7fwlxUY3 4EGMRtxqWPwyGR7M34fnggFdcmELPt+7L3RI/wFb8vFq1Kca1MNDGHU3q+o2 oQ62YhQ4b4+3hwryv1kzOvkz6kKJDmzDy0cUmR4yhIcyOsAmes3oCQ/j+2Ve xmsHd9iWkaZLyhyXyTAxOt1ujmb1MtiO0dC8AeUjvGB7Rublx2qb+MLDGSX1 9PRoeQAewfezyY2ui8LhkYxU71yO/XEUHsUofv+t6aqKfHujGSlN/usYfxMe w2jN9OFjrzyHxzKyu1UcvrcWHsdojLt/gf4H2IHRWPHwlVd/4PF8fwx9q5yj gXyAExgZv/5T62ICT2QUXuw2sWwwPInR0zEvPocNgycz+m9+/3PldrAjo+vd tyd2nwc7Mfo0svKZgwc8hVG/RUtL+qyAnRktOfT6tlYYPJXRINVPEWPjYBf+ frwbQyeI8DRGbslu8/Zfh6fz8QUvWrUoD57B30+73q9r78AzGY2+bKui+xie xc+Hfq0OD/kFz2Z0o+W00Jz2yP84h5Gl6uPjER3guXw+3LyCunaFXfl5+mxV y0/GivyXjIyiZpr62cPu/Hk1enRcO0qRD5NR241GFTQOns9oVPZDyddLkR+T 0UyX1hMHRsMLGA1fu7HEOECRL5PRqsh7O21PwosYVf+qVX57TZE/U+YljBYf DDecnqrIp8nPkxVN73yrgD35ermoPHpJc+TzXMbP+wOtPhR+QLkX30+T28yz aoJyb74fcoIF7U6wD6POl7YPvqcNL2fUosfa1v3MYV9+v41Y7WjhAfvx/RZh syXOGfZn1OR4go7LdngFo+l5t3T3boZXMnriXFjw8RAcwOffd5VVrwB4FaOI 2nzPa6fg1fx+qJ++fsIReA0/D42Uzzx6Aq9lNK31/iq3PHgdv3+WRNb8LoHX 8/Px1xnHdcqd/jmQkc/k/JK6GpQH8fN6knZuVXuUb2D/mz92I6Op9V/ehnaF N7H/zSe7ma/f+8Oez3WCtzB6bWZyYtAueCuj2yPDnjf4wNsYraw655y8Hw7m 62mHmtGVTfB2Rom33tpkHIN3MLr3qon+xkPwTkaD0zvU/boA72L0MLjxXF42 HMLo6PGgw1QM7+bn5c8TF5xq4FB+fnxueJqviny9exiFZAUtcFOD9/L30St8 uJsJvI/Pb3ajZ+MYOIyf/+qZh3r0g8P5/Nkbdv7UB97P1/dL2019nOAIRlWf 9u7z9IEPMApWsXCcshiO5Otl4RqNJtvgKEaOrbJGmQTCBxkJia5zvAT4ED9f 3qWWxebBhxldlVYYb30HRzNSvqOmFfYFjmH0bPzgcUG9kb/5CL/fvGf4/PyO 8qP8+8vSIfhGV5Qf4/u95d5rv5rBxxkVd3wQZN8KPsGodonHpIyR8ElGUaNu /BzrBJ/iz2Pn03q8F3ya37964uKBc+EzjJrNP+TwZxF8ln9/lLhH2O2AYxkd qjAao70PPsff7+fI+ovtkA/7PKNO/WcZmMSi/AK/b8zfb151E77IaEifhcpW qXAco1sOwyobVdA+ntFZk/ZW3hqwwOibk3rXK99QX2TUeHPZvj26KGeMdo7L /Rs2EZb4eZFR2XHjIvgSo25xbTbcsIEv8/sof+SSYFs4gX8fXyk2/zgLvsLn 0/BM1NKlcCJfz4sHUIkIX+X7zYH6G6+Cr/HzpbrXMHYBvs6o5O34m0V34BuM Pv7NUHf7DN9k5OHne8qkGk7i++vsYINyPeRLT+b3cZ83UW3aKvK98/MxfY2u hRp8m39v+pUNjzCFU/j6fvXmyqp+cCr733zuaYx6rVOubnoSvsOo9c73zd7P UuSH5+vN5+3w7nbwPUYL/rpq7/ZW5Itn9Pf2EWFiLJzBqEtliWNhB+Sfz+Tf C5+PjH2Sj/L7vP/bT9KUEhX55BnVN08N/9Ya9R8wUkm3GOVZp8gvz2jRmwUx Zi1Q/pDR877Nzr2ZCj/i+7tdeUGqHpzDqMxywtgJzvBjRoX7lYucteEnfL2G ZSTb94afMpo/9ndlB4Kf8fXW065OdSKcy/dfL8vm9YFwHv8+X9Ygel2B8/n9 +cZ44Ito+Dmfr4Kry3duhQv4/w2laOu+wfALft/9UGtY1K7rPxfy75O4Uj/9 bJS/ZDTwa1boMz2Uv2LkWltTtFkZfs2oZW7cu/7acBHfbwsii7e0hd8w8s+w bWtnBhczOhbstvTdWvgtozy/nJ0ZIXAJ73+Dt+/HGfA7RjfbjkxpfgEuZZQ8 JeXHuBPwe/5/afuCqBFX4TJGGzRmBP7NgcsZZfW2muqTBlcw+r6mRH/1KbiS z3+ShlWIuv4/f+DrN7p6zxdd+CO//5RuaXZRg6sYnXm14+EEQ/gTn+/AAclM E67m923qpOi6vnCNrL/PjBISXJcNHAJ/4ffZudIP+4bBXxn9UBs2OG4WXMu/ n1qv+6O6HK5jZPWu74ol0+BvfD06r9C67wh/59/fnz4f3eMN/+D33ZVhIcoB 8E8+v7tCE+si4Hp+Xqnpu2YHw78Y1bS/5JGwBf7NzzdTizrzBLhB5j+8/ybD D6WHwY18f/s5jHSLhv8yKqhdXvw5FVaSyGxcz/Er4+EmEqWW3XQxEGFliSYe WXTMqBRuKlF4RYd+w2vh/yTyzLfSP/sRbiZRdhdH6dwzuLlEAX6H3F8rdfvn FhLl2fsXprxCuYpElR5jnvoUw6oSHU23a/zcAKtJFBg4vbhME+1bSnS42I2O D4TVJVrxdYPg3x/WkLmVRD+DX5rnDIZbS3QurTC1diHcRqI+6m91TtnCbSVS dXx0r9cEWFOiz6P2erYKhNtJZOpYOGheN7i9rP8OEo3f+HST5ixYS6Kufqfn nMmEtSUy2F6bF+oBd5TIqVN3P5MIuJNEQ3uYXfU5BHeWKNmttHf0ebiLRH9P rMswOQ3ryKwrUZTti/oZcbCeRAcC/v4ukeCuEhUsTdynI8L6Eu1JUvpRvQfu JpH0btt/NTWwgUTxHyJf+dbD3SXaL7TeyyphQ9nzGUnUQ0tlsN132FiikY+M DbW0Df65h0Tdeii3CuwMm0j0/se0/IBi1O8pEWUNemDQFOWmEtnuOqb1eCjc S6LLw7/tih0P9+br7za93T0Y7iPR+RbLV3c8Cpvx+TB94H75ENyXj+fdn7vN wuB+EqUdfVuW6g+b8+dvGx/VVAPuL9FMG9tOtevgAbL2AyU6bT2iyHsyPEjW 32CJXL4k/PhTCltIlNl/S9/AHbClRCmm75r5ZcBDZO2tZO2tJRr8LrPnsNbd /9lGogc1D/MmWsBDJTo1Z72aUizqD5PoTPS4VMqGbSVSPzsvWUiDSeLfH96T 7qqivZ1EX38Py25oRLm9RHs/BEV/fQMPl2ibUL9jvjnqj5Bo8pWYjHIfeKSs fJREV74tTU+fB4+WaGDnml4Z7eExEtW/MRv7vAgey+e7h/mm8UvgcXx+sr4M dQ+EHWQeL2s/QaLi1XeP0VZ4okRJG2p2SpPgSbLyyRK1TV1to3kOdpRozEXX cw1Khv/sJKs/RSJ3+ydaZ/NhZ4kSrq9OPZMOT5WVu0ikNr9fW99D8DSJwo6Z NRS7o//pEm3OmDbn13h4hkSjDsYb1WnCM2W/P0tWPlv2+3Mk2qCTkGNYjvK5 EukYRh1/bwm78v1vkejqNA12k8gufO6Gc8tgd4mG21p9MewLz5Oou63FYNuz 8HzZ83nI+l8gG99CWf+LJLo41ulTuBG8mN8/e7wf5NvDS2Tzs1Qi+ybLrEpV YU9+HzwJCjjY1Oifl0m0dH9yswGHUe4ls7dsPnwk8h51Tb33N3g5P3+sj0wt WIn+fCWaEhPRZa057CfRs+SiWRdXob6/rP0KiQ5u0Vtz0w71V8raB0j0ZVfu Bx9NeJVsfldLZOWm8ehaN5SvkXmtrP06Wfl6iTIK/o7f5gQHSnQzI/jx/Wg4 SFa+QaLyiZMKiufDG2XlmyT6aB5gY3Ub49ssm58tEo37ZKe7age8VVa+Tfb7 wbLf2y7RrrwFy/QMjP95h0T9huv1vncX5Ttl9Xfx+8JzdGiRCIfI+t/Nz8sS 44XdVdFfqEQL19esX3IF3iPR1je7tyUVwHtl9ffx8/JE6k53GzhMoobZ/p8c v6D/cNl498vqR0jk5/4oZG8h6h+QOVKifWZ3OzuvRP0omQ/KfEg2vsOy34+W lcdIFK00X3ewc49/PsLPb9utDnMjUH5UIo0PsTZtpsPHZD4um58TEsWFRi2r u4H+TsrKT/H7S2dkdlm5yT+flpWfkbU/K3sfsbLxnpO1Py+rf4HfB54BSkIj fFFWHifrL17WnyBRzzVTY5S3oVyUKKdMY/b5HjCTWZL5kqy/y7L3lSCrf0Xm RH6evfNfZ/8Dviqbn2v8fN2y/spxa8zndX6+7PoTEroLviF7/puy50+StU+W /d4t2fhvy95fisypfD9un3/ReGbPf06TjfeObHx3Zf3fk7VPl40nQ9Y+U1b/ vmw8WbL6D2TOltV/yOffdMpLtWTTf34km58cWfvHst9/Iit/Kuvvmex5cmX1 82T95fP9Zvbppu8n+LmsvEDW/oVsvIWy9i//v/7/AW3m3sE= "]], LineBox[CompressedData[" 1:eJxTTMoPSmViYGCQAWIQDQZ3NzooN9dsXWCtcQDMv7fR4bxW8G2uvVoQ/n00 /oONDidkXM88ew5V/3Cjg0F78mq1KE0I/xGa+sdo8k/Q9D/d6DDxcXG103d1 CP8ZmvzzjQ68em93F76F6n+x0SHvnBP3e3kdCP8lmvmv0PS/RjP/DZr+t0B+ 19/u3i6o+ndo8u/R+B/Q7PuI5r5PaOZ9RpP/gqb/K5p7v6Gp/44Wnj8QfADb 0aSM "]], LineBox[{{4602., -13.369223455335854`}, {4603., -12.676076274775909`}}], LineBox[{{4605., -13.369223455335854`}, {4606., -12.96375834722769}}], LineBox[{{4608., -12.96375834722769}, {4609., -13.369223455335854`}, { 4610., -14.0623706358958}, {4611., -12.676076274775909`}, { 4612., -13.369223455335854`}, {4613., -14.0623706358958}, { 4614., -13.369223455335854`}, {4615., -12.96375834722769}, { 4616., -14.0623706358958}, {4617., -13.369223455335854`}}], LineBox[{{4620., -13.369223455335854`}, {4621., -13.369223455335854`}, { 4622., -14.0623706358958}, {4623., -13.369223455335854`}, { 4624., -13.369223455335854`}, {4625., -12.96375834722769}, { 4626., -13.369223455335854`}, {4627., -14.0623706358958}, { 4628., -12.96375834722769}, {4629., -14.0623706358958}, { 4630., -14.0623706358958}, {4631., -13.369223455335854`}, { 4632., -13.369223455335854`}, {4633., -14.0623706358958}}], LineBox[{{4635., -13.369223455335854`}, {4636., -14.0623706358958}, { 4637., -13.369223455335854`}, {4638., -12.96375834722769}, { 4639., -14.0623706358958}, {4640., -13.369223455335854`}, { 4641., -14.0623706358958}}], LineBox[{{4645., -14.0623706358958}, {4646., -14.0623706358958}, { 4647., -14.0623706358958}, {4648., -14.0623706358958}, { 4649., -14.0623706358958}}], LineBox[{{4660., -14.0623706358958}, {4661., -14.0623706358958}, { 4662., -14.0623706358958}}], LineBox[{{4664., -14.0623706358958}, {4665., -14.0623706358958}}], LineBox[{{4667., -14.0623706358958}, {4668., -14.0623706358958}}], LineBox[{{4678., -13.369223455335854`}, {4679., -14.0623706358958}, { 4680., -14.0623706358958}}], LineBox[{{4688., -14.0623706358958}, {4689., -14.0623706358958}}], LineBox[{{4695., -13.369223455335854`}, {4696., -14.0623706358958}}], LineBox[{{4725., -14.0623706358958}, {4726., -14.0623706358958}, { 4727., -14.0623706358958}}], LineBox[{{5295., -14.0623706358958}, {5296., -14.0623706358958}}], LineBox[{{5306., -13.369223455335854`}, {5307., -14.0623706358958}}], LineBox[{{5309., -14.0623706358958}, {5310., -14.0623706358958}}], LineBox[{{5315., -14.0623706358958}, {5316., -14.0623706358958}, { 5317., -13.369223455335854`}}], LineBox[{{5322., -12.96375834722769}, {5323., -13.369223455335854`}, { 5324., -13.369223455335854`}, {5325., -14.0623706358958}, { 5326., -13.369223455335854`}, {5327., -13.369223455335854`}, { 5328., -14.0623706358958}}], LineBox[{{5332., -14.0623706358958}, {5333., -14.0623706358958}, { 5334., -14.0623706358958}, {5335., -13.369223455335854`}}], LineBox[{{5337., -14.0623706358958}, {5338., -14.0623706358958}, { 5339., -12.676076274775909`}, {5340., -13.369223455335854`}}], LineBox[{{5346., -14.0623706358958}, {5347., -13.369223455335854`}, { 5348., -14.0623706358958}}], LineBox[{{5350., -14.0623706358958}, {5351., -14.0623706358958}, { 5352., -13.369223455335854`}, {5353., -13.369223455335854`}}], LineBox[{{5356., -14.0623706358958}, {5357., -13.369223455335854`}, { 5358., -14.0623706358958}, {5359., -14.0623706358958}, { 5360., -13.369223455335854`}, {5361., -13.369223455335854`}, { 5362., -14.0623706358958}}], LineBox[{{5364., -14.0623706358958}, {5365., -13.369223455335854`}}], LineBox[{{5369., -14.0623706358958}, {5370., -14.0623706358958}, { 5371., -14.0623706358958}, {5372., -13.369223455335854`}, { 5373., -13.369223455335854`}, {5374., -12.676076274775909`}, { 5375., -12.96375834722769}}], LineBox[{{5377., -12.96375834722769}, {5378., -14.0623706358958}, { 5379., -12.676076274775909`}, {5380., -14.0623706358958}, { 5381., -12.96375834722769}, {5382., -14.0623706358958}}], LineBox[{{5384., -14.0623706358958}, {5385., -12.676076274775909`}, { 5386., -14.0623706358958}, {5387., -12.96375834722769}, { 5388., -14.0623706358958}, {5389., -14.0623706358958}, { 5390., -12.676076274775909`}, {5391., -13.369223455335854`}, { 5392., -13.369223455335854`}, {5393., -12.96375834722769}, { 5394., -13.369223455335854`}, {5395., -12.96375834722769}}], LineBox[CompressedData[" 1:eJxc23lcTc//OPBUdqJIKCoSLVKWSNRLVNp4yxLSYklRRFmiRFlKZCtCRUoi S5R71puE9pKokIRUIqmQUuQ338953T9+1z8ez8fMOWfOLK+Z6Z7RXOfr6CEr IyOjNEBG5v/+/98/ZRGU6i59MyBT9+H/PELKKiLY+tRiYIu6vuCRUh4llX+0 lFVFYBi2/qb2ah3BalLpY0Qw2KCZ396M6WOl0tVFkK9mWdzwaZJgDan8mlLp 46SeN16qvFrEEX+PRUZg/glS6dpSz58o5UlS99eRsq7U/fWk0vWl7jdZBOMP BokSTDG/gVT6FKn7GUq9v5HU/adKeZpU/ukiOP3RP9CiY6LgGVL1ZyyVf6YI bkXG+PzkMP8sqfKaSD1vtpRNpfLPkUqfK/V8M6l0cymDCGJl1o8xXoblmSd1 fwup/POl0hdIvY+l1P2spOrbWqp8C6XSbaTubyuV306qPPZS+R2k0heJ4NC7 44fFr7QFL5Z63n9S1y+RsqNU+y0l/alh8JobE/H9lkl5uVR9rJCqDyep8qyU yr9KBElXso+unYPpq0Ww2nuXzJ0etLNUf1sjZRep/K4i2BjUErRJhHYTgc6e 5XGyhzG/u5TXSl2/TgSnDJ6MXrYTvV7qfTZIXe8hlX+j1P08pfJ7SdXHJqny bhZBRIWHz9hxaG+p9/WRun6LVH1uFcGfNf7NS9omCPaVut82ETyq1d44vj96 u1S6n1R5/aXae4fU++4UwXfzQ3au0ehdUs/fLZU/QOr5e6TKv1fq/QKl6jNI qj/vE0G9afzyVzvxecFSz9svVZ4DUvUdIgLb5nljdodjeqhUfRwUQVtE+Rdf JUw/RMbHl5Q5Q1di+mEy/uaP1c95gulHRKDpbR1Zk4YOEwGfd+RZQSw6XCr/ UannR0j5mFR5jku9T6TU+58g9WPFDNJv1xJ8Uur5p6Sef1rqeWek0qOk0qOl 6uOsCPJe/bM/7Ig+J4LzB8fu4eehY0TQZLRrzuwsLM95qfQLIvhdqHHPsBjT L0q9T6wIXNiDmVtOYHqcCOadcd1/3QcdL1WeS1LXX5a6PkEEvasvTP4air4i 5USp+yWJYLb74KeMJvqqCPar3S/V+oT5k0XQvsijZrIa+poIXmTWON/cjU6R Ku91EWyOyuw97SL6hlR7pYpgvvnsNq0p6JsiuGnj2HxmAvqWCNJN3BTmdI4X fFsq/x0RWPTymV3XH51G4rv5TGPza+i7Us+/J4KXOXfOaNJ4v3Sp6zNIPJgx dMyVFky/LwKv8+xZ3U9oEWm/dwY2L2vQlFQ6LXV/RgQLb7pd/yOD92elzJF4 Kx5zqfwB5udFYHBia1GlBaaLRaCYHTBH6TqmZ4ogNM/Jpcse0x+I4H7n1aaz TzE9S6p8D6XqL1sEDwvb5q7dh34k9f6PpdKfiOB9wJPLcAidIwKP1bU6F3ah c6Xy50k5XwTGH/N1zIagC0RQM/mk1f0EdKEI/hPF5X3yRRdJ5S8WwRCNu6lu o9ElUvmfiuBHuPf+hxPQpSJI+ZnZPuTuOMHPpO5XJlW+5yJQNdKZqFqG+V+I 4G/LY9tV8pheLnW/CnK97sfefnnoSqnrX0pd/0rKr8n87xI0QCYF81eJIEa3 aG3GBfQbEaxou9/xtw5dLYJB19Zl3nmEfiuCgp8FHlaH0DVk/C+ceTtwHvqd CAIWnHv1owr9XgTDzvnWOJ1FfxBBLvX99/1h6FryPoN0akJvoj9K3b9OBBoK rxw+LUTXiwAKZxSNk0M3iCCQtVlUuRv9iYz/inLfNZroRpI/fsmFV3rozyK4 p3g7Rm4w+osIqpUeZS+dhG4SQcb89ogUe/RXEYyp/req5Kum4GYS3w/OW+LV B9O/icDyqbbWCBV0iwj0Tr9/6leG+VtFUHup7krKH3Qbef7Hw/ItLejvIsiq /eR8+CP6B+nv7iOaNr5E/yTjQ7dbticL3U7i06ddPY+Oon+JYOnKxXEj49Ad ItgXadJhvBXdSfrrhf5ZD3LQv0XgOGq836RodBdpf/PXv1fdQneLINO9Tj/2 BvqPCPp0rre6fR/9V+r+PSK42Fr57+hp9D8RtFqd9FbYh5ahILCoY8iwZehe FDjMWjl+iwtalgJ57niV6gK0nJTlKbj43h0SpqN7U7B0ufJuG0N0H+r/L09f CsJvnQsOGo/uR0HI5sYxcg0agvtT0Pv8sjsRzegBFLzYc6HaphY9kIJEo3rz gAfoQVLpgym48nvtpp/5aAWp/EMouJQ7r6f1D3ooBSpX4eiu62hFCgb3CwyN P4FWosDAVsd+5230MArUF3ak1YnQw8n7+I3s4xKFViZmB2a8v4IeQUGF/P30 KUvRKhQ8OmnXOCkZPZKCluHpG+4fRI+i4H562srhW9CjKbg541Pgwd1oVQqs PUfrxHqj1ShIbx91smodeoxU/rFS91OnwO+7+N17U7QGBbEBr8b666A1KRh6 syeGLVEXPI6CJUmXTXVHY/p4CrrtP5UmG6C1KDA3yR9qMhQ9gYLk6vASBy20 NgXP20JV6/qhJ0rdbxIFa3TKGhTb8Xk6FBTJPFBSHYDpuhR4LvNeG9AHrSdV Pn0KYpqvnrQ/iJ4sVR4Dkt/1SukxP0yfQsGb8L/j3s1DG0qlG1HwtTFjpLsu eioFZYqL4g1D0NNI+w2z8+ylip5OwQWPc+8PKqJnkPp3r23/2DZWsDEF9Uft ZR5oYPpMCu511PVkZGD6LArGMBUr/vTHdBMKVrc+kj36AdNnU7Ajd+NG3Yto UwoU32lPfx2LniPluRTkZlmu2XQDbUbBWKs0I3oB2pyCH9WmgfOt0ECB6ufa JVXK6HkUKKleX/xcFm1BwZPQ8m+r3dDzKVjEDVv3UBe9gIIR9m/nu/VCW1LA TYjf3mcw2oqCaUbbRs44N0awNQWn3ga6z2xAL6TAeY65m1UZ2oaCiL6wf8oj tC0FpMLo/zLQdmQ8GRfbyReg7Ul/W2u4PD0B7UDBybUd6yZZoxdRYLSu3KRr BXoxGd8ZidoTTdH/kfYfx983nYReQsHPKb41W1ehHSn4za9cnzgYvZSCvPn3 4271Ri+j4OHxYgXb32qCl5P6EplZHn+KXkFB6PafJUPy0E4kHhZ6uJvVoVdS EOzzXWbuRfQqCia7lryZ8BG9mjyvWdHasxjtTOLt0pTfLe3oNaR+dqmMH3If 7ULBIK+5J2LM0K4UmBjuFL28g3Yj7XFXL+6yA9qdxPNxXO+XLui1/zc+1QNr FdHrKOh7gbEtNkWvp0C7cURwgjZ6A+k/bbtaRv9QFexBQXW/M04PX6I3UuDl PKvDqRDtScrzctuk2X3xei8KXFn+zcaHmL6JPO/0q6HZD9CbKTDeNPWg7nG0 NwVH2cpPP2PRPhTobara65SI3kL6t8Xu0Pgg9FYK+KwPUyfbon1J/FJSXvXf HPQ2ClwaDwTd0kJvJ/E+8Eby09FoPwp0nr8eY/drtGB/CugkHTPNf+gdpD/e +t26ZCzm30nBXw+rlMmNmL6LArV7YgjPRu+mQP9444BrqeiA/5uvVBd/LUDv oWDig5tGeiXovRT0vz7W1fEuOpCM58T+Xm/XooMosPA2KZ/gid5HQf7r4NLn R9DBJJ7oLVH0/w+9n4Ih1r3ltKzQB0i8vbtN5tskdAiZj7PdLFpM0aGk/nel bpaxRB8k5a/csqJMDX2IgnJGrBAojz5Mxv/b6651z0YJPvJ/8bvfvcYydBgF w/Yvyp3yFR1OwfWraWWf7qCPkvl4qZP56nR0BAV2cu2XC8LRx0i8+77x0sgY 9HEK5hwpP7jXDR1JQdXKGVcD96FPkP5662fDYz/0SQqYieeDNzijT5HxlRv9 froL+jQFlUaDR/fRR5+hQK5u/3/d6ugoCg7dcVTXUERHk/VEdnpHh8RnKehx 2qL39udIweco+L7TRxTfgI6hoNcQbyXNAvR5CuJjnR2VH6EvkPYZv+PCr0T0 RQoebLvnMS4FHUvmm2Nj3E2PoOMoWBh7tjbgJDqegrA2h/Xvj6MvkXiTYhMQ ao6+TEH0fjY8bwU6gYLs1KgBx6air5D+Y7s30GcOOpG8T+evWUPV0UkU7LYx y/FUQ18lz7fIixvSF51MwZlVx2QmDUNfoyCNLR9p8kVFcApp34Z/3r2foa+T 9ZI7N+17MfoGBW+NmLLnuehUMr9M7lwRlY6+SeKV1uodLlfQt0h8/XLLY9sp 9G2yPnOLDDuyDX2HgsdP3KF4DTqNjGeX3+NuBKHvkutLfYL7LkPfI/N90nr/ Aw7odDJ+Zl/+0DgPnUGB/6SwuikT0fdJ/yyrjdo5FC2ioN1S4fyerhGCKQrm T3WKkv2Opin4fNnp8+wONEOeF/yrn0kWmqVg5TC3d3Oq0BwFE+Sqd55MR/MU KOuN7mq8jRZT8F/iw/i7x9CZZP2yyrTW/SL6AQVXbzQ+GnEAnUXmm6jeejP8 0A8pcHMas+6JNTqbgrNDN1xYvRj9iMTzz0eNb5iiH1OwljmjNVsD/YSC0R/q U3KV0TmkfLsO10UroXNJPKjyf3xBBp1Hwex7d3o6e6HzyfsvsVc3L1QWXECe X7fTwvM1upCsX6Nf3XnyDF1E6iOp17+Qm+hiYtvq7ua76BIyXlROpm9JQj8l 64HQgOLxkehSEs9ePPUrPIB+Rp4XObE23xVdRoHZYO30OGf0czLeqR+9NFag X1BgyI5fpGKBLqeAtajXLDNHV5Dx8GPX05F66EoynrUmurzQQb+kwHt+4vKM AehXFBSknc3N+zBc8GvSn8I7jelf6Coyv4j+VsdVo99QsKrv5w30U3Q1Bf3u 1swb+hz9lqxPe10v2Maga8h69MTdoq0c+h0pbyLruCAa/Z6CaxcrBvlGoD9Q sF1W//IUf3Qt6a8rE8oNN6M/kvLvW3hA1xNdR8EdVctR0yzR9SQezo6ezOqj GyjItEqbozgD/YkCyqEq7usEdCMFNWlmV7/Loz9TYGuv1rBvEPoLBUGf9StE zcMEN5HxUWRw/eFn9FcKvn0Z7mf2Ct1M3seS+9CnHP2NlMd2y2/ZDHQLGR/y vHz1NXQrWQ+yn/zCJW6jYPrZR4plSejvFFgq+p7sdxj9g8Rzfnar3SH0T7L+ Wm/+3Nsd3U5BZO23F+JV6F8U2HzuVJZZhu4g7SPW726wQ3dSMKm//SGVOejf FGj29Rs5RgndRUGhxp1nB4eiuykoSR+t8UfiPyS+9dP4XteuJPgvBbKZn3cv /4HuIeuZ978zDGrQ/8j68cXnjmMFaBkaWr+W9HuUj+5Fw9K1f7f7JKFlabhg k/LjfCxajoaDTxYYXjqOlqehqnJI9r8z6N40VDx4frPvRnQfGpocuEVDfNF9 aTj3PAMsdqL70WBxIKFkpCO6Pw17Cluyk0zRA2hoeTjXxns2eiANdcctZ9XP Qg+i4VjYNo/TSujBxI93mKj0RivQcJvNnfb8n6LgITQs6998d0MLeigNY5dM kX1eiVYk15+x7t3rKVqJhn5z7wdtzUIPoyF8FJiUF6CH07Bg36ZhF9LQyjQ4 dfea5puIHkHD3T1Wtz5EoVVoaJhtH6sZhh5Jw/mKr11N/uhRNIQMOumr4Yke TZ6vp23vbINWpSE6PmNZ0X9oNRq+qRfG75qNHkND7Ax7h/NG6LE03CwqPT5x CFqdhshxHoWKmmgNGlISa5u9+6M1aRhsO8rYvBd6HA3jjX4r93wbKng8DZOq tLjDNWgtGo5vvLRxVwF6Asl/z2v3sly0Ng0yTo8nJNPoiTTM7WiwvX8dPYmG 5dqr7jQkonVo0HTbWPv5OFqXBlX9dKvMULQeDWZ9Oit3+6L1yf1GxXZ+2ISe TNrPzEsu3h5tQOpn2vjpRxejp9Dw1K1z3UwLtCENJqWeMHkS2ogGWev9xlpj 0VNpyPca/LhiEHoaDT5ZXjb/VNDTaahPKy/s82OI4Bk0bJwf+3RoJdqYBh31 uy0BFHomDVZeTxX6nUPPomHzpbGNK2PRJjTce72sI2sXejYNlQpNmwpd0aY0 DDfedT5+NnoODQ/+eTrlTUDPJe9zvmTZgR4FwWY0aP+cY1bXiDanwVnNY0JQ ExpomJyc4LWDQc8j9afpqjMvAW1Bw4arVSO2HEDPJ/2/TeOJ61r0Ahrc8w9+ yFiOtqTh/llu0RRdtBUNq0pr/H6poa1pmJF/fkiZPHohDWvC1iuVNw8WbEPD y+9PTV1eoG1pEKmavU2+graj4YDGtzdnrqLtaehoTBrfGYF2IO39vmDL/rXo RTRsD/zYP2QpejENz80MRry2Qv9Hw/rKBepT+qCXkOcv6w7TUkI7kvfv3O7y tmqQ4KU0DK3/c/BMA3oZDX5n67Pfs+jlNDzWGqtdegq9goZZVu2vT0WjnWiw nrHgGuOHXklDWpnavjgn9CpS3si0yy8s0atp2LVX9ZnRBLQzDf09/Vyr5NBr aLD768CybQMFu9Bw4vjaVzLlaFfSfy20x/y4jnajwai47ID7XbQ7DbXyvc7K HkavpeHVmaMhZz3R60g8KL4/4Istej0NCzc6fr04E72BhsCNs5umj0F7kPj3 7mDdmtHojeR920X9VjYPEOxJ+meSEz/rI9qLxP/zewoDH6A3kf78n16gMYXe TPpv3ce1zdFobxLPE1qsD+1H+9DQvUm/gFqJ3kLD9chBhwvM0VtJvNBb0+ms i/aloXhDGkQPRm+j4axSsk1Wa3/B28n7JT7oSf6A9iP9++XTYa0P0f40VJs8 G1Z1B72DhqtlDX8yL6B30mBp8CVKJwi9iwa5uF4pJ9eid9OQ0SJ+89YaHUBD +yHFx+HT0XtIfP9sMOP6aPRe0j5axpo1fdCBNDxqqrUo+9VPcBCZT/6DuTcq 0ftoGJHW/ELtATqYBso18e3jJPR+Gm5cDL7lcRJ9gIY+75aETQlCh9Aw4Vq3 wl53dCgN744nOlw0QR8k42NsjG2+LvoQaY+OVx7LR6EP05BZPHnuBjn0ERr2 yiSN7KjuKziMzD+d2rc+V6HDaVCq/dE0IB19lLTH3D2fNK6gI8h4bu/pSj+M PkZDV3m5pcJO9HHS3yaNWH/aFR1Jg5ZzUuxEM/QJGlYobmyIG4k+SYPixOXM yhHoUzSIw8Rvstr7CD5NQ0lG/OPNZegzNCQ01hkMe4COoqFT3OBlK0ZH0xC/ /Npj60T0WRo8UmNOFEagz5F4uPG9UfIWdAyJ9+FDTB3c0edJ+x8vPXRsDvoC iZc2Px7/VkdfpGEIDJt/bBA6loa4ny7BD5p6C46jYefrv8bsG3Q8DaO22qeO LUJfomFJ2pOmH7fQl2lYPcq62jkVnUCDuk/VjXk70FdIf750SufibnQimb/v hxeuW4VOomFer0ld+4zQV2mgS7lRL9TQyTRcuzozuX0g+hqZD6cpJYk65AWn 0HBKbuTomGr0dRrGJGam2uegb9Cw47LxNPMb6FSyHgpR5B0uoG+S93+n2z8u An2LhqBRR342b0PfJvFjSk1FxQr0HTLfbstu0gJ0Gnm+99l5R7XQd0l8Hhc5 qFgFfY+GmMbnGitk0ek0uLkvsEuqlxOcQQM/dNFhuhh9n/SnF8VX5qSjRaT/ Q+28l7FoioaAiW/fTj6Opkl/D4o4dXQnmqGheaF6mtk6NEvay7rlQ48VmiPx 4qP+6iNGaJ6GgsIXnQaaaDENDx9ayyzoh86kwSF+aDX7TVbwAxo2jd+iolyN zqLhR0vnppmP0A9p+Pwz5n7pNXQ2DTZn6OL7Z9GPyHpbX3F//xD0YxIPLjvn hnujn9BwJEs/13opOoeG9HNparss0blk/T45YvUTfXQeDScv33Z8rIDOp6Fn 2HerjS29BBfQoB/r1s29RBeS57/reGf/FF1Eg+6MZr0KCl1MQ1haWHFrMrqE jLdp/oc2H0c/Je2tHRPSvh1dSuLx5wqHR67oZ2Q9YJuzY9l/6DJSHsrUPdgI /ZzMH0EWgw+pol+Q+T/48F75gehyMp49qCVv22QEV5D651b6+1ShK2kwDmkb nZWDfkmDa+Cdr9NZ9CsaBuo3L/qbhH5Nw+xVV2XmRaCraIjo/qN+Zy/6DanP Gr2utGXoahq8K28Ulc5DvyXzf0Pmj2QTdA0N28y3Wi4ag35H1tc2WU+ch6Lf k/X74C4znR//sv7nDzR8/eW2oDwXXUuDwk8vk6uX0B9J+31J0vX3RteR8n0v 3DRwDrqehlLX3qlt49ANNOhNGazh+q1H8CfSvpMzPG7noxtpKOv66Hr7Kvoz WQ/NG234bCv6C1mP9kkOz1iIbiL7U4VXzyu00F9J+4bvvazV+FdwM1kv9x0f vegJ+hsZ3wPTo2dcR7fQoNZnyqignehWGkKjGr6eWoduI/vhdxcTeiajv5P1 RHTa9kHdfwT/IPNRit3j8BfonzR4Lu5dIHcT3U6DL/Vww8Kd6F80TPfpdfrN anQHDTlpUcqDTdCdJP/CU6HbZdG/aai5k2UbV9ctuIsG+QOxbYtvobvJ80Xz 1dTPov+Q8RwZk5/nhf5L2juv6GjLVHQPDRo+8mW9hqH/kf2h06ymH++6BMsw 4PHoxtfbueheDDznet3OOYWWZUDuksaYyh1oOQY0Z/iFzHFEyzOwpX+S3/ox 6N4MmH8ZE3v692/BfRjQ9asuYCrQfYnt/4UOEKH7MWAWovw0NRDdn4ExHr/M 73qhBzDQ8fs3NdoQPZCBog/bKPf+6EEMpCx5ppZe0il4MAPD9t3iB99DKzDg 2pH7wes4eggDhod0Cm57oIcy4Gje+MvdDK3IwOpPm23S1dFKDCTrv3RL7e4Q PIyBWclRNkweejgD47eXOnVwaGUGFuo8DdoSgB7BwAarzO/Dl6JVGFBz3by0 cCp6JAPhH8NWvhyEHsXAtwFTTq+o+iV4NAM2M87admSgVRk4OHCqw9SjaDUG sn5dHZ60AT2GgUcG/g6wED2WAf9T7IqXY9HqDPzR3NKvpLNdsAYD+b5ntS3K 0JoMDArWMXWh0eMYEE/rkzsyEj2egeIRX2VcXdFaDITKJhaWmaEnMBCrYXgj XAmtzUCE6rKWHV9/Cp7IwND8A3/qytGTSHt9PbS73zW0DgOZK/nrj7ajdRmw PPkofZErWo/cf/z9TcWGaH0G3gTwh36NRk8m/SuK+pLx6YdgAwZumn6qmfQY PYW0T07ukI7LaEPSv2r9o1v2oY0Y8LywzzfcAT2Vgbdxbmu3TUBPY0DlkHrc mZ7vgqczsMuAVZZ9h57BwN5fl3a9zUAbk/7Vq3H/8lj0TNK+et3/XvqjZzEw XNHhTJgj2oSBw9ErH+bPRM9moFl/xqaif22CTRnYd2Jq248m9BwyHs79DtvL oOcyoBGj8UcnCm3GQPb9IaOKtqHNGXh48u+fxzZoIF5yIMdWGz2PgR+znnid k0dbMLCxZ6RKak2r4PkMXKSv+OwqRC9ggDYs1Q+/gLZkYN3cA9fag9FWDAR6 ZD5a/x/amsSPN6+yOgzQC0l82fpzSfBgtA0DQ44siJZlWwTbMvCxuIh/G4a2 Y2B0x/aiJH20PRkPm8VZhZ++CXZg4L+artO2WehFDCxdtTN5oit6MenPfSdH GWug/2OAP236tv5ls+AlDFQfXe+rEoF2ZMAuI2ttsCN6KQMxo32Ltw1EL2Og 8ZeHWuqrr4KXk/fvqi9/7IVewYBszQk1WR20EwOn5DUuP/vUJHglAwNeduXf PYleReLFuu5PakvRqxno9LDf3KqBdmbgjGNEwoPXXwSvYUBRdvaYPhfRLgy8 fsDu0DFBuzLgc6lXvflQtBsDK+Q891RmfxbszkDuwIzAB/7otQzMmHZo2XJN 9DoGep2ef6Xfj0bB6xnoor4p5ojQGxh4bGu60TwI7UH657dUC1Nt9EYG/h5j PfbVfxLsycC83xvDpyWivRg4l2iq4u6C3kTi//6sC6vHojcz8K6nx/F5SYNg bwbW3uMNohPQPgxEy+4NMJ6D3sLAlIEXxkfKorcysFP+WXZxfr1gX9K+SZPl zoaitzHQFla6vmMmejsD8T7Dcrd31gn2Y6D15tG31Y/R/gxEtpYvX30YvYOB UfPzTIwnoncyELY5JEHc+FHwLgYO3D25SS4TvZsBq4WVtIk3OoDEX82B7MEp 6D0MTHrGt0XX1Qrey8CIglPjxtxEB5L4Kb4/+PthdBADDv2zLZuGo/cx4L4y f33uyw+Cg0n79i9ojU1C72dg7M0+YWFO6ANkvDsp/NHXRIcwoJ3XLRK1vBcc SuKrfbjCzQT0QRLfChalrF2LPsTAPffu0l6T0IdJPFu88NzHu+8EHyH94fL7 4Wumo8NIvJTJXlXI1AgOJ/1b7lk0uwR9lNT/Ys9pnZVvBUcw4LKDe/fPDH2M xLf/umbPeFwt+DgDAd/1HOQXoyNJf9lg55ld/EbwCQa88rYvs3FAnyTtqbr/ rhVfJfgUA0YuM8xWuqJPM/Bg9dTCxW9fCz5D5gPd4gqXZegoBqzf6xiX/nkl OJrED/vlBcvc0WcZCJK9fLXs30vB5xgIHlVnM9gLHUPi9Y6xybNaKwWfJ/Nf qFGu4Rr0BQaOVmQpKdVXCL7IQL9Zuwfs24qOZeB3TG9rqw/lguMYWLXjeuK2 QHQ8qd/cAP2w3y8EX2LAIL970rVj6Msk3o9MKeuYjk5g4JKJd5TZueeCrzAQ 1dj9/fkodCIpv/FSi5yCMsFJZD7bvr/6xlj0VQZyxi2f1VXyTHAymX+dW0VK c9HXGBi3ijJPjygVnEKeP1TLbdCVp4KvM6Az37J9aXyJ4BtkPdU4pjCjqFhw KgPdtqb3jpYUCb5J+r9a9JtdnYWCbzGglyNrHd5dIPg2A++XD1y6sSJf8B0G rm1s6v/HCp1GxueOBzbN0/ME3yXr17a582eo5wq+R+afvsql20NzBKeT8Rq1 /GJfuyeCMxhY9lPXSGnvY8H3GfjnvGr2+vePBIvI+tAzZpTX9WzBFJm/e4Vr qLU/FEwzkFbiSzV8zhLMMPAlsiGl3vKBYJb098K8qJBEsWCOgcRqjqYdOcE8 WX9N3rlQpocRLCbr24ClI8xbKcGZDPheuqap5ywS/IDMP90r1C+FZQjOIutP Ly/jJeJ7gh+S+WZr5LdBv9IEZ5P+ZhTXz3j6LcGPGLiit+TJ/gvXBT8m67HR Cl7iEcmCnzCwe9L+Dlr1iuAcUp/fRiosMY8XnEv6u8mLbSv1zgrOI+Nn35eo c1eOC84n/X34y4pz3/cILiD9YUSJzuapqwUXkvnHbshAw487zP/nIrKe2OsQ 2LYqQnAxAz2xi96+tI8SXELi13HD6GWqFwU/JfH/kkLut+wEwaWkfBXjj90x uir4GQNrXMyMfJenCC4j/WO7o8smtZuCnzNQ+CF320KPO4JfkPpPeB9g9uCu 4HKyfvnUnOHpmS64goH2bIO9YVvuC64k68W4QabZN0WCX5L9xN5DXM5OWvAr Ei9U6vf7LGIFv2Zgf/y5flOH8IKrGDi7tNnl/Gex4DekPr6uLgmweSC4mgFb nQWjK+qzBL8l42ur/u6tLx4KrmFg8MdxQ2yiswW/Y+CT7uSO4V6PBL8n6wmm ou/+2Y8Ff2DgevfOZ/zoJ4JrGeizuGbSyJfojwxMDz5QrBWZI7iO7N/UIsZ5 Hc0VXE/a40+Th+ruPMENJD73zmjZPT9f8CfSvqHMX5+v6EayHllns2R1RYHg zwx8L3j9ftzOQsFfGNhsuq554oIiwU0MNG1J80oyLBb8lazn7s556apUIriZ rA+HJ+q/z0F/Y2CHXc98H9+nglsY2LOk1VTLvVRwKwOUwvePq4c+E9xG1qc+ e7/dCkJ/J/194MiuW/noHwysF6V5T5pbJvgnmS9ULni0paLbSf1lH25p6PNc 8C8GZK4EvDfeiu4g+6FYeerEO3QnA1O1bYdc03gh+DcD6QoJ40NuorvI+ntD QFF7I7qbgaf7Y38eXVEu+A/Zv2u4WK9g0H9J/nVx/FbNCsE9ZP3c6PpY7I/+ R94nJHew9Ru0DAt7YjbOvTulUnAvFn5ddxxudB4ty8KVJNfe3b1eCpZjoTVJ YclXD7Q8CxHqz4JOcOjeLMS55ueEjH0luA8LmhMHBNwIRPdlYVlq24ODL9D9 WJjYYd8nafJrwf1ZuJ5c3lp8CD2ABZn+Iyt216AHsqCeWTYo1rFK8CAWDv1p +fKaRg9m4bnJn2uacm8EK7DwoHhPez839BAWnm46+9PxJXooC9THbxNnqVcL ViTPv306tjYQrcRC//dVDcWf0cNYKKtI/jjb+K3g4Sx06s807H0crcxC7wh1 iz/16BEsnO/tbB1jVSNYhYULT7On6yahR7IwOnRw/rAf6FEsbNRzOvLd4p3g 0SwoB38dncSjVVnwCJ5d81P2vWA1FqxO7Zp80RA9hoWSjRRZk6HHsjDUwulC XQhanYWGxNvVk++hNVg4teBA7I86tCa535CRu936fxA8joWb8rLBywE9noV9 kQtnVq1Ba7HwxzRvzu6T6AksvI+e/47i0doseGn3Wefbgp7Igp183KQno2sF T2IhKqiv59I5aB0WTNwqloz3ROuS+1usfy93DK3Hgt9nnTR5Cq3PgtaIc2u0 fqInk/K2Oll+Uf8o2ICFgffXL1MxR09hoVynPsXGE23IwtXkpotVUWgjFp7o xUXI8OippH1Oeie0fUZPY+HzPD/jrQp1gqezcGSV7vkPs9AzWJh74V1JmSfa mAXjCZ55VifQM1nwHOjdOuo+ehYLBft3ppx9hzZhoc5E1HBLpl7wbBbCJuU2 VxqiTVmgw478M1iOnsOC89azB9YdRc9lYXyBhdOVW2gzFtI3qw6gS9HmLGxw v7SouhsNLLgP3xWXNaFB8DwWttZfVGs0R1uwkHZSdHSlD3o+eR9ze1nTKPQC Ul+3J6Za5KItWVjlJT/r9he0FQvTqEdKzkqfBFuzkDCja0KHIXohGU9/tAxD PdA2pD4b7F5NO4S2ZeHT3GaDmttoOxYmJac0fipF27OwNK+zfkcX2oGF/FP7 Z9sMaxS8iIVUz+gJdXPRi1n4uvr12RWb0f+xMKOgf1VrBHoJC9aa+2Ou30M7 slCcG7m1uBy9lAXtpLmpnT3oZSR+Jr/pe2LiZ8HLWbjfabe6ZjF6BQs5sT8r R/minUh9nHO36xuHXkna33D61shM9CoW7uTdK658i17NQn2/mSpqf9HOLKje P67eNvGL4DUstAwSly5ejHZhYTLjOGv9TrQrCzcGXe7zMA7tRuKDo3xGM412 Z+Huk+SxLrXotWQ87Dw29KpMk+B1LKyPCdcI10OvJ+lvZ7UHWqE3kHh/VV72 nBfag4XG7iOqKZHojSxMdUw130ShPVlY8m3iyF1laC9SXw5tDgbf0ZtY0HiR /lth+FfBm0k8aZwDz2eivVnwN53466Qr2ocF1+ft0XkH0VtIvLffa7Y3Fb2V hWH+LamFj9C+pP9mhD448Am9jbT3Sv11B/o3C97OQtuz0Svjx6H9WLgnK76f uxDtz8Ilxbi7+V7oHWR+DF4oLjyG3kni/SiNZcb30LtY2JTs819VJXo3C2sO +ar1+ooOYCHafueXucO+Cd5DxtPTmrt7DdF7SX3xY0r7LkUHkv4WPrhF2Rsd xMJbFZ+kzOPofSwE1NQW7biLDmahZ2tIyPsy9H4WkkojTLVb0QfIeMm4md7Z t0VwCInPbjdumxmgQ1kIvqS1wuI/9EEWYmZc3hjpiz7Egt6RrdTnMPRhMh+f VTSMuo4+Qvqzd1RDexE6jIVBudO81zWgw8l4kF2UOqwHfZSF17vNleWGtgqO ION/eF6y9jj0MRYWB8vcGDMFfZzEMz+P8zfmoiNJfbko5DvZoU+Q+rr4qtTY DX2SxLdRJ4ds90afYmFC6sPnkwPRp1m4Nqy4PDscfYaFiotREW0x6CiyfqmH E5Ep6Giy3lh7xed3GvosC11rg70XZKPPkfhyNacyoRQdQ/qr1i0Tk3fo8yws f/IyJe4b+gJZf3W8M8zpQV9kIT7nwsjFg9sEx7KQGZA8dYAyOo6F+a/e6p7S QseTeJ9P/1MyQl9iYdRNudkD56Mvk/mwovBaoQM6gYXm3GmliW7oKyysMx80 +5o3OpHUn7Ki2jM/dBJZDx3IKT50FH2VBQvF0pbaM+hkMt+zc6a6XkFfY0E0 wGGI8210CgtBs79NXc+hr7OQZze19Gs++gYLHZYZV0Xl6FQWFn04NyzhA/om C4YfGpr9WtG3SDz+ODi+uQd9m9x/w8BTFXLfBd9hwcynMnzTCHQaaU8jyt1n HPouCwudVw/bZoi+x0KtRdTIkNnodBZeyGj/W2GJzmCh1+/Egu1L0PdZGK65 crePO1pExrv7g1ehXmiKhQHpp/f82ImmyXyeUdHf6hCaIfVt+UW1JBLNkvXa mg+9G8+jOVKeA29fL76B5lmYt6/gTmsGWsyCr+aUoL5idCYLTbY7otaXoB+w 8Gy3ZsyUl+gssn4+llzU9AH9kMRvR+O3/q3obBLv1LYvcuxCPyL9deDfkE65 H4IfszDO1XFc9SD0ExbYP91HjFXROSxwvT8Nl5uIzmXhv0mh2V8no/NI+4hb b56Yjc4n98+3DB2xEF3AwgnP+Q1p/6ELSf86+WqFjgu6iMwHCSmn921CF7NQ HTxvr/x2dAlZ38ftLD0QhH7KgqJ2femlcHQpC7rjPIqHnEY/Y6F96WPvkXHo MhZ2TxNp3ktGP2ehtPRljFM6+gVZD/q+sHjAo8vJeD2hvSkrB11B5ptN+bm9 StCVJF5drPFvrEC/ZOFvwpPstFr0KxK/PhX9ev0F/ZqFPsb2my3b0VUkHj03 ubfgH/oNKf/Js8cj+v4UXM3CwennW04MR79l4bBijYunBrqGlH/H6dNaE9Hv WJC3LdwzYCr6PYlnhW1XLs9Cf2AhVokbf3MeupYFo9VBs81t0R9ZkNM3CxMv RdeR+aSqa7+SM7qelHdCj5GjJ7qB9Jf1b1cP8EV/IuvX/IcaBjvRjSwYXI2y 23MQ/ZmsL+YvHX31GPoLC2fkM7zGn0M3kfngSNcWi1j0V1L+hFu3tiahm8n7 /jPt9+cm+huZn7OW1TdnoFtYeNhjq27GoVvJfHZs5pHCR+g2FvbmildrlKC/ s+AkpxoSU4n+wULfDykfbGrQP0k8yL72n0stup2sZwotRvb9iv7FQuDj9tLE H+gOFpR2scp9/6A7WYDNK+fYyLYL/s3Cv7xzwe6D0V1kP7Ou91y14ehuMt9/ Up7EqaD/sPCGPmI3Uwv9l6xXLQLG5Oqie1i4HVBlvmoa+h/Zb8/+uqXvLLQM B78UrjTFmaF7cWBAOYz4uQAty8EpgxURhYvRchwETeibb7AULc/Bhg3sPfNV 6N4cQFuvvTPd0H04YH/PdEz0RvflQG2i8b+VW9D9ONhSFn/DaRe6PwcO85Nj DgWhB3AwsVX9t9VB9EAOjsv/uFQbjh7EQV3GsYaDJ9GDOXjot6Gm4QxagYMk xc4I+Tj0EA6W1dRVv7uMHkrKJz8k+3AqWpFc/3vzLItbaCUOxl1WdF0tQg/j wKzwRfVvBj2cg8tFVppxmWhlDlQt/n6VyUWP4KDB+MgEcRFahQNr/ZdDF5ah R3IwZuaEitOV6FEcpDq7OchUo0eT+y+CMQvfo1U5KEx4MuxbPVqNg9HR8jKj vqDHcPDo4NW0h9/QYzmo0h7x9Eg7Wp2DjpVPzz3vRGtwsHzCztNOMr8Ea5L3 X9B3g7Y8ehwHowandof0RY/nwFv15NPowWgtDnwi6/xXDkVP4GCGbmr7rBFo bQ6i2v+Ir6uhJ5L385cvTdJAT+Jg0JPPvyImoHU4sPPt5xyjh9blgIFu15OT 0XocdLIpHkWGaH0OZiWufhM1Az2Zg13P5e9Wm6ANOLjkn91nBqCnkPI+FtkF maENOdDocJ9w3hJtxMHwyuwphTboqRxkfq2PPOaAnsaBe9HvsWkSTyf94cGi EmYpegZ536LKAEMntDEHI4a6L3Nbg55J0oMUQ+66oWdxMDdEFOkgsQkHP5Kv NQWtR88m9eO1t+aOF9qUg7P5T5S3+6DncJC9bkVzzhb0XHJ9f/OLj/3QZhzY ZHkc+b4dbc6BzMC2LQm70MCB4pJOtYK96HkcdA9SVGaC0BYcuO3ZtfDAfvR8 Dp4o5v47FYJewEHuVNnPeqFoSw6ixzdtcTmMtuLgQavlz44jaGsOEssqwq8e Qy/kIGfo9Jx/EWgbDnb4Zis4n0bbkv7qvLpt+ym0HQcj7x3I+yJJtyfjM7jL O/As2oG0X8eLCbrn0ItI+x2xZw7GoBdzcHdkWHReHPo/DvSWJA77JPESDpZA tXzLRbQjB7sNzurZXEEvJe3N9usMTkQvI+1rmDX0rMTLOQg5/Ekj8yp6BXmf Pa9KlCR2Iu0RN1LzUjJ6JQcDfzefsr+GXkXqX1M1Y7rEq0l8XS63MeUG2pmD 6TrvYupT0GtIff7x69RORbuQ9lAx/rxHcr0rB8Y3oHDkLbQbBx+2T/zASu7n zkHNC7PicZLr13LwcssF12WS/Os4iHs2TfbqHfR6DhIGOv1TuoneQN53lPKJ K7fRHhyMvfIwrEiSvpGDnnUaK7ol13ty8GYT9zcyDe3Fgd9PG81oSfomDlZl J49slly/mYOY12z0X4m9SX9s9HBwkjzPh/TfNVGWnpLrt3AgZ/Ki65Gk/Fs5 eH6uw3SM5P18SftPOPy2XHK/bRz8Xdj70V9JfW3noOKh5X8+kvr142D9fAOt 8RL7cyA/wkDvexJ6Bwcb414sHyC5fieJ5+yCVf8k3sXB16Md8VaS/Ls5SD+d GfpW0p8CSDwNSeS0JN5Dnv9tj9lXifdycDN1qEfOZXQgBxbTFHJ2SdKDODg9 1SM/V9J/93GwwEAz6pjEwWR+j9Mx1rqA3k/mE9Z6806JD3AQH1c+/7JkfIRw oAMR9CeJQznIO5Bz6XIU+iAHd0z3HXA9gz5E2tcw+lCuZHwe5qD3J+PJG0+i j5B4kGL3blc4OowD9ZCdPcqS8R9OxltWL5VASXw4SsazmmNW+QF0BAfF61K8 0iXpxzhoX+umuVaSfpyDP87Fj17vQ0dykHVGYwUXgD7BwfdniZXFEp8k65ff AYtsJfHvFAcq2prcCEl8PE3i8c2iqW8l8fUMiTcDUw//lMTfKBKPtmwLc5c4 moOPQ/03iDaiz5L2X7mvM8oVfY7EnzpHxd4Sx3CQX3hcbZEz+jwZzy6DA3pW oi9wYNR32MktjuiLpL62eFnMWIyO5UBpYxhtYoeOI+PXab7ojy06noMpxpcf yVqjL3HADQx2eLUAfZmD140hbfvN0Qkk/iXIyz6ahb5C+t+M4fu/SpzIwUxz A+WUKegkDkx+tTqHGqGvcjD7yz7240R0MgeHn9/ItZfM59dI+gsuynccOoXE i/+qdxmpo6+T8e32Mb5bsl64wcG9mQmBJUroVA6SVUKff5KsL25yoODY5Llg APoWB+P/ZqlX/8P1zG0Snw1Gp/+QxfQ7HEx4v0tp0B9MT+MgzH/fQrlu9F0O aocwuyO/o+9xUF8+zijtKzqdvG+WnMKmBnQGiRfrdu5XqkPfJ/095vmwsjdo EWlv7eSQ8HI0ReKnudY6s2domvSfMSp3/ArQDInfbX3CXz9Gs2Q85L+69j0L zXGgvUe79AaH5jkI8L868M8dtJjMrztsOoMlziT9x+m0X+g19AMOtu42urfv CjqLgyZbeYfQePRDDoY01I0oikJnczC1K31Ql2Q9/Yi0V6+R51OPoR+T9Uug 64rpoegnZP5++GLj/D3oHNIeyt8tIrejc0n9pGxfeWsrOo+DZr20Bde90Pkc eMptWdhbsl8o4GBh7KSQPc7oQg4eFxxQSXFEF3EQycRMb7VFF3MweXiIdb4V uoSML+ty89Xm6Kdk/aoz9fVkY3QpB6ZBb7kv+uhnHGza1yRjq40u48Bpufnc qZro5xy8OK3S1l8V/YKst43ubNUegi4n+RV8ZOne6AoO3lWsDrskg67k4ELf Bal/f+N+7yUH/6JGxHm0ol9xsDjp7TGvevRrsr609+bc3qGrONDP25j0/BX6 DanvKzJWy59K9v8kXi9q212TJ9n/k/brOfwk/6Fk/8/B5lF//l4WSfb/JH6X 7h824I5k/89B6PLxU/WuSvb/HDxdNKsr+JJk/0/m087CGSvPSvb/HJTEV3+4 eVyy/yf1oTZR55xk/15P5rc9x39+2CPZ/3Nw9EtumLpkv/+J7CdDjnXv9ZLs /0n/+DXl4QE3yf6fgxsPqZVayyX7fxLPXa3DAmwk+3/SXtyZ35vmS/b/HBxb FKQ6aY5k/0/WH/cenZ9qJNn/cxARenbQMV3J/p8DZcMRp4PGSPb/ZD95bsPk cyMk+38yHuPfL3/SR7L/58DKZZlsvIxk/0/mG4OMrUE/8e8xP4kHZFrfbka3 c3Bo30nPfZK/7/ziwPx6lP6K1+gOsh/ZPDPL7Cm6k4PzG4fmmOSif3OwzXuH dV8K3UX2Pwutx665g+7m4HPSPpOWBPQf0p5X2Uw2Bv2XrN+OaDyrjUT3kPlo MeO/+RD6H9mfnnBeM2APWoaH0OmGVXe90b14KD5zf+bndWhZHj4pH9x0ZhVa jocTwbMPxzmg5XmImCS36JolujcPQ9/MXxVmgu7Dwy/LvGwVHXRfnoy3Q9en jUX346EuTzetYAS6Pw/Hu67sPd0fPYAHt8GXVwf+xb9HDuRhS3Bq57/v6EE8 VKi2jhtWjx7MQ5zy6oSM12gFHuhoW6OkZ+ghPJiG9E+VzUYP5eG7cnDvOSK0 Ig+zP7h6a6WglXg4O8UzpX8cehgP2hvfVd85jR7OQ1dBlN3QI2hlHu4YxMJm yd97R5Dn//zm4uKDVuFhlOZE8S5X9EgePuipHt4n+XvyKB70Ezat2Sb5e/No HsL8ml1TZ6FVyftnTHpwSh+txoOM3Iy4iDHoMTzkeSoZT1RCj+VhSerqe3xv tDoPn21rzBPb8e/lGuT+/lVJtl/QmjxMP+P3JakGPY6H9IRZu1xK0eN5WB5V pGOSg9biIdp/8ILt99ETeLgh/+SG3g20Ng+3pn48szIWPZHUT/rBWsVT6Ek8 OL2bLrcwGK3DwxrljP3+vmhdHjaGTKu8uA6tR/J/3bulbClan4cnS3ovHbIA PZmHQ+KX7W7GaAMeMruo2NmT0FN40HVZdLxFFW3Iw0DflT97BqKNeDjFJf2r /Iu/v0zlYYar1saBbehpPOzZ0yUfVYuezkNBaUDJ8BfoGTykVg0wi3yENibt uePZiGwReiYPHwsfV1hLfj+axUNsZ+MyJ8nvSyY8TDN605F8CD2bh5amqYNu 7EWbkvqLXuRweDN6Dg/jC9rHsSvRc3nYqaqbwdijzXj4GdDQeswYbc5D49Ws GQf00MDD18Avl13U0PN42LY2xrJmINqCB4XqNUN2/sLf5+bzcNewlXOvRS/g YW7OtLuhDNqSjNe/hwx849BWPAQoFB6sC0Bbk/dfcPuK/TL0QjJ+d8z69mY+ 2oaHw8VTe89TRdvysLXEe5HGX/y90o4HK+fFlYmv0PY8XAvxbKx8gHbgweFI 6HmnC+hFPFyfsOBg+h70Yh4u5A5cav0f+j8eyjYX6G2Yhl7Cw8TmBSNHK6Ad eXiw4PbYK9/x99qlpH33X22YXoBeRuLfHmOHoXfQy3n452iR/eYMegWJpztM 68u90U4kHna1mA6X/J68ktTHa4XoTjX0KjKedcp/XJBBrybjab1P4tsK/L3a mYeruuX/3bmHXsPD/UGxvQ6cQruQ8XHI78zrDWhXHtRiku2MF6PdeDizJH7R E320Ow+ewRPXBMqg1/Kw+Ilen5I3kt//ecjZVvIlKF3y+z8PXFFzry1HJb// k/7U1Gyh7iv5/Z8HL3vfXt/+k/z+z8OOC9dS9LUlv//zsPtMa/8v//B7Ay8e 3hX16dhcg97Eg52xeWUCg97Mw3qvJv+Qs2hvEv/muGYq+qJ9SPu+y6lcYofe wsM3Vf8++ZrorTz82brlx+HeaF8eLPtPUx4r+b5iGw8+5UUfFTLQ23koV/ba MjcM7cdD0djxm7zXov15iIq8yC1fgN5BymdnW/lBGb2TBxNmk+urZvw+ZBcP 4/6L6dmUjd7Ng7uxuF9HMjqAzH/hCn82BqH38DB1YNaZPkvRe3kY42/T9moM OpCM94+D1iv24PcuQTzc3tppl/QKvY+MlzuRkyvvoYN5MPP+I8efQu8n5QOd 646e6AM8tH/2NF42Cx3Cw/bX5g/O90eHkv6VHtvvkeR7noMk/k3+W2ZJow/x 0J35jh8n+R7oMGm/UZH9fm1GHyHzzZ7dGoPN0GE8WKS8W6Q3BB3OQ/PGot2i Nvwe6SiJ9+surX6ah44g8aEybd79ePQxHoapv7lm6ok+Tuan309nNsxFR/IQ GBZ8umcU+gQPWrOa9ul8w++rTvJwOqN+s0ke+hSp3/3HYk6fR5/mIVetzK3F G32GB+sYvc3dZugoUh/rPxQqS77/iuZBx0R7UOAn/D7sLA9/G+7cTuLQ58j1 D+Nn9TmFjuFhc/zxu6ku6PPkeS/P3dSaib7Ag8EOleyAXuiLPOxbcMpb/Aa/ b4sl8Vgn8KPKHXQcD/IWy46qhKHjeSjJnOT/dzX6Eg9T1o9e5jAFfZmUzx9U Gnrwe7wEHmxumUPRM/QV0l5h7a7yF9CJPLyc02SycCc6iYfKcXqiGTboqzwc PGz96vIIdDIP/TPHys59h98TXuNhwBv7Q6lidAqJR2vYhImn0NfJ/JD0vuaY M/oG6b+bPVOspqFTeZDt4/79wkD0TRKfFmee90zC7yFvkfXcjvwRU63Rt8n6 ccCX8Q8y8XvKOzxkK34wPBGJTiPr1x+FuRbj0XfJ+m1LUy3k4fea93j4McrU w9wZnU7Wb71M53G90BkkPsg/zvkcht+D3uch0m7VEA1TtIiHLAX10OYa/L6U 4qFpht1p711omsxfgduVMoejGZL/gs8Ok5v4/SpLxudfN1fRejTHg9EoSzau Cb9/5Ul8m37/6PAQtJi01+NTKy4YojNJfBidf/F6Fn5f+4CMx4Y1QfdXoLPI ePWh+iz5i9/rPiT5N3zxVU5CZ5P+WkVHXNVAP+IhqJ/TD6WqSsGPeXAZcXvx puXoJ2Q+6O3atec7fk+cw8PRII24rXfQuTw8d4y1XGuGzuOBeVIWXFuJ3yvn k/KceLLXfwe6gIfWkr51anLoQjLfBS/RaUrD75+LSLymLRd3zEAX86BSfuqA WgZ+T13CQ1W1d7npUvRT8jy/2pEu7fh9dikPMz31usqPoJ/xsEoc+dJiLLqM 9O/2193nzuP33s95GGsXdnanKfoFiaeXDXVUXuH34+WkPVcb139tx+/LK8h4 PnlQZZgxupLM/1cfVb5Zgd+jvyTrUVcr0dPt+P36Kx5+Hxl++YA3ft/+moyX gDOtKsfw+/cqHjbIOIFWEX4f/4aH/RcddGoU0dVkPXYhP/XxAPye/i0PNf1d dq6Zg9/f1/Cwru9ySPfH7/Pf8XB+YXhl0kX8fv896b9yUQr9z+P3/R94SNi/ 2u4rhecBasn6NbTy+oJGPC/wkYfwJbtUt//B8wR1PFxsW9xwaBq6noxv3sB3 sQmeP2jg4dV8i9kuNXhe4RNZHwV/Syj3yxTcSNbja/+tiHfC8w6fyfNarf2O HcfzEF948E6IuJ2UjOclmsj69t+43x42lOCvPAw33dAY25ohuJmHcwsXhkW4 4HmMbyS+PAos/1uD5zVaSP0+bRPFbL8tuJWHA1VvCrmpqYLbyPqzdmbhh+5r gr+T8s74ETPQNknwDzJf9S2ar/4zXvBPsr+Sje8f6HxOcDspz8mFJ7Krjgn+ xcMj5bD0lUNCBHeQ+Tp+ufXgy7qCO8n46Gk/8+fVrqz/+TeZf68Gfr9yL1xw Fw/5X5fPG1IXLbibrA8KW3wqTfB8zR+yfr/S58ug+ETBf8l+JvFXgt6qa4J7 eFjxuEA2s+iG4H9kvayuXD137W3BMmL48vBetJz4ruBeYvh5IjJOxyZdsKwY Ahddr3aquS9YTgxUn2UZ3YfwvJG8GDpkC6t8NPE8Um8xaGY2psqY4nmlPmIw vNc+uqyJF9xXDHqKixdEL8bzTv3EoNpy2yf6I56H6i+G4tlGyjua8bzUADFU fL/CdmfheaqBYji3/6913Rc8bzVIDGO392QcLMDzWIPFcMCNeflGEc9vKYjh xzyXuYc08HzXEDEEN/wu7XiHHkruN3DnsCWVeB5MUQyv3ujve1+P58WUxDBg gs32jJN4vmyYGF4na9WZluP5s+FiuH3wm5/VNTyfpiyGuPwPl7Rr8fzaCDG8 7BV3bN9xPN+mIobUrJNV3x/g+beRYrjRz177GoPn40aR939hcdx5PZ6fGy2G xQrLAq68QauKoSz9cvzPlXj+Tk0MpmZ3b7j8Qo8Rw/RJE9eOWvRc8FgxrJ+v VjxoFJ73UxdD5YhnvSfsQGuIYU/R4BXPP6E1xaCSLWf3LADPE44TQ+KjPzOP f0OPJ+/7qm9W9j48j6glhjHpxd9G9MbzixPEoF57JKrgPFpbDAsuarTnjsXz jxPF4Ddh9wWbM+hJYtBe1T5n5QA8P6kjhsHMjynzItC6YjjxxLTopCaev9QT Q/odx2jXWLS+GEINn+mazsHzm5PFsErx0T0lMdpADGlLt83zm4fnP6eI4aDu 7kO+BWhDMfQ3SQks34znR43EYBFQrHX1I3qqGDbYOx+7vA/Pn04Tgw2Vsuhh J3q6GLbduuc8bweeX50hhu7ovX/DW9DGpP9x+criFDz/OlMMnVtzR8yRwfOy s8RgF7kr9eNytIkYzrwoKdeIRc8m9zcNOT+oFG0qhqfTu86vGYPndeeIQfRq WVb9FvRcMeiye5o8JOd9zcTQmjIvoOsb2lwMzbc69ZWt8bwwiKH6yOWcnmD0 PDGsqaivN65EW4jBcpbvuykyeD55vhh6qelq7Z+HXiCGkj2NZ++dRFuKYeHW 5Ekzq9FWYjgr993Ecxqej7Ym7eukvu5NAHqhGEbeMftrwaBtxKDGpPXzlcXz 2LYkPr2cw1gtRtuJ4Vid3ObcY2h7MSxqGPiBe4B2EMPbTXZxF9Xw/PciMj4y lzwYshW9mMS3PetS1qeh/yP99ZdaVKMMnjdfIoa6PY+9GFO0I2l/WuG1///r 6s7DcnreP4BbyhIhkSXSQoQoRUS6y5pdyhY+yFYhKiVFQpESUokKiSwlSyVx ZrJUyC5Lm7Kv0SJLqH7zvbyf63c5f76uOTNnnnNm7pnzx3PPXniaRLrlmwYM fAXbSRR7fVzsxZ74v7u9mG/uKe2aOsPTJVI/uCu+PhmeIRH3UAsIaIP/18+U aMR02w+J9vAsiWbPHNbiQDg8WyKPK/GRbd/DDmK+DBywzcdY8f9/ifruG/rU 0k3x/3+JPoyLeVRwV/H/f4neU7hTeFPkD/hPoqz4tbl5tvB8iexPF06+egxe IOLni0mJKj/hhRL1kDxsCsYgf4GjRNGJNktGRsKLRHya2+7ZoKfwYol2LW8e v7Yd8iMskWi0cqm/1wp4qURX7FLaV6bCyyTKm/Pzg7ca8jE4SdSrcGLncdNh Z4nCDV+90oyAXcR4dIyvvl0DL5dI+efHonQz5INYIZHd0lML+u+CV0rUKbDK NjgPdpWoNMXWxaQD8k2skui68+LxU83g1eJ5PXJPrF8Iu0nUfZbHm1nBsLuI j/rqFm7JsIdEL1JzXjTPh9eI+TBkU1lMQ+TP8BTtTdWe+FIT9hLxoyraabgd vFaibz/Wmc11g70l8nqesWt4DLxOIqdtZzqMyIV9xPv7uLRxk2rYV8ynAbxO U7fqr9dL/8uX1CR4GLxB3N+m+m3z+bCfREVbK1p+3A9vlEh7hf2k3edgf4lS v+6xGFwMb5KobEaEq2cL5D/ZLNGZaR99WhrCWyQ6tMpl38q5cICIL+YZJeZb 4UCJxpVrdQw6C2+VKGP8RpXEp/A2iTyHhuz8/RsOEvc7bNWy1gD5XLZLpGR0 M2qBLRwsUdMc8xkz/eAQMf4M9y6algLvkMi9fe3+wbfhUDGfBsXcm1cJ75SI 2WXfrNJDfppdIv52PNgwczy8W6wngcdvJHnCYWI9Ng2pjouF90h0uTBW/cIt OFyipfEOK1IbIL9OhFhfAzxXdekOR4r9yyfSrbGG90q0xNrYNngJHCXRkGLv yZcj4X0SJUR+7L0uC94vxntEZJOMP3C0eP/ui1Ketka+oBiJ+rXvfefZcDhW xEP6XOq3BD4gnqf/9iK7vfBB0Z+QxNaqOfAhsV41fPpSvQKOk2hQfHLQyw7I f3RYxIOuhW/OT4bjJbr0ZOwmt+XwEYniglL6DT8OH5Xo6JaRLtPy4QSJnsf9 PjHtK3xMxPP3g+7ZmiJ/03GJahJKx16dBZ+Q6L8jNT+NFfmgTkp0YOrYN8ZJ cKJEex2K59Rmw0kSPdo4rk2PRsg/dUqi+w+q8jvrwcli/gbsD/zoCJ+W6G3n tlGtQ+AzEi34pPk2MBE+K9qbUPxL7Rl8TiKHSKe7v5ojf1aK8PrQbt0Hw6kS verp/ruZIv9WmhifBZt8VfbA58X4zvo1sNFtOF3Mx2+xP4NL4Quivc+H1N+o If9Xhthvqr1VSR8MXxTjK+XFj9Mb4Uti/HyK1T8dBktifXtmTGeyYCbRTM2Y Xa+UkL+Mi/nomLv17EA4UyKTn0d970+GL0vU835ZxWl/+IoY38f7XXp4Dr4q nufMJTUXy+BrEqU8HdPgqyryr2WJ9WDWZet2E+Fs4cuT6y5Mh3PE74k7sHNJ FHxdomPRr/xsHsI3xP3d8h4f/Q7fFPvzuPApFxT543LFfueB7gb/sfAtiRbO bT3bfyN8W6zfDcqNzY/Cd8T+9OEm56RC+K6YL9Ptsia0QL67e2J+3Xwc/EwL vi9RuxnZV2Mt4AcS+S+620d3CvxQovl0fUaTZXCemN+r7xhErYcfSbTYN6qt 6g5F/j+x/y6w9H2drMj/J9Z/m342TbMU+f8kqlW7sMzkmSL/n1jf7jkVLKpW 5P+TyGK937ObKsgvWCiRRpJrybDucJHY3zQ/9m4UwcUSWTWa+r1gIvxMookn jpaNdYFLxPqgsXSdhh9cKvrPWVBBPPxcuHvrZLt0+IVYn1q6TR52C34pvud6 tpxfWgS/kihKa0dGXRPkb3wtUYhRqrprR/iNeN+ju1bUK/I9vpVoWLstF76N gd+J+TdVQ3PwUvi9WN86b+gydQ38QXwvzGtk2mYX/FGiN3YNi9+dhj+J8Wtm oWWaBZeJ8fY6bnfaI/iz2M9YtFqfVwN/EfHosa+LRifkxywX9d9pWhn1givE +1p6QLfDMLhSohuXVy+ocYCrJFrrmnX+5mr4q0SZFqlbQ0PhavH8vzd65RMP f5No3ca7Mwyvwd/F/LHt7x35BP4h0XTTTc7pn+GfEtVpZXs0aYp8ozVif3mw ze2V2vAviQztjMaeHQj/FuNVq3bBkSnwHxHPF37xuuUE14rr43RuNNoM10nU X/9h76/JcL3YH12wbFRxEW7AyMPgt+Pp+3BDRuP2JM0eWAk3YlT10z8wvTny uTZmNHLvbc86XViJ0WkbT29vM1iZ0ahnC39NV+SLbcKogXXGqssL4aaM5m+7 +XRCKNyM0eh85V7q8XBzRss2dNyumgOrMDLy4w8TSuAWjAbvGeJbUAm3ZPQj MSHHrXGTv1ZlFNqmpGaLIdyKUaq+Uv5UK7g1owH3z5iMnAi3YbRV19jUzBFW YxQ4xX7XfkX+3raMKieVze6VCqszumUdV2usyA/cjpGJlpJTj2K4PaP7Kg9K jv2GNRh9W7h9Xlpb5BvuwOhFUUq7sT3gjozabjT/EWoJd2LUzLXZ3tolcGdG S8zaH1rjBWsyyk83ahEVAXdhdKLq/RxrRf7krkzs3xu5RxfBWoxeB7r55r+F uzFqcz4w3LYZ8jNrM3r8fcauie1hHUYqOsE2AyxhXUYxI/NHH14I6zFaunfp 1rDlcHdGPKa0rfkOuAcjaVnsT5MTsD4jZYcXsSa34J7i965Y+ufkQ7gXo7Gj +/df9Bw2YKSlrF2dVw/3Fu9Lp6vp5j7If92H0bVIz+Y2lnBfRrFDBtwdsxI2 ZGS355FaUz+4H6PZkmfv3eFwf0YTlCvmreGwEaM4twd7ay/Axoz2N/meGfoD HiCe96hlZuqtkS/chNHvG4Wh5/RhU0bvi375Xh0AD2Rk0X7UtQEr4EGMinZ9 81XeBJsx+pnkWzozCh7MqPW9+64Vd+AhYvx39Hmgfx02F+9j6KGVfm/hoWI8 nGtr4/8HHsZoZt/vTsH9kG/dgtGgtIZmg4bCw8X4DSkdenU+bMnoQp1qwzmK fO/EaJ51G8dHB2ErMV4tw10/HoatxfP8+dSg6XV4BKO0RXd0n9fDIxl5xsQ9 sW6EfPSjxHwaF5zm0w0eLeLLl7DjLxT57McwSs9arp/mAI8V8eLIE1WnDbAN I+PurcJ09sLjGHUds9Hq0hl4PKP+ycWDBl2GJzAKGdxeKfEjPJGRdjPzglNK ivz/jN6cOa2UZ6zI/88oe1+V9MJKkf+f0bFY5/i8mYr8/4zW6MY6P1+hyP/P aGq/nsUbI+Fp4nmZzdirymA7RhObz811K4XtGVntanrQtCHON5jOqGPboJfG LeEZjIpP99Pe0RGeyejPtCLbd5PgWYxKXt89pu4BzxbjS80w1jICdmD0y88r Q/8gPEeMf8rQvFYIz2UUEDbG98treB4jt5EjGx5XxfkQ/4n2VCMDjujD8xmV 3dB22qXwAkYNRx+PHT4fXijG+76ebpFusKPoX89xBXah8CJRbqZ/fX8UvJjR ArtPfb8WwksY2Zu478/+Ay8V4+91VEUTJZyfsUzEIz3dBfbNYCdGp+r8hw/X hZ0Z9Qr99FbPEHZh1K56fnN3xfkdyxk5Lz6l1W0cvILR5ZiqsFYL4JWMXJ92 GcAWwq5iPWnXaWdTd3gVoyYaj2Yr74RXM9qxda2/zhHYjVHT6JwCp6Owu1hP PDVHTM2CPRg5/GqyfHsBvIZRyskJphV5sKeYfzlz8l8ozk/xYnSgJONgwHd4 LaP12lv7ta6HvUV7+ef/G6WC81fWMbqblO2sbQL7iPWv/TDlCMV5L76M/J9n d+4zGl7PiK3Yqjl4KrxBxOcCNzUVN9hPPH//A+89t8MbRXyfGdj3WgTsz8gv P883W3E+zSZGNlfvVdunwpsZrTtbm5B2Ed4i5l9pxAvzDDhAxOdDuePnlsKB jBp97tx21WN4K6MPxS/vfvkGbxPzp+7u6twaOEi8z17BN7QV5/lsZ7S5YN4s HwM4mNHH3s9MYwfBIWJ8b1ib9dEa3sGopnO3xrlz4VBGs1L1txUvhXcyuh2a e8E4EN4l4r/tmzqT9fBuRtHlR/urKM43ChPtf+1Vm7Qf3sNoTLBSdPdzcDgj 2j53zjMGRzAamuj9y+8OHMnI8rH/DvMX8F4RXzVnrb5eBkeJeBQ+4VR0I5zn tI+RuUpJ6jTF+U77hXMN5i42g6MZZeRt+SQNhGMY6a1f6XnCAo5l5NNr0o1O ivOmDjAq99KqsPOCD4p4ZrG5i9Eq+BCjHn10Nb7th+PEfqFxWoDJRvjw/+bv xaefzsDxYr/hY3D/50X4iNi/ae/qHnIbPsooOKfdvG2ZcILYjzU4bmP4BT7G aFJRafaiP/BxRm+DuNqpGviEGP+qVTr/Kc7/OsmoVbv+5pWmcKLoz439d55b wkli/dt24EyRBXxK7DfPNjfJmg0nM9qgc3bfTTf4tJjPs85b7dwIn2F0bmP8 +tqt8FlGLY4o9xgQD58T99/QOKo7h1MYXfU+GrcmDU5ltOpgbW7De3CamP9X F6nOrYfPM3K/0vlUzHs4ndGZ7BndU5rh/LcLYr9j2D+qUgPOYORy697yH3rw RUaTz16q7zoAvsTo69s/Uf2HwBKjcEOdNb8dYSbWk4q7UsxsmIt4auBzuovi PLtMRga3sl69c4cvi/X2QzR98YCviP2s4+AHO8/BV0V8Nz29bupN+Bojxwsm mW8y4SxGSlNa5bcog7MZvWv5zmZMBZzDaN/mE49y2inO/2MU9rZZiktLxfl/ jLYtN0xa3Bq+KZ7/pGud7rSCc8X+qM8099V28C0R/4sDQlRGwbcZedmOuO4z D74j4nP92OFHFecb3mU0MFPP8c0x+J74nonL7T0uEr7PyMznu+v4q/AD8T1j 1Se77BL8kNHhNNNRq9/AeYw+EZ1e9Qh+JOLFC8soz9fwY0Z7JiZMmdMD50E+ YeQbebNOswX8VMSv6SpHrk6B88V+P3ta02MD4QIxn8f/7hQ4Di4U86Ol2uoU R7iI0ZfQ0O/NZsDFoj83Z645tg1+JvYb3g67vcLgEvE+P+daeafApYzOOuxI rk2Gn4vvua+vQjbWwC8YLS5zGG73Hn4p4uXD3Nn7SuBXjGaUGE8Y1grne75m VD9B51a4KvyGUZ9+D26sMIDfivUj4IZ0URd+x+hByNI9v83g94zigza/zLCH P4j9po3r16eK80w/MlKNeF9dvgf+xGiY/46lt6PhMkY5eR0SVx6AP4vvhQth Jg6Z8BexP3repk/gZbhcrHeT/1htqoUrGAV5OKkvrIErxX42eISReZNOf10l 1rfypzqjv6H8q3h/PuWdQnugvFrst6ynLXPpCn8T41Gj9KTLdPi72F95prc6 sAz+Ifaz3Xz73zKCfzLq98vkqdZRuIaR+nftU80Xwb8YefdsOHrWbvg3I52G +oN+PIL/iO+35UPz7+XCtYzmKCvtkUrhOkY919k9CVHG+bz14vu18X+jqxrD DTht73S0S1Uerm/I6Y1HeOtleihvxOl9J1Pb4eZwY06BzcymTlsGK3GacbvO pW4srMz/PZ+4CafJQYfWGnjBTTmdrHU4z0PhZpzOv9+5IWEP3JxTyfWKAKVD sAqnkFOhT75zuAWnofQkKv813JKTp59z1qASWJWTUqFetEUV3IrTo1CPwg9d cD5za05jdatDojXgNpzMw8q3BC2H1cTve+lhbWUPt+VUVNx6sKcjrM7/PX+6 HSdNy+drYiLg9pz2+j6Zau4Fa3CKmO42wUBxfQdOtrGLV5e9gDtymjdJs0Dp OtyJU5NLffx1iuDO/N/ztTU5jf+8/PEaLZyf3YXT2YBUm3wbuCsnhyUOO/d8 x/VanGr+SBNLzFHejdOhk9v8Ls6HtTmdyLMMXO0E6/B/zyPX5bQnd6XFskuw HqdJRwJWZF6Bu3PqrOEsBb2De3Ba2qaNV8QxWJ9Th+2dwx5Wwz059R7oWmEy EOen9+L0n2dPByVT2IBTn2qW4qAO95aV9+FEfc5eOTEb7stp5sWY7BWTYENO x5wL2+cFw/04Zb3O7Kq5Be7PKX/1s9eP58NGnCJp9Hf7eNiYUyH1t/i2FR7A /z1v3oRTnbeViV4FbCp+37v1vY1K4YGcfqvvGH7HSOuvB3Hq9nHIzwg32IxT xyxz3/2z4cGcXjv5TY76jfpDxPuVEh5mzUW5OacnmTWLek+Fh3LKi52aVDkf HsZpVH76qqAtsIV4X6HW84KT4eHifaZ1P/woCbYU4+XH67qUFJg4nYqd5lg1 tNtfW3EyGxlzKqEBbC3m8/ItPwYYwSNkHinmx7Za3VIreBSnb2mZyh+7wKM5 aRv01TwWBI8Rdox87JIMj+VUG3e7vfFl2IaT+4vqpF5L4HGcPnvwH/lP4PGc Wp4IsVd9Dk/gdElt1OUmJ+GJnJImPXrhoqn915M4bZRUzYNbwpM5lXdUu67S F57CaY7Bg7dq31B/Kqen/k7ql3VQbsvJOvpLaGVXeJoY752q62aOgu04Fd8s KplhCNvL6k/nZMX0L23ygGeI+RFm+LzeHp4pxvfyvFBlb3gWp1fWx9dsmwfP FuPVg5o9mgk7cMpuOGJfzm54jnhfvrubJi2D53LaUVbeXMkdnsdp0+a2JVHp 8H+cEnqbVRunwvPFePLeV2zzEl7AafTRMev3lsALOSUXnE2s/QU7cnJ5Yq6d 8AleJOJXXUP/SRnwYk6tVw9p6vUYXiLuZ9kqQqefzl8v5aT3u/L8szbwMk77 n8+nQ6awEyePKr9k9wGwM6d92bfqHEbDLqI/6nq7H7SEl3PScRqSfGAsvILT +h1DfgxaCa/klN40cMPi6bArp4JDCcdbr4VXybxaZjcxXtqNWetsAbtzOqOt 9zl8Dewhu98aTjGNgzaF+cGeYv528zfbdQv24jSu4Eni0kJ4LadVvpfX+aTD 3pzs3vhMLr4Kr5OV+4h44nZk7tEbsC+nO587+s5qo/vX68V4KTS99aErvEHM d7VTexurwn6cNGx9Il/Wo/5GTkb1+UmO/VHuL+Jr7sBbuo3hTWI/MNbslI8V vFmM58ePXOfowFs4dS2un3WnDO0FcCqtbGbUxxzlgbL2t3I6MnRkycop8Dax Xva+tSBlHxwk4vn03ybqM+HtYv3aFOTccSMcLPYru7U/SyFwCCfL7Qc17lvA O2Tth3JSj3QtmREB7+Q0Mb3tlTRXeJeIJwkLWfJVeLeIb77zNh5LhcM4Hf6y cnJWc72/3sPJrdf9wOQalIeL9dnYoKfmAziC086PG6KrSuFITh8mlN2psUf9 vZwu51ZaLFgPR4nxlpm+YWg5rt8n5r/eMkONj/B+Ud83p2i8Ba6P5hSQXLPN 0RiO4bQlekwThxFwLKdBr24YDG8NH+Dkc/5spVkwfJDTlLSY6+9c4UNiP/Lu 9cXg03Acp3uHbxSPCYMPc0r75pyTsxCOl/XnCKfna7MO0hb4qIgfUad6VLft /tcJnBZYP9BIeILyY5xSM9ZeOZoDH+ek4miktnoffIJTv9CVt55Yo/5JTgYD 23SNK0d5ooiv2clhOulwkux+p2T9SZaVn+aUaGP7OawHfEbEI0uzQZYJ8FlZ f86J+Hl9xtxfE1CeIqufyumTsecw80w4Tdb/85xGWJpXdu8Pp4t4y0ocEr3g CzJncFIu3mdYtgm+KPan81XvXtDp8deXxHwcGmufvwaWRPx5sMEzqjHMZPW5 rD+ZnJz3MGWT/fBlWf+vcPLrknqv+zv4qph/udpnjW7D1zjNzdjMVoTCWSKe fbbq6rUN98/m9G7S5PznjnCOrH/XZeU3OE2LCddcZwzfFPNrwd3gnYVwLqfr +fUTAmzhW7L73ZaV35E9n7uy+9+T1b8v9g/XA+/fjIYfcPozx/3z1Er4oez6 PE7xcVeCFgzT/+tHsv4+5nT1pf4SveYofyLi3witvtlZKH8qay+f0xLfcl+n NFxfIOLb48XLtXThQk5Rm7W8L1nh+iJZ/4plfibWQ5cxO0pOwyWcVD8eG9Zm JtorlfX3OafoBo5dB9n1/OsXIp6UhgRI+bj+paz/r2R+LWv/Dacqyy3j54XD bznt6pfV2W4N/E7m97L7fRDx563qnBM90Z+PnGa7eDZIrkP5JxEPvO1jGgWg vEzs93bsXV59Ef4sq/9F9nzLZe1VyFwp63+VrH9fZfevlt3/m3g+Wx0T9Wcb /PV32fP9IeLNZt+0Q0N7/fVPTiu31wbv2A7XyPrzS1b/t+x+f2Tt1cr6Vyd7 HvWy+g0y/71/w0za/crdx/oHyhtl/nt948x/21fK/Pf3KsvKm2T+27+mmXSj y6jbb9/BzWT1m8v6oyJzC1n9lpn/Ph9VWX9byX5Pa1n/2mSSar/Pl1Z/xv3V xP3uWrco79b3r9vK6qvLytvJ7tdedr2G7Pd3kNXvKOt/J1l/OsusKXteXWTt d5W1ryWr3032/LRl7enInreurD092fXdM+le72lFKqz3X/eQ3U///8v/D+G7 5oM= "]], LineBox[{{7976., -12.676076274775909`}, {7977., -12.676076274775909`}, { 7978., -12.96375834722769}, {7979., -12.4529327234617}, { 7980., -13.369223455335854`}, {7981., -14.0623706358958}, { 7982., -12.676076274775909`}, {7983., -13.369223455335854`}, { 7984., -13.369223455335854`}, {7985., -14.0623706358958}, { 7986., -14.0623706358958}}], LineBox[{{7988., -13.369223455335854`}, {7989., -12.96375834722769}, { 7990., -13.369223455335854`}, {7991., -14.0623706358958}, { 7992., -13.369223455335854`}, {7993., -13.369223455335854`}, { 7994., -12.96375834722769}}], LineBox[{{7996., -12.96375834722769}, {7997., -14.0623706358958}, { 7998., -14.0623706358958}}], LineBox[{{8001., -13.369223455335854`}, {8002., -13.369223455335854`}, { 8003., -13.369223455335854`}, {8004., -12.96375834722769}, { 8005., -12.676076274775909`}}], LineBox[{{8007., -14.0623706358958}, {8008., -13.369223455335854`}, { 8009., -14.0623706358958}}], LineBox[{{8011., -14.0623706358958}, {8012., -14.0623706358958}, { 8013., -13.369223455335854`}, {8014., -13.369223455335854`}, { 8015., -14.0623706358958}, {8016., -13.369223455335854`}, { 8017., -14.0623706358958}, {8018., -14.0623706358958}}], LineBox[{{8025., -14.0623706358958}, {8026., -13.369223455335854`}, { 8027., -14.0623706358958}}], LineBox[{{8032., -13.369223455335854`}, {8033., -14.0623706358958}}], LineBox[{{8035., -14.0623706358958}, {8036., -14.0623706358958}, { 8037., -14.0623706358958}}], LineBox[{{8042., -14.0623706358958}, {8043., -14.0623706358958}}], LineBox[{{8081., -14.0623706358958}, {8082., -14.0623706358958}, { 8083., -14.0623706358958}}]}}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[1.6]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[ 1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ NCache[ Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[ 1.6]}, {}}}, {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0., -15.273793688306661`}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{ Charting`ScaledTicks[{Log, Exp}], Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Exp[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Exp[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0., 8142}, {-15.273793688306661`, 1.4179514231559174`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, Ticks->FrontEndValueCache[{Automatic, Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{-13.815510557964274`, FormBox[ TemplateBox[{"10", RowBox[{"-", "6"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-9.210340371976182, FormBox[ TemplateBox[{"10", RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-4.605170185988091, FormBox[ TagBox[ InterpretationBox["\"0.01\"", 0.01, AutoDelete -> True], NumberForm[#, { DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {0., FormBox["1", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-11.512925464970229`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-6.907755278982137, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2.3025850929940455`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2.302585092994046, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {4.605170185988092, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}}}]]], "Output", CellChangeTimes->{{3.785003466427495*^9, 3.7850034763522387`*^9}, { 3.785003506656761*^9, 3.7850035279403973`*^9}, {3.785003558770405*^9, 3.785003582849557*^9}, 3.7850036590215187`*^9, {3.78500372032237*^9, 3.785003755582879*^9}, {3.785003794389751*^9, 3.785003801551887*^9}, { 3.7850038600098743`*^9, 3.7850039066366453`*^9}, {3.785003995477704*^9, 3.7850040433445587`*^9}, 3.78500482809217*^9, 3.7850053303088083`*^9, 3.785006116816091*^9, {3.785056891624435*^9, 3.785056917777589*^9}, { 3.7850572794770412`*^9, 3.7850572903202963`*^9}, 3.7850576616058693`*^9, 3.785057733942786*^9, 3.785063510525573*^9, 3.7850646381587*^9, { 3.789820924287415*^9, 3.7898209511296062`*^9}}, CellLabel-> "Out[215]=",ExpressionUUID->"765eacb6-1851-4d58-84e2-e2ed47100b2f"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"tData", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"4", ",", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"13", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"32.95", ",", "\"\\""}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"42", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"21.57", ",", "\"\\""}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"16", ",", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"2", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"55", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"5.77", ",", "\"\\""}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"32", ",", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"14", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"31", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"15.87", ",", "\"\\""}], "]"}]}]}], "}"}]}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.7850582222461777`*^9, 3.785058233197236*^9}, { 3.785091499131219*^9, 3.785091529298004*^9}}, CellLabel->"In[22]:=",ExpressionUUID->"8f6a5438-be42-44f3-87d6-da2bc37c171f"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"tFit", "=", RowBox[{"LinearModelFit", "[", RowBox[{ RowBox[{"Log2", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#1", ",", RowBox[{"#2", "/", RowBox[{"Quantity", "[", "\"\\"", "]"}]}]}], "}"}], "&"}], "@@@", "tData"}], "]"}], ",", "x", ",", "x"}], "]"}]}]], "Input", CellChangeTimes->{{3.785058234789083*^9, 3.785058316373475*^9}, { 3.785058353021956*^9, 3.785058353982479*^9}, 3.7850583994503117`*^9, { 3.78505845364515*^9, 3.785058453928129*^9}}, CellLabel->"In[23]:=",ExpressionUUID->"c4cbaaa3-d693-4c1c-b0a0-8724f52d4d94"], Cell[BoxData[ TagBox[ RowBox[{"FittedModel", "[", TagBox[ PanelBox[ TagBox[ RowBox[{ RowBox[{"-", "10.919686950725108`"}], "+", RowBox[{"2.006789423582779`", " ", "x"}]}], Short[#, 2]& ], FrameMargins->5], Editable -> False], "]"}], InterpretTemplate[ FittedModel[{ "Linear", {-10.919686950725108`, 2.006789423582779}, {{$CellContext`x}, {1, $CellContext`x}}, {0, 0}}, {{ 1., 1., 1., 1.}}, {{2, -6.731720879223929}, {3, -5.0872394411908575`}, { 4, -3.0398494069726665`}, {5, -0.7248861453540679}}, {{1., 2.}, {1., 3.}, {1., 4.}, {1., 5.}}, Function[Null, Internal`LocalizedBlock[{$CellContext`x}, #], {HoldAll}]]& ], Editable->False, SelectWithContents->True, Selectable->True]], "Output", CellChangeTimes->{{3.785058261893118*^9, 3.7850583167277937`*^9}, 3.7850583541983747`*^9, 3.7850584046666822`*^9, 3.785058454267872*^9, 3.785091533090296*^9}, CellLabel->"Out[23]=",ExpressionUUID->"fa68dd36-a911-4b03-a5e1-774b6ced48f8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"Log2", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#1", ",", RowBox[{"#2", "/", RowBox[{"Quantity", "[", "\"\\"", "]"}]}]}], "}"}], "&"}], "@@@", "tData"}], "]"}], ",", RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"tFit", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "5"}], "}"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{ RowBox[{"ColorData", "[", "97", "]"}], "[", "2", "]"}]}]}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.785057971969727*^9, 3.7850580830023727`*^9}, 3.785058221488821*^9, {3.7850583313816633`*^9, 3.785058407210636*^9}, { 3.7850584584440813`*^9, 3.785058458720736*^9}, {3.785098280897551*^9, 3.785098288548439*^9}}, CellLabel->"In[91]:=",ExpressionUUID->"ea17c51f-a1d7-41fd-a34c-228c2d4ab784"], Cell[BoxData[ GraphicsBox[{{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6], LineBox[{{2., -6.731720879223929}, {3., -5.0872394411908575`}, { 4., -3.0398494069726665`}, {5., -0.7248861453540679}}]}}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, { {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.012833333333333334`], AbsoluteThickness[ 1.6]}, {}}}, {{}, {}}}, {{{}, {}, TagBox[ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" 1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAnX5iBjFkez582GAu4dYlwMTTIExX IFk/gA9r0k3VJcD/xr6DICBpP4VGdXa60yXAncCNHwUgeT+OtIm+k9AlwGw9 dW33H4k/oZCyTkbKJcDT+2iU8B+ZP8ZIBG+rvSXAB9viJ+0fqT8QuaevdaQl wKHKn3HrH7k/pZnuMApyJcCur4nbbC7KP3eEpsi3BCXAZz/Rmexy0z9Y1P38 o54kwG7lKeO0rtk/JSB4y5A6JMAKIYQn3zjgP5qVHC8CziPAjhDLKqFg4z8f cGAvsmgjwGLbVL8DzOY/S3TOxOb6IsBxxYRibyfqP2R0X/QbjyLAsXAMUxhJ 7T+M2Y/AjyoiwKF7a+owV/A/XGjqIYi9IcCCn/xR9OzxPztc5B+/VyHAANPg QLx68z8HTAG49vMgwCZ0ZnhUKvU/emVI5bKHIMDk9ZdWC732P/7jLq+tIiDA SuVqfZJx+D9QGH8cWmofwE7kkCseHvo/f2DmDlqTHsDqw2KAyK37P8xyjDrX yh3ALhHWHUNf/T9p2IaQXfEcwAo/9WHc8/4/JAjAH2EmHMBH7Vr3IlUAQDCL TdltShvA2MJkAVosAUAUBiHHe3IawLWIxF4g9QFAFksz7gapGcBmBXXgzs4C QGnjmT+bzhjAY3J7tQyaA0DaRT/KrAIYwC9nK85MYQRAJKAqib86F8DPEiwL dTkFQL1NanLbYRbAu66CmywDBkB2xeiUdJcVwHsBKlDM3QZAfpC74Ra8FMAK 3HpIbrQHQF9T1GK65BPA5aYhlJ98CEBe4Csd2xsTwJQoGQS5VQlArsDXAQVC EsCQmmbHYSAKQBprwh+sdhHAWpRdzgznCkBhDfNxVK8QwPhEpfmfvgtA8AXw 3AuuD8Dj5UJ4wocMQFiFd0hpGg7Aoj0xG81hDUBgq6cI2WQMwK2FdRFnLQ5A pGVVO0PMCsCHVWNLA/UOQJoPj9avOwnANdyhqYfND0AyYHHGLokHwJgpm63N SxBABEXRKKjzBcB/wI2YS7kQQHTQ2d8zPATATRtVpcokEUCcS27/wYwCwEFu x1sRiRFAAFuAkUr6AMCfHGIkzPURQAgidvDKi/6/JMOnlk5bEkCAtuai9Vz7 v5AtwirSvhJAYCpvJiU++L9m8wTRySoTQIDrSFN52/S/YrHyIImPE0AY1R1l wrLxv2yCU/xKkRNA0OmEUqek8b91U7TXDJMTQIj+6z+MlvG/iPV1jpCWE0Dw J7oaVnrxv645+fuXnRNAyHpW0OlB8b/5wf/WpqsTQIAgjzsR0fC/kNIMjcTH E0DQ1wAkwN7vv5qjbWiGyRNAMAHP/onC77+jdM5DSMsTQKAqndlTpu+/thaQ +svOE0CAfTmP523vv9xaE2jT1RNAICNy+g797r8n4xlD4uMTQJBu49BdG+6/ MLR6HqTlE0AAmLGrJ//tvzqF2/ll5xNAcMF/hvHi7b9MJ52w6eoTQFAUHDyF qu2/cmsgHvHxE0AAulSnrDntv3w8gfmy8xNAYOMignYd7b+FDeLUdPUTQNAM 8VxAAe2/mK+ji/j4E0CwX40S1Mjsv6KABGe6+hNAEIlb7Z2s7L+rUWVCfPwT QICyKchnkOy/tCLGHT7+E0AA3PeiMXTsv77zJvn//xNAYAXGfftX7L+8GFpU "]]}, Annotation[#, "Charting`Private`Tag$141775#1"]& ]}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{1.9375000000000002`, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{1.9375000000000002`, 5.}, {-6.731720879223929, 0}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.02]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{ 3.785058012185809*^9, {3.785058062951374*^9, 3.7850580832349863`*^9}, { 3.7850583426184177`*^9, 3.785058408046142*^9}, {3.785058455108177*^9, 3.785058459228675*^9}, 3.785091533739656*^9, 3.785098295086089*^9}, CellLabel->"Out[91]=",ExpressionUUID->"734656d0-32f9-40e2-a69d-89571abd59bf"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"2", "^", RowBox[{"tFit", "[", "7", "]"}]}]], "Input", CellChangeTimes->{{3.785058386832859*^9, 3.785058477063302*^9}, 3.78506383677318*^9, {3.7850915410821342`*^9, 3.785091541656537*^9}, { 3.78509844755682*^9, 3.785098483105493*^9}}, CellLabel->"In[97]:=",ExpressionUUID->"249cb54f-1c35-414f-8168-27f2195185e6"], Cell[BoxData["8.741246451133405`"], "Output", CellChangeTimes->{{3.785058395254241*^9, 3.7850584775526667`*^9}, 3.785063837484005*^9, {3.785091534969634*^9, 3.785091541930415*^9}, { 3.7850984450125093`*^9, 3.785098483493142*^9}}, CellLabel->"Out[97]=",ExpressionUUID->"9b814a6a-324d-4cb2-98b4-7e298a5398a1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"UnitConvert", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"2", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"55", ",", "\"\\""}], "]"}], "+", RowBox[{"Quantity", "[", RowBox[{"5.77", ",", "\"\\""}], "]"}]}], ")"}], "16", " ", "2"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.785098739458117*^9, 3.785098761159773*^9}}, CellLabel-> "In[100]:=",ExpressionUUID->"e66c9322-9282-4dd8-b7bf-4e72fb9ae72c"], Cell[BoxData[ TemplateBox[{"93.38462222222222`","\"h\"","hours","\"Hours\""}, "Quantity"]], "Output", CellChangeTimes->{{3.785098744320797*^9, 3.785098762761623*^9}}, CellLabel-> "Out[100]=",ExpressionUUID->"a4c4ccfb-7bb8-41fb-a9fe-42202dac8ba9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"UnitConvert", "[", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"415330.76", ",", "\"\\""}], "]"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.789864568431135*^9, 3.7898646115539017`*^9}}, CellLabel->"In[54]:=",ExpressionUUID->"627962e9-b7e0-4522-91c1-a872c1829f1a"], Cell[BoxData[ TemplateBox[{"115.36965555555555`","\"h\"","hours","\"Hours\""}, "Quantity"]], "Output", CellChangeTimes->{3.789864611844674*^9}, CellLabel->"Out[54]=",ExpressionUUID->"2ccc1fbf-388f-4931-a956-b768507e520d"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"UnitConvert", "[", RowBox[{ RowBox[{"Quantity", "[", RowBox[{"528330.62", ",", "\"\\""}], "]"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.789864620940146*^9, 3.7898646325142736`*^9}}, CellLabel->"In[55]:=",ExpressionUUID->"a8cc9c6c-6fc3-4b82-9191-4d7c4984dc2c"], Cell[BoxData[ TemplateBox[{"146.75850555555556`","\"h\"","hours","\"Hours\""}, "Quantity"]], "Output", CellChangeTimes->{3.789864632797861*^9}, CellLabel->"Out[55]=",ExpressionUUID->"3e2cba64-6d05-4547-852b-bb9117d96801"] }, Open ]] }, WindowSize->{1277, 1060}, WindowMargins->{{Automatic, 2}, {2, Automatic}}, FrontEndVersion->"12.0 for Linux x86 (64-bit) (April 8, 2019)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[558, 20, 3307, 78, 146, "Input",ExpressionUUID->"6ca216e4-4a7b-4e5f-a718-f4e70c77d6a2"], Cell[3868, 100, 668, 18, 59, "Input",ExpressionUUID->"f756d73a-4921-45d7-acd1-44fe21438a02"], Cell[4539, 120, 417, 7, 31, "Input",ExpressionUUID->"c91e85b2-f90e-40d7-bf19-7a03fd9499bb"], Cell[4959, 129, 819, 23, 31, "Input",ExpressionUUID->"1b068f0a-fa61-487d-893c-5b00f279e758"], Cell[5781, 154, 1819, 48, 78, "Input",ExpressionUUID->"83b164e2-d1bf-4be5-bf92-d3645cb950ca"], Cell[7603, 204, 963, 26, 49, "Input",ExpressionUUID->"f81a2199-caac-407b-95bf-2211d7b265a5"], Cell[8569, 232, 756, 18, 50, "Input",ExpressionUUID->"a0e3da7a-9e7b-466f-bc4d-cb0b0d8819f4"], Cell[9328, 252, 2200, 55, 106, "Input",ExpressionUUID->"cfeba3ce-dc48-40c8-b8b8-f34cf59a253d"], Cell[11531, 309, 1026, 28, 39, "Input",ExpressionUUID->"9b0c3339-71cd-41f6-9ef3-ca7bd5b2e440"], Cell[12560, 339, 1306, 28, 31, "Input",ExpressionUUID->"a1830ef0-911d-442d-b5d2-b62c202fce89"], Cell[13869, 369, 656, 14, 31, "Input",ExpressionUUID->"c5d823f9-e85c-4b3b-b05c-3154ec28aa66"], Cell[14528, 385, 1810, 44, 99, "Input",ExpressionUUID->"b26da0ea-b484-4f10-9733-25392042ef58"], Cell[16341, 431, 506, 11, 31, "Input",ExpressionUUID->"3b7ef50e-b362-4da3-b734-818bb17a7c2f"], Cell[CellGroupData[{ Cell[16872, 446, 321, 9, 31, "Input",ExpressionUUID->"1d9176bd-3b77-4ecc-9453-1c9a125a6eca"], Cell[17196, 457, 15983, 311, 217, "Output",ExpressionUUID->"94444a82-e2b3-4106-a108-782b27727f6c"] }, Open ]], Cell[33194, 771, 1829, 48, 101, "Input",ExpressionUUID->"965aa541-441e-48ee-b9c7-6c04093a0d42"], Cell[35026, 821, 1515, 37, 101, "Input",ExpressionUUID->"0885a315-6bfe-4916-87e6-8a66c95472da"], Cell[CellGroupData[{ Cell[36566, 862, 1315, 33, 31, "Input",ExpressionUUID->"b9af9737-77db-4699-8144-d484234a5c9a"], Cell[37884, 897, 51062, 911, 251, "Output",ExpressionUUID->"fcf23027-c302-44d1-9d27-16acc04f8948"] }, Open ]], Cell[CellGroupData[{ Cell[88983, 1813, 1654, 44, 55, "Input",ExpressionUUID->"d80acc58-e355-49f5-8e82-b7a019a31499"], Cell[90640, 1859, 41211, 776, 246, "Output",ExpressionUUID->"f41cbe29-ba97-4889-a68f-a761c37c429b"] }, Open ]], Cell[131866, 2638, 1054, 27, 78, "Input",ExpressionUUID->"09f155dc-a270-465f-83b4-5452a9d3c6a6"], Cell[132923, 2667, 1187, 25, 78, "Input",ExpressionUUID->"faf27222-05ad-48db-b551-d6176fd5d567"], Cell[CellGroupData[{ Cell[134135, 2696, 2141, 48, 55, "Input",ExpressionUUID->"511fd1ec-10b6-4e80-beb1-748a7f18c95e"], Cell[136279, 2746, 42042, 797, 242, "Output",ExpressionUUID->"f62a50cd-fb60-4044-88c1-f71ceba66716"] }, Open ]], Cell[178336, 3546, 482, 15, 31, "Input",ExpressionUUID->"5a1efa6e-dfe2-4d60-ae14-3a6c7a1d321c"], Cell[CellGroupData[{ Cell[178843, 3565, 1038, 22, 31, "Input",ExpressionUUID->"90d2bb91-ba31-44f8-b0ca-47994c701e88"], Cell[179884, 3589, 1434, 20, 35, "Output",ExpressionUUID->"e1195010-cc94-47f8-88d9-a44426afb4c8"] }, Open ]], Cell[CellGroupData[{ Cell[181355, 3614, 605, 16, 31, "Input",ExpressionUUID->"24a1235a-0106-41db-84ea-024b7cb0822c"], Cell[181963, 3632, 656, 10, 35, "Output",ExpressionUUID->"c8e8618e-dea4-4e8b-ba15-191c5ed897bf"] }, Open ]], Cell[CellGroupData[{ Cell[182656, 3647, 509, 14, 31, "Input",ExpressionUUID->"6c35788f-083e-448b-82aa-5d86bb96b55a"], Cell[183168, 3663, 188, 4, 35, "Output",ExpressionUUID->"8859f4d2-839c-4aad-be80-f128e6490cbc"] }, Open ]], Cell[183371, 3670, 2103, 62, 101, "Input",ExpressionUUID->"49fe8588-a840-4740-82fd-06e6920b19de"], Cell[CellGroupData[{ Cell[185499, 3736, 1210, 31, 55, "Input",ExpressionUUID->"63c8922f-d24e-46ca-a537-602acfdc4822"], Cell[186712, 3769, 21772, 444, 251, "Output",ExpressionUUID->"7ce3143a-014a-4c43-92bf-fb28b22193ae"] }, Open ]], Cell[208499, 4216, 1462, 45, 129, "Input",ExpressionUUID->"666e65f1-8d79-40dc-9b3a-fee9e9d2fc06"], Cell[CellGroupData[{ Cell[209986, 4265, 1046, 26, 31, "Input",ExpressionUUID->"fdefbdb5-3432-48a1-ab56-2911aa735797"], Cell[211035, 4293, 24186, 484, 233, "Output",ExpressionUUID->"011cfe76-5e46-4695-9c02-f9b1d9e2513f"] }, Open ]], Cell[CellGroupData[{ Cell[235258, 4782, 664, 18, 31, "Input",ExpressionUUID->"6bf8aea7-b7b9-4d5b-a161-210bee9bd86a"], Cell[235925, 4802, 15808, 284, 247, "Output",ExpressionUUID->"34d6c5b9-6a15-4a71-8c30-e23185f77056"] }, Open ]], Cell[CellGroupData[{ Cell[251770, 5091, 1167, 25, 31, "Input",ExpressionUUID->"57f24fa6-c961-417d-8040-d9f006e7bc42"], Cell[252940, 5118, 76969, 1284, 238, "Output",ExpressionUUID->"765eacb6-1851-4d58-84e2-e2ed47100b2f"] }, Open ]], Cell[329924, 6405, 1553, 40, 78, "Input",ExpressionUUID->"8f6a5438-be42-44f3-87d6-da2bc37c171f"], Cell[CellGroupData[{ Cell[331502, 6449, 632, 15, 31, "Input",ExpressionUUID->"c4cbaaa3-d693-4c1c-b0a0-8724f52d4d94"], Cell[332137, 6466, 1038, 28, 46, "Output",ExpressionUUID->"fa68dd36-a911-4b03-a5e1-774b6ced48f8"] }, Open ]], Cell[CellGroupData[{ Cell[333212, 6499, 1030, 27, 31, "Input",ExpressionUUID->"ea17c51f-a1d7-41fd-a34c-228c2d4ab784"], Cell[334245, 6528, 3907, 81, 240, "Output",ExpressionUUID->"734656d0-32f9-40e2-a69d-89571abd59bf"] }, Open ]], Cell[CellGroupData[{ Cell[338189, 6614, 347, 6, 31, "Input",ExpressionUUID->"249cb54f-1c35-414f-8168-27f2195185e6"], Cell[338539, 6622, 316, 4, 35, "Output",ExpressionUUID->"9b814a6a-324d-4cb2-98b4-7e298a5398a1"] }, Open ]], Cell[CellGroupData[{ Cell[338892, 6631, 589, 15, 31, "Input",ExpressionUUID->"e66c9322-9282-4dd8-b7bf-4e72fb9ae72c"], Cell[339484, 6648, 253, 5, 35, "Output",ExpressionUUID->"a4c4ccfb-7bb8-41fb-a9fe-42202dac8ba9"] }, Open ]], Cell[CellGroupData[{ Cell[339774, 6658, 333, 7, 31, "Input",ExpressionUUID->"627962e9-b7e0-4522-91c1-a872c1829f1a"], Cell[340110, 6667, 226, 4, 35, "Output",ExpressionUUID->"2ccc1fbf-388f-4931-a956-b768507e520d"] }, Open ]], Cell[CellGroupData[{ Cell[340373, 6676, 333, 7, 31, "Input",ExpressionUUID->"a8cc9c6c-6fc3-4b82-9191-4d7c4984dc2c"], Cell[340709, 6685, 226, 4, 35, "Output",ExpressionUUID->"3e2cba64-6d05-4547-852b-bb9117d96801"] }, Open ]] } ] *)