(* 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[ 442145, 9556] NotebookOptionsPosition[ 421073, 9227] NotebookOutlinePosition[ 421409, 9242] CellTagsIndexPosition[ 421366, 9239] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Initialization", "Title", CellChangeTimes->{{3.782624936755896*^9, 3.78262494500487*^9}},ExpressionUUID->"9a643c6d-1044-4612-8f7a-\ 377e028cd777"], Cell[BoxData[{ RowBox[{"Needs", "[", "\"\\"", "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"MaTeX", ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{ "{", "\"\<\\\\usepackage{amssymb,amsmath,latexsym,amsfonts,amsthm,\ mathpazo,xcolor,bm,mhchem}\>\"", "}"}]}]}], "]"}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.7288240181604652`*^9, 3.728824027007351*^9}, { 3.733131339213026*^9, 3.733131352923026*^9}}, CellLabel->"In[1]:=",ExpressionUUID->"8b7c0bbd-9f99-42dc-b8a5-a4dc3cb8cc89"], Cell[BoxData[ RowBox[{ RowBox[{"HaToeV", "=", "27.21138602"}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.7208031947801647`*^9, 3.7208032000677156`*^9}, { 3.7208034541742477`*^9, 3.720803455246439*^9}}, CellLabel->"In[3]:=",ExpressionUUID->"b24e8243-3c38-4b03-af3a-708cb1afa004"], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["\[Delta]", RowBox[{"a_", ",", "b_"}]], ":=", RowBox[{"KroneckerDelta", "[", RowBox[{"a", ",", "b"}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{3.5767843605069733`*^9}, CellLabel->"In[4]:=",ExpressionUUID->"5822ee69-a453-46a0-9a58-bd14b8a97301"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["F", "0"], "[", "t_", "]"}], ":=", RowBox[{"If", "[", RowBox[{ RowBox[{"t", "\[Equal]", "0"}], ",", "1", ",", RowBox[{ FractionBox["1", "2"], SqrtBox[ FractionBox["\[Pi]", "t"]], RowBox[{"Erf", "[", SqrtBox["t"], "]"}]}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.5764508510320177`*^9, 3.576450882688406*^9}, { 3.576460057492025*^9, 3.5764600828205853`*^9}, {3.5764671476781178`*^9, 3.5764671766921053`*^9}, {3.579916170955673*^9, 3.579916171041703*^9}, { 3.579916284781068*^9, 3.5799162848679523`*^9}, {3.579917335658855*^9, 3.5799173370087748`*^9}, 3.57991775752785*^9, {3.580013360449069*^9, 3.580013371032818*^9}, {3.791204493514099*^9, 3.791204494904435*^9}}, CellLabel->"In[5]:=",ExpressionUUID->"43788edb-8cf4-404a-88d1-db5bf1515eb0"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"\[CapitalGamma]", "[", "x_", "]"}], ":=", RowBox[{"Gamma", "[", "x", "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5767843605069733`*^9, {3.668756017902652*^9, 3.668756027660227*^9}}, CellLabel->"In[6]:=",ExpressionUUID->"058853fd-911e-44b3-8eac-1c3fbeb8c4a5"], Cell[BoxData[ RowBox[{ RowBox[{"$Assumptions", "\[Rule]", RowBox[{"R", ">", "0"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790612553197805*^9, 3.790612558626453*^9}}, CellLabel->"In[7]:=",ExpressionUUID->"5dbbd40c-d911-445f-b476-85cd91f8d014"] }, Closed]], Cell[CellGroupData[{ Cell["Matrix elements", "Title", CellChangeTimes->{{3.779526821452816*^9, 3.77952682493222*^9}},ExpressionUUID->"98d632cb-7177-481c-9b9f-\ d6f48d10e284"], Cell[CellGroupData[{ Cell[, "Section",ExpressionUUID->"9458067c-0b7a-4f70-9a58-1f771c4b3842"], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"11bf4889-b9bd-4f4e-8dbb-a1e9e8a04d2a"], Cell[BoxData[ RowBox[{ RowBox[{"\[ScriptCapitalS]", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]_", ",", "A_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Beta]_", ",", "B_"}], "}"}]}], "]"}], ":=", RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Alpha]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Beta]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], SuperscriptBox[ RowBox[{"(", FractionBox["\[Pi]", RowBox[{"\[Alpha]", "+", "\[Beta]"}]], ")"}], RowBox[{"3", "/", "2"}]], RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"\[Alpha]", " ", "\[Beta]"}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]]}], " ", SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{"A", "-", "B"}], "]"}], "2"]}], "]"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.576450521600048*^9, 3.576450601477757*^9}, { 3.576872585214479*^9, 3.576872668475618*^9}, {3.57687272885421*^9, 3.576872728944818*^9}, {3.579916092387648*^9, 3.579916142300425*^9}, { 3.6560325968246727`*^9, 3.656032627333782*^9}, {3.6560334237894363`*^9, 3.6560334543496313`*^9}, 3.656033501500393*^9, {3.656034168807974*^9, 3.656034169503957*^9}, 3.656034249838081*^9, 3.65603428628251*^9, { 3.657419237952764*^9, 3.657419243496664*^9}, {3.657432554859721*^9, 3.6574325625623617`*^9}, {3.7795268642448807`*^9, 3.779526892756715*^9}, { 3.790614097995901*^9, 3.790614134630106*^9}}, CellLabel->"In[8]:=",ExpressionUUID->"fd4d58e4-e6f8-4497-ac22-d536c7dc2652"], Cell[BoxData[ RowBox[{ RowBox[{"\[ScriptCapitalT]", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]_", ",", "A_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Beta]_", ",", "B_"}], "}"}]}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"\[Alpha]", " ", "\[Beta]"}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]], RowBox[{"(", RowBox[{"3", "-", RowBox[{ FractionBox[ RowBox[{"2", "\[Alpha]", " ", "\[Beta]"}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]], SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{"A", "-", "B"}], "]"}], "2"]}]}], ")"}], RowBox[{"\[ScriptCapitalS]", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]", ",", "A"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Beta]", ",", "B"}], "}"}]}], "]"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.5764506077735443`*^9, 3.576450636952054*^9}, { 3.579916143373057*^9, 3.579916148380529*^9}, {3.656032632015997*^9, 3.656032656876679*^9}, {3.6560341704633427`*^9, 3.656034171112013*^9}, 3.6560342990101433`*^9, {3.656034587343053*^9, 3.656034588398306*^9}, { 3.657419246521282*^9, 3.657419251312986*^9}, {3.6574325567021017`*^9, 3.657432563402364*^9}, {3.779526874688856*^9, 3.779526896028626*^9}, 3.790614198473736*^9, 3.79061641080725*^9}, CellLabel->"In[9]:=",ExpressionUUID->"f4215905-d329-4e5c-925a-feafdeee6fce"], Cell[BoxData[ RowBox[{ RowBox[{"\[ScriptCapitalV]", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]_", ",", "A_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Beta]_", ",", "B_"}], "}"}], ",", RowBox[{"{", RowBox[{"ZC_", ",", "C_"}], "}"}]}], "]"}], ":=", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"2", "\[Pi]", " ", "ZC"}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]]}], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Alpha]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Beta]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], RowBox[{ SubscriptBox["F", "0"], "[", RowBox[{ RowBox[{"(", RowBox[{"\[Alpha]", "+", "\[Beta]"}], ")"}], SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{ FractionBox[ RowBox[{ RowBox[{"\[Alpha]", " ", "A"}], "+", RowBox[{"\[Beta]", " ", "B"}]}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]], "-", "C"}], "]"}], "2"]}], "]"}], RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"\[Alpha]", " ", "\[Beta]"}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]]}], " ", SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{"A", "-", "B"}], "]"}], "2"]}], "]"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.5764506469916887`*^9, {3.576450689278904*^9, 3.576450845913303*^9}, { 3.576450891155459*^9, 3.5764508913303423`*^9}, {3.576459615586534*^9, 3.576459619742888*^9}, {3.5764599742451572`*^9, 3.576460002180661*^9}, { 3.579916151076499*^9, 3.579916154291819*^9}, {3.6560326719657087`*^9, 3.656032705698762*^9}, {3.656032784400991*^9, 3.6560327883205967`*^9}, { 3.656034171959223*^9, 3.6560341725918818`*^9}, 3.6560345909276237`*^9, 3.656034741857669*^9, {3.6574192551059093`*^9, 3.657419257808338*^9}, { 3.65743255880517*^9, 3.657432564418058*^9}, {3.779526877419273*^9, 3.7795268990686483`*^9}, 3.790614203831818*^9}, CellLabel->"In[10]:=",ExpressionUUID->"517a10dc-802a-4ead-9f44-0905089379ba"], Cell[BoxData[ RowBox[{ RowBox[{"\[ScriptCapitalU]", "[", RowBox[{ RowBox[{"{", RowBox[{"\[Alpha]_", ",", "A_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Beta]_", ",", "B_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Gamma]_", ",", "C_"}], "}"}], ",", RowBox[{"{", RowBox[{"\[Delta]_", ",", "D_"}], "}"}]}], "]"}], ":=", RowBox[{ FractionBox[ RowBox[{"2", SuperscriptBox["\[Pi]", RowBox[{"5", "/", "2"}]], " "}], RowBox[{ RowBox[{"(", RowBox[{"\[Alpha]", "+", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"\[Gamma]", "+", "\[Delta]"}], ")"}], SqrtBox[ RowBox[{ "\[Alpha]", "+", "\[Beta]", "+", "\[Gamma]", "+", "\[Delta]"}]]}]], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Alpha]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Beta]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Gamma]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", "\[Delta]"}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], RowBox[{ SubscriptBox["F", "0"], "[", RowBox[{ FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"\[Alpha]", "+", "\[Beta]"}], ")"}], RowBox[{"(", RowBox[{"\[Gamma]", "+", "\[Delta]"}], ")"}]}], RowBox[{"\[Alpha]", "+", "\[Beta]", "+", "\[Gamma]", "+", "\[Delta]"}]], SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{ FractionBox[ RowBox[{ RowBox[{"\[Alpha]", " ", "A"}], "+", RowBox[{"\[Beta]", " ", "B"}]}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]], "-", FractionBox[ RowBox[{ RowBox[{"\[Gamma]", " ", "C"}], "+", RowBox[{"\[Delta]", " ", "D"}]}], RowBox[{"\[Gamma]", "+", "\[Delta]"}]]}], "]"}], "2"]}], "]"}], RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"\[Alpha]", " ", "\[Beta]"}], RowBox[{"\[Alpha]", "+", "\[Beta]"}]]}], " ", SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{"A", "-", "B"}], "]"}], "2"]}], "]"}], RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"\[Gamma]", " ", "\[Delta]"}], RowBox[{"\[Gamma]", "+", "\[Delta]"}]]}], " ", SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{"C", "-", "D"}], "]"}], "2"]}], "]"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.5764509073310003`*^9, 3.576451028887642*^9}, { 3.576460736353737*^9, 3.576460738268038*^9}, 3.576464845679883*^9, { 3.5799161578550377`*^9, 3.579916159903202*^9}, {3.579916203518588*^9, 3.579916203677882*^9}, {3.656032713388176*^9, 3.6560327526888027`*^9}, { 3.656032805105885*^9, 3.656032821823473*^9}, {3.6560333882078037`*^9, 3.656033412302227*^9}, {3.6560334619334507`*^9, 3.6560334911467667`*^9}, { 3.6560341750473127`*^9, 3.6560341763679028`*^9}, {3.656034591807816*^9, 3.656034593991696*^9}, {3.656034836229966*^9, 3.656034848075869*^9}, { 3.657419260329598*^9, 3.657419274128447*^9}, {3.6574325601692133`*^9, 3.657432565287834*^9}, {3.779526885627684*^9, 3.7795269060209312`*^9}, { 3.779599173326108*^9, 3.7795991739647827`*^9}, {3.790614205920676*^9, 3.790614210485475*^9}}, CellLabel->"In[11]:=",ExpressionUUID->"440fb372-2001-4d90-ade1-e5498676702f"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["DFAs", "Title", CellChangeTimes->{{3.7826249735359907`*^9, 3.7826249744308434`*^9}},ExpressionUUID->"cdfcc3a6-7299-4a1b-a9d0-\ f29078225f1e"], Cell[CellGroupData[{ Cell[, "Section",ExpressionUUID->"23d29e55-92a0-4dbd-8800-76494f7702a3"], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"5917ba4c-2cd7-4975-9b3b-073e72bd0e40"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"c8ade4e2-951f-4fce-ae16-fdd4ea72db6f"], Cell[, "Output",ExpressionUUID->"e2c1e6f8-35e1-43ee-b47e-a64bb64f8585"] }, Open ]], Cell[, "Input",ExpressionUUID->"02e08ec6-7c15-4841-9609-90296edfe494"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"150e916f-8806-4d8e-b5d0-c0bc713b1f4d"], Cell[, "Output",ExpressionUUID->"fb35d58c-512f-4f74-aa01-67c7b7b81a77"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[, "Section",ExpressionUUID->"8fd0ca40-ccd3-410e-8538-798441b5cf4b"], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"10e37c4d-fcc0-4a25-949c-6383c67ff9eb"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"b7e33c7b-f239-4612-b339-911d66bee804"], Cell[, "Output",ExpressionUUID->"3acd8e38-829c-4dd5-ac53-54c357a30852"], Cell[, "Output",ExpressionUUID->"0a957f43-bd43-468d-a336-addbe42a4e30"] }, Open ]], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"5bc098a3-a8b3-48df-b81b-4249253ebc03"], Cell[, "Output",ExpressionUUID->"3597039b-63a4-48ef-b436-f5b1fb49d7fd"] }, Open ]], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"7707f078-0791-4cee-b4ea-44b37115dc20"], Cell[, "Output",ExpressionUUID->"d4f8c9be-6e4c-40eb-ba9a-d4053731284e"], Cell[, "Output",ExpressionUUID->"2e03225f-8957-4361-919c-4f6a7c36dc6e"] }, Open ]], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"731b5390-31ed-4914-91db-765023c263dd"], Cell[, "Output",ExpressionUUID->"ed71661b-3a8d-4eee-a4d0-69211937142a"] }, Open ]], Cell[, "Input",ExpressionUUID->"1f5927dc-663a-4f11-a2d1-7bc195f79332"] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["eDFAs", "Title", CellChangeTimes->{{3.7826249522813463`*^9, 3.782624958928115*^9}},ExpressionUUID->"e756f09e-4f67-4fb6-a4c1-\ 1a4fcf53e013"], Cell[CellGroupData[{ Cell["eLDA exchange", "Section", CellChangeTimes->{{3.7826249982517223`*^9, 3.782625006542748*^9}, { 3.7826250653667927`*^9, 3.7826250672414913`*^9}, {3.782625110014524*^9, 3.782625116494841*^9}},ExpressionUUID->"81f07a4a-071b-4e38-8018-\ d116e770b20b"], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"7471e1f3-36cd-497f-a3e0-06aa7035995d"], Cell[, "Text",ExpressionUUID->"c0165a48-1e75-4237-86f9-15c7a0fc2c6e"], Cell[, "Input",ExpressionUUID->"eeea1fbc-15c7-4b79-b5b2-0d2e682c7cb1"], Cell[, "Text",ExpressionUUID->"6509cf0c-3cb5-4484-a79b-9a4e9a4c867b"], Cell[, "Input",ExpressionUUID->"ea3020ca-486a-47b1-95e0-aa46f448646d"], Cell[, "Text",ExpressionUUID->"dc6b5921-169b-4f2d-9120-4c7ca89c05f3"], Cell[, "Input",ExpressionUUID->"12ac5e19-b8fd-477e-a85d-a74e029b6d4c"], Cell[, "Text",ExpressionUUID->"21ac5bf4-2ae7-4b41-8495-ff3b6d5d2017"], Cell[, "Input",ExpressionUUID->"c8865179-994b-4123-9657-507eae2fd52f"], Cell[, "Text",ExpressionUUID->"d352d13e-d96f-4f21-9cc5-32da8a2e376d"], Cell[, "Input",ExpressionUUID->"e2a90d7c-9765-4224-b6c1-0cb3ba56719e"], Cell[, "Text",ExpressionUUID->"4256ed0c-1e05-4553-a95a-370962e94038"], Cell[, "Input",ExpressionUUID->"d7507220-76aa-479e-af51-0886ad0e4f5c"] }, Closed]], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"06909924-3ce1-46cd-9951-a1961992331f"], Cell[, "Text",ExpressionUUID->"00f96a87-a2a3-4e94-b9f7-ae8b20115f53"], Cell[, "Input",ExpressionUUID->"4eb0128c-86a9-44cb-baf0-ed4eebc1e580"], Cell[, "Text",ExpressionUUID->"9803e7ae-a081-4acb-a592-f69d3de67cb1"], Cell[, "Input",ExpressionUUID->"6f3a9707-559f-42d1-a790-59e5b1f4e142"], Cell[, "Text",ExpressionUUID->"d5065f92-c8dc-4b04-8355-2a9254137fdd"], Cell[, "Input",ExpressionUUID->"701f739c-3702-4026-bb77-fd214c3d2d73"], Cell[, "Text",ExpressionUUID->"de63bd9f-a6da-4080-be2f-7a3017d5f45e"], Cell[, "Input",ExpressionUUID->"8bcda35c-6687-40f7-8100-1822b15b723a"], Cell[, "Text",ExpressionUUID->"426f209f-956e-43ba-9527-ec27b0f09378"], Cell[, "Input",ExpressionUUID->"cf1020b9-32d9-40d8-a3f9-f6fd7cc9eb77"], Cell[, "Text",ExpressionUUID->"8b03673b-8e98-4de2-b69e-483417ba6223"], Cell[, "Input",ExpressionUUID->"a883904a-8742-4fa2-8a54-45a9e5a1e807"] }, Closed]], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"77af7129-5b6f-46d1-972e-088c04a397e1"], Cell[, "Text",ExpressionUUID->"137a2815-3e41-4c54-bb77-2baab3309f67"], Cell[, "Input",ExpressionUUID->"ee1a49a3-d78d-48fd-b18b-b45c556268d6"], Cell[, "Text",ExpressionUUID->"7f6139ea-87a7-485f-96a7-072785ed5a50"], Cell[, "Input",ExpressionUUID->"e2512605-e53f-4895-bc29-b005c70f53b5"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"2caf6c5b-6ae4-41ea-a5bc-6e2553b311b0"], Cell[, "Output",ExpressionUUID->"71a67885-8142-46b8-9292-410654424b59"] }, Open ]], Cell[, "Text",ExpressionUUID->"32015b28-f5cc-4eff-8d8d-b8691b888e8f"], Cell[, "Input",ExpressionUUID->"1fcbd290-f3ea-43bd-b2ef-f31601137679"], Cell[, "Text",ExpressionUUID->"9b1e04fb-55cb-4e81-8daf-ba707c78dfce"], Cell[, "Input",ExpressionUUID->"c51ccbbc-5ee1-4cca-ade7-af230c7f6ba6"], Cell[, "Text",ExpressionUUID->"8bfb35af-a4e4-4813-ae15-3703f4aeab96"], Cell[, "Input",ExpressionUUID->"60e340d1-6bd1-4928-9814-51c59353edd1"], Cell[, "Text",ExpressionUUID->"f5f45693-a80c-4a46-ad73-07811620c0d9"], Cell[, "Input",ExpressionUUID->"f99857fd-0430-402d-a733-929b6b359e23"] }, Closed]], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"ef62b877-dbc0-41f4-bb50-f7bab5069a50"], Cell[, "Text",ExpressionUUID->"5b10be0f-a732-422f-9446-681c78cbd103"], Cell[, "Input",ExpressionUUID->"009be4dc-79a6-499d-b9af-ddbb9078f85a"], Cell[, "Input",ExpressionUUID->"afd8bd15-999f-411c-a673-53d5b75e5201"], Cell[, "Text",ExpressionUUID->"1fe4835f-3b82-458a-9e2a-9272922b081a"], Cell[, "Input",ExpressionUUID->"b5e6e435-424a-4f3e-8416-709ae4356a73"], Cell[, "Text",ExpressionUUID->"d05917ae-a767-4a78-834a-c4b18c1c0b13"] }, Closed]], Cell[CellGroupData[{ Cell[, "Subsection",ExpressionUUID->"bcd158fd-9aa7-4c7b-837e-afd37c54f55a"], Cell[, "Text",ExpressionUUID->"a0112f10-d580-4370-a6ed-bff98b24a4a6"], Cell[, "Input",ExpressionUUID->"aabf1284-1a62-408f-8d1c-50c99b5acc35"], Cell[, "Text",ExpressionUUID->"88a4bd50-0ba7-4f7c-9fc0-e0feb01831fc"], Cell[, "Input",ExpressionUUID->"a889f096-9a50-426c-9cf3-81c363ec2eaf"], Cell[, "Text",ExpressionUUID->"d3c69495-05ef-49fe-8484-fa7fd62cc408"], Cell[, "Input",ExpressionUUID->"0138b572-760b-4f82-a618-73197e776fa2"], Cell[, "Text",ExpressionUUID->"b83db319-04e5-42b8-ae4c-57f93abe09fd"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["eLDA correlation", "Section", CellChangeTimes->{{3.7826249982517223`*^9, 3.782625006542748*^9}, { 3.7826250653667927`*^9, 3.7826250672414913`*^9}, 3.782625112301036*^9},ExpressionUUID->"258ca12d-c8c5-4bc9-84ec-\ 1711f7860786"], Cell[CellGroupData[{ Cell["Explicitly-correlated calculations", "Subsection", CellChangeTimes->{{3.726073981425799*^9, 3.7260739868717747`*^9}, { 3.742878146737846*^9, 3.742878154661549*^9}, {3.742878200397444*^9, 3.74287820116363*^9}, {3.7429004809627247`*^9, 3.742900482248204*^9}, { 3.743008847489559*^9, 3.743008848427631*^9}},ExpressionUUID->"1f7fd91a-8b15-493d-99e6-\ d7e40486d265"], Cell[BoxData[ RowBox[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"M", "=", "10"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "n_"], "[", "u_", "]"}], "=", SuperscriptBox["u", RowBox[{"n", "-", "1"}]]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"H", "[", "R_", "]"}], "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ SubsuperscriptBox["\[Integral]", "0", RowBox[{"2", "R"}]], RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "i"], "[", "u", "]"}], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ FractionBox[ SuperscriptBox["u", "2"], RowBox[{"4", SuperscriptBox["R", "2"]}]], "-", "1"}], ")"}], RowBox[{ SubsuperscriptBox["\[Psi]", "j", "\[DoublePrime]"], "[", "u", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"5", "u"}], RowBox[{"4", SuperscriptBox["R", "2"]}]], "-", FractionBox["2", "u"]}], ")"}], " ", RowBox[{ SubsuperscriptBox["\[Psi]", "j", "\[Prime]"], "[", "u", "]"}]}], "+", RowBox[{ FractionBox["1", "u"], RowBox[{ SubscriptBox["\[Psi]", "j"], "[", "u", "]"}]}]}], ")"}], SuperscriptBox["u", "2"], " ", SqrtBox[ RowBox[{"1", "-", FractionBox[ SuperscriptBox["u", "2"], RowBox[{"4", " ", SuperscriptBox["R", "2"]}]]}]], RowBox[{"\[DifferentialD]", "u"}]}]}], ",", RowBox[{"{", RowBox[{"i", ",", "M"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "M"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"S", "[", "R_", "]"}], "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ SubsuperscriptBox["\[Integral]", "0", RowBox[{"2", "R"}]], RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "i"], "[", "u", "]"}], RowBox[{ SubscriptBox["\[Psi]", "j"], "[", "u", "]"}], SuperscriptBox["u", "2"], " ", SqrtBox[ RowBox[{"1", "-", FractionBox[ SuperscriptBox["u", "2"], RowBox[{"4", " ", SuperscriptBox["R", "2"]}]]}]], RowBox[{"\[DifferentialD]", "u"}]}]}], ",", RowBox[{"{", RowBox[{"i", ",", "M"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "M"}], "}"}]}], "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", CellChangeTimes->{{3.742918604620111*^9, 3.7429186131351423`*^9}, 3.742918719955948*^9, {3.74291885295679*^9, 3.742918854648775*^9}, 3.742922362967875*^9, 3.742980439148241*^9, 3.742980540306929*^9, { 3.742994989188118*^9, 3.742995016518692*^9}, {3.742995150772037*^9, 3.7429951513978567`*^9}, 3.7429952985264072`*^9, {3.74299538074587*^9, 3.7429953808123302`*^9}, {3.742996132486848*^9, 3.7429961349036427`*^9}, 3.7429963078815823`*^9, {3.742996660743409*^9, 3.742996660843338*^9}, { 3.742996945034573*^9, 3.742996945161457*^9}, 3.7430081967857656`*^9, 3.743009059579871*^9, 3.743009234820531*^9, 3.743009382026333*^9, { 3.7430094920285807`*^9, 3.74300951455619*^9}, 3.74300961041049*^9, 3.743009666438663*^9, {3.7430098539824047`*^9, 3.743009854170718*^9}, 3.743009922023739*^9, 3.743134546286873*^9, 3.743134666275275*^9, { 3.74322049794233*^9, 3.7432204980603647`*^9}, 3.743249005112269*^9, { 3.743249116887512*^9, 3.743249129269992*^9}, {3.743249272993807*^9, 3.743249285356189*^9}, {3.743250236465829*^9, 3.743250264555167*^9}, 3.743252170343741*^9, {3.748320687040152*^9, 3.7483207268379183`*^9}, 3.748320783735428*^9, {3.748361427987043*^9, 3.748361428073436*^9}, { 3.753773332985786*^9, 3.753773347232463*^9}}, CellLabel->"In[65]:=",ExpressionUUID->"2c3eb4d2-28fa-4072-acba-f33846909355"], Cell[BoxData[ RowBox[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"M", "=", "10"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "n_"], "[", "u_", "]"}], "=", SuperscriptBox["u", RowBox[{"n", "-", "1"}]]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"H1", "[", "R_", "]"}], "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ SubsuperscriptBox["\[Integral]", "0", RowBox[{"2", "R"}]], RowBox[{ RowBox[{ SubscriptBox["\[Psi]", "i"], "[", "u", "]"}], RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ FractionBox[ SuperscriptBox["u", "2"], RowBox[{"4", SuperscriptBox["R", "2"]}]], "-", "1"}], ")"}], RowBox[{ SubsuperscriptBox["\[Psi]", "j", "\[DoublePrime]"], "[", "u", "]"}]}], "+", RowBox[{ RowBox[{"(", RowBox[{ FractionBox[ RowBox[{"7", "u"}], RowBox[{"4", SuperscriptBox["R", "2"]}]], "-", FractionBox["2", "u"]}], ")"}], " ", RowBox[{ SubsuperscriptBox["\[Psi]", "j", "\[Prime]"], "[", "u", "]"}]}], "+", RowBox[{ FractionBox["1", "u"], RowBox[{ SubscriptBox["\[Psi]", "j"], "[", "u", "]"}]}]}], ")"}], SuperscriptBox["u", "2"], " ", SqrtBox[ RowBox[{"1", "-", FractionBox[ SuperscriptBox["u", "2"], RowBox[{"4", " ", SuperscriptBox["R", "2"]}]]}]], RowBox[{"\[DifferentialD]", "u"}]}]}], ",", RowBox[{"{", RowBox[{"i", ",", "M"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "M"}], "}"}]}], "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", CellChangeTimes->{{3.742918604620111*^9, 3.7429186131351423`*^9}, 3.742918719955948*^9, {3.74291885295679*^9, 3.742918854648775*^9}, 3.742922362967875*^9, 3.742980439148241*^9, 3.742980540306929*^9, { 3.742994989188118*^9, 3.742995016518692*^9}, {3.742995150772037*^9, 3.7429951513978567`*^9}, 3.7429952985264072`*^9, {3.74299538074587*^9, 3.7429953808123302`*^9}, {3.742996132486848*^9, 3.7429961349036427`*^9}, 3.7429963078815823`*^9, {3.742996660743409*^9, 3.742996660843338*^9}, { 3.742996945034573*^9, 3.742996945161457*^9}, 3.7430081967857656`*^9, 3.743009059579871*^9, 3.743009234820531*^9, 3.743009382026333*^9, { 3.7430094920285807`*^9, 3.74300951455619*^9}, 3.74300961041049*^9, 3.743009666438663*^9, {3.7430098539824047`*^9, 3.743009854170718*^9}, 3.743009922023739*^9, 3.743134546286873*^9, 3.743134666275275*^9, { 3.74322049794233*^9, 3.7432204980603647`*^9}, 3.743249005112269*^9, { 3.743249116887512*^9, 3.743249129269992*^9}, {3.743249272993807*^9, 3.743249285356189*^9}, {3.743250236465829*^9, 3.743250264555167*^9}, 3.743252170343741*^9, {3.748320687040152*^9, 3.7483207268379183`*^9}, 3.748320783735428*^9, {3.748361427987043*^9, 3.748361428073436*^9}, { 3.753773332985786*^9, 3.753773347232463*^9}, {3.7537734366652946`*^9, 3.7537734507751827`*^9}, {3.753773511672027*^9, 3.753773520247346*^9}}, CellLabel->"In[66]:=",ExpressionUUID->"c078489f-d878-44cc-991e-1146d0ec84cb"], Cell[BoxData[{ RowBox[{ RowBox[{"Eig0", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"R", ",", RowBox[{ RowBox[{ FractionBox["1", "2"], RowBox[{ RowBox[{"Sort", "[", RowBox[{"Eigenvalues", "[", RowBox[{"{", RowBox[{ RowBox[{"N", "[", RowBox[{ RowBox[{"H", "[", "R", "]"}], ",", "100"}], "]"}], ",", RowBox[{"N", "[", RowBox[{ RowBox[{"S", "[", "R", "]"}], ",", "100"}], "]"}]}], "}"}], "]"}], "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], "-", RowBox[{ FractionBox["1", "2"], RowBox[{"(", FractionBox["8", RowBox[{"3", " ", "\[Pi]", " ", "R"}]], ")"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"R", ",", RowBox[{"{", RowBox[{ FractionBox["1", "10"], ",", FractionBox["1", "5"], ",", FractionBox["1", "2"], ",", "1", ",", "2", ",", "5", ",", "10", ",", "20", ",", "50", ",", "100", ",", "150"}], "}"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eig1", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"R", ",", RowBox[{ RowBox[{ FractionBox["1", "2"], RowBox[{ RowBox[{"Sort", "[", RowBox[{"Eigenvalues", "[", RowBox[{"{", RowBox[{ RowBox[{"N", "[", RowBox[{ RowBox[{"H1", "[", "R", "]"}], ",", "100"}], "]"}], ",", RowBox[{"N", "[", RowBox[{ RowBox[{"S", "[", "R", "]"}], ",", "100"}], "]"}]}], "}"}], "]"}], "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], "-", RowBox[{ FractionBox["1", "2"], RowBox[{"(", FractionBox[ RowBox[{"16", " "}], RowBox[{"5", "\[Pi]", " ", "R"}]], ")"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"R", ",", RowBox[{"{", RowBox[{ FractionBox["1", "10"], ",", FractionBox["1", "5"], ",", FractionBox["1", "2"], ",", "1", ",", "2", ",", "5", ",", "10", ",", "20", ",", "50", ",", "100", ",", "150"}], "}"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Eig2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"R", ",", RowBox[{ RowBox[{ FractionBox["1", "2"], RowBox[{ RowBox[{"Sort", "[", RowBox[{"Eigenvalues", "[", RowBox[{"{", RowBox[{ RowBox[{"N", "[", RowBox[{ RowBox[{"H", "[", "R", "]"}], ",", "100"}], "]"}], ",", RowBox[{"N", "[", RowBox[{ RowBox[{"S", "[", "R", "]"}], ",", "100"}], "]"}]}], "}"}], "]"}], "]"}], "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], "-", RowBox[{ FractionBox["1", "2"], RowBox[{"(", RowBox[{ FractionBox["3", SuperscriptBox["R", "2"]], "+", FractionBox["352", RowBox[{"105", " ", "\[Pi]", " ", "R"}]]}], ")"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"R", ",", RowBox[{"{", RowBox[{ FractionBox["1", "10"], ",", FractionBox["1", "5"], ",", FractionBox["1", "2"], ",", "1", ",", "2", ",", "5", ",", "10", ",", "20", ",", "50", ",", "100", ",", "150"}], "}"}]}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.748320848858045*^9, 3.748320856154438*^9}, { 3.748320887956957*^9, 3.7483208881681957`*^9}, {3.748361672158485*^9, 3.748361684168634*^9}, {3.7483647689725313`*^9, 3.748364772816889*^9}, { 3.7483651934130507`*^9, 3.748365201736299*^9}, {3.753773322322504*^9, 3.753773326079838*^9}, {3.753773529304337*^9, 3.753773533079694*^9}, 3.753773752654941*^9, {3.753773908151957*^9, 3.753773925542416*^9}, 3.782710474505459*^9, {3.7827105601283092`*^9, 3.7827105648819723`*^9}, { 3.782710653611959*^9, 3.7827106554025517`*^9}, {3.7912676193117228`*^9, 3.791267632485333*^9}, {3.791267737525374*^9, 3.7912677419882507`*^9}, { 3.791269037464747*^9, 3.791269059761744*^9}, {3.791269135649015*^9, 3.791269170256198*^9}, {3.791276444924409*^9, 3.7912764555726767`*^9}}, CellLabel->"In[67]:=",ExpressionUUID->"9d8f3aff-de80-478e-b7fa-93c98d3997e8"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"FindFit", "[", RowBox[{"Eig0", ",", RowBox[{ FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["R", RowBox[{"1", "/", "2"}]]}], "+", RowBox[{"c", " ", "R"}]}]], "/.", RowBox[{"a", "->", RowBox[{"-", "0.0238184"}]}]}], ",", RowBox[{"{", RowBox[{"b", ",", "c"}], "}"}], ",", "R", ",", RowBox[{"MaxIterations", "\[Rule]", "10000"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"FindFit", "[", RowBox[{"Eig1", ",", RowBox[{ FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["R", RowBox[{"1", "/", "2"}]]}], "+", RowBox[{"c", " ", "R"}]}]], "/.", RowBox[{"a", "->", RowBox[{"-", "0.0282814"}]}]}], ",", RowBox[{"{", RowBox[{"b", ",", "c"}], "}"}], ",", "R", ",", RowBox[{"MaxIterations", "\[Rule]", "10000"}]}], "]"}], "\[IndentingNewLine]", RowBox[{"FindFit", "[", RowBox[{"Eig2", ",", RowBox[{ FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["R", RowBox[{"1", "/", "2"}]]}], "+", RowBox[{"c", " ", "R"}]}]], "/.", RowBox[{"a", "->", RowBox[{"-", "0.0144633"}]}]}], ",", RowBox[{"{", RowBox[{"b", ",", "c"}], "}"}], ",", "R", ",", RowBox[{"MaxIterations", "\[Rule]", "10000"}]}], "]"}]}], "Input", CellChangeTimes->{{3.74490442616041*^9, 3.744904462164751*^9}, { 3.744904493398246*^9, 3.7449044986891108`*^9}, {3.7449046086546717`*^9, 3.744904615683036*^9}, {3.744904661010707*^9, 3.744904730630151*^9}, { 3.7449048318432503`*^9, 3.7449048371708803`*^9}, {3.7483209427957153`*^9, 3.748320947610834*^9}, 3.7483614480757113`*^9, {3.748365049730114*^9, 3.74836505539084*^9}, {3.748365092652234*^9, 3.748365121022852*^9}, { 3.748365229503859*^9, 3.748365229661584*^9}, {3.7537740097668867`*^9, 3.753774017885911*^9}, {3.753774087759344*^9, 3.753774102439625*^9}, 3.782710634125111*^9, {3.78271069785186*^9, 3.782710724897832*^9}, 3.7912677201511717`*^9, {3.79126924431262*^9, 3.7912692716226997`*^9}, { 3.791276460110341*^9, 3.791276465060092*^9}}, CellLabel-> "In[409]:=",ExpressionUUID->"04f137ec-ad47-4cb8-a976-ec708cc8747a"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"b", "\[Rule]", "0.007923352705637004`"}], ",", RowBox[{"c", "\[Rule]", "0.17820175850290984`"}]}], "}"}]], "Output", CellChangeTimes->{{3.744904447194687*^9, 3.744904462614192*^9}, 3.7449044992640533`*^9, {3.744904616038113*^9, 3.7449047310161533`*^9}, 3.744904838229162*^9, 3.744910399143386*^9, 3.744957251784482*^9, 3.7449642181369953`*^9, 3.744972167413603*^9, 3.74508253355338*^9, 3.745118966686862*^9, 3.7451441000025997`*^9, 3.7479804201223307`*^9, 3.748320948669895*^9, 3.748361529488284*^9, 3.748361579108712*^9, { 3.748361677134914*^9, 3.748361685861054*^9}, 3.748364775740555*^9, 3.7483650558506002`*^9, {3.748365101887542*^9, 3.748365121567154*^9}, { 3.7483652043125143`*^9, 3.748365230113633*^9}, 3.753774018593093*^9, 3.753774104519877*^9, {3.782710627979114*^9, 3.782710634588338*^9}, { 3.7827106837527514`*^9, 3.782710725915807*^9}, 3.791269009712132*^9, { 3.791269043595293*^9, 3.7912690625486803`*^9}, 3.7912691435884867`*^9, { 3.7912692492180557`*^9, 3.791269271962544*^9}, {3.79127646571692*^9, 3.7912764689355803`*^9}}, CellLabel-> "Out[409]=",ExpressionUUID->"5fafddca-de0e-4199-8a06-2f07bcbeb991"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"b", "\[Rule]", "0.004011883522661856`"}], ",", RowBox[{"c", "\[Rule]", "0.14262596914269524`"}]}], "}"}]], "Output", CellChangeTimes->{{3.744904447194687*^9, 3.744904462614192*^9}, 3.7449044992640533`*^9, {3.744904616038113*^9, 3.7449047310161533`*^9}, 3.744904838229162*^9, 3.744910399143386*^9, 3.744957251784482*^9, 3.7449642181369953`*^9, 3.744972167413603*^9, 3.74508253355338*^9, 3.745118966686862*^9, 3.7451441000025997`*^9, 3.7479804201223307`*^9, 3.748320948669895*^9, 3.748361529488284*^9, 3.748361579108712*^9, { 3.748361677134914*^9, 3.748361685861054*^9}, 3.748364775740555*^9, 3.7483650558506002`*^9, {3.748365101887542*^9, 3.748365121567154*^9}, { 3.7483652043125143`*^9, 3.748365230113633*^9}, 3.753774018593093*^9, 3.753774104519877*^9, {3.782710627979114*^9, 3.782710634588338*^9}, { 3.7827106837527514`*^9, 3.782710725915807*^9}, 3.791269009712132*^9, { 3.791269043595293*^9, 3.7912690625486803`*^9}, 3.7912691435884867`*^9, { 3.7912692492180557`*^9, 3.791269271962544*^9}, {3.79127646571692*^9, 3.791276468937379*^9}}, CellLabel-> "Out[410]=",ExpressionUUID->"fc860ff0-d7ef-459d-b9bd-49bdcfea456c"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"b", "\[Rule]", RowBox[{"-", "0.07411135123824349`"}]}], ",", RowBox[{"c", "\[Rule]", "0.07108999554813503`"}]}], "}"}]], "Output", CellChangeTimes->{{3.744904447194687*^9, 3.744904462614192*^9}, 3.7449044992640533`*^9, {3.744904616038113*^9, 3.7449047310161533`*^9}, 3.744904838229162*^9, 3.744910399143386*^9, 3.744957251784482*^9, 3.7449642181369953`*^9, 3.744972167413603*^9, 3.74508253355338*^9, 3.745118966686862*^9, 3.7451441000025997`*^9, 3.7479804201223307`*^9, 3.748320948669895*^9, 3.748361529488284*^9, 3.748361579108712*^9, { 3.748361677134914*^9, 3.748361685861054*^9}, 3.748364775740555*^9, 3.7483650558506002`*^9, {3.748365101887542*^9, 3.748365121567154*^9}, { 3.7483652043125143`*^9, 3.748365230113633*^9}, 3.753774018593093*^9, 3.753774104519877*^9, {3.782710627979114*^9, 3.782710634588338*^9}, { 3.7827106837527514`*^9, 3.782710725915807*^9}, 3.791269009712132*^9, { 3.791269043595293*^9, 3.7912690625486803`*^9}, 3.7912691435884867`*^9, { 3.7912692492180557`*^9, 3.791269271962544*^9}, {3.79127646571692*^9, 3.791276468939496*^9}}, CellLabel-> "Out[411]=",ExpressionUUID->"be1fc15b-822b-40ee-83e7-f10e88666d7f"] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"\[Epsilon]c0", "[", "\[Rho]_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"R", "=", FractionBox["1", RowBox[{ SuperscriptBox["\[Pi]", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox["\[Rho]", RowBox[{"1", "/", "3"}]]}]]}], ",", RowBox[{"a", "=", RowBox[{"-", "0.0238184"}]}], ",", RowBox[{"b", "=", "0.007923352705637004`"}], ",", RowBox[{"c", "=", "0.17820175850290984`"}]}], "}"}], ",", FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["R", RowBox[{"1", "/", "2"}]]}], "+", RowBox[{"c", " ", "R"}]}]]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]c1", "[", "\[Rho]_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"R", "=", FractionBox["1", RowBox[{ SuperscriptBox["\[Pi]", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox["\[Rho]", RowBox[{"1", "/", "3"}]]}]]}], ",", RowBox[{"a", "=", RowBox[{"-", "0.0282814"}]}], ",", RowBox[{"b", "=", "0.004011883522661856`"}], ",", RowBox[{"c", "=", "0.14262596914269524`"}]}], "}"}], ",", FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["R", RowBox[{"1", "/", "2"}]]}], "+", RowBox[{"c", " ", "R"}]}]]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]c2", "[", "\[Rho]_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"R", "=", FractionBox["1", RowBox[{ SuperscriptBox["\[Pi]", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox["\[Rho]", RowBox[{"1", "/", "3"}]]}]]}], ",", RowBox[{"a", "=", RowBox[{"-", "0.0144633"}]}], ",", RowBox[{"b", "=", RowBox[{"-", "0.07411135123824349`"}]}], ",", RowBox[{"c", "=", "0.07108999554813503`"}]}], "}"}], ",", FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["R", RowBox[{"1", "/", "2"}]]}], "+", RowBox[{"c", " ", "R"}]}]]}], "]"}]}]}], "Input", CellChangeTimes->{{3.753773568857679*^9, 3.7537735989190903`*^9}, { 3.753774000549728*^9, 3.7537740603360977`*^9}, {3.753774109143517*^9, 3.753774138102693*^9}, {3.753774206440414*^9, 3.7537742282053556`*^9}, { 3.75396524390508*^9, 3.753965286454199*^9}, {3.791269068082594*^9, 3.7912690828650312`*^9}, {3.791269148681624*^9, 3.791269151216712*^9}, { 3.7912692591613283`*^9, 3.7912692894394073`*^9}, {3.791276387368285*^9, 3.7912764354379272`*^9}, {3.791276474148543*^9, 3.791276489611991*^9}}, CellLabel->"In[57]:=",ExpressionUUID->"f39e798a-cf02-4ca3-8667-7392e238bcca"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SizeLegend", "=", "1.5"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SizeEpilog", "=", "3"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"SizeLabel", "=", "2"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OptionsEc", "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", "\[IndentingNewLine]", RowBox[{"PlotMarkers", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "Large"}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]", RowBox[{"FrameStyle", "\[Rule]", RowBox[{"Directive", "[", RowBox[{"Thick", ",", "20"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", "\[IndentingNewLine]", RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", "\[IndentingNewLine]", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"MaTeX", "[", RowBox[{"\"\<\\\\text{Radius of the glome $R$ (a.u.)}\>\"", ",", RowBox[{"Magnification", "\[Rule]", "SizeLabel"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"MaTeX", "[", RowBox[{ "\"\<\\\\text{Reduced correlation energy $\\\\epsilon_c^{(I)}$ \ (a.u.)}\>\"", ",", RowBox[{"Magnification", "\[Rule]", "SizeLabel"}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}]}], "\[IndentingNewLine]", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Show", "[", RowBox[{"{", RowBox[{ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Eig0", "\[LeftDoubleBracket]", RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", RowBox[{"Eig0", "\[LeftDoubleBracket]", RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"Length", "[", "Eig0", "]"}]}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Eig1", "\[LeftDoubleBracket]", RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", RowBox[{"Eig1", "\[LeftDoubleBracket]", RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"Length", "[", "Eig1", "]"}]}], "}"}]}], "]"}], ","}], "*)"}], "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Eig2", "\[LeftDoubleBracket]", RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", RowBox[{"Eig2", "\[LeftDoubleBracket]", RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"Length", "[", "Eig2", "]"}]}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], ",", "OptionsEc", ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"Placed", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"MaTeX", "[", RowBox[{"\"\<\\\\text{Ground state $I=0$}\>\"", ",", RowBox[{"Magnification", "\[Rule]", "SizeLabel"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"MaTeX", "[", RowBox[{"\"\<\\\\text{Singly-excited state $I=1$}\>\"", ",", RowBox[{"Magnification", "\[Rule]", "SizeLabel"}]}], "]"}], ","}], "*)"}], "\[IndentingNewLine]", RowBox[{"MaTeX", "[", RowBox[{"\"\<\\\\text{Doubly-excited state $I=1$}\>\"", ",", RowBox[{"Magnification", "\[Rule]", "SizeLabel"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Right", ",", "Bottom"}], "}"}]}], "]"}]}]}], "]"}], ",", RowBox[{"Plot", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Epsilon]c0", "[", FractionBox["1", RowBox[{ SuperscriptBox["\[Pi]", "2"], " ", SuperscriptBox["R", "3"]}]], "]"}], ",", RowBox[{"(*", RowBox[{ RowBox[{"\[Epsilon]c1", "[", FractionBox["1", RowBox[{ SuperscriptBox["\[Pi]", "2"], " ", SuperscriptBox["R", "3"]}]], "]"}], ","}], "*)"}], RowBox[{"\[Epsilon]c2", "[", FractionBox["1", RowBox[{ SuperscriptBox["\[Pi]", "2"], " ", SuperscriptBox["R", "3"]}]], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"R", ",", "0", ",", "150"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}], ",", RowBox[{"PlotStyle", "\[Rule]", "Thick"}], ",", RowBox[{"PlotTheme", "\[Rule]", "\"\\""}]}], "]"}]}], "}"}], "]"}]}], "Input", CellChangeTimes->{{3.753609235477899*^9, 3.753609243770727*^9}, { 3.753609289981525*^9, 3.753609306025341*^9}, {3.753609407838635*^9, 3.7536094194920893`*^9}, {3.753609944288713*^9, 3.753610008002369*^9}, { 3.753610042319037*^9, 3.753610162428212*^9}, {3.753610425797776*^9, 3.7536104339576883`*^9}, {3.791266605076848*^9, 3.791266624236309*^9}, { 3.7912667630683727`*^9, 3.7912667649886513`*^9}, 3.791266812133045*^9, { 3.791267447018565*^9, 3.791267466727985*^9}, {3.791276249159471*^9, 3.791276316093234*^9}, {3.791276499414219*^9, 3.791276590807248*^9}, { 3.791302726279767*^9, 3.791302737367152*^9}}, CellLabel->"In[70]:=",ExpressionUUID->"b42b1902-b9ba-401f-a9df-30e4652a34c1"], Cell[BoxData[ TagBox[ GraphicsBox[{{{{}, {{ {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], AbsoluteThickness[1.6], CapForm["Butt"], GeometricTransformationBox[InsetBox[ FormBox[ StyleBox[ GraphicsBox[{ {GrayLevel[1], DiskBox[{0, 0}, Offset[{6., 6.}, {0., 0.}]]}, {AbsoluteThickness[3.], Dashing[{}], CircleBox[{0, 0}, Offset[{6., 6.}, {0., 0.}]]}}], StripOnInput->False, GraphicsBoxOptions->{DefaultBaseStyle->Directive[ PointSize[0.012833333333333334`], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]]}], TraditionalForm], {0., 0.}, Automatic, Scaled[19.5]], {{{ 0.1, -0.023391913368829433`}}, {{0.2, -0.02297901655935025}}, {{ 0.5, -0.021817116105320795`}}, {{1., -0.02010876852270148}}, {{ 2., -0.01737071560943161}}, {{5., -0.012359326069805606`}}, {{ 10., -0.008436394465178656}}, {{20., -0.0052569107832976985`}}, {{ 50., -0.002546258230602838}}, {{100., -0.001399039749842982}}, {{ 150., -0.0009719698383387358}}}]}, {RGBColor[0.365248, 0.427802, 0.758297], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6], CapForm["Butt"], GeometricTransformationBox[InsetBox[ FormBox[ StyleBox[ GraphicsBox[{ {GrayLevel[1], PolygonBox[ NCache[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}]}, { Offset[{0, 8}], Offset[{-6.928203230275509, -4}], Offset[{6.928203230275509, -4}]}]]}, {AbsoluteThickness[3.], Dashing[{}], JoinedCurveBox[NCache[ Line[{Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}], Offset[{0, 8}]}], Line[{Offset[{0, 8}], Offset[{-6.928203230275509, -4}], Offset[{6.928203230275509, -4}], Offset[{0, 8}]}]], CurveClosed->True]}}], StripOnInput->False, GraphicsBoxOptions->{DefaultBaseStyle->Directive[ PointSize[0.012833333333333334`], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]]}], TraditionalForm], {0., 0.}, Automatic, Scaled[19.5]], {{{ 0.1, -0.014496797090865628`}}, {{0.2, -0.01452285969558331}}, {{ 0.5, -0.014560532378814613`}}, {{1., -0.01451224002718311}}, {{ 2., -0.01414160309608582}}, {{5., -0.01233394674740097}}, {{ 10., -0.009715546420459952}}, {{20., -0.006743807472706599}}, {{ 50., -0.0035844891474714016`}}, {{ 100., -0.0020591316208532526`}}, {{ 150., -0.0014581624596552599`}}}]}}, { {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], AbsoluteThickness[1.6], CapForm["Butt"]}, {RGBColor[0.365248, 0.427802, 0.758297], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6], CapForm[ "Butt"]}, {}, {}, {}}, { {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], AbsoluteThickness[1.6], CapForm["Butt"]}, {RGBColor[0.365248, 0.427802, 0.758297], PointSize[ 0.012833333333333334`], AbsoluteThickness[1.6], CapForm[ "Butt"]}, {}, {}, {}}}, {{}, {}}}, {{{}, {}, TagBox[ {RGBColor[0.9, 0.36, 0.054], Thickness[Large], Opacity[1.], CapForm[ "Butt"], LineBox[CompressedData[" 1:eJwV1Gc8FYofx/FoSzJKZK/IpuiInB/Zjs2hY55DdpnJykq2Y68SKePSxbHq iusniqgU96IhpaiMIsm64t//wff1efJ+/BWh+VmeY962bRvj9/7fJvLGz6+1 fZrxInbtXa6FmNzjNGpBryI6Mgzsq44WYubruAhB+j3iPvhUULZQgLmTuc92 0HuJ99bcdR4mF2D+9I3llfRRYo8/S6xGXz569WZTWqJfEz/XjLXYXM9HjYrE jsCAt8RPJXNd6hfyMYBB6A6pmSDeLQzmNuXOx8O+oqnf0z8TE12nw0Yv5OG2 N/ynX+yaJvrUkySv6eXhjOHh+broGWKXQRPvumAetkuyWvkGfCWWyb13ix3M xYbv4elBNd+JrWohRbqnc9G21s3mW/oKMdTabfWtbA4+naTWORqtEqf2ZLwb Y81B4Hfe/WzXGjGeTYXL4Gs2Sqeebb0TvU6U4NueQqnPxg1PUwGvgF/EMt83 /iqEbLTgLF4MqGGCO9I5o0L2Wchad6S0eg8zpPjESK5BFvYYFhlPuDPDffGc fhHJLDwVm19uLrYdRrbqKPZLmSi+kElWKN4BbOI23YbZmbjy7Or9ufTd4Phz if6rJQPdiCwEjqXdYJCkIt2VkIFDDHqLCmUPFE0zprnsMrAup4ARdXQvOBY2 fLfeoKPb2epKdmSBnd7p4vuM6Tg0+TT7xMJ+eCPWNeu6lYZAtmA/S2aDlMvK sd9G07Cudzj9cjsbPPIyqZhkpGFyzXhST9IBmM3t62B1S0NhQijxz0x2qMV8 EHyeiqO/klU0j3FCpqVZ0eLdFKSrkoLNHTiheDnaPTwvBXX82JpoGZxA2xIS IQenYOP7bMXEn5zwvLoueMfx3777usyLB1xQ/70njq85GXWTa0VolEOg0kvn PP0wCZsODu5PSOUBM3eN3OuHErE9gG9SpY0HQrQvVRtsJuDDgXP3p2Z44B8p 94/inxNwJGndXdeIFw4szaZ6tibg6oZY5469R+C5oUfRfpcE1JwKCbySwAeW eSW9Di1Xsb+FfzQmVhD0FvgLJiLjcYjTo1axQRAY3F/o8d7x+Mav4cr794JA 7iMEGNjF49wxPUUAITDheJ2rdCIeD5T4JW9tCoGZNXE1+usVlD4zIUDsEIYj i1wrj85dQX+ZEy/+VheFlm9akT+843D8pP6WgJUoXOuNnPVwiEMTHYp8lLco 2Jnvt/phEofSjjFpmkWi0PbZSdlUKQ6n6E8NcFkUbuzc5sW2FouURbcHnQ1i oO2J0WlpsXimNa+xW1ICmCjmjepdMdj46I8JMaIECM1mRSndjUHhoTb2eLIE RPwXmk+oicHNmYkLOlcloKGYcTA8Owb/4peXefRBAio2BSx7XGNQNqbnds+N oyAlTyCf2xuD3PoruX1cUkCyVbNtxShcfGy8Ki4nBWX8LQNYHYXPjG7ax+hJ QbPZes1UThTGmxqKngyTArlL/1yle/72Ntfry8elQFe0pciE67d3I/ZHVx8D mcKfykYXLmN8XOKWClEGun/ms1QRItFlxxgty04GnEaMOCSORqJ6gmLPXIAM 2G0l2rdxReJi8qu02+Uy8L45aENhPgJdsmSOcLDIQt7hYdsTVRGocfP5ibl/ ZWF85ZFqHF8E/vj7sPctb3l4kFPKc+BgOK5aKBaR4uThtqCtqtnOcNyYMni8 XCQPcsdZmW8uh+EOtvCjxn3yIH6iWDnoVRhyO419+CGpAPzWTgtjpWFI2Lxp rzulANSmFvdKhTAkCuUdXapXhEpLNWUqJRS1vUQ0+9oUYYzM2h1vEoo6TbU2 Jb2KEGUe/aUFQtFAvyfe4J0ikJ+GXwfJUDT3W/lQzKYEt73YrH4uXUIani3V Pa8EI24g0p99Ca86C/IUSCtD5JiW/bXRENR0e9LndVIZql8Nc9o9CcFlz9AI DR1lKHRK/y6KIegZODQ+4agMNa2/nr+rDEGjqwkVslnKwMPz4smPkBBku/NN uWtFGWQ7XooH8YZg4XKHydeHxyF6I3fCyOMi/pnufOWMswqcKHceYIgGIyV2 u+1rHxWIDvu2TOYNxj0Xq6QDQlXg7arKwE72YHR1mB8syVKBzoMNdpd/BeER mWjh9W4VMKbGZg69DMKkxyV/M6RUoUa/0GdfVhC6bR9fEVhUhbt8ZVteu4OQ L8zBdzWeAL18s2aMvYE4fvFDxd1MArBclPRgMAfizUDPd8HFBJhq/zTX8l8A ivsGW35vIsB37kbpwa8BKOucRpj5QACrA6ud+kMBqKnbvmMM1ED0rdZ2xeIA pHLw38ANNVg3dOd8eDwAq6rfPEsIVocoUynR5/7+KEyNK9OOVYcDuwVJsd7+ WMhz7OJmujokSfsaE9z8MSUxhD+kSh2O63xoarb1R99zHD7nXqtDn0dX9idN f1QU0d+jAxqg19o1eozNH+8XNmozsZ6GkTBfhUMufjiQmHwv4rYmPJ7XuUvZ dgFThsdYJQYA1rZr7Vpo88EXj4Yi2c9oQyX5yZjxkBdOsr5XrB89AwH7/Gtl dnliYoh82SkLXQi2G2ITyXDHFdVcm7AZPSAx3+PhPXYO942MGmhEGkBw4F1+ yqIr1hU4rM4uGsK/Dt3pHPM0FGSszpomG8OD/gM2hxapKDA7fL1khwnwpkhP MvipOBPZn1FWagou1DsafUYuWBtiSs3lNQf71bQjLwSdUQ5e2g0MmwP3X4x0 +3FH5Go5vzhRZgFEcim+LHFArTaxGR8XS2iSXLvXkWqPDxgGTAQ+K/hntjrA PYuCVRZh999OWQEtyclDPu8sDl/pH1y7ZQ2VPxIvi9y3Q2+qZOq8nw0EVfMN No7ZooX8D1dJNTKYX57k+shh+/vk3l0bXiKDxICqVowLGQ/mjwY5dtpCmYb1 5rM7NriguFBjH2UHQlWHtIX326Bg2yWmYsJZeKAt1iMRbo1NCyzrLcwU2MsU lhH20Qoz7nWY6yEFxLzNL8Q6WeHQsShDRqo9VHosym8OW6KDnNPNTCMH8FM/ vV/c0RIJwrXcTTsdQdibO8V9zgIjOnYr1L9whGtMn5o5Qy1w57e4ChG6E+wa /C+wmd0Clx/v7Thv7wzCcx1aSxXmWNy3tX6Z0wWIHg75fNrmSF1h0YvxdwGP 0zaVSkNm+Gqdj+Y34gINi7y7c3nN8Kfe6doiFSroN7IJlgab4n0W7j1T2VSg zq3+5/XKBJXLl44LrFKh8p3B67cnTdA04SM9k0wDr5/1ldJVJNQ3opNU7WjA UDiv1VBOQmBTYxk7S4OjFVmGhFskVMqnX5V0pMHgXEmZ/g0SHqxUi+xwpQFH Z9N5nxwSvnmU4TXnT4PHH2Qde6NJ6LlTQ8cglQbJl5JHntuRkNr3ielbGg3k C7c+u5JJSEnPwhw6DX6Vu7muWpGQdOjzqXdZNIhdpBeImpFQQSJbKaSQBvl+ FxYjdEm4rPNFsLyCBpydvRRtZRLO78kZM6yigVx/wuaYAgm/PD19bf4PGtCr E1hC5Uj4yjrnkPqfNLhVNk6plyJhu5sm61AjDbLi9r4WFSJhi9R036VmGswy T7d38pOwbi4nUeAuDdJbVHY7HyHhzeBpZq9WGvik1A4WHyJhESG3k62NBiYK 5RYaXCTM3tCMam6nwf19pYQxdhKmdE6rUzpocGrlSkIkGwmvxOeubSENZIcI 6gKsJPwfvBJVNw== "]]}, Annotation[#, "Charting`Private`Tag$276202#1"]& ], TagBox[ {RGBColor[0.365248, 0.427802, 0.758297], Thickness[Large], Opacity[ 1.], CapForm["Butt"], LineBox[CompressedData[" 1:eJwVynk8lAsbxvFUjshxlIgwFYpS9mWi5rmVbMlJ5YmR7aHFdmwlu4lhssxj T6JSkTclInVCbtJGeFGSVpXRQfZdeju9f1yf3x/Xdz3lt//I4kWLFnF/7f+t IBemhkoaWUyecfbAJT4mPHHusqWLiDiDeM2+n3xMfRMTzqDvEYoyZ7IeytE4 rHZDOLG4nshuknpXo0pjZm9my1L6KTFxw9KAq0mjUX5UVnRAC1H+3spnny6N o1vvaEQWtxNKKy9Wm+nR2LD8erpR3kuCH7g2SebXf7b/wvQMv4uQCxkd0NGi 0fNpOrsy+g1RC737vqnTuL2QVxsY8J5o2nKwMnIjjWdMWCvOafcQbZca+qTW 0RhQxmwILv5E9FfsHmqXpZG9VveknfIXot51sO2FJI2m9FZVvbxeol1VxU9r GY2rfZSSxvhfibofR67tnOLjorcKO9p+6yc8FZdXSQ/yccBy9cit6AHCp7gi N7qHjzWq4gd8AoaIH2lCfawmPt4eC+MHFY8RSy/przY5z8dDJR52w/wZojuc +v5Ci4/NvW63nKxmidQeHxBV5iMouIi0/DZHzO+Xs1KR5uPmJIf7N6LniYD5 rk6puWRcOG6j6Bnwg+h2uRAuVpeMtivzxgOKhWBxVZI5vScZZ1riqr7xRSDF YVrOziUJPQgx5opJESgwYQvYfyZhRxldqc9eBumG3aUeRBLeysgui9ooCu+h YSJu7S/vcP2aJIoBkSE+JNqTiB29zel6o79DqY7xU2cqEbt+JOizNq2E18c7 NJ75JmDFqvbf45NkQd9VVpIu5GFNgHyvfrUsqFuyLcfO8fBR65EqwYAs2Jc3 Vzkn8/DVmfmju63k4GFd3w77IB7OLijXLRVdAwyBY8RjEx6yBMGBsfHyEJ8y 1x3XE49NlQpdnNMM6LLIvhOxIR791fXaHhgrwW0VXcvXz7n4wdD8p+IBJWir KR/sqOfiXlO2RpSXEhhtsvnYeY+Lm504yawcJbhol5o7eZWLArrZAqeVoCRK IjMzgovscY/6utvKEBCQ+/mQJhd33c8qb1DdAGHuwYx752NRxnwms1FKDYby xcOMeTE4/mzPrMpWNThmUPHFOSoGW6zyHTlmanDiedF4wskY5NpYKhmGqsHf qgkfpt1/ebvc0oIPavBUx3uxuskv70E0RV/fBKnx9cyphdPIjeH91CfUweSE kGx36GmceLDa64qXBjR7zY8weRyctdXKsY7RgECF68MxHA4uCCyeTedoQNoe xdn2UA4ulQjbuKdRA1rTrslE+3BQxvnd5wlVTfDxx/FV+znI/F++426BJjw/ nVa7mcFBYm3WxslSLfgzpG39/aBojHNhyGZv1oG5sDtbKhcikeXxvNHTUAcW 2qzvZ45G4vTxkPDtpjpg8YYTGtkbiccDOz58ctKBIItcX6/mSLSKiy/ckqYD 58cDpW/nRaLEjWGdhzM6MHZ3cmU/KxLPTdfuHXqkC2HTseUNCRF4k+8Su8tF H7yu7b1sbhiO8qGHfWa5TNg7ImlUNByCRdfftsSfMAbG47m4zQqnsJWXcC/8 Kgve6D/iso6dxMTOd+IbWgH2yX98Jrf0BLY97oiQ3LUTKJuk6cq2QOwV79Eq 7doF5Y/U7+++HoC8YI3LRra7oU/H4nNlhT/OGGTahQ6YwfDL/OqURD9c/qrL YnuEBVjvVPpu2+eLt7IPzw6OW0K/v67uxlgfZJTNDtok7AGRLS7uBSreqDjY mXtx6V7YpjsTPDnniQMRTSmXL9mA4aSyQVD7cSwJtnHLlNsH3AeGcbFPjuFW eG3f2rkPDJSqsrJ6jqJUpe/4p8u2oP/4Yn7r3BE0qVYe8HbdD5raDFGB9hGs L7MQYsofgDKVm1lC4R5YZBta9V5wALyr3uu9qHfHztim9rkrB8GrnqsL69zR y001acTPDiLwwiNmBIW2GhPuqttImFE3/stV4IbRyR/Pd06SIN4qUJx1dcNV Z7uCnOoOQUOo546Cblcc1Rotdoyyh/2Hbk79Rbkio/qUUB7TASaOiTh7f3XB ilGx+crFbBg2u3KqZYkLptyr3WeGbCiNNMrwNXLGjk1RlmVJjnBzkfoSPW8n PLzVOT/V6jD0FHWU2lccRua6EpkKYSeQrs4YjBQ5jOG1IpqlbU5wLNXv8ks7 RxQejilcTzvDpx3asiX32Dj9TLTW19EFzix39l2xio15jT/nI1e6AvP56++N YQ7oNiNmxvF3hVSVkvbRMXvsnpen/F65wvK0uCcd7vY4ZbajJEffDVLMFjne 6D2EVWIyywTpbuDX7Fj22ecQ6hRM6irOuoGX3U38Y5REm/gvdCpJAeOulNR6 DonmVrS1gT0FxeWV3QZRJILENrF3DhR8qXk0bh1BovZZOk7ViQJhny75sBAS V13bFlHrToF0G23+2p/Et49TPL/5U9DSaz9x1Y3E48LbTS2SKCjcREqE7CLR rbFPaDiZgvZ5he/ZJiSy+WmYQVMwZdpo+DdBorX0V6OPaRSskYjNnzMmUXND unbwOQokj+7fytEjcdr0H0ZBIQVeC1uU8zaQOLIs451lEQUpQZLC9cok/tO8 4/zIfyh4GHpJv289id0HM6SNb1JgnhMYo80gscaDJd5RTsFF2/8+ey5DYqVa f+OpOxR4m4wpTqwi8da3DJ7iXQqeaKnUr5EiMf9E/2LP+xRsZPmPef1BYg4z s06imoJ3S9yjMn4nMX2BFXWnhoJA2TUONctJTKzrN2bXUnDUJea0QJTEWG7m 3E+k4MjDMzMSy0j8F/HtFy4= "]]}, Annotation[#, "Charting`Private`Tag$276202#2"]& ]}, {}}}, InsetBox[ TemplateBox[{GraphicsBox[{ Thickness[0.009790483649892304], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJLIGYCYvc1R5czeCg6eOyvlbV4ruawJ7/m7UxWJQz+ qcNOazPlNBycJzQLpWkpOUxub426bKPpEM4p1m5cr+SQngYEbVoOrQrsqme2 yDskhASpL/DUdhCpnFRy1kXW4UGE+PaLDdoQ+RJJOL9gecmGf/5ccL6JMQh8 sW/m9V8/hVUDzq+8/+OW8W4lOL/TxnNXWpCCw5vax9nn1/yynz4TCCJlHGaC aWaHB67xjrMKJR1egOTfcDrsCLaK+K8u5hCtGiFzTkbIYa2QDl+6nQjEfUvE 4fztIHXs0nA+2JxAOQj/nogDf2zAfaN0JQeFXQv2pa4Tg/N7I7r9GTfIwfl7 QeEmquBw+gwQ5Cg53AeZo6gACb9VSg4zQO60VHCoBvkrWhmir1zBoRvkLydl SLjyKzqAvasMpZkVIe4RRPDvaMqu+R+sAOenguLBTR7OjwH5948cnP9l38et 6dek4ObD+B8WrVc4G6HgcAYM5BzKD29znamrANUvD3c/2F+mCg4toHi8Ig/n w/wP4/8HgfuScP6bttxuo90SkPjRVIDGh4TDim8vK84IKEDi9bI4RN1seYca ULi8FnNYAwr3fTIODCDgIAbRP1MSzoeYIwDng53vw+JQAdLfLQPng9OPtTKc n5H/ofXkFXVIPMzkg6Y/LQdwfrCQgPPB4b1RCs4Hu+u0jMMGvbzFjDFaUPfK OQTckq5JFNKCuGODgsMJUH6Zp+kAy18QeQR/s/mPQylaGg7o+Q8AunloPg== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYCYrnlLzz09qs4/Hz7+oClsoqDqc3eoGkLVeF8 nxPstrOnqsH5G1SfNM9bq+bgsebocoYfynD+3vyatzNTleD8nohuf0YBKTi/ D8wXd9ikl7eYcY6aw0wQ2Cnm8KZ4q+jv06oOIW8vf5yxUMzBxBgINqs4xKhG yJyrQfAVdi3Yl8on6jBjAn+VWbaaQxoIqIk6JIQEqS/gVIeoMxZ1kJh6hTNj EYIPtk9GAyd/Csg8bm24+TA+zP71IPef1YS77/zVsDf6uzUg9h8Tc2Dm7JJP XqfhUHP/xy3j1wg+zP8w/n3XeMdZiopw/n8Q6FdyEAe7V9PhAUj+oDLUPi04 X19rpfCFFm1UPouOg8q1R8EMOcoOqWCH6Dh8WLRe4ewKJQf3/bWyFs8R/OdZ 2t+my+o6GIDNUXWo+bQhIPuWjsOJXTt62TaoOpwBgRwdhzmLlHf+Oa7qIA9K D/+14Xww7Y7gQ9yjBfF/mqqD/8WJMf+YtSDxfFYF7r9KUHhYK8P5MPuSY++4 MVdowM17FCG+/aKDOtQeVYdfoHTGrOYQeEu6JvGTigMsfcLMR0+vAK9vIzw= "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKG1bGbHC9K2hw5xFyjv/HFd16A8uUZmubwDn6yjK f8n5putgDALBynD+GRDokUeVvyzhoP6ked5ZLgOHtUI6fOl2Ig77a2Ut0qcY wvlbzH8cSskyhvO53FRLmXaZOMwEgUhJOP8/CNgrwPkea44uZ6hQdniSuPCa Sb8x3H3o7v+y81bX362GDqcOO63N/KfiULxV9Pfpc0Zw/mkQPc/YQfnao2CG OUpwfoxqhMy5PXJwPgMIOEg6HGxbHn6KydjhgWu846yLog4OTY+Oz+A2gvML 1nTfznhgAOc3shztNxQ3cEhPAwEpOH9vfs3bmVMV4Hyw+kJliL9XGsDdh+5+ AGxcs0Q= "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4uUvPPT+G1o7nNi1o5dtg6rDdaFPjufFrB3m LFLe+ee4qsP0CfxVZtVWEL67qkOMguPH5DuWDoG3pGsSP6k4qD5pnnfWytJh A5iB4P98+/qApbKKg33To+MzViP4PifYbWerWsH5EPutHDzWHF3O8EMZzt+b X/N2ZqoSnC9SOankLIssnO8OVi/tUM9ytN+Q3crhQPe+JpPFUg4S8+I0Tx+w dFD/pPJyVqckxP5sS4dWBXbVMyYSDtxuqqVMXJYOGmB5cYeDbcvDT02ygPOT Y++4MWsg+BJTr3BmXDJ36Ivo9mcUkHD48630wZyF5lD7JRwaQfaXmzu8acvt NtotCZFPNHdoB9snDefL71qwL9VPFs6HhfeXnbe6/rqaw8N7i/mPQymrzODh vVEvbzEjjxk8vLlA7s8yhYc3jA8Lz2mg+LqN4N8BajMKNYPze7xesZgkmsHD G8aHhTeMvyPYKuL/cRk4/4FrvOOsQkmHJff38c0pNnP4su/j1vRv4nD3poHA MTGHF1na36a/NXNwA5kfIQr3LwMILBBx6AsuUZnObwHn1/22Kjg3A8EHx4eQ pUPV/R+3jL1FHUDeNkq1dIhRjZA5VyMGj3+Ye2B8WPyUbBX9fVrPyuEMCPiI w9ObAij8+UQh6j9aOZgYg4Coww2Q+V8R/CMg+5Ws4fznIP/44ubnr+m+naFg Azcfxoe5F6xusbVDyNvLH2csFIPkJ2trh5kgsBPmH2uHg6D0yywO5/eA/SPl gJ4/AXCIjtM= "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIIaxWZDYzFDMAOUzoLFxqUEWJ8YcYswk1V5i9NLa jwDSKwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYC4jMgsMTBQWHXgn2pfKIOl/Pj2c8xOjqYGIOA qEM2588F6cwIvvAnx/Npsgj+G959BjONcPM36uUtZpzjCDcfxo9RjZA5VyMG MS/W0SHk7eWPMxaKOcwEAU1HCL1TzIFl8SQrRlVHh4Pd+5pMmMXh/J6Ibn9G ASk4v9PGc1faIkU4/1XxVtHf2SoOwSUq0/9fcHCYs0h555/jqg66Exb8MFRD 8KdO4K8yu22Pyp9t7/AiS/vb9LlQfrS9w5PEhddM9FUh/iq2cwCH2xxlOP/E rh29bBtUHRJi77gxR9jBzdsC8u8eWwjfXdXhOchcWVuHwFvSNYmfVBzsmx4d n1Ft47BB9UnzvLMI/s+3rw9YKqtA7HmD4F8VAgWYLZx/oG15+KkiWwePNUeX M/xQhvP35te8nZmqBOfDwgvG7wPzxR1mgMI50xYe3ktfeOj9Z7SFx0ftb6uC cxU28PiC8WHxyeO/fkqqh61DGgioiTqAvTHLFh7/YPozgg/2n7cdnB8hvv0i wzw7uP6noPDJtYebD+PD7Pe5ODHm32M7uPtiFBw/JtfYwd0Piw+Y/2B8mP9h /HSQfWJKcP6HResVzmooQ8Lbxt5BtMfrFUuIisN1UHh/Q/DB9iQ6wPmw/ANO f0rKcD6Y9lF0QM9fAJ9larY= "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQ/Scm9+g/KRcHA62VwhdYVB28T7Dbzj7q7NDIcrTf cLqqg+qT5nlnZzk7zFmkvPPPcVUH4U+O59NSEfz25eGnjGwQ/M8bArJniTs7 /Hz7+oDlYlWHmSDw0clBtMfrFUuIqoMxCGQ7OVy4GvZG31oFol/EyeGOpuya /83KDpURK0zP3nZ0SE0DgmOKcP5/EKiXh/P7I7r9GTdIO7AsnmTFyOrkoP5J 5eWsTgmH45pWk077OzmEvL38ccZCMQf7pkfHZzQ7OTCAgIOoQzbnzwXpp6H8 BSIO8210rszSc4bzweb5IvgW147mmhQ4OzxwjXecdVHE4QTI/HJnhyCQ+Yyi DiBvmSi6QOQLJSH+lXRxUNi1YF8qn6hDG8h/KS4OIO+kqYk6TPnGFj+jxsXB BBwQog5rum9nMPQj+GB6NoLvqlrKNGsDGv8Cwjyw+G0Xhzdtud1G0qIOF/Pj 2c/9RONLusLdA+PHqEbInKsRc3AAhc9lF3h4gf033wXij51icPf0gcJbQBzO 7wHzpeD8lNg7bsw7tB1EQOmj18Wh/rdVwbkX2g4SU69wZngBwydCfPvFBm1I uEq4OBzftaOXLUDbYeetrr+p850d0kH+YUPwN+jlLWaM0XI4AwJfEHwe//VT UgVc4HxY+t0O8ogEgm9mszdoWqKmA3r6BgAFmSlq "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/Scm9+g/KReHGNUImXN75B1g/APd+5pMFss4MICA hIuD+ieVl7M0ZRzaloefMmJxceiJ6PZnFJB2SDh8WTv1prODMQhclnBYYKNz ZVafs4PbmqPLGSLEHdZ0385gcEfw3VVLmWYdcELlJzg5pKeBgDScPxMEOhXg /E4bz11pSsoOv0Hu2+Tk0PDbquDcChWHdpB7bJzhfN0JC34YliH4JiB3bXaG mBepAjHvhbODQGzAfaPjyg51IHUcLg4PXOMdZxUqw/0Psw/GB8t/VHJADy8A 1KeCnA== "]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJTIGYC4hzOnwvSud0dRConlZxlkXGA8d+05XYb7ZZw KNkq+vs0m7vDGRDwEXd4w7vPYOYvN4j6FFGHZS889P57uju0KrCrnpki4iD0 yfF8Wqu7w1ohHb50OxEHh6ZHx2ecRvCzQeZP9oDzEw9f1k5V9ITqF4fzQ95e /jjDUQbOj1GNkDm3R9bBHmSesKdDC0j9FTmHeTY6V2Z983BQ/6TyctZJeYc1 3bczGM57OJwFubdGwWHyN7b4GXM8HFLTgOCYggOIShOD2q+n6NDj9YrFZKa7 w38Q6Fd0YACBAneHmSDAqQTnd9p47kpTUobzRUEaQ1Qg/l3q7nDqsNPazH8q kPBh8oDz635bFZzLQPDB7t3m4dAAEtdA8J0nNAulcSnD+eWHt7nOrFWC+P8h gq/6pHne2UceEHc8UHbYXytrkf7EwyHwlnRNYpGKQ3CJyvT/LzwcniQuvGai rwrx13QPhxdZ2t+mz1V16Ab5N9HDYc4i5Z1/jqtC3KuE4IP9XegO598EGmvE 6u6QEnvHjblCBc43BoFgJTgfFp7g9KIG5ccpOLAsnmTFmOsOjT95B90JC34Y TnOHxJcmNL6eu0PiJ03OoRik38/DoTei259xgyw8vXzZ93FrupmsA4//+imp Gzwg6cVEBs5PB+uXgvNNQO67LO7Qtjz8lFGKh8PB7n1NJsxiDic0rSad/u4O 5/OC1Hcg+OD0YOnuoLBrwb7UdeJwfg/IPQJScD56foHxAfRPV5M= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4ueJC6+ZvPd0EKmcVHJ2i7IDjC+/a8G+1HWS cP6OYKuI/+piDgmHL2unKno5MIDAAhGHNd23MximI/jLX3jo/d+J4M+30bky 656Xw1ohHb70eyIOxzWtJp1+7uVgYgwCog4hJSrT/xt4O8wEgZ3iDnekaxKN ZL0d1D+pvJzVKQEx/ztMv7iD+bWjuSYPvBxC3l7+OGOhOMScwwg+2Px2BB/s /nwvhy/7Pm5NnyYB59fc/3HL+LUUnA/z/xvefQYzjbzhfB7/9VNSHbwdTh12 Wpv5TwWh/9OGgOxbCL6Zzd6gaQdV4XyJqVc4Mw6pOZRHrDA9W+zl8CJL+9v0 ueoO/0Gg3svBQGul8AUVTQcFx4/JZ3K9HOYsUt75J13TocfrFYuJp5fD6+Kt or+5NR1yOH8uSJf2cpjc3hp1eY+Gwwa9vMWMbzyh5mg4uKuWMs364OlQ99uq 4NwJdYf7+/jmGH/ydMjI/9B6MgTBh9ivBucH3gIG9CcVB3A0VHs6TAGZL4Pg nwGBOYj0AAsPAJGB+94= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQbWIMBNa+DtGqETLnZCQd7JseHZ9h7OugsGvBvlQ+ UYeSraK/T0/zdQCrM8bkv+HdZzBzFYJ/dx/fHONNCD6P//opqTd8HdJAQE3U IYfz54J0aT+4+TB+DMj+GjGH/yBw39ehVYFd9cwUMYj8bl+HkLeXP85YKOZw Q7om0Wirr8PB7n1NJszicP5MEIiUROVzKsL5BlorhS+0qED4pb4OcxYp7/xz XNWhdXn4KaMjPnD+W5B/mhB8nxPstrNdfaD6VSHhw+3jsMMByPih4vAepH6X N0SdKYL/YdF6hbMrlBwkpl7hzHjk7VB+eJvrzFolB/0JC34YfvN2qLz/45ax tbKDLogv5gN1v4qDwCfH82mqPnD3gu3LRvD/xOQe/fcLwZ9ro3NllpmvQ6eN 5660RcoOsPjkjw24b1SuCPHfEh94eEz5xhY/44q3w8pvLyvOFChA3F3r7SBS Oank7BI5OH+9kA5fep0UnA+Ov2NiEPcd9XZgAIEFIg7yjh+Tz9j6wPkJhy9r p0Yi+GD3FPtAzD8i4hAuvv0iQ52PQxAoPhlFHdDTHwC6qwcJ "], {{ 58.462500000000006`, 6.778130000000001}, {58.1172, 6.289059999999999}, {57.3656, 5.835939999999999}, { 56.900000000000006`, 5.835939999999999}, {56.423399999999994`, 5.835939999999999}, {56.00629999999999, 6.27813}, { 56.00629999999999, 6.790629999999999}, {56.00629999999999, 7.231249999999999}, {56.245299999999986`, 7.64844}, { 56.60309999999998, 7.874999999999999}, {56.900000000000006`, 8.053130000000001}, {57.55629999999999, 8.22031}, { 58.462500000000006`, 8.35156}, {58.462500000000006`, 6.778130000000001}}}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYompVzgzHvk5iFROKjm7RdkBxpfftWBf6jpJ OH9HsFXEf3Uxhynf2OJniPg7MIDAAhGH+/v45hh3Ifg3pGsSjdYi+Bfy49nP XfR3WCukw5d+T8ThT0zu0X+3/B1MjEFA1OHwZe1USaEAh5kgsFPcoX15+Ckj jgAH9U8qL2d1SkDMfwXTL+6Qw/lzQfplf4eQt5c/zlgo7pCaBgTbEHyw+VUI Ptj9Sf4OX/Z93Jo+TQLOr7n/45bxayk4H+b//gU/DJ8B3QPjyzt+TD4jGeBw 6rDT2sx/Kgj9nzYEZN9C8M1s9gZNO6gK54PpQ2oOa7pvZzCk+zu8yNL+Nn2u OsTfxf4OBlorhS+oaDqElKhM/5/g7zBnkfLOP+maDvtrZS3SbfwdXhdvFf3N rekw10bnyiw+f4fJ7a1Rl/doODxJXHjN5L6fw38QqNdwqIhYYXr2sZ9D3W+r gnMn1B0EPjmeT3vq55CR/6H1ZAiCD7FfDc4PvAWMqE8qkPDL83OYAjJfBsE/ AwJzEOkBFh4AlzHz4g== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQLfzJ8XxabqCD+ieVl7M6JRyuHs01aUgOdDjYva/J hFnS4Q3vPoOZRoEOJsYgIO6QH89+TlIx0CENBI6JOSyeZMXoy4Dgc/5ckL75 XACcX7NuW1L90gCHHcFWEf/VJRykXz8yk5oQ4LBeSIcvvU7KYWtLzYXNjQEO 913jHWcJykDMqwlwSAUbIOug/qR53tmqAIe9+TVvZ4oqONzfxzfH+BWCrwqS lwuE8z9vCMieZR/o4L7m6HIGDQWIeSWBDs4TmoXSshQcgktUpv8H8v+DwH4F B3nHj8lnSgMd+GMD7ht9R/BXfntZccZBEc5fC3LvP2WH72zxM3xsAx3mLFLe +ee4qsNjEdmTT58HwPkxuUf/bTqN4IPdvwrof4emR8crVCHu64aGzzMViHt8 AhwEQPYfV3aojFhhetY4wOEMCPgowfkilZNKzi6Rh/MPgOJnsYyDv5xYlq99 gENPRLc/o4AUxD3BAQ4MIOAg4ZAOsqcowGEmCOwUhccH2D92IpD4uofgr+m+ ncHwG8GHRHsgxLwFIg7NgZ5zG8wCHWJUI2TO1Yg6iHsE/JHwhqUXMQg/OtAh 5O3ljzMWijkcvqydKhkX6FBz/8ct49diDujpDQCrngqm "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQbaNzZdYzw0AH/tiA+0bfFRzu7+ObY8wV6FB9/8ct 49cKDo9FZE8+/R7gIFw5qeTsEwWH/bWyFul3EPzvbPEzfHYi+DXrtiXVLw2A 6188yYrRtybAYSYIcCrC+e5rji5n0FBy2Hmr629qfYDDWiEdvvR1ShDzOgMc yg9vc53pqwzhz4Tqj1RxOHxZO1VyV4DDqcNOazP/qThw/lyQvvkegg9zL4wf k3v03ybuQIcniQuvmaxXcagFuU8y0GGL+Y9DKVwqDt7Vzfo+WoEOK7+9rDjj oOzweUNA9iz9QIf/INCv5IAePgDes46A "]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYC4vbl4aeMTgQ5sHB2ySfnaTn8B4HXQQ7mNnuD piVqOXhXN+v7/Aty2KCXt5gxRsuB4+eC9M1swQ7TJ/BXmWkj+D/evj5geVgT zt/u0PTo+AxNh/v7+OYYMwU7ZOR/aD0ZouHwWET25NP/QPNUnzTPe6vu8GL7 eubnQPvVP6m8nKUp7VC7bltS/d4gh5r7P24ZvxZzMAaB3UEOCrsW7EtdJ+aw 4eHLqZvmBDlogNR3ijn0eL1iMWkMchCpnFRyNkXMoX/BD8NndVD1fKIOO291 /U2djuCLewT8kbgf5GACNljUAeSMs2rBcHmwuD2CD3aPYzDcfHnHj8lnJIPh 9keIb7/IAPRvyNvLH2csFIOH15d9H7emf0PwIf4Rh/NbFdhVz5hIQNwDDI83 bbndRrsl4OFTDVYv4VAZscL0rHOwQwPL0X5Dc02Hgnj2c5KewQ76WiuFL6ho QcLPBxr+zloOnKDwzwqGx5fwJ8fzaa3B8PiNzT36b1M7NH4ktB3OgEADgg8O D7Ngh/Q0IGDThvhXE8GXfv3ITEoGwfeXE8vy/R0EMYdH26E50HNuw6kguHno 6QsAv84Qeg== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJ+KL1okhWj74Iwh24bz11pm5Qc2paHnzJag+CbGAPB bkz+ym8vK84YKMP5DCCwQRmuH8YviGc/J7kQwW8K9JzbcCwEzt91q+tv6m4E /0CtrEX6Gkw+zD4YH+YemH4YP0BOLMv3OIKP7j+Ye9Q/qbycdVIa7l4YH+Yf dH56GhAck4HzRSonlZw9IgvXD+PD7IPxYe6B8WHuhfFh/kHnw+yD8WHugemH 8WHhCeOj+w8AEwO/1A== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 98.33439999999999, 13.512500000000001`}, {96.4875, 13.512500000000001`}, {95.5453, 12.046899999999999`}, {95.5453, 9.1625}, {95.5453, 7.7671899999999985`}, {95.7953, 6.564060000000001}, {96.21249999999999, 5.9796900000000015`}, { 96.6297, 5.395309999999999}, {97.2984, 5.0609399999999996`}, { 98.0375, 5.0609399999999996`}, {99.83749999999999, 5.0609399999999996`}, {100.74399999999999`, 6.6109399999999985`}, {100.74399999999999`, 9.6625}, { 100.74399999999999`, 12.2734}, {99.9688, 13.512500000000001`}, { 98.33439999999999, 13.512500000000001`}}, {{98.1203, 13.095300000000002`}, {99.27659999999999, 13.095300000000002`}, { 99.74219999999998, 11.9281}, {99.74219999999998, 9.067189999999998}, {99.74219999999998, 6.528130000000001}, { 99.28909999999999, 5.47813}, {98.19219999999999, 5.47813}, { 97.03589999999998, 5.47813}, {96.54689999999998, 6.68281}, { 96.54689999999998, 9.590629999999999}, {96.54689999999998, 12.1063}, {96.9875, 13.095300000000002`}, {98.1203, 13.095300000000002`}}}]}, Thickness[0.009790483649892304], StripOnInput -> False]}, { ImageSize -> {204.2692303860523, 32.67741967621419}, ImageSize -> {102.13461519302615`, 16.338709838107096`}, BaselinePosition -> Scaled[0.32439307852814453`], ImageSize -> {103., 17.}, PlotRange -> {{0., 102.14}, {0., 16.34}}, AspectRatio -> Automatic}],GraphicsBox[{ Thickness[0.007051191651389083], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{ 1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGBQB2IQLbNRbD7Tg1/2O4KtIv6riznA+Aq7FuxL5RN1+A8C 9RwOJsYggMnviej2Z9zABefzOPJ5zcjkgfN7QfIfeOH89DQgWMbvAKLS1EQd 3NccXc4wQ9gBZh86/2D3viYTZxE4P0Y1QuZcjBScDzFfziHk7eWPMxaKOYCt UVZ0qLn/45bxa0mHahB9W8lBHqTeT9ZBIDbgvtFzZQfnCc1CaVaKcD6YPq4M 5+sqyn/JMdNwKD28zXXmXAWH7Q5Nj45LaDtUgczTFofz2xTYVc9cEYPzv+z7 uDXdDMF/05bbbRQtCvG/sLbDTBD4KeRwBgR4tCHuey0ACRc2bYj/9vDC+Td4 b4ulmnHB+du8NljM+ckC1w8J1y/2MPtgfHObvUHTErUcxJtkphhc/m1/fNeO XrYALYg+HyaH51na36bbajk0i9eyZh5jgpqP4G82/3EoRUsDzgf7Y7cknA/2 R6SEAzcovl8yQs0VdzgAiq9kBmj4I9ITLH0BAESa+vo= "], CompressedData[" 1:eJxTTMoPSmViYGAQB2IQ/X3fx63p17gdRHq8XrF80XQoWF6y4Z8/n0PALema RCEtB2MQuCzgoK+1UviCipbDF5B6M2E4/4FrvOOsjWJwfsjbyx9nNEo5+Jxg t519VRPKl3Ews9kbNC1R00F+14J9qX2yDpvNfxxK0dKEmFcm5+AFVq8BMS9Q 3sFjf62sRbqGw1ohHb70cwoOElOvcGY4qTs4T2gWSotSdJgxgb/KrFsVzv+w aL3CWQ1lOP/sGSCoUXCovv/jlnG3gsN/ELgv49Ab0e3P+EHWASR9xkfKwQTk P2FpiDu+iTu4rzm6nMFCwmFHsFXEf3Vxh3YFdtUzV4Tg/IPd+5pMFgvA+bDw YgABB3EHWHhqfFJ5OasTwYeFLwAt8Z2s "]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKL1e9UnzPF5thzmLlHf+Oa7qEHBLuiZxkjqcnxAS pL5AU9XBGASCleH8MyDQI48qf1nCoe63VcE5D3WHtUI6fOl2Ig4b9PIWM8Zo wflgc9n14PzF9/fxzQk2cJgJApGScP5/ELBXgPM91hxdzlCh7PDnW+mDOYF6 cPehu19m+QsPvflaDqcOO63N/KfiIDMvTvP0BR04//iuHb1sBXoOytceBTPM UYLzY1QjZM7tkYPzGUDAQdJhq0PTo+MWug4PXOMdZ10Uddhi/uNQipc2nC/a 4/WK5YsGnG9mszdoWqK6Q3oaCEjB+Xvza97OnKoA54PVFyo7pIKUtWkg3Ivm fgCtta96 "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYCYoemR8dnnDZzOLFrRy/bBlWHwjXdtzM2mDnM WaS8889xVQcDrZXCF0SgfHdVhy87b3X9LTV1CLwlXZP4ScXhQK2sRfoVE4cN qk+a551F8H++fX3AUlnF4SZQmZGrKZz/JHHhNZP9CD7EflMHjzVHlzP8UIbz 9+bXvJ2ZqgTni1ROKjnLIgvnu4PVSzvIzIvTPL3A1OFA974mk8VSDlvMfxxK iTJ1UP+k8nJWpyTEflZTh1YFdtUzJhIOS+7v45uz2MRBAywv7hCj4PgxWQfB //Ot9MGcg8Zw/ga9vMWMOcYOfRHd/owCEg7TJ/BXmVkbQ+2XcJAG2S9g7PCm LbfbaLckRP63kUM72D5pOF9+14J9qX6ycD4svPuDS1Sm3zeCh7f/xYkx/5yN 4OHtfYLddvZSQ3h4Lwa5n9kQHt4wPiw89UHxVYLgl2wV/X36HYIP1vbLEB7e MD4svGH8HcFWEf+Py8D5D1zjHWcVSjrYVkasMOU1cviy7+PW9G/icPemgcAx MYdGlqP9hu1GDm4g8yNE4f5lAIEFIg4ab3n3Gaw0hvMlpl7hzDAygfPB8bHG xKHq/o9bxt6iEPf/M3GIUY2QOVcjBo9/mHtgfFj88Pmvn5J6wtThDAj4iMPT mwIo/PlEIeq7zRxMjEEAan4fgg+2fw+CD/bPc9x8LjfVUqZd5nDzYXyYe8Hu sDF3CHl7+eOMhWKQ/HTFzGEmCOyE+cfM4SAo/TKLw/k9YP9IOaDnTwD5IZcz "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGBQAmIQPWMmEJy0dEiJvePGvEPb4cRhp7WZ6ywd6n9bFZx7 oe2QDBLXsHR4ECG+/WKDtoMxCBy2cDi+a0cvW4C2g8TUK5wZl8wd0tOAgA3B 36CXt5gxRsvBrjJihWmtBZzvd3FizL/NCP5MsP0WDtsdmh4dl0DwzWz2Bk1L 1ITz1wrp8KXXycD56p9UXs7qlHQAWZt2zMKBAQQcJByk58Vpnt5g4aABkn8p 4rD8hYfe/4dQ+QUiDhvB9lo6uK05upwhQszh+85bXX+vWjq8acvtNpIWdfAH uc/ZCq7e5wS77eynCH6MguPH5BhrOB/sjzXWDl/2fdya/g3Kf2PtcAYE1og6 2IL8L2vrEK0aIXNORtJhyf19fHMW2zoc6N7XZLJYChLefHYO7iD3zJCD88H+ 5FSE88sPb3OdeVbZQeMt7z4DTVuHOYuUd/45rurwBeT+p9ZwPjgewhB8CVB4 HLByqPm0ISA7StXhz7fSB3MKrRwuXA17o79bxQEW/3vza97OTFV2QE8PABVA 52c= "], {{25.787499999999994`, 8.971879999999999}, { 25.787499999999994`, 9.139059999999999}, {25.907799999999995`, 9.353129999999998}, {26.098399999999994`, 9.567189999999998}, { 26.431299999999993`, 9.9125}, {26.896900000000002`, 10.1156}, { 27.385900000000007`, 10.1156}, {28.387500000000003`, 10.1156}, { 29.018799999999995`, 9.304689999999999}, {29.018799999999995`, 8.02969}, {29.018799999999995`, 6.695309999999999}, { 28.30309999999999, 5.76563}, {27.290599999999998`, 5.76563}, { 26.670299999999994`, 5.76563}, {25.787499999999994`, 6.1468799999999995`}, {25.787499999999994`, 6.409379999999999}, { 25.787499999999994`, 8.971879999999999}}}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIZIGYC4t7gEpXp9+0cNujlLWaM0XJQedI872yXPZz/ 51vpgzkHEfyrQp8cz1+zd9ju0PTouASCb2azN2haoiac3xPR7c8oIAXn94H5 4g4R4tsvMpyzd5gJAjvFHL7svNX1N9XeIeTt5Y8zFoo5zACJ37RziFGNkDlX g+Ar7FqwL5VP1EEYaFwaq4ODiTEIYPLtgc6aoY3gX8yPZz8XiJt/fx/fHONX DnDzYXyY/e3Lw08ZLXGAu8/82tFckwIHuPvB9mU7wP0H48P8D+OnxN5xY96h 7RAJ8n+cg0P9b6uCcy+0HVRB4S3l4PAAFDAN2g4y8+I0T1+wdzi+a0cvW4C2 Ayx+0tOAgA3Bh8UHAHOEuq4= "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGJ5IIaxWaBsBigfRjMjqWHGooZa6kkVp5Z7aO0vXOoB MK4CWQ== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGIHIGYC4uUvPPT+X3RyOAMCPpIOPP7rp6RucHKIUY2Q OScj7fB5Q0D2rPlODq0K7KpnTGQc2peHnzJqcXKouP/jlnG3nIP41CucGUpO DgKxAfeN3JUdEg5f1k6VdHKI4BRrN16v7GAMAsJODlvMfxxK4VKB8z3218pa uCP4U9pboy7PUXHYqJe3mFHFyWGD6pPmeWdVHJ4kLrxm4u7kINrj9YrliopD cInK9P8NTiDnMzA8QPBnTOCvMutWdWBZPMmK8a2jww6HpkfHKzD55teO5ppc QPDB9m/GzX8Msl/eEW4+jA+z/w3vPoOZVo5w99X/tio4l+DoYGazN2jaQRWH 3zG5R/8VOTqcOuy0NrNOxQEc3p2ODh8WrVc4u0IZ4h4DJwcTkL2XpSDqo6Dh PUXc4f4+vjnGWU4OfRHd/owFYg7eJ9htZ7c6OSjsWrAvlU8EYn+Sk0N6GhCo CTpczI9nP2fo5KD+SeXlLE8uB90JC34YfnOExO8ZVkj87UHwKyJWmJ5djODz guK/w9GhcHnJhn/9bBBz8xwd/oMBO8S+KAQ/Qnz7RQYzR4cv+z5uTb/GAHF/ kKNDi3gta+ax//bZnD8XpGc7Oog0yUwxuPzPHmY+jD/fRufKrHcIPiw8ZswE gptMcP8f6N7XZKLMDQn3Bc4OD1zjHWd9VITE711nSPqRgYbvT2d4+FuAzFNw gcePGihZebnA4w/Gh8WvBCg9X3KGxz86Hxy+OxH8RFB6X4ibD06fGs5w82F8 mP2uqqVMswKc4e7LAYVXtbPDnEXKO/8ch8pPcHaQmheneXoCgn/hatgbfWs0 eQEVBx9Q+uh1dpgJDj9lSP5td4bE7xxlB/T8DgAqbbGh "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{44.060900000000004`, 7.862499999999997}, { 44.418800000000005`, 8.660939999999998}, {44.359399999999994`, 8.721879999999999}, {41.224999999999994`, 8.721879999999999}, { 40.903099999999995`, 7.921879999999999}, {40.962500000000006`, 7.862499999999997}, {44.060900000000004`, 7.862499999999997}}}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvb9W1iL9i4eD+ieVl7M6JRzcVEuZZj3wcDjYva/J hFnSoXir6O/TdR4OJsYgIO5QGbHC9Gy0h0MaCBwTc7i/j2+OsRSCv6b7dgbD dnc4f8o3tvgZKe4OO4KtIv6rSzhczI9nP2fp7rBeSIcvvU7KgWXxJCtGWXeH +67xjrMEZRwegMwTcndIBRsg6/AkceE1E353h735NW9niio4RIhvv8jwDsEH y4d7wPm1v60Kzs3wcHBfc3Q5g4YCxH1Mng7OE5qF0rIUHOybHh2fwezp8B8E 9is43JSuSTRi9XTgjw24b/QdwV/57WXFGQdFOH8tyL3/lB3aloefMpri4TBn kfLOP8dVHRIOX9ZOfekO54eUqEz/vwHBB7svH+h/B6DFFaoOdSD3GUDD55mK A0h4xmY3BwGQ/ceVHXq8XrGYNLo5nAEBHyU4X6RyUsnZJfJw/gFQ/CyWcbC4 djTXZIabQ09Etz+jgJRDIsg9B90cGEDAQQJizz83h5kgsFMUHh9g/9iJQOLr OoL/aUNA9ix+DzgfHE7uHhDzFog4zLPRuTKrzcMhRjVC5lyNqMNxTatJp9fD 0osYhH/ewyHk7eWPMxaKOcg7fkw+c9XDoeb+j1vGr8Uc0NMbAMSqDZk= "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQLfTJ8XxarYcDf2zAfaPvCg4R4tsvMuh5OFTf/3HL +LWCQ8Lhy9qpnB4OwpWTSs4+UXCQmHqFM+OSO5zftjz8lFEPgj/lG1v8jBR3 uP4H+/jmGAu5O8wEAU5FON99zdHlDBpKDjz+66ekSrg7rBXS4UtfpwQxT8fd ofzwNteZvsoQvg9Uf6SKg4Ljx+Qzve4Opw47rc38p+Kwpvt2BsN1BB/mXhg/ uERl+n8DD4cniQuvmaxXcZgMcp+Ph8MW8x+HUrhUHPQmLPhhmOfhsPLby4oz DsoOtb+tCs5VeDj8B4F+JQf08AEAIz2Jzg== "]}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZiR+AxksEk1hxj1lJhJLb2UuBMA 8t8CMw== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJjIGYC4je8+wxmvvJycF9zdDnDCgWHHM6fC9IPeztM aW+NujxHxWF/raxF+hlvhzmLlHf+Oa7icEe6JtHorrcDAwg8UHF4krjwmsl3 BH/KN7b4GTw+GPwZE/irzLpVHfbc6vqb2u8N59/fxzfH+JKXQzinWLtxvKKD zoQFPwzjvBx+vn19wFJZBaLe3cuh4bdVwbkVKg7zbXSuzDLzctjh0PTo+A8V B/UnzfPOMnlB3afqcDE/nv1coKfDBlWghK+qQ8Lhy9qpkZ4Qd65XgfArPSHm L1ZxOAMCUzzh/k1PA4Jtng4eII+7qzj4nGC3nX3U06HbxnNX2idliPoaaHjN kIeYN9PTwcQYBMQdireK/j7d5+kAMibtmJjD75jco/+qPB1iVCNkztWIOdgD nT0jG8GHuRedDzFP1IFl8SQrxqsI/ocNAdmz7ns6zASBnaIO70Hx98jTQeOT ystZL6HqvyLsF/jkeD6N18vhTVtut5G0hIO848fkM6peEH/4SDrw+6+fkmrg 5SC/a8G+1HWSEP8shKqPloPEn4u3Q8jbyx9nLBRz0AfFj5s3xL5OMYcNenmL GUO8HdYK6fCl3xN1ML92NNckwdtBpHJSydkUUUj6yfF2UACZzycK8f9ub7h/ 0Plg+08i+C6qpUyzbuDm/wcBdR+4+TA+LDwvgMKT0Qfu/i+g8HsPdc86MXh6 7ovo9mcUEIend0j4iTug5w8ATSJXnA== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYp8T7Laz1/o53NaUXfOfWckBxj8DAjLKDjek axKNtvo56CrKf8kRU3H4E5N79N8hP4fAW0CJTyoO4eLbLzK0+TkYaK0UvtCi 6uCqWso0K8DPYc4i5Z1/jqs6LH3hofdfEMGv/21VcO6EL5xvYgwExb4Ooj1e r1hCVB2OalpNOi3u6/CqeKvo72wVB5bFk6wY1/o4MIBAgrLD/lpZi/QSH4c7 IPduVoTzv+z7uDXdTB7OTwOBYxIOAp8cz6ex+jqsFdLhS7cTcbiQH89+7iKC D7LWRNEPzrdvenR8xmQ/iH41UYh/F0Hl74nC/S9SOankbIq4Q3nECtOzm/0c 3rTldhtJS0D8U+3nsCPYKuK/uriD+NQrnBlefg4zQWCnmEMO588F6cII/v19 fHOMs3zhfNUnzfPO/vKBmHNZCs4P5xRrN+5XgPNh8bOm+3YGg7uvwxbzH4dS ulQceP3XT0m9gODD7IPxwfpi/Byk5sVpnhZQcTC/djTXpMLPwWPN0eUMFcoQ 85sw0wOMDwD3D+wW "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQAWIQHVyiMv0/R4DDiV07etk2qDrc38c3x5gpwGHOIuWd f46rOsy10bkya5s/hO+u6vAkceE1k3R/h8Bb0jWJn1QcdCcs+GEo5u+wQfVJ 87yzCP7Pt68PWCqrOJRsFf192g/BL49YYXq2G8G/kB/Pfm6iv4PHmqPLGX4o w/l782vezkxVgvN7Irr9GQWk4Pw+MF/cQeCT4/m0Xn+HmSCwU8wh4fBl7dRI f4eQt5c/zlgo5mBiDATC/g4xqhEy52oQfIVdC/al8olC3LPaHyJujMlf+sJD 7/9FBN/82tFckx+4+YsnWTH6egTAzYfxYfZ/Z4uf4aMaAHefv5xYli93ANz9 sPiA+Q/Gh/kfPb4AXia1hw== "], {{63.592199999999984`, 13.4891}, { 63.23439999999999, 13.4891}, {62.92499999999999, 13.179699999999997`}, {62.92499999999999, 12.821899999999998`}, { 62.92499999999999, 12.4766}, {63.23439999999999, 12.165599999999998`}, {63.58129999999999, 12.165599999999998`}, { 63.926599999999986`, 12.165599999999998`}, {64.24839999999999, 12.4766}, {64.24839999999999, 12.821899999999998`}, { 64.24839999999999, 13.1563}, {63.926599999999986`, 13.4891}, { 63.592199999999984`, 13.4891}}}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4v21shbpSwIcRConlZzdouwA48vvWrAvdZ0k nL8j2Criv7qYQ+26bUn1ewMcGEBggYjD4klWjL4/EHx5x4/JZzgD4Xzp14/M pGQCHdYK6fCl3xNx2PDw5dRNCoEOJsYgIOrwnS1+ho9roMNMENgp7rD7Vtff VOtAB/VPKi9ndUpAzNeA6Rd3eLF9PfNzoHkhby9/nLFQ3CE9DQj4EHyw+R8C 4Hyw+58EOHzZ93Fr+jQJOL/m/o9bxq+l4HyY/w9f1k6VdAuE84NLVKb/9wl0 OHXYaW3mPxWE/k8bArJvIfhmNnuDph1UhfMlpl7hzDik5sDxc0H65mcBDi+y tL9Nn6vucAYE3gQ4GGitFL6goukQm3v036bHAQ5zFinv/JOu6SD8yfF82sUA h9fFW0V/c2s6NAd6zm3YFeAwub016vIeDQfVJ83zzi4KcPgPAvUaDvnx7Ock lwY41P22Kjh3Qt3BWufKrGdAfkb+h9aTIQg+xH41OD/wlnRN4icVSPhlBThM AZkvg+CD3TkHkR5g4QEA+276nQ== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQ7a5ayjRrQZCD+ieVl7M6JRw4fi5I3zwtyOFg974m E2ZJB3nHj8lnUoMcTIxBQNxh8SQrRt+QIIc0EDgm5nD1aK5JgzGCb6NzZdYz RgR//cOXUzfdCHTYEWwV8V9dwsFfTizL93Cgw3ohHb70OimHF9vXMz/fEuhw 3zXecZagDMS89YEOqWADZB0ixbdfZFgX6LA3v+btTFEFB+FPjufTZIPg/AiQ fBCCr/qked7ZoiAH9zVHlzNoKDhcB5m3PMjBeUKzUFqWgkP78vBTRiuCHP6D wH4Fh+ASlen/gXz+2ID7Rt8R/JXfXlaccVCE89eC3PtP2UHbatLp+oIghzmL lHf+Oa7qIO4R8EdCGsHvX/DD8Nm/QDgf7P57QP87ND06XqEKcd++QEj4PFOB uKch0EEAZP9xZYc13bczGNIDHc6AgI8SnC9SOank7BJ5OP8AKH4Wyzg0B3rO bSgKdOiJ6PZnFJCCuKc90IEBBBwkHGaCwNJACL1TFB4fYP/YiUDiSzAIzr+/ j2+OsR6Cnw5yp1cQxLwFIg5bW2oubM4McohRjZA5VyPq4F3drO9TB0svYhB+ X5BDyNvLH2csFHP4zhY/w2dikEPN/R+3jF+LOaCnNwAnDQ7V "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQnR/Pfk4yNciBPzbgvtF3BQfhT47n02yDHKrv/7hl /FrBQdwj4I+EdpCDcOWkkrNPFBw+bwjInsWP4GtaTTpd/yYQzl//8OXUTTcC 4fqvHs01aVgf6DATBDgV4Xz3NUeXM2goObzh3Wcwc1Ogw1ohHb70dUoQ8/YE OpQf3uY601cZwj8D1R+p4vCdLX6Gz9tAh1OHndZm/lNxsNG5MuuZYBCcD3Mv jN+/4IfhM7sghyeJC6+ZrFdx2AByn0+QwxbzH4dSuFQcatdtS6qPDXJY+e1l xRkHZQfVJ83zziYFOfwHgX4lB/TwAQDiI49d "]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQ7V3drO/zK9jBQGul8AUWVYfPGwKyZ50PdmhkOdpv OF3V4cE+vjnGu4Id5ixS3vnnuKrD1aO5Jg3zEfwJC34YPutC8F1VS5lmVQQ7 /Hz7+oDlYlWHmSCQGuwg2uP1iiVE1SE9DQiUgh0uXA17o2+tAtH/Lcjhjqbs mv/Nyg6cPxekb74V5JAKUndMEc7/DwL18nB+f0S3P+MGaQd/ObEs3/dBDuqf VF7O6pRw2PDw5dRNIsEOIW8vf5yxUMzhLe8+g5l6wQ4MIOAg6tAc6Dm3IQjK XyDiIPP6kZlUC4IfADJvMoL/Yvt65udLgh0euMY7zrooAjF/RbBDEMh8RlEH kU+O59P+QuULJSH+/RnsoLBrwb5UPlGI/+RCHEDeSVMTdZDwCPgjoR3iYGIM AqIOSyZZMfqaIPhgdVYIfkE8+zlJVzR+KMI8MB0V4vCmLbfbSFrUYWtLzYXN mWj8yhC4e2D8GNUImXM1Yg5vQOETFgIPL7D/bEIg/tgpBndPHyi8BcTh/B4w XwrOT4m948a8QxuSPoxDHOp/WxWce6HtECG+/SKDUIjDAxCjQdvhDAj8CHY4 vmtHL1uAtoOm1aTT9XuCIemCDcHfoJe3mDFGC+Lv5wh+SInK9P9fEHxY+t3u 0PTouASCb2azN2haoqYDevoGAGpFNTE= "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7V3drO/zK9ghRjVC5tweeQcY/0D3viaTxTIOZ0Dg R7CD+ieVl7M0ZRwmLPhh+OxdsENPRLc/o4C0Q+26bUn1N4MdjEHgsoSDzOtH ZlJbgh3c1hxdzhAh7rB4khWj7wQEvyCe/ZykL4KfD+LLBjukp4GANJw/EwQ6 FeD8ThvPXWlKyhD3uQU7NPy2Kji3QgXini4E/4mI7MmnyxF8sLnHoOZFqkDs fxjsIBAbcN/ouLJDj9crFpOPwQ4PXOMdZxUqw/2PYt8vqPxHJQf08AIAx9KF 4g== "]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJTIGYC4qZAz7kNRaEOIpWTSs6yyDjA+G/acruNdks4 tC0PP2VUEOpwBgR8xB2OXNZOlcyCqk8RdVBw/Jh8ZmKoQ6sCu+qZKSIOV4/m mjSsD3VYK6TDl24n4vCGd5/BzEsIPth8szA4v3bdtqT62jCofnE4P+Tt5Y8z HGXg/BjVCJlze2Qh5pWFObSA1F+Rc5B5/chMKiPMQf2TystZJ+UdlkyyYvQN CXM4C3JvjYKDhEfAHwnrMIfUNCA4puDAAAI/oO7RU3QQ+uR4Pm1nqMN/EOhX hPhzSajDTBDgVILzO208d6UpKcP5oj1er1hCVCD+3R/qcOqw09rMfyqQ8HmH 4IOUmSiGwflg93qEOTT8tio4p4HgO09oFkrjUobzyw9vc51ZqwTxfyyC/2Af 3xzjuDCIPx4oO6zpvp3BEB/mEHhLuiaxSMXhB1v8DJ/EMIcniQuvmeirQtxr EebwIkv72/S5qg4iIP/KhjnMWaS8889xVYh7/4XC+WB/L0Xwd97q+puaH+qQ EnvHjblCBc43BoFgJTgfFp7g9NIA5ccpOATIiWX5Lg6Fxp+8wxMR2ZNPt4dC 4ktT3mERKL4ehELiJ00Ool8kzKE3otufcYMsPL182fdxa7qZrENIicr0/y7Q 9GIiA+eng/VLwfkmIPddFneYsOCH4TO5MIeD3fuaTJjFHDY8fDl104tQOB+s fgOCD04PnaEOCrsW7EtdJw7n94DcIyAF56PnFxgfAPsaZ+0= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4gO1shbpT8IcRConlZzdouwA48vvWrAvdZ0k nL8j2Criv7qYQ+26bUn1f8McGEBggYjDkklWjL4W4XC+guPH5DOeCL7M60dm UjHhDmuFdPjS74k4bHj4cuqmhHAHE2MQEHX4xhY/w6c13GEmCOwUd9h1q+tv anW4g/onlZezOiUg5mfA9Is7vNi+nvk50LyQt5c/zlgo7pAGAn4IPth8AwQf 7H6VcIcv+z5uTZ8mAefX3P9xy/i1FJwP8/+Ry9qpkm0IfkiJyvT/PeEOpw47 rc38p4LQ/2lDQPYtBN/MZm/QtIOqcL7E1CucGYfUHDh+LkjfrBbu8CJL+9v0 ueoOZ0BAJ9zBQGul8AUVTYfY3KP/NimHO8xZpLzzT7qmg8gnx/NpguEOr4u3 iv7m1nRoCvSc2/ArzGFye2vU5T0aDqpPmuedfRTm8B8E6jUcCuLZz0k+DXOo +21VcO6EuoONzpVZz4D8jPwPrSdDEHyI/WpwfuAt6ZrETyqQ8FsV5jAFZL4M gg925xxEeoCFBwAqK/hK "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQnQYCXREO0aoRMudkJB3e8O4zmNkW4aCwa8G+VD5R h/bl4aeMdkQ4mBiDACb/8GXtVMlDCL61zpVZz44i+MElKtP/34hwANujJurQ FOg5t+EXwnwYPwZkf42YwxkQuBPh0KrArnpmihhE/lSEQ8jbyx9nLBRz2Hmr 62/q8QiHg937mkyYxeH8mSAQKYnK51SE8w20VgpfaFGB8JdHOMxZpLzzz3FV h/4FPwyf+SH4YP/oIfifNgRkz+KH6VeFhM+ncIcdDk2Pjv9QcTgCUn8q3MHn BLvtbFME/8Oi9QpnVyg5RIpvv8hwL9yh/PA215m1Sg5PRGRPPn0e7lB5/8ct Y2tlCP97ONT9Kg5Xj+aaNPwPh7sXbJ8Swv1e1c36PlkIvvTrR2ZSHREOnTae u9IWKTvA4pM/NuC+UbkixH92iPCQ8Aj4I3E93GHlt5cVZwoUIP5bHe4gUjmp 5OwSOTh/vZAOX3qdFJwPNveYGMR958MdGEBggYhDTO7Rf5u4I+D82nXbkuol EXxIvEdAzD8i4lARscL0rHaEQxAoPhlFHdDTHwAu/RlG "], {{98.1625, 6.778130000000001}, {97.8172, 6.289059999999999}, { 97.06559999999999, 5.835939999999999}, {96.6, 5.835939999999999}, {96.12339999999999, 5.835939999999999}, { 95.7063, 6.27813}, {95.7063, 6.790629999999999}, {95.7063, 7.231249999999999}, {95.94529999999999, 7.64844}, { 96.30309999999999, 7.874999999999999}, {96.6, 8.053130000000001}, {97.2563, 8.22031}, {98.1625, 8.35156}, { 98.1625, 6.778130000000001}}}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4jA+3U1zwyMdRConlZzdouwA48vvWrAvdZ0k nL8j2Criv7qYQ5JAhOWWgkgHBhBYIOLwJnCHXOtqBH+B67bPf/cg+HPeLz/m fT7SYa2QDl/6PRGHKc7dOc8vRzqYGIOAqEPP9Dyh5h+RDjNBYKe4g819/97p 7yId1D+pvJzVKQEx/zZMv7jDk6WzjyhciHQIeXv544yF4g4zQPoOIvhg8xcj +GD3T490+LLv49b0aRJwfs39H7eMX0vB+TD/P6gSWef+E8G/UvFSzZAhyuHU Yae1mf9UEPo/bQjIvoXgm9nsDZp2UBXOl5h6hTPjkJpDAND5r2dGOrzI0v42 fa66w38QmB/pYKC1UviCiqbD579AG6ZFOsxZpLzzT7qmw/fgx0tnt0Q6vC7e KvqbW9OBGWRgbqTD5PbWqMt7NBx2l0yWYAmLhJhTr+GwHWh8YESkQ91vq4Jz J9QduJm028UiIx0y8j+0ngxB8CH2q8H5gbekaxI/qTgINR84tVA20mEKyHwZ BP8MCMxBpAdYeAAASWL3RQ== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvWHu++XHgqMd1D+pvJzVKeEQsEOu9bVntMPB7n1N JsySDjL6d1XYJKMdTIxBQNyhIGPi2xr2aIc0EDgm5iDf+jpwx7MoOL8FyJXb iuBPce7Oed4d5bAj2Criv7qEgwcPk3Z7WZTDeiEdvvQ6KYcnS2cfUciIcrjv Gu84S1DGYTmQuyEpyiEVbICsA9B13uaJUQ5782vezhRVcKjP2lMy+QKCX75v vpQ+azScD5SVYFGLdnBfc3Q5g4aCwxKQeVHRDs4TmoXSshQc2NfIRKVERzv8 B4H9Cg7+SQIRljHRDvyxAfeNviP4K7+9rDjjoAjnrwW595+yw/5TC123KUc7 zFmkvPPPcVWHlgNAgXNRcL66IccamU0IPtj9E4H+d2h6dLxC1cEFGBy/C6Hh 80wF4h7jKAcBkP3HlR3EWcL4dKWiHM6AgI8SnC9SOank7BJ5OP8AKH4WyziA uJtUoxx6Irr9GQWkHP6s/HjJ1yrKgQEEHCQcXLZ9/nslIsphJgjsFIXHB9g/ diKQ+DqK4ANDqyjjIYIv0Az04F+oeQtEHNYXAROATLRDjGqEzLkaUYftQOMr DGHpRQzCd4x2CHl7+eOMhWIOIuvcH1a5RDvU3P9xy/i1mAN6egMANsMJsA== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQvV2u9XWgRLQDf2zAfaPvCg71WXtKJn+Icqi+/+OW 8WsFh5YDpxa63otyEK6cVHL2iYJDh2PC0wuHEHz3h1Ui6+Yj+FOcu3OedyP0 L599RGFDUpTDTBDgVITz3dccXc6goeTw/PfKj5dSoxzWCunwpa9TgpiXH+VQ fnib60xfZQi/Hqo/UsWhZ3qeUPOCKIdTh53WZv5TcWh5HbhD7igSH+peGF/d kGONzKcohyeJC6+ZrFdxkIlKsb7/P8phi/mPQylcKg4JAhGWWwSiHVZ+e1lx xkHZAeh7CRaxaIf/INCv5IAePgBlaZCa "]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYC4gWu2z7/3RLjwMLZJZ+cp+XgAuReuRHjYG6z N2haopaDf+/0PKHXMQ4b9PIWM8ZoObwJ3CHX+jnGYfoE/iozbQT/x9vXBywP a8L52x2aHh2foenw5ILS7Z/vYhwy8j+0ngzRcHihZsix5g3QPNUnzfPeqjuw hPHpbtoa46D+SeXlLE1phz8rP17yXRXjUHP/xy3j12IO/0FgeYyDwq4F+1LX iTlsBTqvojPGQQOkvlPMYU/JZAmWvBgHkcpJJWdTxBz2n1roui0bqp5P1MEn SSDCsgXBn+LcnfP8dIyDiTEIiDrcUWFrnCocC5cvfwl0oA6C33IAaKBeLNx8 m/vAEGGLhdvf4Zjw9MKnGIeQt5c/zlgoBg+vL/s+bk3/huBD/CMO57cqsKue MZGAuAfIf9OW2220WwIePtVg9RIOtVlAHxrEOjSwHO03NNd0uHHue/Bj01gH fa2VwhdUtBxq7E3jdlnGQsLfWcuhIGPi25rwWHh8iYMCuCgWHr8i69wfVpXE QuJHQttBoBnowVwEHxweyrEO6WlAwKYN8a8Ygm/aCfQwB4L/ZOnsIwovYhzO gACPtsOc98uPeW+PgZuHnr4ADEIX3Q== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJ+KH34q0ZMv1uCQ7eN5660TUoOvdPzhJp9EPz/IBCM yV/57WXFGQNlOJ8BBDYow/XD+NnPf6/86Ibgi9489z14cxycf6XipZrhCgT/ /fJj3uYzMfkw+2B8mHtg+mH8jD0lkyW2IPjo/oO5R/2TystZJ6Xh7oXxYf5B 56enAcExGThfpHJSydkjsnD9MD7MPhgf5h4YH+ZeGB/mH3Q+zD4YH+YemH4Y HxaeMD66/wDlIN9I "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4pLJEixh3xIcMvI/tJ68ou4wX0r/rsovBJ99 jUxUinaiQwPL0X5Dc00Hiy0nyvYB+ZPbW6Mu22g6RPcf+qqhg+D3Ts8Takbi dzgmPL2gh+CH8ulumquf6JCaBgRsCL5oj9crlhINOD8dJH9MEs4/AwI+4nD3 pIHlxSDmiyU6hLy9/HHGQjGHIwobijIYEx1iVCNkztUg+Aq7FuxL5ROFuNcm 0cHEGAQw+QYcQAscEPzIFOv7/q4IPnMY0EG+CP7S2UAboqDuURN1UGFrnOoc n+jwpi2320ha1OF78OOls3MQ/OPe5p2ONQj3wPgw9yrf/lmXlYHwD5C3pyQY 4V9wePgjwgPGRwkvGJ9N2+H3yo+XfL0SHVp4/ddPUdV2AMYuW6NhooPPCXbb 2aFaEHXA8Dtx2Glt5jxNh/2nFrpu+5zgcP5q2Bv92xoO6OkDAGol3jM= "]]}, Thickness[0.007051191651389083], StripOnInput -> False]}, { ImageSize -> {283.64999252801994`, 32.67741967621419}, ImageSize -> {141.82499626400997`, 16.338709838107096`}, BaselinePosition -> Scaled[0.32439307852814453`], ImageSize -> {142., 17.}, PlotRange -> {{0., 141.82000000000002`}, {0., 16.34}}, AspectRatio -> Automatic}]}, "PointLegend", DisplayFunction->(FormBox[ StyleBox[ StyleBox[ PaneBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]], { InsetBox[ GraphicsBox[{{ GrayLevel[1], DiskBox[{0, 0}, Offset[{6, 6}]]}, AbsoluteThickness[3.], Dashing[{}], CircleBox[{0, 0}, Offset[{6, 6}]]}, {DefaultBaseStyle -> {"Graphics", { AbsolutePointSize[6]}, Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]]}}], NCache[ Scaled[{ Rational[1, 2], Rational[1, 2]}], Scaled[{0.5, 0.5}]], Automatic, Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {19.5, 19.5}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.2948717948717949] -> Baseline)], #}, { GraphicsBox[{{}, { Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]], { InsetBox[ GraphicsBox[{{ GrayLevel[1], PolygonBox[ NCache[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}]}, { Offset[{0, 8}], Offset[{-6.928203230275509, -4}], Offset[{6.928203230275509, -4}]}]]}, AbsoluteThickness[3.], Dashing[{}], JoinedCurveBox[ NCache[ Line[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}], Offset[{0, 8}]}], Line[{ Offset[{0, 8}], Offset[{-6.928203230275509, -4}], Offset[{6.928203230275509, -4}], Offset[{0, 8}]}]], CurveClosed -> True]}, { DefaultBaseStyle -> {"Graphics", { AbsolutePointSize[6]}, Directive[ EdgeForm[ Directive[ Opacity[0.3], GrayLevel[0]]], PointSize[0.5], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]]}}], NCache[ Scaled[{ Rational[1, 2], Rational[1, 2]}], Scaled[{0.5, 0.5}]], Automatic, Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {19.5, 19.5}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.2948717948717949] -> Baseline)], #2}}, 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 -> "Times"}, Background -> Automatic, StripOnInput -> False], TraditionalForm]& ), Editable->True, InterpretationFunction:>(RowBox[{"PointLegend", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.9, 0.36, 0.054], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6000000000000001, 0.24, 0.036000000000000004`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.9`", ",", "0.36`", ",", "0.054`"}], "]"}], 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.9, 0.36, 0.054]; 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.9, 0.36, 0.054], Editable -> False, Selectable -> False], ",", RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], ",", InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.365248, 0.427802, 0.758297], RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2434986666666667, 0.28520133333333336`, 0.5055313333333333], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, 1.35 CurrentValue["FontCapHeight"]/ AbsoluteCurrentValue[Magnification]}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.365248`", ",", "0.427802`", ",", "0.758297`"}], "]"}], 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.365248, 0.427802, 0.758297]; 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.365248, 0.427802, 0.758297], Editable -> False, Selectable -> False], ",", RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{#, ",", #2}], "}"}], ",", RowBox[{"LegendMarkers", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ GraphicsBox[{{ GrayLevel[1], DiskBox[{0, 0}, Offset[{6, 6}]]}, AbsoluteThickness[3.], Dashing[{}], CircleBox[{0, 0}, Offset[{6, 6}]]}], ",", "19.5`"}], "}"}], ",", RowBox[{"{", RowBox[{ GraphicsBox[{{ GrayLevel[1], PolygonBox[ NCache[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}]}, { Offset[{0, 8}], Offset[{-6.928203230275509, -4}], Offset[{6.928203230275509, -4}]}]]}, AbsoluteThickness[3.], Dashing[{}], JoinedCurveBox[ NCache[ Line[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}], Offset[{0, 8}]}], Line[{ Offset[{0, 8}], Offset[{-6.928203230275509, -4}], Offset[{6.928203230275509, -4}], Offset[{0, 8}]}]], CurveClosed -> True]}], ",", "19.5`"}], "}"}]}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", RowBox[{"{", RowBox[{"False", ",", "False"}], "}"}]}], ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], Scaled[{0.99, 0.01}], ImageScaled[{1, 0}], BaseStyle->{FontSize -> Larger}, FormatType->StandardForm]}, AspectRatio->1, Axes->{False, False}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox[ GraphicsBox[{ Thickness[0.0050238633509168545`], StyleBox[{ FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld AKjmAn0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJfIGYC4hkzQYDHYc4i5Z1/nms6fN33cWv6NX6H7Q5N j45LaDmApSMFHWTmxWmeNoDyfwrB+Qq7FuxLfScO5z9wjXectVHK4XXxVtHf 3Jpwfguv//oprOpwvmiP1yuWKyoOHmuOLmewEIeIFyo79Ed0+zNuEITzYfbD +NX3f9wyfi0A558BAR8BiDkVyg7ClZNKzrIIOKwV0uFL11N2UP+k8nJWp4BD OKdYu/F9JQd5kHvXCTjwxwbcNzqu5BD89vLHGY6CDu5g/UoQ894IOqSnAYGY EsQeQSGH8sPbXGf+VYSYWyfkcEdTds3/zYoOIiD7XKQdQkDmLBSHmN8n7cAA Ag7iEHNvSEP03RNz+A8C8jIOGmB3iTl8AYV3mYzDm7bcbiNpMYc1IHX7ZCDu WCPqAI4fS1lIOPOJQtXLO5gYg4Cow32Q+z4i+MrXHgUz2CjA+d02nrvSinDz wdRnRbj5MH6MaoTMuRoxiD8MFKH+E4P445yCQw04HqD8OgVIPO0Ud6gCiWuL QdzxRgni3msSDiu/vaw446AMsVdYChJ+zcoOKaBwXibtIAVKPwIqDgEgexTl HAJvSdckflKB+/fn29cHLJXV4HxwempVh/OfJC68ZnJeEx6+kPSrDZE3E4Pz wfYXi8L5YP818EHimw2Tv/zW8seGztxwvl2JY+1pGQ6cfK+t/seT277aw8yH 8c1t9gZNS9RyuPL72PV5kX/tj+/a0csWoOVQuLxkwz9+ZofnWdrfpttqQdMF M9Q8BH+z+Y9DKVoacD4k/KXg/B3BVhH/1cXh5oG0px0Tg9sHiz9IvH+xh8Uv jA+L/5ypCYUWxf/twfrVROHmwdJLs3gtayYbB5y/1WuDxZyfPHB+qwK76hkT AQeYfkh+FIanLxgfZj843e8WgKcv3yeel0yFeeHuh5VPMP/B+DD/o5dfANnI +aI= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQPXUCf5VZto6D+ieVl7M6JRw26OUtZpTRcTjYva/J hFnSISP/Q+vJKVoOJsYgIO5Q/9uq4ByHlkMaCBwTc5CYeoUzg0kTzvc5wW47 u1Qdzn9VvFX0t7aaw45gq4j/6hIOjyLEt19sUHVYL6TDl14n5bBB9UnzPF5V h/uu8Y6zBGUg5j1ScUgFGyDroKMo/yXnmorD3vyatzNFFRz+fit9MCdQA84H y3/ThPOntLdGXf6j5eC+5uhyBg0FB3GQeYt0HJwnNAulZSk4zFmkvPPPch2H /yCwX8GBhbNLPnmdjgN/bMB9o+8I/spvLyvOOCjC+WtB7v2n7LDF/MehlFda EHOOqzrILX/hoWevAee/yNL+Nj1WHc4Huy8M6H+HpkfHK1Qh7otRhYTPMxUH D5A7M5QdBED2H1eG2DNPyeEMCPgowfkilZNKzi6Rh/MPgOJnsQzEX7+UHHoi uv0ZBaQcwjnF2o3nKzswgICDhIMRKNomqzjMBIGdovD4AJtjJwKJr6/qcH5y 7B035hsacP4MsD5NiHkLRBxEerxesWzRcohRjZA5VyPqsB3krwhtaHoRg/Bv aDuEvL38ccZCYPqYF6d5+oO2Q839H7eMX4s5oKc3AEkxAO8= "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQ/SRx4TWTfi0H/tiA+0bfFRz+fit9MCdQ06H6/o9b xq8VHOSWv/DQ26/hIFw5qeTsEwWHX29fH7B8rA7nbzH/cSjllBqc/6p4q+hv bTW4fompVzgzHqk4zAQBTkU4333N0eUMGkoOF66GvdH/reKwVkiHL32dEsQ8 L1WH8sPbXGf6KkPNV4Xoj1RxkJoXp3n6gprDqcNOazP/qTj4nGC3nf1VHc6H uRfGf56l/W16rKYD2J/rVRzegNx3WhNiLpeKg/8t6ZrEIC2Hld9eVpxxUHaY 0t4adblGy+E/CPQrOaCHDwDXJJMI "]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQHaPg+DF5jrGDgdZK4Qssqg5/v5U+mPPRyKGR5Wi/ 4XRVh416eYsZ5xg5zFmkvPPPcVWHHq9XLCaGCH7xVtHfp+8ZwvneJ9htZ081 dPj59vUBy8WqDjNBwNPQQRSkMUTV4QwI2Bg4XLga9kbfWsXheZb2t+my+g53 NGXX/G9WdtgAss9GzyE1DQiOKcL5/0GgXh7O74/o9mfcIO3wJEJ8+8UHeg7q n1RezuqUcPiy81bXX1YDh5C3lz/OWCgGMT/XwIEBBBxEHewrI1aY/oXyF4g4 LL6/j2/OYUM4v2BN9+0MBiM4/7rQJ8fzbkYOD1zjHWddFHH4CjI/1MghCGQ+ o6hD/W+rgnMrjCHyhZIQ/840dlDYtWBfKp+oQwkofPRMHEDeSVMTdegLLlGZ Hm/iYGIMAqIOB2plLdJbEHxw+MxB8D9tCMiedRyNz24KNw+sXsbU4U1bbreR tKgDl5tqKVMUGn+WKdw9MH6MaoTMuRoxhxeg8OE1hYcX2H9LTSD+2CkGd08f KLwFxOH8HjBfCs5Pib3jxrxDG5I+Gk0g4fJC22H6BP4qs9/A8AHFU4O2QzrI 3dOMHY7v2tHLFqDtcFu6JtFoqRFEnA3BB8dzjBYkHgKM4XxwumxH8GHpd7tD 06PjEgi+mc3eoGmJmg7o6RsAGf0zeQ== "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHaPg+DF5jrFDjGqEzLk98g4w/oHufU0mi2Uc0tOA YJqxg/onlZezNGUcSraK/j6dZ+zQE9Htzygg7aDxlnefgaSxgzEIXJZwWHx/ H9+cZiMHtzVHlzNEiDvsr5W1SP9iCOd/3hCQPeu5ASpf3QBiT5o0nD8TBDoV 4PxOG89daUrKDtEg950xcGj4bVVwboWKQzHIPfcM4fyDbcvDTwUZwflnwMAI Yl6kCsQ8c2MHgdiA+0bHlR1SYu+4MVcYOzxwjXecVagM9z/MPhgfLP9RyQE9 vAB3CYgb "]}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4pKtor9P/7N2OLFrRy/bBlWHJff38c15bO0w Z5Hyzj/HVR1SYu+4MXtA+e6qDhpvefcZrLRyCLwlXZP4ScXhw4aA7FnsVg4b VJ80zzuL4P98+/qApbKKA4//+impFQi++NQrnBmfEHyI/VYOHmuOLmf4oQzn 782veTszVQnOF6mcVHKWRRbOdwerl3bwuTgx5t9lK4cD3fuaTBZLOTzP0v42 vdfKQf2TystZnZIQ+y2sHFoV2FXPmEg4XBf65Hj+mqWDBlhe3KEvuERlejyC r6+1UvjCFws4/3Hiwmsm8y0c+iK6/RkFJBxOHnZam5lnAbVfwsEPZL+zhcOb ttxuo92SEHk9C4d2sH3ScL78rgX7Uv1k4XxYeB9sWx5+SsgCHt6NLEf7DcvN 4eFd99uq4NwNM3h43wC538wMHt4wPiw8wfG1AsFf8cJD77+iOZwfIb79IoOe OTy8YXxYeMP4O4KtIv4fl4HzH7jGO84qlHQoWNN9O8PB3OHLvo9b07+Jw92b BgLHxBy2mP84lLLL3MENZH6EKNy/DCCwQMQhWsHxY/IdBN/7BLvt7FRLOL8f FB/3LR2q7v+4Zewt6rAc5H5DK4cY1QiZczVi8PiHuQfGh8WPfdOj4zN+Wzmc AQEfcXh6UwCFP58oRP0+awcTYxCAmn8QwQfb/x7BB/tHygYn36YyYoXpWxu4 +TA+zL3/QSDfxiHk7eWPMxaKQeKHw8ZhJgjshPnH2uEgKP0yi8P5PWD/SDmg 508AWQKcIg== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYvGpVzgzfjk43NaUXfOfWckBxj8DAjLKDstf eOj9Z3R00FWU/5IjpuJwXNNq0ml+R4fAW9I1iZ9UHFSfNM87e8nBwUBrpfCF FlUH4U+O59PmOjjMWaS8889xVYfiraK/T8ch+N4n2G1niyL4/0Gg3t5BtMfr FUuIqoPGW959BiftHF6BNGarOCy5v49vzmdbBwYQSFCGuK/J1uEOyL2bFeH8 L/s+bk03k4fz00DgmITD3lpZi/Qldg5rhXT40u1EHObb6FyZJecA50eIb7/I kIfg8/ivn5L6wAGiX00U4t/3UPl7onD/i1ROKjmbIu7grlrKNIvB0eFNW263 kbQExD/HHRx2BFtF/FcXd3iSuPCayXQHh5kgsFPMwfza0VyTBAQ/HGy/PZwP Vt9v52BiDASXpeD8cE6xduN+BTgfFj9fNgRkz1K3d9hi/uNQSpeKw01gtBjJ OsD5MPtgfLA9Kx0cpObFaZ4WUHFgWTzJivGog4PHmqPLGSqUHT6DzDuPmR5g fABe9+7K "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQrfqked7ZW84O6p9UXs7qlHBY0307g+G4s8PB7n1N JsySDjelaxKNUp0dTIxBQNzhwT6+OcZOzg5pIHBMzMFdtZRpFgOCL/zJ8Xza XCc4/3dM7tF/Xk4OO4KtIv6rSziYXzuaa6Lg5LBeSIcvvU7KIZvz54J0ZieH +67xjrMEZRxcQeb9cHRIBRsg6+B9gt129ldHh735NW9niio47K+VtUi/4gTn +4DkbZ3h/CeJC6+Z1Ds7uK85upxBQwHivhfODs4TmoXSshQclr/w0Pv/0tnh PwjsV3BwaHp0fMZrZwf+2ID7Rt8R/JXfXlaccVCE89eC3PtP2eEN7z6DmVXO DnMWKe/8c1zV4bim1aTT553g/J23uv6mTkfwwe4PBfofZFCFKsR94tDweaYC cc9MRwcBkP3HlR0+bwjInpXu6HAGBHyU4HyRykklZ5fIw/kHQPGzWMZhvo3O lVl1jg49Ed3+jAJSEPcsd3RgAAEHCYg5TxwdZoLATlF4fID9YycCia+9CH6E +PaLDN8Q/HSQO/WcIeYtEHFgWTzJijHX2SFGNULmXI2og+6EBT8Mp8HSixiE v83ZIeTt5Y8zFoo5tC8PP2W0x9mh5v6PW8avxRzQ0xsAg9cT0w== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQXRGxwvRssrMDf2zAfaPvCg77a2Ut0kWcHarv/7hl /FrB4bim1aTT750chCsnlZx9ouBQ+9uq4NwOBP8N7z6DmUUI/u+Y3KP/vJzg +l1VS5lm/XB0mAkCnIpwvvuao8sZNJQcireK/j79z9FhrZAOX/o6JYh5Qk4O 5Ye3uc70VYbwjZwg+iNVHNqXh58yKnFyOHXYaW3mPxUH4U+O59P2Ivgw98L4 O291/U0Vd3Z4krjwmsl6FYj7jJwdtpj/OJTCpeIw5Rtb/IwQZ4eV315WnHFQ hqiLd3b4DwL9Sg7o4QMA2w6PgA== "]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQ/Scm9+i/WW4OBlorhS+wqDp4nWC3ne3q5tDIcrTf cLqqg+qT5nlnpdwc5ixS3vnnuKqD0CfH82lPXeH8tuXhp4z2IPhfNgRkz5ru 6vDz7esDlotVHWaCQKGrg2iP1yuWEFUHE2MgeO3icOFq2Bt9axWI/ikuDnc0 Zdf8b1Z2qIxYYXo22sUhNQ0IjinC+f9BoF4ezu+P6PZn3CDtwLJ4khVjq4uD +ieVl7M6JRxOaFpNOn3exSHk7eWPMxaKOTg0PTo+g9nVgQEEHEQdcjh/Lkj3 hvIXiDgssNG5Mmsdgg827yyCb3HtaK7JB1eHB67xjrMuikDM/+7qEAQyn1HU AeQtk4VuEPlCSYh/Z7o5KOxasC+VTxTivyduDiDvpKmJOkz5xhY/448bJByM RR3WdN/OYOB3h/PBtDSC76payjTLAI0f4A43Dywe7e7wpi2320ha1OFifjz7 uUo0/kx3uHtg/BjVCJlzNdDwCXaHhxfYf/LuEH/sFIO7pw8U3gLicH4PmC8F 56fE3nFj3qHtIAJKH7zuDvW/rQrOvdB2kJh6hTPjFDB8IsS3X2zQhoTrDDeH 47t29LIFaDvsvNX1N1XezSEd5B82BH+DXt5ixhgthzMgUILg8/ivn5I6AcGH pd/tII9IIPhmNnuDpiVqOqCnbwAwyCph "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/Scm9+i/WW4OMaoRMuf2yDvA+Ae69zWZLJZxYACB GW4O6p9UXs7SlHFoWx5+yqjFzaEnotufUUDaIeHwZe3USDcHYxC4LOGwwEbn yiw+Nwe3NUeXM0SIO6zpvp3BcNwVzndTLWWa5YDGf+DikJ4GAtJw/kwQ6FSA 8zttPHelKSk7/AK5z8jVoeG3VcG5FSoQ9+xB8HUnLPhh+A3BNwE7zA1iXqQK xLwMNweB2ID7RseVHepA6jrcHB64xjvOKlSG+x9mH4wPlv+o5IAeXgBpwIbD "]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4vrfVgXnFng73NaUXfOfWckBxj8DAjLKDjz+ 66ekrvB20FWU/5IjpuKgP2HBD8Nt3g6Bt6RrEj+pOPR4vWIxqfR2MNBaKXyh RdWhImKF6Vlnb4c5i5R3/jmu6nADqMyIFcHfope3mHGPF5yfngYCXg6iIINC VB1+xOQe/cfl5fCqeKvo72wVB/NrR3NNFng6MIBAgrLDpw0B2bPSPR3ugNy7 WRHO/7Lv49Z0M3k4H2zsMQkHF9VSplk/PB3WCunwpduJOLAsnmTFeNQLzt9f K2uRLuIN55cArT3d5g3RryYK8e80qPw9Ubj/RSonlZxNEXdY0307g2G5t8Ob ttxuI2kJiH/yvB12BFtF/FcXd/A5wW4729bbYSYI7BRzmG+jc2UWG4Iv8snx fFqsF5wfIb79IsM7TwcTYyC4LAXnh3OKtRv3K8D5sPi5v49vjrGVl8MW8x+H UrpUHByaHh2fcRjBh9kH4/8HAX9vB6l5cZqnBVQccjh/LkjP9nbwWHN0OUOF MsT8Msz0AOMDANTJ7PQ= "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKM2yeJIV41xfhzmLlHf+Oa7qoDNhwQ/DfT5w/ga9 vMWMKj4OxiAQrAznnwGBHnlU+csSDuURK0zPrvZxWCukw5duJ+LgqlrKNKvA F863b3p0fEa0H5yfw/lzQTqzv8NMEIiUhPP/g4C9ApzvsebocoYKZYcI8e0X GfL84O5Dd3/C4cvaqY2+DqcOO63N/KfioOD4MfkMrx+c73OC3XZ2qZ+D8rVH wQxzlOD8GNUImXN75OB8BhBwkHQ4rmk16bS6n8MD13jHWRdFHVqXh58yWuML 58+10bkySwzBX/rCQ+//Rh+H9DQQkILz9+bXvJ05VQHOB6svVHYwAYXbbx+4 +9DdDwBFMa3C "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYCYt0JC34Yhvk7/Hz7+oClsopDyVbR36f7EPzy iBWmZ08j+Bfy49nPXfR38FhzdDnDD2U4f29+zduZqUpwfk9Etz+jgBSc3wfm izsIfHI8n3bW32EmCOwUc0g4fFk7daa/Q8jbyx9nLBRzMDEGgmB/hxjVCJlz NQi+wq4F+1L5RB16vF6xmBz0d0gDATVRh/rfVgXnXvhD1BmLOlw/mmvSwB4A 53P8XJC+WQw33121lGlWSQDcfBgfZv+L7euZn/sEwN33hnefwUytAIj9x8Qc gktUpv/XCHCouf/jlvFrBB/mfxj/vmu84yxFRTj/Pwj0K0Hc6x7g8AAkf1AZ Yl8Ogl8JCv9mNP7kAAeVa4+CGXKUIebMD3D4sGi9wtkVSg7Srx+ZSW1A8EHR +2xbgIOB1krhCy2qDs2BnnMb1gU4nNi1o5dtg6rDGRBYEOAwZ5Hyzj/HVR3E PQL+SExG8NuXh58yqkHwwfYnQ/2fpuoQm3v036bgAIcNqk+a551VgfuvEhQe 1spwPsy++/v45hgrIcyba6NzZdY3fwjfXdXhSeLCaybL/R0Cb0nXJH5ScYCl T5j56OkVAIBiN74= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYC4scisiefXg9w+Pn29QFLZRWH9uXhp4y+IPgc PxekbxYKhPO3ttRc2Cwa6OCx5uhyhh/KcP7e/Jq3M1OV4PyeiG5/RgEpOL8P zBd3uHo016RBONBhJgjsFHOoXbctqf5ngEPI28sfZywUc0hPA4JrAQ4xqhEy 52oQfIVdC/al8ok6CH9yPJ/GG+gAEk5TE3Xo8XrFYqIY6GBiDAKiDosnWTH6 miD4YPuccfPB5i0MRDUfyIfZD3Z/ZSDcfTtvdf1NDYfaf0zMQd7xY/KZ0ECH mvs/bhm/RvBh/ofx77vGO85SVITz/4NAvxLEvSWBDg9A8geh4TkTwXdXLWWa tQGNfyDQQeXao2CGHGWHM2AQ6PBh0XqFsyuUHF5sX8/8/A6CH5t79N+mx4EO BlorhS+0qDr4y4ll+d4OdDixa0cv2wZVSDycDXSYs0h555/jqg7g9LAfwQ8u UZn+fwWCD7Z/AtT/aaoO2laTTtc3BDpsUH3SPO+sCtx/laDwsFaG82H2re6+ ncHgjzBP+vUjMykNKN9d1WF/raxFOkOgQ+At6ZrETyoOsPQJMx89vQIAC3I5 Aw== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQXRmxwvSscbCD+ieVl7M6JRysda7MeqYZ7HCwe1+T CbOkQ3CJyvT/P4IcTIxBQNzh+tFck4bnQQ5pIHBMzIHj54L0zccQ/Px49nOS UxH8xyKyJ59mBznsCLaK+K8u4dAc6Dm3ISzIYb2QDl96nZSD9OtHZlIeQQ73 XeMdZwnKQMxzCnJIBRsg69Dj9YrFxDHIYW9+zduZogoO7qqlTLM2IPjdIPmn CH6E+PaLDGzBDu5rji5n0FBw4ASZZxXs4DyhWSgtS8Fh962uv6nWwQ7/QWC/ gkP78vBTRjbBDvyxAfeNviP4K7+9rDjjoAjnrwW595+yQ2zu0X+bmIMd5ixS 3vnnuKqDd3Wzvs+6IDj/8GXtVMlJCD7Y/YVA/zs0PTpeoQpxXxA0fJ6pOOwE uUc4yEEAZP9xZYf7+/jmGP8KdDgDAj5KcL5I5aSSs0vk4fwDoPhZLOOwtaXm wmbWIIeeiG5/RgEpiHukghwYQMBBAmKORZDDTBDYKQqPD7B/7EQg8bUUwRf+ 5Hg+7SCCD9Z3F2reAhGHF9vXMz//E+QQoxohc65G1KF23bakekFYehGD8BWD HULeXv44Y6GYg7bVpNP1KsEONfd/3DJ+LeaAnt4AoecO6g== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQvXiSFaPvjyAH/tiA+0bfFRzcVUuZZl0Icqi+/+OW 8WsFB+/qZn2ffUEOwpWTSs4+UXBQfdI87+wiBD8m9+i/TfUI/mMR2ZNPsxH6 OX4uSN/sFOQwEwQ4FeF89zVHlzNoKDnIO35MPuMa5LBWSIcvfZ0SxDz/IIfy w9tcZ/oqQ/jxUP2RKg7aVpNO1zcEOZw67LQ285+KQ348+znJpQg+zL0w/uHL 2qmSl4IcniQuvGayXgXivvtBDlvMfxxK4VJx2PDw5dRNH4IcVn57WXHGQdkh Qnz7RYZvQQ7/QaBfyQE9fAAhD5BX "]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIZIGYC4g0PX07dlBLssEEvbzFjjJbD1aO5Jg39CH6P 1ysWk7kIfnOg59yGRcEO2x2aHh2XQPDNbPYGTUvUhPN7Irr9GQWk4Pw+MF/c YfEkK0bfBcEOM0Fgp5iDd3Wzvk9bsEPI28sfZywUczAxBoLkYIcY1QiZczUI vsKuBftS+UQh7lsfDBE3xuS/4d1nMPMQgr+1pebC5qu4+TY6V2Y9UwyBmw/j w+yfsOCH4bN/CPe92L6e+fkThPvB9j1C+A/Gh/kfxk+JvePGvEPboSJihenZ 28EO9b+tCs690HZ4sI9vjvGuYIcHEeLbLzZoO4SUqEz/Dwyf47t29LIFaDvA 4ic9DQjYEHxYfAAACHC6Og== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQnQYCWqEO0aoRMudkJB3e8O4zmKkW6qCwa8G+VD5R h47l4aeMIkIdTIxBAJN/5LJ2qmQSgm+jc2XWs1QEP6REZfr/ilAHsD1qog5N gZ5zG2YhzIfxY0D214g5nAGBmlCHVgV21TNTxCDyWaEOIW8vf5yxUMxh562u v6npoQ4Hu/c1mTCLw/kzQSBSEpXPqQjnG2itFL7QogLhu4c6zFmkvPPPcVWH CQt+GD57FwLng/1zDsH/tCEge9b6EKh+VUj4TApx2OHQ9Oj4DxWI+qwQB58T 7LazTRH8D4vWK5xdoeQQKb79IkNdiEP54W2uM2uVHJ6IyJ582h7iUHn/xy1j a2UIf3oI1P0qDleP5po0zA+Buxds3yEE36u6Wd+HC+EfmdePzKQ0Qh06bTx3 pS1SdoDFJ39swH2jckWI/+6FwMNDwiPgj0R5iMPKby8rzhQoQPznHeIgUjmp 5OwSOTh/vZAOX3qdFJwPNveYGMR9+SEODCCwQMQhJvfov02rEfzadduS6nci +BB9UPOPiDhURKwwPXs6xCEIFJ+Mog7o6Q8AitMSaw== "], {{84.6625, 6.778130000000001}, {84.31720000000001, 6.289059999999999}, { 83.56559999999999, 5.835939999999999}, {83.1, 5.835939999999999}, {82.6234, 5.835939999999999}, {82.2063, 6.27813}, {82.2063, 6.790629999999999}, {82.2063, 7.231249999999999}, {82.44529999999999, 7.64844}, { 82.80309999999999, 7.874999999999999}, {83.1, 8.053130000000001}, {83.75630000000001, 8.22031}, {84.6625, 8.35156}, {84.6625, 6.778130000000001}}}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4kjx7RcZ/oU6iFROKjm7RdkBxpfftWBf6jpJ OH9HsFXEf3UxBwmPgD8S4mEODCCwQMTBRufKrGeBCP7OW11/U5MR/K0tNRc2 l4Y5rBXS4Uu/J+LgVd2s71MV5mBiDAKiDhMW/DB8Ni/MYSYI7BR3CClRmf5/ SpiD+ieVl7M6JSDmN8L0izs0BXrObSgLcwh5e/njjIXiEHsyEHyw+V4IPtj9 dmEOX/Z93Jo+TQLOr7n/45bxayk4H+b/mNyj/zbNR/Df8O4zmLkszOHUYae1 mf9UEPo/bQjIvoXgm9nsDZp2UBXOl5h6hTPjkJrDoklWjL4OYQ4vsrS/TZ+r 7pAGAm5hDgZaK4UvqGg6/GCLn+FjG+YwZ5Hyzj/pmg5rum9nMGiHObwu3ir6 m1vTQeb1IzMpkTCHye2tUZf3aDgcqJW1SP8T6vAfBOo1HDh/LkjfDIyfut9W BedOqDtcPZpr0vA/1CEj/0PryRAEH2K/GpwfeEu6JvGTCiT8joQ6TAGZL4Pg nwGBOYj0AAsPAHxL7qs= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQAWIQ3bY8/JSRTbjDiV07etk2qDoIfXI8n2Ya7jBnkfLO P8dVHZoCPec28EH57qoOqk+a5519FuYQeEu6JvGTioNXdbO+z74whw1gCQT/ 59vXByyVVRze8O4zmHkLwS+IZz8n+RPBl3n9yEzqT5iDx5qjyxl+KMP5e/Nr 3s5MVYLzeyK6/RkFpOD8PjBf3MFG58qsZ0DzZoLATjGHJyKyJ5/eD3MIeXv5 44yFYg5nQGBPmEOMaoTMuRoEX2HXgn2pfKIQ93CGO5gYgwAmHxw+Mgh+gJxY lq8+bv61o7kmDdXhcPNhfJj9mlaTTtdHhMPdBw5fu3C4+2HxAfMfjA/zP3p8 AQBha7vM "], {{92.3922, 13.4891}, {92.0344, 13.4891}, {91.725, 13.179699999999997`}, {91.725, 12.821899999999998`}, {91.725, 12.4766}, {92.0344, 12.165599999999998`}, {92.38130000000001, 12.165599999999998`}, {92.72659999999999, 12.165599999999998`}, { 93.04840000000002, 12.4766}, {93.04840000000002, 12.821899999999998`}, {93.04840000000002, 13.1563}, { 92.72659999999999, 13.4891}, {92.3922, 13.4891}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKL21pebC5sQIhzmLlHf+Oa7q4FndrO/zKRzO7/F6 xWKyNNzBGASCleH8MyDQI48qf1nCoSCe/Zzky3CHtUI6fOl2Ig7XjuaaNHhH wPnBJSrT/x9A8DcUZUx8KxLpMBMEIiXh/P8gYK8A53usObqcoULZ4f4+vjnG pxDuRXf/YxHZk0+DIxxOHXZam/lPxeHwZe1UyVkIfqT49osM5yIclK89CmaY owTnx6hGyJzbIwfnM4CAg6SDuEfAH4nlEQ4PXOMdZ10UdfjGFj/DJxPBbwr0 nNsgh+C3LQ8/ZfQm3CE9DQSk4Py9+TVvZ05VgPPB6guVIeEogHAfuvsBX724 BA== "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIIaxWZDYzFDMAOUzoLFxqUEWJ8YcYswk1V5i9NLa jwDSKwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYCYoHmA6cWpkY5KOxasC+VT9QhY0/JZIkpUQ4m xiAg6rC+KGPiWyR+wA651tcLEXyRde4Pq9bg5r9ffszb/CHCfBg/RjVC5lyN GMS8g1EOIW8vf5yxUMzhPwgsj3KYCQI7xRxYwvh0Ny2NcjjYva/JhFkczu+J 6PZnFJCC8zttPHelLVKE818VbxX9na3isP/UQtdt1VEOcxYp7/xzXNWhBehd VzUE36U75/lvTjT+z0iHF1na36bPhfJfRjo8SVx4zURfFeK+9ZEOZ0BgjjKc f2LXjl62DaoQ/62MhJsnDnJQE5Tvruqw+UTZvvlRkQ6Bt6RrEj+pOKgZcqyR MYp02KD6pHneWQT/59vXByyVVRzSQMAPwQfHRw6CLxOVYn0/P9LBY83R5Qw/ lOH8vfk1b2emKsH5sPCC8fvAfHEHIVD850bCwxsUPNuCI+HxcURhQ1GGYSQ8 vmB8WHxGAo3zT42EuFNN1CEQFJ+VkfD4B4dPP4K/Hpg8RJYh+EtmA03chdBv c9+/d/o7hPkwPsx+/ySBCMszCPf9Wfnxku8mhPth8QHzH4wP8z+Mnw6yT0wJ zv+waL3CWQ1lB5B1eY8iHUR7vF6xhKg4mHc6JjwViILzy18CY8gFwYflH3D6 U1KG88Hpw0fRAT1/AQDyIYZH "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvWHu++XHPsc4qH9SeTmrU8IhYIdc6+uXMQ4Hu/c1 mTBLOsjo31Vh2xnjYGIMAuIOBRkT39Ysj3FIA4FjYg6yra8Dd7Qh+C1Arlwo gj/FuTvnuXaMw45gq4j/6hIOHjxM2u1iMQ7rhXT40uukHJ4snX1EgSPG4b5r vOMsQRkHEHcDU4xDKtgAWYe3y495mzPGOOzNr3k7U1TBoTZrT8nkAgS/dN98 Kf2lCD5QVoLlWIyD+5qjyxk0FByWgMz7FePgPKFZKC1LwYF9jUxUyu8Yh/8g sF/BwTdJIMLyT4wDf2zAfaPvCP7Kby8rzjgowvlrQe79p+yw/9RC122HYxzm LFLe+ee4qkPLAaBAHoKvasixRiYIwQe73xDof4emR8crVB1cgMHxWxAaPs9U IO65HO0gALL/uLKDOEsYn+6uaIczIOCjBOeLVE4qObtEHs4/AIqfxTIOIO6m o9EOPRHd/owCUg5/Vn685Hsr2oEBBBwkHFy2ff575Ue0w0wQ2CkKjw+wf+xE IPGViuADQ6sooxHBF2gGenBuDMS8BSIO64uACWBPjEOMaoTMuRpRh61A4ysu wtKLGIT/MMYh5O3ljzMWijmIrHN/WPUkxqHm/o9bxq/FHNDTGwB5mhLQ "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQvV2u9XXgjhgH/tiA+0bfFRxqs/aUTJ4Q41B9/8ct 49cKDi0HTi10rYtxEK6cVHL2iYJDh2PC0wtJCL77wyqRdfYI/hTn7pzn2gj9 S2cfUdjAFOMwEwQ4FeF89zVHlzNoKDk8/73y4yXWGIe1Qjp86euUIObxxziU H97mOtNXGcKXh+qPVHHomZ4n1OwQ43DqsNPazH8qDi1A18ulIvGh7oXxVQ05 1shMinF4krjwmsl6FQeZqBTr+/NjHLaY/ziUwqXikCAQYbllQ4zDym8vK844 KDsAfS/Bsi3G4T8I9Cs5oIcPAKBAjZQ= "]}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIIaxWZDYzFDMAOUzoLFxqUEWJ8YcYswk1V5i9NLa jwDSKwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYC4rv+vdPzguIcFHYt2JfKJ+pg2umY8LQhzsHE GAREHWrsTeN2NSL4sq2vA3f0IfgPqkTWuc/Ezd9TMlmC5RzCfBg/RjVC5lyN GMS8dXEOIW8vf5yxUMzhDAhMiXOYCQI7xRzOK93+WTcpzuFg974mE2ZxOL8n otufUUAKzu+08dyVtkgRzn9VvFX0d7aKQ8/0PKHmjDiHOYuUd/45ruoA8q6Q MILPH2G55cS3WFT+s1iHF1na36bPhfKvxTo8SVx4zURfFeK+ObFQWhnOP7Fr Ry/bBlWI/6YhzHtyAeigPCjfXdWhfqpzd457rEPgLemaxE8qDl/+Xql4KRfr sEH1SfO8swj+z7evD1gqq0DC0RrBB8dHJIL/Qs2QY01MrIPHmqPLGX4ow/l7 82vezkxVgvNh4QXj94H54g7g+I+KhYc3OLwcYuHxMeEt0Eage2DxBePD4lMV aJxMUKxDGgioQdNHWiw8/sHhU4Pg1wCTx8NJCH5BxsS3NcsR+tnXyESl3EaY D+PD7JfRv6vCthPhvuNl++ZLzUe4HxYfMP/B+DD/w/jpIPvElOD8D4vWK5zV UHYAWWd9PtZBtMfrFUuIigNLGJ/upr8Ivsu2z3+vGMTB+bD8A05/SspwPthc H0UH9PwFAHsffPI= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQbW8at8tTIMFB/ZPKy1mdEg79h75qxHAnOBzs3tdk wizp8Pz3yo+XnsY7mBiDgLiDLUj9lXiHNBA4JubwJnCHXOtmBD8AyH3diOAn CERYbomId9gRbBXxX13CQfTmue/BzvEO64V0+NLrpBzWF2VMfGsS73DfNd5x lqCMQwmQW6Mf75AKNkDWYU/JZAkWvXiHvfk1b2eKKjj4mHc6JsxF8F26c57/ vojgdzgmPL3wKd7Bfc3R5QwaCg4WW06U7RNOcHCe0CyUlqXgkA0yUCTB4T8I 7Fdw6J2eJ9QM5PPHBtw3+o7gr/z2suKMgyKcvxbk3n/KDj0g/od4hzmLlHf+ Oa7q4A9SMBvB//L3SsXLOgQf7P44oP8dmh4dr1B14AcGxwk7aPg8U3EAqlYz ZIh3EADZf1zZ4ckFpds/n8U5nAEBHyU4X6RyUsnZJfJw/gFQ/CyWcTgP5NZ9 inPoiej2ZxSQcjhetm++FHu8AwMIOEg4CDQfOLVQNd5hJgjsFIXHB9g/diKQ +JqI4E94W2Nvug7Bvwvy4CmoeQtEHGpACeZlvEOMaoTMuRpRhxag8a7/4qHp RcwBFPxK7AkOIW8vf5yxUMyhwJbr+mKOBIea+z9uGb8Wc0BPbwDZehPi "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQ3fI6cIfc03gH/tiA+0bfFRx8zDsdE/bGO1Tf/3HL +LWCg3/v9Dyh1fEOwpWTSs4+UXAI5dPdNLcfwRdZ5/6wKgfBTxCIsNwSgdBf kjHxbY1+vMNMEOBUhPPd1xxdzqCh5LDlRNm++UbxDmuFdPjS1ylBzLOJdyg/ vM11pq8yhO8D1R+p4hCRYn3fPzfe4dRhp7WZ/1QcAnbItb6eiODD3Avjf/l7 peLlvniHJ4kLr5msV3F4oWbIseZMvMMW8x+HUrhUHHTvqrA13o13WPntZcUZ B2WHDseEpxcexTv8B4F+JQf08AEAvCuPJQ== "]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYCYn7dTXPfayc4/Hz7+oClsoqDuiHHGhkrBP+y b5JAhCeCz6jdLnbTK8HBY83R5Qw/lOH8vfk1b2emKsH5PRHd/owCUnB+H5gv 7vBVI6b/ENC8mSCwU8zh9s+6rD02CQ4hby9/nLFQzMEYBIDuiVGNkDlXg+Ar 7FqwL5VP1GHp7CMKG9wSHNJAQE3U4Xvw46WzAxIcTMAKRR3mS+nfVYlC8MH2 JeLmJwtEWG6ZgDAfxofZvx9kYA3CfftPLXTdlg21/5iYw+e/VypeZiU41Nz/ ccv4NYIP8z+Mf9813nGWoiKc/x8E+pUg7q1KcHgAkj+oDLGvB8G3N43b5TkD jb8gwUHl2qNghhxlh3SQO5YlOHxYtF7h7Aolh3DLLSfK1iH48U8vKN3emOBg oLVS+EKLqkN3zvPfK9cmOJzYtaOXbYOqQ4djwtMLQP1zFinv/HNc1QGcHuYj +L3T84SapyD4YPs7oP5PU3U47m3e6diQ4LBB9UnzvLMqcP9VgsLDWhnOh9lX nDHxbU06wryPl4AJLATKd1d1AKpWM3RIcAi8JV2T+EnFAZY+Yeajp1cA+m03 eA== "]], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCwBmIQ/fdKxUu1ykSHMyAwR9lh6ewjChuaEh0aWY72G05X cXi//Ji3eWOiAwMIPFBxiN/lycPknegwZ5Hyzj/HVRzMOx0TntokOpw67LQ2 s07VAci7oKQPk1d16J2eJ9Qsg+DvP7XQdRs3gn/cG2jCjwSHwFvSNYlFqg7f gx8vnf0iAW6fClvjVOfLCQ5T2lujLsuoOICca3giweGBa7zjrI9KcH754W2u M2sV4XwDYyAolnf4qhHTf+hmgoNI5aSSsyyyDqeB1n/+muBwoHtfk8liGQft drGb564nOLxpy+022i3p8B8EgPYdBMkzSzqoG3KskbmU4CAM0p8iAecr7Fqw L3WdOJzvtubocoYIMQeQdV9vJDi0KrCrnpkiCnH/6wQHjU8qL2e9FIGoP5UA Ce81Qg63f9Zl7TmS4FB9/8ctY28hB/Y1MlEp+xMc0tOAoE0Azp8zEwgk+eD8 F7WPs8/nsDpc9k0SiHgI9F+TzBSDy//s84WaD5wSTITzweq9EXywvRWJDtu8 NljMqeRwgPHPgmgeITg/RjVC5lyNqMMFJaAL0xId1grp8KXfE4eElzeCD4re A3wI/mdQgvqVAOeDw/8jNL4KJeB8WHjD+NNB/ouUgtj/JQESD/elIOb/g4bX G2kHUPT9ZUh0UAeFp6aMA9i/jIkOIW8vf5zhKOMwF5RgmROh8S/jcKJs33wp 9kSHVFB4psk4AFN3UQZnItQ+GQdQci/iQfD3z5fSvyuD4HMzAX1sCDNf1iFZ IMJyi0MiJD0tkXO4cQ6YYgMTIfEnreDwe+XHS75RiQ7hnGLtxvyKcD7IOcbB SnA+2D9nlBzA+S8SypdRhqSPMER+RM+fABP/sCo= "], {{ 136.46099999999998`, 10.4859}, {137.27200000000002`, 10.4859}, { 137.82000000000002`, 9.817189999999998}, {137.82000000000002`, 8.804689999999999}, {137.82000000000002`, 8.02969}, { 137.31899999999996`, 7.493750000000002}, {136.59199999999998`, 7.493750000000002}, {135.79399999999998`, 7.493750000000002}, { 135.25599999999997`, 8.112499999999997}, {135.25599999999997`, 9.031249999999998}, {135.25599999999997`, 9.94844}, { 135.69799999999998`, 10.4859}, {136.46099999999998`, 10.4859}}, {{137.02200000000002`, 5.13281}, {138.369, 5.13281}, { 138.83299999999997`, 4.859380000000001}, {138.83299999999997`, 4.084379999999999}, {138.83299999999997`, 3.05938}, {137.891, 2.29531}, {136.63899999999998`, 2.29531}, {135.60299999999998`, 2.29531}, {134.888, 2.9046900000000004`}, {134.888, 3.7859399999999988`}, {134.888, 4.321879999999999}, { 135.19699999999997`, 4.8109399999999996`}, {135.67299999999997`, 5.014060000000001}, {135.86599999999996`, 5.10938}, { 136.19799999999998`, 5.13281}, {137.02200000000002`, 5.13281}}}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGJ5IIaxWaBsBigfRjMjqWHGooZa6kkVp5Z7aO0vXOoB MK4CWQ== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGIHIGYC4gOnFrpu+57ocAYEfCQd5r5ffsz7faJDjGqE zDkZaYcTZfvmS71OdGhVYFc9YyLjcNzbvNPxSaJDxf0ft4y75Ry028Vunjud 6CAQG3DfyF3ZAajbvPNkokMEp1i78Xplh/8gcDzRYYv5j0MpXCpwvsf+WlkL dwR/Sntr1OU5Kg5XKl6qGZ5JdNig+qR53lkVB6DrPv+9kugg2uP1iuWKisPP uqw9JY8TQc5nYHiA4M+YwF9l1q3qEG65BejkRIcdDk2Pjldg8lXYGqc6b0fw wfavx82P3+XJw9SNMB/Gh9kf//SC0u2JCPexr5GJSpmd6GBmszdo2kEVB37d TXPfz090OHXYaW1mnYoDcxif7qaliQ4fFq1XOLtCGeKe84kOJsZAcFnK4TTI wzeh4T1F3OGrRkz/obuJDn0R3f6MBWIO34MfL50NDH+FXQv2pfKJOCwusOW6 fjvRIT0NCNQEHc6DFADNU/+k8nKWJ5fDbVAAHYDG7xlWB+7rQB2bEPzo/kNf NdYg+JEp1vf9ge4rXF6y4V8/m0OHY8LTC/MSIeHynx3i35kIfrJAhOWWCYkO X/Z93Jp+jQHi3+mJDi3itayZx/7bm8QBAwyoX6RJZorB5X/2MPNhfEZQAtqH 4MPCY8ZMILjJBPf/ge59TSbK3A6gYDLWTnJ44BrvOOujIiR+rZIg6UcGGr6O SfDwB5vnnQSPnxvngAEUmgSPPxgfFr/g9GyeBI9/dH53zvPfKw0R/GSgd3q1 cfOBsbO4gBdhPowPsx8U/DHiCPeBw0spyWHOIuWdf45D5dWTHKTmxWmenoDg X7ga9kbfGk1eQMUBZP10tSSHmeDwU3bgZgL6QDUJEr9zlB3Q8zsATTPXLA== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxdk31IU1EYxmd+pAU2xKYbul1379TQUJtapuVLFmIlRoZaaB/nMNcnSkhU hGUGIsMsorLErCRUmCli/aExJdPKrERWWVqTCkzUdKWUWNg5984d8oX7x++e e9/3PM95ThDK22lwlclkLuQB8iyROWoXhkafcG9joQpcwkoU77di0LTethju KyG8uWqyNhZDA13/5AeJMXtbUwQMF7NMaS5yP4i3pZVdVzDu5JqOH3RfxBMI btDarQR7fyqSf0NgyKUVAKR797YRBPO0bIyl9UAn99IaD/z/+7NqeP0r/cs9 wuL+1BqofEIGkv5ldH6TBl7c2fLwpx3BBW6prteqkfbvhp18ZGSu3u7B2Hh5 4kyikrF70dUkUyTjSE9zwJ4EDCE/hNGbzzWSPxsxTN5t5F56ciD6uXnBLw7i Wp6dsIRgKE1Iac3t50BPi2eM5VlxLb6M2wqu+Lv5MKZy184imKL9Bzgg3apV Y4w7Z0Kzy78jGFwVaJ531UKeT3FHzwwCec4O25pkHqicGKLv3Nz6/FehArRX qyI+yjH0vckYj2gTpHU1hopLK07HLtcBpgcaxji7/PFM6DrGQ7OFhx8RfaLO YQH4QfJiO4Ym3dfiW6kCDNTkb1iWhmF2YqwjjhdA8CAGpmM4Zfv9Qd/Gw596 koAMx//7eagj8kpzMAhvP6fLjvIwRfUec+y3TgAriUvWAcd8kw7o+ALSv8it qzzKLxiiqZ/xjI00NlrGYu68MPR0bmo4VKgDGoe/0wjEeOUKQONTOYQkv7W8 xL0IMr0UJfp9QVK+nrJ89WmJ4G4E7SbL+egkNbhmeK9u7mJ5XeBkc1etrCLA yWJeSlUwR/X3IJi22B8Yr/mD9eRocJQVOe+LeD+GkeQPrATi5ruaaUf+zb7S +XliJ9PjydYwFv3QY+Do/fVWSOeRiR3zlLD4vv8DJG2umg== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ5IGYCYgOONTJRd5Id/oOAvLIDjL9WSIcvXQ/B91hz dDmDhbKDClvjVOfryQ4fFq1XONuh7LCnZLIEy6ZkB4mpVzgzHqk6zDmisKFo RbJD/W+rgnMZmnD+j7evD1g668D5pjZ7g6Y16jtYbDlRtm8z1P54Q4j8jWSH LeY/DqV0GcHtvy70yfH8MgTfvunR8RmrEfzDbcvDT21C8Bff38c357CRg2PC 0wtKt5Md1J80zzt7ysjhim+SQMRNBD89DQiuIfgp1vf9e3cnO/D6r5+SqmHk cHqh67bPK4Hyb3n3Gfw0cFg6G+jAWckOLSAFT/Uh5k9PdhDp8XrFckUXzof5 F8Zn4eySTz6nBbEPqP8MCPRoOHSAFKxKdvj7rfTBnEI1h2SBCMste5IdQMrS 1FTg7gOHz3sluPthfJj/YHyU+PuH4MPiFwB3VOwU "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYCYotOx4SnCikOM0HgpKHDBaXbP+v0UhwMtFYK Xzhi6HBEYUNRhmmKg/jUK5wZhwwdfgQ/XjrbIsXhPwisR/Drf1sVnOtA8GtB /ApDB0btdrGbZikOpw87rc38Z+Cwp2SyBAuQ38hytN/wuoHDh+XHvM0VUxxq Pm0IyL6l6QB2jwzUfHsNBwYQkIGar6HhMAfkIIEUh/NXw97oS2s4aBhyrJFh S3E4AwI8GhDzWFMc3hRvFf3dre4QYbnlRBkfgg/2pybUvzPVHZIEgCpcEPKn Frpu++yL4HcAnXPBD2G+DtA75+wR9juYxu3yBPrX7+LEmH/KGvDwAoefC4L/ KEJ8+8UFCP7k9taoy3s0HFjC+HQ3AfmPExdeM3mvAQ8fM5u9QdMYNR3OfQcG qH+Kw+L7+/jmBBtC1AemOICMY1hn6HCibN98qeAUB/W3vPsMdho6pIFAHCK+ eqbnCTVnIOL3ii/Qx5kpDtxuqqVMXEYOM4DSB9LQ+F4pDsYgwGzkAPS90m1X BL/Aluv6YgcEHxjanY4mKQ7eJ9htZ7MaOYC0n1JEmIeevgBTyQZ/ "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ5IGYC4h/Bj5fOPpPi8OPt6wOWzjoOMH4Dy9F+w+26 Dld8kwQiTqY4bHdoenT8h76DRadjwtMdKQ7cbqqlTFyGDjcWF9hyLU9x6A8u UZmub+RwCaS+N8VB/UnzvLOnjBzSQKALwQeb34Hgc6yRiUppT3Ho9nrFYnIQ wT/ctjz81CYE3x5o/YzVCP51oU+O55cZOUyRYAnjA9q3US9vMWONkcOflR8v +a6Cuqff0GHu++XHvHenOOyvlbVIFzGA82H+hfEDbknXJAppOhzzNu903JDi sMX8x6GUU6oQ+e4Uhweu8Y6zCpXh9nusObqcwQLBXyukw5euh+D/BwF5BN8Y BJiV4f4Hy79XgocPjA8LPxj/SsVLNcMVKQ6Z+R9aT5qoOOQJNR84tTPFwQhk 3mQ1iP9PQtXP14DH359vpQ/mbNRyQI9fAMMv6bc= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYCYh4m7Xaxm8kOxiCwWcLhwKmFrtvuI/h7SiZL sDxKdqi4/+OWMbe0w8dLvkkCT5IdQt5e/jgjUcZBZ9Pc98ufJTs8cI13nBUo C9cfoRohc+6OrMNMELia7CC/a8G+VD05h5znv1d+PIXgnwYq/7wXwf8R/Hjp 7BXJDge69zWZPJZxmHNEYUPRDIT9YPmOZIedwVYR/90lIebXJjusFdLhS68T hfPbFdhVz2wRhPNjQO6p4XH4qhHTf6gz2aFwecmGf+c5HM6AwAIEX/n2z7qs DQg+9/XFBbb7kh3+g4A9l4OGIccamXNQfj2vA3vjVOfuO8kOs0H2WApA1N+C ht9nAYcb574HPwb6/8u+j1vTpwk4/L1S8VLtYLLDdd7bYqnbeB0WSOnfVdmG cB84fNcg+EDTc57PRvBTrO/7905OdpDZKDafKYEfzlf/pPJyVqcQnK8ACs88 MYceUIDPhYWvlAMots+tTob4u0faIeHpBaXbG5MdAkDxqSjjcAfo/T07kh1q QOGdLePAEsanu+kggr90NjBCziH4sPTzpi2322i3NJy/BhQf96Qc0NMXAHHd IVA= "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYC4lA+3U1zz6c6pIHAM3aHmP5DXzW2pDrcd413 nGUo4MB1fXGB7apUhzdtud1G1UIODqZxuzwXQNUfE4PwZ6Q6tCuwq54xkXLo nZ4n1Dwl1aEFxL8iC+ev/Pay4swHBThf+dqjYIY3SnD9U9pboy7PUXFIsb7v 3zs/1SEhJEh9gaaagy3IAStTHfwuToz5p6zhYLHlRNm+zakOv96+PmDprOkA cz9Yvae2gwHHGpmoE6kO9b+tCs690HZIEoiw3AJ0r8y8OM3TGzQdpkiwhPFN THUws9kbNC1RwwHo25j+plSHGRP4q8y41RwKQBZWpDoE3pKuSSxScThwaqHr tmKo+w8oofKB/oHxdwRbRfw/LuPwYfkxb/PaVIcv+z5uTf8mDvFPf6rDGRBY I+xg0emY8HQOLDwFHHiYtNvFgP6LUY2QOWfDC3c/JD5YHdDjBwASBLx0 "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQrXT7Z11WRJpDtGqEzDkZSYcLIIGwNAeFXQv2pfKJ Osx9v/yYd36ag4kxCGDyj3mbdzqWIPgLpPTvqpQh+AdOLXTdVp/mkAYCaqIO c44obCiagDAfxo8B2V8j5jATBBrTHFoV2FXPTBGDyFekOYS8vfxxxkIxhy9/ r1S8BJp/sHtfkwmzOJwP1hcpicrnVITzDbRWCl9oUYHw09Ic5ixS3vnnuKqD ziagj6wQfK7riwtstRD8uF2ePEzSMP2qDr3T84SaedIcdjg0PTr+QwXi/x+p Dj4n2G1nmyL4HxatVzi7Qslhwtsae1OmNIfyw9tcZ9YqOTgmPL2gxJ7mUHn/ xy1ja2UInx/mfhWHnOe/V34UQrgXbJ8Kgm/AsUYmygPBV2FrnOocnubQaeO5 K22RsgMsPvljA+4blStC/GeECI8ZQOMO/Et1WPntZcWZAgUHYOx8/vsi1UGk clLJ2SVycP56IR2+9DopOB8cf8fEIO77lerAAAILRBymSLCE8Ummwfl8ukAL 5RF8SLynQcw/IuLAw6TdLqaZ5hAEik9GUQf09AcAJhwXOA== "], {{ 178.76299999999998`, 6.778130000000001}, {178.41699999999997`, 6.289059999999999}, {177.66599999999997`, 5.835939999999999}, { 177.2, 5.835939999999999}, {176.72299999999998`, 5.835939999999999}, {176.30599999999998`, 6.27813}, { 176.30599999999998`, 6.790629999999999}, {176.30599999999998`, 7.231249999999999}, {176.545, 7.64844}, {176.90300000000002`, 7.874999999999999}, {177.2, 8.053130000000001}, {177.856, 8.22031}, {178.76299999999998`, 8.35156}, {178.76299999999998`, 6.778130000000001}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 182.378, 6.623440000000001}, {182.01999999999998`, 6.623440000000001}, {181.69799999999998`, 6.289059999999999}, { 181.69799999999998`, 5.9312499999999995`}, {181.69799999999998`, 5.57344}, {182.01999999999998`, 5.2406299999999995`}, { 182.36599999999999`, 5.2406299999999995`}, {182.748, 5.2406299999999995`}, {183.08100000000002`, 5.5625}, { 183.08100000000002`, 5.9312499999999995`}, {183.08100000000002`, 6.289059999999999}, {182.748, 6.623440000000001}, {182.378, 6.623440000000001}}}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4gJbruuL96Q7nNi1o5dtg6pDxsS3NfY70x3m LFLe+ee4qkOeUPOBU0uhfHdVh1MLXbd9npjuEHhLuibxk4rDV42Y/kO16Q4b VJ80zzuL4P98+/qApbKKwxKQBd0I/omyffOlZiP4YPvnpDt4rDm6nOGHMpy/ N7/m7cxUJThfpHJSyVkWWTjfHaxe2mHu++XHvKenOxzo3tdksljK4YLS7Z91 fekO6p9UXs7qlITY35zu0KrArnrGRMLh3Pfgx0vL0x00wPLiDnd+1mXtyUDw OdbIRKVEI/hJAhGWWwLSHfoiuv0ZBSQcbO779073gtkv4RCZYn3f3zXd4U1b brfRbkmIvFO6QzvYPmk4X37Xgn2pfrJwPiy8HROeXlCyR4T3AVAAayPCe6pz d85zcUR4g93PjAhvGB8WnuD4EkTwp0iwhPEpIviHQBGkhAhvGB8W3jD+jmCr iP/HZeD8B67xjrMKJR2Asad/VyXd4cu+j1vTv4nD3ZsGAsfEHLL2lEyWMEl3 cAOZHyEK9y8DCCwQcTAABXAEEv+uCltjJoIPjo+KdIeq+z9uGXuLOtxYDIxA YPzFqEbInKsRg8c/zD0wPix+jnmbdzoC+WdAwEccnt4UQOHPJwpRvyXdwcQY BEQh4bMVwZ8BCsBdCD7YPwdw84Gp40TZLYT5MD7MvR2gCD6V7hDy9vLHGQvF IPGzN91hJgjshPoHmP8OgtIvszic3wP2j5QDev4EACT/mEU= "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 192.57799999999997`, 6.623440000000001}, {192.22, 6.623440000000001}, {191.89800000000002`, 6.289059999999999}, { 191.89800000000002`, 5.9312499999999995`}, {191.89800000000002`, 5.57344}, {192.22, 5.2406299999999995`}, {192.56599999999997`, 5.2406299999999995`}, {192.94799999999998`, 5.2406299999999995`}, {193.28099999999998`, 5.5625}, { 193.28099999999998`, 5.9312499999999995`}, {193.28099999999998`, 6.289059999999999}, {192.94799999999998`, 6.623440000000001}, { 192.57799999999997`, 6.623440000000001}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYCYp1Nc98vD8twSAOBZ6wOGjH9h74WZDjMmQkE kjwOHy/5JgnUZDjEqEbInLPhd1hcYMt1vT3DoVWBXfXMF0EHx4SnF5TmQ/lT xByAujViVkPVy8jA+dX3f9wyfq0A56/89rLizAEliL3LMhwCb0nXJBapOMw+ orChaE6Gw4wJ/FVm3GoOpxa6bvvcm+Fw/mrYG/1oDYeSyRIsYXUZDtNB8qs1 HWDur/9tVXDuhbYD+xqZqBT/DIeEkCD1BZ7aDipsjVOdszMcJre3Rl220XRY fszbvLM0w+HUYae1mXIaDifK9s2Xqoeq11RzWApyQFuGwxSQ+jkqDiDn9ndl OChfexTM8EYJzge7/4MCnN8C8v8VWbj+dhDfRArCr4OG7zExhzMgUJLh8KYt t9uoWsiBUbtd7GZWhsN913jHWYYCcPdD4oPdAT1+AIksvW8= "]]}, Thickness[0.0050238633509168545`], StripOnInput -> False]}, { ImageSize -> {398.0929912826899, 39.52181320049813}, ImageSize -> {199.04649564134496`, 19.760906600249065`}, BaselinePosition -> Scaled[0.26821463664500295`], ImageSize -> {200., 20.}, PlotRange -> {{0., 199.05}, {0., 19.759999999999998`}}, AspectRatio -> Automatic}], TraditionalForm], None}, { FormBox[ GraphicsBox[{ Thickness[0.006683151774376796], StyleBox[{ FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld AKjmAn0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJfIGYC4hkzQYDHYc4i5Z1/nms6fN33cWv6NX6H7Q5N j45LaDmApSMFHWTmxWmeNoDyfwrB+Qq7FuxLfScO5z9wjXectVHK4XXxVtHf 3Jpwfguv//oprOpwvmiP1yuWKyoOHmuOLmewEIeIFyo79Ed0+zNuEITzYfbD +NX3f9wyfi0A558BAR8BiDkVyg7ClZNKzrIIOKwV0uFL11N2UP+k8nJWp4BD OKdYu/F9JQd5kHvXCTjwxwbcNzqu5BD89vLHGY6CDu5g/UoQ894IOqSnAYGY EsQeQSGH8sPbXGf+VYSYWyfkcEdTds3/zYoOIiD7XKQdQkDmLBSHmN8n7cAA Ag7iEHNvSEP03RNz+A8C8jIOGmB3iTl8AYV3mYzDm7bcbiNpMYc1IHX7ZCDu WCPqAI4fS1lIOPOJQtXLO5gYg4Cow32Q+z4i+MrXHgUz2CjA+d02nrvSinDz wdRnRbj5MH6MaoTMuRoxiD8MFKH+E4P445yCQw04HqD8OgVIPO0Ud6gCiWuL QdzxRgni3msSDiu/vaw446AMsVdYChJ+zcoOKaBwXibtIAVKPwIqDgEgexTl HAJvSdckflKB+/fn29cHLJXV4HxwempVh/OfJC68ZnJeEx6+kPSrDZE3E4Pz wfYXi8L5YP818EHimw2Tv/zW8seGztxwvl2JY+1pGQ6cfK+t/seT277aw8yH 8c1t9gZNS9RyuPL72PV5kX/tj+/a0csWoOVQuLxkwz9+ZofnWdrfpttqQdMF M9Q8BH+z+Y9DKVoacD4k/KXg/B3BVhH/1cXh5oG0px0Tg9sHiz9IvH+xh8Uv jA+L/5ypCYUWxf/twfrVROHmwdJLs3gtayYbB5y/1WuDxZyfPHB+qwK76hkT AQeYfkh+FIanLxgfZj843e8WgKcv3yeel0yFeeHuh5VPMP/B+DD/o5dfANnI +aI= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQPWMmEOzUdIhWjZA5JyPpcP5q2Bv92ZoOCrsW7Evl E3WYs0h55x91bQcTYxDA5LewHO03LEfwfU6w286eiuCzcHbJJ+vpOKSBgJqo Q82nDQHZVrpw82H8GJD9NWIOZ0DAR8ehVYFd9cwUMYj8Lm2HkLeXP85YKOZg brM3aNpCbYeD3fuaTJjF4XyQN2ZGSqLyORXhfAOtlcIXWlSgfC2IP46rOrzI 0v42/a46nN8I8s91NTj/19vXBywfq0L1qzpcAIXPbxWHHQ5Nj47/UHEQiA24 b7RdGeJvUwT/w6L1CmdXKDnoKMp/yQlTcSg/vM11Zq2SQwuv//opS1UcKu// uGVsrQzhq6pC3a/iIDH1CmdGkircvWD7qtXg/O0ge3dowPnu+2tlLZZrOnTa eO5KW6TsAItPfpA7yhUh/otVh4eH7PIXHnryKg4rv72sOFOg4ACOpsNKDiKV k0rOLpGD89cL6fCl10nB+eD4Oybm0A2y55GyAwMILBBx8L04MebfYVU4P/CW dE2ikRqcD7Z3phrE/CMiEHcfUXMIAsUno6gDevoDAAZuBUQ= "], {{ 12.862499999999997`, 6.778130000000001}, {12.517199999999997`, 6.289059999999999}, {11.7656, 5.835939999999999}, { 11.299999999999999`, 5.835939999999999}, {10.8234, 5.835939999999999}, {10.406300000000002`, 6.27813}, { 10.406300000000002`, 6.790629999999999}, {10.406300000000002`, 7.231249999999999}, {10.645299999999999`, 7.64844}, {11.0031, 7.874999999999999}, {11.299999999999999`, 8.053130000000001}, { 11.956299999999999`, 8.22031}, {12.862499999999997`, 8.35156}, { 12.862499999999997`, 6.778130000000001}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQrfGWd5/BS2MHA62VwhdYVB1OH3Zam2ln7NDIcrTf cLqqQ/1vq4JzL4wc5ixS3vnnuKpDpPj2iwx1CL5906PjM7QRfPGpVzgzHhk6 /Hz7+oDlYlWH9DQgmGboINrj9YolRNVhJgh0GjhcuBr2Rt9axaEBZM92fYc7 mrJr/jcrO/icYLedfVXPIRWk75ginP8fBOrl4fz+iG5/xg3SDjWfNgRkV+k7 qH9SeTmrU8LhYNvy8FNBBg4hby9/nLFQzGGL+Y9DKbsMHBhAwEHUgdtNtZTJ yxDCXyDiULCm+3aGgBGcb1sZscLUF8FffH8f35zJRg4PXOMdZ10UcTgMMn+R kUMQyHxGUYh7vhpD5AslIf59ZuygsGvBvlQ+UQdHUPhUmziAhNPURB1iFBw/ Jq8xcTAxBgFRB1CwmFxE8MHh8xLBP1Ara5EuYorKDzGFmwdWn2nq8KYtt9tI WtThhtAnx/PL0PjPTOHugfFjVCNkztVAwyfKFB5eh0D++2QCMXenGNw9faDw FhCH83vAfCk4PyX2jhvzDm2HCFD6OGcCTTfaEHEPE4cHIIkGbYg/Hhs7HN+1 o5ctQNth+QsPvf8fjSDhxobgb9DLW8wYo+VwBgTmGMP5/hcnxvy7jODD0u92 B2BASyD4ZjZ7g6Ylajqgp28AjAE3Kg== "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrfGWd5/BS2OHGNUImXN75B1g/APd+5pMFss4mBgD wWNjB/VPKi9naco4ODY9Oj5jt7FDT0S3P6OAtMPXnbe6/qYaO4CUGV+WcChY 030744KRg9uao8sZIsQdur1esZg4Ivj7a2Ut0k0MUfklBg7paSAgDefPBIFO BTi/08ZzV5qSMsR9koYODb+tCs6tUHGwB7lH2wjO7w8uUZk+H8EHmyNpDKEj VRwOgMxrMXYQiA24b3Rc2cFAa6XwhSPGDg9c4x1nFSrD/Y9i30uo/EclB/Tw AgAyuIMf "]}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQAWIQvcX8x6GULguHE7t29LJtUHV4krjwmkm+hcOcRco7 /xxXdVhyfx/fnMvmEL67qoOB1krhCybmDoG3pGsSP6k4HGxbHn5qkpnDBtUn zfPOIvg/374+YKms4uB3cWLMP2ZzOD9SfPtFhjoEn8dNtZSpy9zBY83R5Qw/ lOH8vfk1b2emKsH5PRHd/owCUnB+H5gv7tDj9YrFpNHcYSYI7BRz0HjLu89A 0twh5O3ljzMWijmcAYEeM4cY1QiZczUIvsKuBftS+UQh7tln7mBiDAKYfHD4 cFnA+deFPjmeD8PN/7QhIHtWuyXcfBgfZr9j06PjM35bwN23GBS+ky3g7ofF B8x/MD7M/+jxBQACjLzO "], {{23.9922, 13.4891}, {23.6344, 13.4891}, {23.325000000000003`, 13.179699999999997`}, { 23.325000000000003`, 12.821899999999998`}, {23.325000000000003`, 12.4766}, {23.6344, 12.165599999999998`}, {23.981299999999997`, 12.165599999999998`}, {24.326599999999996`, 12.165599999999998`}, {24.6484, 12.4766}, {24.6484, 12.821899999999998`}, {24.6484, 13.1563}, {24.326599999999996`, 13.4891}, {23.9922, 13.4891}}}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4qUvPPT+b7R3OLFrRy/bBlWHq0KfHM9Ps3eY s0h555/jqg5TJ/BXmf22g/DdVR1iFBw/JsfYOQTekq5J/KTioPKked7ZXbYO G1RBDAT/59vXByyVVRzsmx4dn6FtB+f7nGC3nb0UwYfYb+fgsebocoYfynD+ 3vyatzNTleB8kcpJJWdZZOF8d7B6aYd6lqP9hu12Dge69zWZLJZykJgXp3na wc5B/ZPKy1mdkhD7X9s6tCqwq54xkXDgcFMtZeqyddAAy4s7HGhbHn5KCMFP ib3jxrzCBs4Xn3qFMyPIxqEvotufUUDC4c+30gdzFG2g9ks4NIDs/27t8KYt t9totyRE/qG1QzvYPmk4X37Xgn2pfrJwPiy8v+y81fX3qDU8vLeY/ziUomUN D+8NenmLGXus4OHNA3L/K0t4eMP4sPCcDoqvaCs4/wZQm9FVBL/H6xWLyUMr eHjD+LDwhvF3BFtF/D8uA+c/cI13nFUo6bDk/j6+OZ+tHL7s+7g1/Zs43L1p IHBMzOF5lva36bnWDm4g8yNE4f5lAIEFIg79wSUq0/tt4Pza31YF5yRs4Xxw fEyydai6/+OWsbcoxP1PbR1iVCNkztWIweMf5h4YHxY/JVtFf59eZ+dwBgR8 xOHpTQEU/nyiEPWF9g4mxiAANb8UwT8Csn8Rgv8U5J+zuPnm147mmgQ4wM2H 8WHunQkCgg4OIW8vf5yxUAySn3bbQ8R3wvxj73AQlH6ZxeH8HrB/pBzQ8ycA wBWfgQ== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJTIGYC4vk2Oldm7XNwEKmcVHKWRcYBxn/TlttttFvC YfkLD73/Ox0czoCAj7iDvOPH5DNroepTRB1uStckGv11cGhVYFc9M0XEwVW1 lGmWhaPDWiEdvnQ7EYfiraK/T9ch+GDz3Zzg/Cnf2OJnXHGC6heH80PeXv44 w1EGzo9RjZA5t0cWYt4xJ4cWkPorcg4X8+PZz610clD/pPJy1kl5h/v7+OYY Nzk5nAW5t0bB4bim1aTT/k4OqWlAcEzBYSYInIS6R0/RYX+trEW6j6PDfxDo V3QwBgFlR4g6TiU4v9PGc1eakjKcL9rj9YolRAXi3whHh1OHndZm/lOBhM9W BH+jXt5iRhknOB/s3kwnh4bfVgXnNBB85wnNQmlcynB++eFtrjNrlSD+n4Lg R4hvv8gwzcmBAQQeKDt83hCQPWu6k0PgLWBEFKk4tC8PP2U0x8nhSeLCayb6 qhD3ejs5vMjS/jZ9rirEvyJODnMWKe/8c1wV4t6rjnA+OJ5VEHwe//VTUnc4 OKTE3nFjrlCB88HmBivB+bDwBKeXm1B+nIKD+bWjuSYKjtD4k3dIOHxZO9XT ERJfmtD4muUIiZ80OYh+RieH3ohuf8YNsvD08mXfx63pZrIO9k2Pjs9IhqYX Exk4Px2sXwrONwG577K4w85bXX9TxZ0cDnbvazJhFnP4HZN79N8qRzjfAaTe GsEHh88bBweFXQv2pa4Th/N7QO4RkILz0fMLjA8ARH1dVg== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKH0xP579nKabw5xFyjv/HFd1+BOTe/SflyucX/fb quDcBhcHYxAIVobzz4BAjzyq/GUJB1fVUqZZFq4Oa4V0+NLtRByEPjmeT/uL 4PP6r5+S+sINzre4djTXZIK7w0wQiJSE8/+DgL0CnO+x5uhyhgplB9UnzfPO /kK4F939ehMW/DDkc3M4ddhpbeY/FYc3vPsMZs5C8CWmXuHMYHJ3UL72KJhh jhKcH6MaIXNujxyczwACDpIOU76xxc/Y4ubwwDXecdZFUYeQEpXp/y0Q/BzO nwvSF7vC+SVbRX+ftnN1SE8DASk4f29+zduZUxXgfLD6QmWIPR2ucPehux8A KqeyWQ== "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzFDMAOUz4BEnlU2MOchqSFVPLbcRYyYA kW8CJQ== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJdIGYCYh7/9VNST3g6/PlW+mDORm0H82tHc01WeDpI TL3CmfFI2yFCfPtFhmmeDhn5H1pPftF2uL+Pb45xE4Lf4/WKxSQQwa+MWGF6 VtrT4QwI9Gg7iIPM+eUBlddyuJQfz35uoYeDmc3eoGmJmg7eJ9htZ5d6OCTH 3nFjnqEBkU/0cGjhBTqsVR3OD7wlXZP4SRWNr+IAdv8PdwcfkDmmCH4Ep1i7 8XpluHqB2ID7RscR/J6Ibn9GASk4vw/MF3e4CTTWKNbDYSYI7BRz6Ab5T9PD IeTt5Y8zFoo5/IrJPfrvkbtDjGqEzLkaBF9h14J9qXyiDg5Nj47PqPZwMDEG AUw+zP8w/n8QOI6b76ZayjQrwRNuPowPsx8cvlKecPelgcAzhPuXv/DQ+/8Q 4T8YH+Z/GB8WPk8SF14zme8J518AuXelp8OMCfxVZtyqcPWw8Ifxd4A8+kMN zm9gOdpvuF3TQd7xY/KZrx4O5uD41oKkCx9POB+cvsoQ/MTDl7VTJ3pC9JtD 5bd5ws2DpdcNenmLGe8g+LD0CwDgWzYJ "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYp8T7Lazr3o7iFROKjm7RdkBxpfftWBf6jpJ OH9HsFXEf3Uxh+OaVpNOs/s4MIDAAhEHkU+O59NqEXwe//VTUhcg+CyLJ1kx HvVxWCukw5d+T8RBd8KCH4bnfBxMjEFA1GHHra6/qeK+DjNBYKe4g0PTo+Mz mH0d1D+pvJzVKQEx/y5Mv7jDXBudK7OO+TiEvL38ccZCcYcZIH0rEXyw+XkI Ptj9oT4OX/Z93Jo+TQLOr7n/45bxayk4H+b/kBKV6f8lfOH8kq2iv0+r+Tqc Ouy0NvOfCkL/pw0B2bcQfDObvUHTDqrC+RJTr3BmHFJzuLuPb45xlI/Diyzt b9PnqjukpoGAj4OB1krhCyqaDu3Lw08Zhfg4zFmkvPNPuqbDF6Cxs/R9HF4X Ay3m1nS4kB/Pfo7Rx2Fye2vU5T0aDuIgcy95O/wHgXoNhzXdtzMYrns71P22 Kjh3Qt3BRbWUadYNb4eM/A+tJ0MQfIj9anB+4C3pmsRPKpDwS/R2mAIyXwbB PwMCcxDpARYeAPk58ZA= "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjEcakhVT2p5tDTLlLNBADS cwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYCYnnHj8lnbH0dNujlLWaM0XLI4fy5IH0ygl+y VfT36XUIfsLhy9qpO30dtjs0PTougeCb2ewNmpaoCef3RHT7MwpIwfl9YL64 wxkQ2OLrMBMEdoo5hJSoTP/f4OsQ8vbyxxkLxRz218papNv4OsSoRsicq0Hw FXYt2JfKJ+rQujz8lNESX4c0EFATdRD45Hg+7ayvg4kxCIg6zACZ+xPBB/tP 1Q/OX9N9O4PB3w+uH+y/bX5w82F8mP1LX3jo/S/0g7tPZ8KCH4Z2fnD3g+2z 9IP7D8aH+R/GTwfZJ6YE539YtF7hrIayQypIfJ6fg2iP1yuWEBVI+P9G8MHq E/3hfHD4LfF36LTx3JWmpAzng2kfRTgf5p8X29czP2cIgPt/a0vNhc2MCD7I us18CP53tvgZPpK4+ZHi2y8y+AXAzYfxYeEFNk8vAB5eYPeIBMDDqznQc26D UIDDwe59TSbM4nA+LLxgfLD/FinC+a+KgRGTrQJJLxf8HeYsUt7557iqgy4o PtQQfJ8T7Laz3/qh8s/6ObzI0v42fS6Uv9bP4Uniwmsm+qrw+AC7c44ynJ8S e8eNeYc2JN3r+DnU/7YqOPdCG0r7OjyIAHq8QRsSf9t8HY7v2tHLFqDtAMtP 4PhmQ/Bh+QcAk4tu3g== "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvab7dgbD8kAH9U8qL2d1Sjjkx7Ofk5wb6HCwe1+T CbOkQ/vy8FNGOYEOJsYgIO7A+XNB+uaoQIc0EDgm5mCtc2XWM0sEf/EkK0Zf DgRf3CPgj8T9AIcdwVYR/9UlHLa21FzYfDLAYb2QDl96nZSDv5xYlu/uAIf7 rvGOswRlIOZtDXBIBRsg67C/VtYifUuAw978mrczRRUcKiNWmJ5VDoTzwfIR CH631ysWk8pAB/c1R5czaCg42IDMWxvo4DyhWSgtS8HhLe8+g5nrAh3+g8B+ BYedt7r+pq4PdOCPDbhv9B3BX/ntZcUZB0U4fy3Ivf+UHSYs+GH4rCzQYc4i 5Z1/jqs61K7bllSviOB/Z4uf4cOK4IPd9wTof4emR8crVCHuOxoACZ9nKg5v QO5pC3AQANl/XNlB+JPj+bTcAIczIOCjBOeLVE4qObtEHs4/AIqfxTIOL7av Z35eEeDQE9HtzyggBXFPb4ADAwg4SED8uTrAYSYI7BSFxwfYP3YikPiSCITz 3VVLmWaZIPhgdwQEQsxbIOIg/fqRmVRBoEOMaoTMuRpRhw0PX07d1AJLL2IQ /pRAh5C3lz/OWCjmEJt79N+m6YEONfd/3DJ+LeaAnt4AIzMVoA== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQff1orklDdqADf2zAfaPvCg6VEStMzzoHOlTf/3HL +LWCQ+26bUn1hoEOwpWTSs4+UXCIEN9+kUEMwe9f8MPw2acAOF/cI+CPxP0A uH5rnSuznm0NcJgJApyKcL77mqPLGTSUHIJLVKb/3xHgsFZIhy99nRLEvEMB DuWHt7nO9FWG8C9B9UeqOMTmHv236XOAw6nDTmsz/6k4LJ5kxegrEQjnw9wL 439ni5/h4xro8CRx4TWT9SoQ9wUHOmwx/3EohUvF4bGI7MmnyYEOK7+9rDjj oOzQ7fWKxSQz0OE/CPQrOaCHDwBOxI/G "]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCwBmIQ7VndrO8jFOJwBgTmKDsIfXI8n6Ya4tDIcrTfcLqK QxoIKIU4MIDAAxWHCPHtFxm2BTvMWaS8889xFQcFx4/JZ2YGO5w67LQ2s07V wRtkXh1MXtUhpERl+v8IBH/nra6/qeYIvrbVpNP1AsEOgbekaxKLVB16vF6x mHwMgtvXHOg5t+FYkMOU9taoyzIqDvtrZS3SNwQ5PHCNd5z1UQnOLz+8zXVm rSKcb2AMBMXyDleP5po0XA5yEKmcVHKWRdbhsYjsyafcwQ4Huvc1mSyWcfi8 ISB71vkghzdtud1GuyUd/oPA8SCHgyB5ZkmH9uXhp4yOBDkIg/SnSMD5CrsW 7EtdJw7nu605upwhQszBRufKrGcXgxxaFdhVz0wRhbj/W5CDxieVl7NeikDU bwmChPcaIYfadduS6lcGOVTf/3HL2FvIQfVJ87yz84Ic0kHh3iYA58+ZCQSS fHD+i9rH2edzWB04fi5I3/wI6L8mmSkGl//Zg/3jHAzng9VvQ/BBxswUDHHY 5rXBYk4lhwOMfxbkHh4hOD9GNULmXI0oJP7eBDusFdLhS78n7vAFZP52BB/s flsEXx6UHkQRfHD4MwdD4qtQAs6HhTeMPx1kb6QUxH7OYEg83JeCmC8bDAmv N9KQ9KcU7KAOCk9NaPwpBzuEvL38cYajjMMb3n0GM9WCofEv43B/H98cY71g h1RwQpaBhJ8RzD4Zhxfb1zM/t0Dwt7bUXNgcieA/AOlvgpkv6yACyh8LgyHp aYmcQ2XECtOzh4Mh8Set4OCuWso060qwQzinWLsxvyKcD3KOcbASnA/2zxkl B3D+uwTlyyhD0seZYHh+RM+fAME7pIM= "], {{76.9609, 10.4859}, { 77.77190000000002, 10.4859}, {78.32030000000002, 9.817189999999998}, {78.32030000000002, 8.804689999999999}, { 78.32030000000002, 8.02969}, {77.81880000000001, 7.493750000000002}, {77.09219999999999, 7.493750000000002}, { 76.29379999999999, 7.493750000000002}, {75.7563, 8.112499999999997}, {75.7563, 9.031249999999998}, {75.7563, 9.94844}, {76.19839999999999, 10.4859}, {76.9609, 10.4859}}, {{ 77.52190000000002, 5.13281}, {78.86880000000002, 5.13281}, { 79.3328, 4.859380000000001}, {79.3328, 4.084379999999999}, { 79.3328, 3.05938}, {78.3906, 2.29531}, {77.13909999999998, 2.29531}, {76.10309999999998, 2.29531}, {75.38749999999999, 2.9046900000000004`}, {75.38749999999999, 3.7859399999999988`}, { 75.38749999999999, 4.321879999999999}, {75.69689999999999, 4.8109399999999996`}, {76.1734, 5.014060000000001}, { 76.36559999999999, 5.10938}, {76.69839999999999, 5.13281}, { 77.52190000000002, 5.13281}}}], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIZIGYCYq/qZn0fuxCHDXp5ixljtBwK4tnPSWYi+KpP muedLUPwZV4/MpOqCXHY7tD06LgEgm9mszdoWqImnN8T0e3PKCAF5/eB+eIO NjpXZj2rDHGYCQI7xRyeiMiefBof4hDy9vLHGQvFHM6AgE2IQ4xqhMy5GgRf YdeCfal8ohD3dYY4mBiDACa/bXn4KaM5CH6AnFiW73rc/GtHc00afiPMh/Fh 9mtaTTpdfwPhvqZAz7kN+xDuB9u3B+E/GB/mfxg/JfaOG/MObQehT47n07aG ONT/tio490LboTJihenZySEODyLEt19s0HZ4w7vPYGZViMPxXTt62QK0HWDx k54GBGwIPiw+AMfHsig= "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKL21pebC5oehDnMWKe/8c1zVwbO6Wd+nCMHv8XrF YqIa6mAMAsHKcP4ZEOiRR5W/LOFQEM9+TjIz1GGtkA5fup2Iw7WjuSYNpxH8 kBKV6f8dwuD8F9vXMz+fEuYwEwQiJeH8/yBgrwDne6w5upyhQtnhwT6+OcZe YXD3obv/iYjsyaeXQx1OHXZam/lPxeHIZe1USakwOD9SfPtFBr8wB+Vrj4IZ 5ijB+TGqETLn9sjB+Qwg4CDpIOER8EdCPczhgWu846yLog7f2OJn+LwMhfOb Aj3nNsxD8NuWh58yygl1SE8DASk4f29+zduZUxXgfLD6QmVIOE5AuBfd/QCe hrZb "]], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGJtIAaxQYAJSjNCxZiR+PjEcakhVT2p5gxm9ww2u4ix FwCf5QKP "], CompressedData[" 1:eJx11G1IU1EYB/DrC5ZB0tvmtGnq3ZWswEQJW314RCwTpSnj3rOwTGkahtkH i6iZkX1Kq2VEOlRUAv0wciiZGi1D7MW3CsNAI1eaoDbKQaJg2s5155wWeOB+ +H05z3n+9zknMq84y+jHcZyP+xPdn6/7u5F5rO56twhLzrmeg7wGhKny+qFR 5oWAnOr038yPqrQ+GYsipFr7mrlFnvp5sclZY4yirkQVx322hFLfkR0MKPjp B25BhBq8upSgnvt2IPSzCHrnyHx1oxL0JZqHq50iZAtIPWxijuhusBuDFOCw B9XG+0qQEI+XAvZoqwbK/JkP7/tomQ5h1oUrCzNimVWpumVVsgT5eEUrwPZ1 5kFbiUT3Jyb1jwgXfS16iZ4vcKmhoF0r0fP3lIYlFiRKtD9i0j9xAa6njKL+ 1dQaMbSbh2icd6EEisq0WX+9BmJwP9XMT26a3re/ZDbg/L5IMIiXmvd2eiQ1 qU9Mzpdd1LfSNs7OT/Yn/Tk32/fX1LP+iUk+5obFuOlZluf/luutMBfnbBgO 2YrW9XZX0rv8k4juT0zqp10tj03XInq+JjxPEYieX64Xjmh/xF79u03yJyb5 v8D/Q4dovhN4vq4xd43d+mNsZnbZdOcsvYjm72V3/sSkn96RvcYQF+v3Ls7r H0/uCHv7fZX5/Lbynv5Aw7puq/vZ/CrZQPcnJnmpT5w5NLHLQPN6VnJf5R9g YPPa35jS4Wdg8+oxnVePHSk5SZb5SGobfhgyPHl8QlDbxHctvxYAx5Jwj1l+ Ty4xy/meRhBafypmwCzARnx/shBM5TaOJsQK0IrvmwpBy8LM5UEzv/Z/OeR5 b4S1+++Q6H7y/bEyy++HmVm+T1ckWu8Cnrciidbzun8tPPWb7s7bATYBSh93 5JXFsf1+4Pnf5PFRAawV42e5SREyx3aacl0aIO+nnM8QM3kv/wKO2DxQ "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQXZ+1p2TygigH9U8qL2d1SjjIt74O3DEtyuFg974m E2ZJh+e/V368lBrlYGIMAuIO9qZxuzxDohzSQOCYmMObwB1yrcYIfgCQ+5oR wU8QiLDcciPSYUewVcR/dQkH8ZvnvgcfjnRYL6TDl14n5bC+KGPi2y2RDvdd 4x1nCco4lAC5NesjHVLBBsg6AF0nwbIu0mFvfs3bmaIKDj7mnY4JslFwvkt3 zvPfgQh+h2PC0wtFUQ7ua44uZ9BQcCgAmbc8ysF5QrNQWpaCw5WKl2qGK6Ic /oPAfgUHGf27Kmwroxz4YwPuG31H8Fd+e1lxxkERzl8Lcu8/ZYee6XlCzQVR DnMWKe/8c1zVwb8XKCCN4H/5C7ThXyScD3b/PaD/HZoeHa9QdeAHBseJfZGQ 8HmmAnFPQ6SDAMj+48oOTy8o3f6ZFulwBgR8lOB8kcpJJWeXyMP5B0Dxs1jG AcStK4p06Ino9mcUkHI4UbZvvlR7pAMDCDhIOAg0Hzi1cGmkw0wQ2CkKjw+w f+xEIPElGAXnT3hbY2+qh+DfB3nQKwpi3gIRhxpQAsiMcohRjZA5VyPq0AI0 3rUOll7EIPy+KIeQt5c/zlgo5vCgSmSd+8Qoh5r7P24ZvxZzQE9vAJHNFYw= "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQ3fI6cIdcapQDf2zAfaPvCg4+5p2OCbZRDtX3f9wy fq3g4N87PU9IO8pBuHJSydknCg7hfLqb5vIj+CLr3B9WvYmE8xMEIiy33IiE 6y/JmPi2Zn2kw0wQ4FSE893XHF3OoKHksOVE2b75myId1grp8KWvU4KYtyfS ofzwNteZvsoQ/hmo/kgVh4gU6/v+byMdTh12Wpv5T8UhYIdc62vBKDgf5l4Y /8vfKxUv7aIcniQuvGayXsXhhZohxxqfKIct5j8OpXCpOOjfVWFrjI1yWPnt ZcUZB2WHDseEpxeSohz+g0C/kgN6+AAAV1WNQg== "]}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGI1IAaxQYAJSjNCxZjR2DA5dDXI4rjYpKrHpZcY95DK ppabKTGTVHfiEgcA+NYCcw== "], CompressedData[" 1:eJxllGlIFVEUx91aMQv1Ta98mvV8u2aZGWHhX8peC6amlDl3zDUlcsFsEyly ydQ+WEm2mqZhQaSE5kKZRRtpognR8sFcokytrNCkoObO6AzVgfvhx9x77rn/ 8z+zMCZlS7y1hYWFJb828cuKX5l+yyObBljYzChYEJtshOub8UO7HAlWrLqz 5XS0Ec65gyENWoKaxckVlsSIx/uaL833JCgpmp3hY5K5OC83ouu2QeILl9WN vxIMSLydfkrpTrDEeM2ho1KPehc+oZ7Pp+nPLh3Wob9j0ZvxTyx0X90Gzhmc cMw/6l1HL4u3ATv8z3UyeJvheMPcw+IsjUZG/H6fhZ7uz2cwFNLgklvBwvHg yfRncQyOlyTbZ5excG0qa463U4jcwmLoaFKhl5NCfF8/C+9lNBTIpOm/yryX lj+FSHxdFRHnG0SkfFzTBlurWJnD43y7g+KJdD/d3u1HpPoUr9rHQk0EYcNd I2fKGfF+N4J7hc1Z3tZzJf7ePFKXMCqzg5BPKdajIRDK6VIiNfHEcKaOoIWe r5gn6plIUE31TNJLfIbqdVCPwJg54St3EyiOb/xo810vvieFwEforwFR/Ofa VILg106Z0ScN+HVt5HlgmtzPsdC+K+fTCdpo2BpRef6Ba00Bgao00tC6xIhg Xv7BswTvd5lGS1Ybsd7WypR3Q+bl+XzDvsi8f0C7dLojh3fR5S+8gwwSD+2p U/ws1Eks+MesEfv3cuL+C2p8rnq0aUW+zGF2HjcvJsg82Q/BL9vVoj9aCeJ3 0nAW+9pHQDThqnaVE9yo3ipO6qfg982c1P/qNF7wMO5vf3AyU3vbRMos6JnI QbhOO+Gf/XJ+Kg9z5H9ed/1hlUU4g9on/ADFcMh1naZpK2Yw12arnUcEN+EP RpyntRzMdP8PJcw9/IDUE6wpyrbfOVMNYZ57COZwwd1eZjXc8xjegQRXRwcO tBWpxTodOPRT/T3dkE795DfJGnF+t3FwqfqwfvFhrcTCuW86iX8LYUBOy9Py AC2HnFlB1cUak+i7ToJ6ZPU+VprE9+8gSKB6TDXhLr/9VqjMgn7rZBb6P8RK 5//9P/0BW4HvQw== "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYCYoHmA6cWusY7pIHAM3YH2dbXgTv44h3uu8Y7 zjIUcKgRWef+8Fecw5u23G6jaiGHJxeUbv98FgdRf0wMwr8W59CuwK56xkTK oWGqc3fO+TiHFhD/iiycv/Lby4ozHxTgfOVrj4IZ3ijB9U9pb426PEfFQfeu Clvj0ziHhJAg9QWaag4PqoAO+Bnn4HdxYsw/ZQ2H6+e+Bz/mjXf49fb1AUtn TQeY+8HqPbUdjpftmy9lHu9Q/9uq4NwLbQeddrGb557HOcjMi9M8vUHToWd6 nlDziTgHM5u9QdMSNRzeBO6Qa10d5zBjAn+VGbeag/tDoIXT4xwCb0nXJBap ODz9vfLjpV6o+w8oofKB/oHxdwRbRfw/LuPgsu3z3ysL4hy+7Pu4Nf2bOMQ/ R+MczoDAGmGHKxUv1QwfwMJTwKE2a0/J5B9xDjGqETLnbHjh7ofEB6sDevwA AIiTz1k= "]], FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQHcqnu2mudoJDtGqEzDkZSQfmMKCAZoKDwq4F+1L5 RB0uKN3+WeeU4GBiDAKY/J91WXtK3BH8y75JAhGeCP7nv1cqXgYlOKSBgJqo w/nvwY+XJiPMh/FjQPbXiDmcAYGQBIdWBXbVM1PEIPLeCQ4hby9/nLFQzEHd kGONjFeCw8HufU0mzOJw/kwQiJRE5XMqwvkGWiuFL7SoQPhWCQ5zFinv/HNc 1SH+KdBHvAh+jcg694e/4uF8FaB3s+7EQ/WrOjRMde7O2R/vsMOh6dHxHyoO X0D+mxbv4HOC3Xa2KYL/YdF6hbMrlBzaHROeXlgV71B+eJvrzFolhxdqQAds iXeovP/jlrG1MoR/JB7qfhUHe9O4XZ5n4uHuBdv3HsFPtr7v3yuN8E+45ZYT ZVoJDp02nrvSFik7wOKTPzbgvlG5IsR/rIjwmAI07vnieIeV315WnClQcFjx 8ZJvUkW8g0jlpJKzS+Tg/PVCOnzpdVJwPjj+jolB3Dcn3oEBBBaIOPRMzxNq voHgtxw4tdD1GYIPTgefoeYfEXGoBSaXyT/iHYJA8cko6oCe/gBIeg9R "], {{ 129.36299999999997`, 6.778130000000001}, {129.01699999999997`, 6.289059999999999}, {128.26599999999996`, 5.835939999999999}, { 127.80000000000001`, 5.835939999999999}, {127.32299999999998`, 5.835939999999999}, {126.906, 6.27813}, {126.906, 6.790629999999999}, {126.906, 7.231249999999999}, { 127.14499999999998`, 7.64844}, {127.50299999999999`, 7.874999999999999}, {127.80000000000001`, 8.053130000000001}, { 128.456, 8.22031}, {129.36299999999997`, 8.35156}, { 129.36299999999997`, 6.778130000000001}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 132.97799999999998`, 6.623440000000001}, {132.61999999999998`, 6.623440000000001}, {132.29799999999997`, 6.289059999999999}, { 132.29799999999997`, 5.9312499999999995`}, {132.29799999999997`, 5.57344}, {132.61999999999998`, 5.2406299999999995`}, { 132.96599999999998`, 5.2406299999999995`}, {133.34799999999998`, 5.2406299999999995`}, {133.681, 5.5625}, {133.681, 5.9312499999999995`}, {133.681, 6.289059999999999}, { 133.34799999999998`, 6.623440000000001}, {132.97799999999998`, 6.623440000000001}}}], FilledCurveBox[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4sUFtlzX+xMdTuza0cu2QdVh9hGFDUU9iQ5z Finv/HNc1WGh67bPfyugfHdVh79XKl6qpSY6BN6Srkn8pOKgEdN/6GtAosMG 1SfN884i+D/fvj5gqazicB1kQTyC/3vlx0u+eQg+2P78RAePNUeXM/xQhvP3 5te8nZmqBOeLVE4qOcsiC+e7g9VLO1xQuv2zLivR4UD3viaTxVIOzGF8upsS Ex3UP6m8nNUpCbE/PNGhVYFd9YyJhAOjdrvYTa9EBw2wvLgDv+6mue+tEXzr +/690/UQ/KnO3TnPlRMd+iK6/RkFJBzyhZoPnJKF2S/h0DM9T6hZItHhTVtu t9FuSYi8aKJDO9g+aThffteCfal+snA+LLxLJkuwhAkhwvszKID/JcDD+0TZ vvlSrxPg4Q12/7UEeHjD+LDwBMfXEwT/uLd5p+MXBP8rOIIS4OEN48PCG8bf EWwV8f+4DJz/wDXecVahpAMw9pIEfiQ4fNn3cWv6N3G4e9NA4JiYw9z3y495 syc6uIHMjxCF+5cBBBaIOCSDAlgbiS8QYbnFBsEHx4d3okPV/R+3jL1FHbhB ERiW6BCjGiFzrkYMHv8w98D4sPgBJoY9JUD+GRDwEYenNwVQ+POJQtS3JzqY GIOAKCR8OhD806AA7EXwwf6ZjJsPTB2/V65FmA/jw9y7GxTB8xIdQt5e/jhj oRgkfiYkOswEgZ1Q/wDz30FQ+mUWh/N7wP6RckDPnwDifJ9x "]], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 143.17799999999997`, 6.623440000000001}, {142.82000000000002`, 6.623440000000001}, {142.49800000000002`, 6.289059999999999}, { 142.49800000000002`, 5.9312499999999995`}, {142.49800000000002`, 5.57344}, {142.82000000000002`, 5.2406299999999995`}, { 143.16599999999997`, 5.2406299999999995`}, {143.54799999999997`, 5.2406299999999995`}, {143.88099999999997`, 5.5625}, { 143.88099999999997`, 5.9312499999999995`}, {143.88099999999997`, 6.289059999999999}, {143.54799999999997`, 6.623440000000001}, { 143.17799999999997`, 6.623440000000001}}}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYCYp1Nc98vV0tySAOBZ6wOGjH9h746JDnMmQkE kjwOHy/5Jgn4JDnEqEbInLPhd1hcYMt1PTzJoVWBXfXMF0EHx4SnF5Tyofwp Yg5A3Rox1VD1MjJwfvX9H7eMXyvA+Su/vaw4c0DJIR1kb1mSQ+At6ZrEIhWH 2UcUNhTlJDnMmMBfZcat5nB6oeu2z7FJDuevhr3Rj9ZwKJkswRLml+QwHSS/ WtMB5v7631YF515oO7CvkYlKkU9ySAgJUl/gqe2gwtY41dk6yWFye2vUZRtN h+XHvM07XZMcTh12Wpspp+FwomzffCl/qHpNNYelIAeEJTlMAamfo+JwGOjc /qgkB+Vrj4IZ3ijB+WD3f1CA81tA/r8iC9ffDuKbSEH4ftDwPSbmcAYEXJIc 3rTldhtVCzkwareL3bRKcrjvGu84y1AA7n5IfLA7oMcPAK39t8I= "]]}, Thickness[0.006683151774376796], StripOnInput -> False]}, { ImageSize -> {299.2508094645081, 32.67741967621419}, ImageSize -> {149.62540473225405`, 16.338709838107096`}, BaselinePosition -> Scaled[0.32439307852814453`], ImageSize -> {150., 17.}, PlotRange -> {{0., 149.63}, {0., 16.34}}, AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle->Directive[ Thickness[Large], 20], FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{{0}, {0}}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], ImageMargins->0., ImageSize->Large, ImageSizeRaw->Automatic, LabelStyle->{FontFamily -> "Times"}, Method->{ "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{0, 150.}, {-0.023391913368829433`, 0}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.02]}}, Ticks->{Automatic, Automatic}], InterpretTemplate[Legended[ Graphics[{{{}, {{{ Directive[ PointSize[0.012833333333333334`], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]], GeometricTransformation[ Inset[ Style[ Graphics[{{ GrayLevel[1], Disk[{0, 0}, Offset[{6, 6}]]}, AbsoluteThickness[3.], Dashing[{}], Circle[{0, 0}, Offset[{6, 6}]]}], GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ PointSize[0.012833333333333334`], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]]}], {0., 0.}, Automatic, Scaled[19.5]], {{{0.1, -0.023391913368829433`}}, {{ 0.2, -0.02297901655935025}}, {{0.5, -0.021817116105320795`}}, {{ 1., -0.02010876852270148}}, {{2., -0.01737071560943161}}, {{ 5., -0.012359326069805606`}}, {{10., -0.008436394465178656}}, {{ 20., -0.0052569107832976985`}}, {{50., -0.002546258230602838}}, {{ 100., -0.001399039749842982}}, {{ 150., -0.0009719698383387358}}}]}, { Directive[ PointSize[0.012833333333333334`], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]], GeometricTransformation[ Inset[ Style[ Graphics[{{ GrayLevel[1], Polygon[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}]}]}, AbsoluteThickness[3.], Dashing[{}], JoinedCurve[ Line[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}], Offset[{0, 8}]}], CurveClosed -> True]}], GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ PointSize[0.012833333333333334`], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]]}], {0., 0.}, Automatic, Scaled[19.5]], {{{0.1, -0.014496797090865628`}}, {{ 0.2, -0.01452285969558331}}, {{0.5, -0.014560532378814613`}}, {{ 1., -0.01451224002718311}}, {{2., -0.01414160309608582}}, {{ 5., -0.01233394674740097}}, {{10., -0.009715546420459952}}, {{ 20., -0.006743807472706599}}, {{50., -0.0035844891474714016`}}, {{ 100., -0.0020591316208532526`}}, {{ 150., -0.0014581624596552599`}}}]}}, {{ Directive[ PointSize[0.012833333333333334`], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.012833333333333334`], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]]}, {}, {}, {}}, {{ Directive[ PointSize[0.012833333333333334`], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]]}, { Directive[ PointSize[0.012833333333333334`], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]]}, {}, {}, {}}}, {{}, {}}}, {{{{}, {}, Annotation[{ Directive[ Opacity[1.], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6], Thickness[Large]], Line[CompressedData[" 1:eJwV1Gc8FYofx/FoSzJKZK/IpuiInB/Zjs2hY55DdpnJykq2Y68SKePSxbHq iusniqgU96IhpaiMIsm64t//wff1efJ+/BWh+VmeY962bRvj9/7fJvLGz6+1 fZrxInbtXa6FmNzjNGpBryI6Mgzsq44WYubruAhB+j3iPvhUULZQgLmTuc92 0HuJ99bcdR4mF2D+9I3llfRRYo8/S6xGXz569WZTWqJfEz/XjLXYXM9HjYrE jsCAt8RPJXNd6hfyMYBB6A6pmSDeLQzmNuXOx8O+oqnf0z8TE12nw0Yv5OG2 N/ynX+yaJvrUkySv6eXhjOHh+broGWKXQRPvumAetkuyWvkGfCWWyb13ix3M xYbv4elBNd+JrWohRbqnc9G21s3mW/oKMdTabfWtbA4+naTWORqtEqf2ZLwb Y81B4Hfe/WzXGjGeTYXL4Gs2Sqeebb0TvU6U4NueQqnPxg1PUwGvgF/EMt83 /iqEbLTgLF4MqGGCO9I5o0L2Wchad6S0eg8zpPjESK5BFvYYFhlPuDPDffGc fhHJLDwVm19uLrYdRrbqKPZLmSi+kElWKN4BbOI23YbZmbjy7Or9ufTd4Phz if6rJQPdiCwEjqXdYJCkIt2VkIFDDHqLCmUPFE0zprnsMrAup4ARdXQvOBY2 fLfeoKPb2epKdmSBnd7p4vuM6Tg0+TT7xMJ+eCPWNeu6lYZAtmA/S2aDlMvK sd9G07Cudzj9cjsbPPIyqZhkpGFyzXhST9IBmM3t62B1S0NhQijxz0x2qMV8 EHyeiqO/klU0j3FCpqVZ0eLdFKSrkoLNHTiheDnaPTwvBXX82JpoGZxA2xIS IQenYOP7bMXEn5zwvLoueMfx3777usyLB1xQ/70njq85GXWTa0VolEOg0kvn PP0wCZsODu5PSOUBM3eN3OuHErE9gG9SpY0HQrQvVRtsJuDDgXP3p2Z44B8p 94/inxNwJGndXdeIFw4szaZ6tibg6oZY5469R+C5oUfRfpcE1JwKCbySwAeW eSW9Di1Xsb+FfzQmVhD0FvgLJiLjcYjTo1axQRAY3F/o8d7x+Mav4cr794JA 7iMEGNjF49wxPUUAITDheJ2rdCIeD5T4JW9tCoGZNXE1+usVlD4zIUDsEIYj i1wrj85dQX+ZEy/+VheFlm9akT+843D8pP6WgJUoXOuNnPVwiEMTHYp8lLco 2Jnvt/phEofSjjFpmkWi0PbZSdlUKQ6n6E8NcFkUbuzc5sW2FouURbcHnQ1i oO2J0WlpsXimNa+xW1ICmCjmjepdMdj46I8JMaIECM1mRSndjUHhoTb2eLIE RPwXmk+oicHNmYkLOlcloKGYcTA8Owb/4peXefRBAio2BSx7XGNQNqbnds+N oyAlTyCf2xuD3PoruX1cUkCyVbNtxShcfGy8Ki4nBWX8LQNYHYXPjG7ax+hJ QbPZes1UThTGmxqKngyTArlL/1yle/72Ntfry8elQFe0pciE67d3I/ZHVx8D mcKfykYXLmN8XOKWClEGun/ms1QRItFlxxgty04GnEaMOCSORqJ6gmLPXIAM 2G0l2rdxReJi8qu02+Uy8L45aENhPgJdsmSOcLDIQt7hYdsTVRGocfP5ibl/ ZWF85ZFqHF8E/vj7sPctb3l4kFPKc+BgOK5aKBaR4uThtqCtqtnOcNyYMni8 XCQPcsdZmW8uh+EOtvCjxn3yIH6iWDnoVRhyO419+CGpAPzWTgtjpWFI2Lxp rzulANSmFvdKhTAkCuUdXapXhEpLNWUqJRS1vUQ0+9oUYYzM2h1vEoo6TbU2 Jb2KEGUe/aUFQtFAvyfe4J0ikJ+GXwfJUDT3W/lQzKYEt73YrH4uXUIani3V Pa8EI24g0p99Ca86C/IUSCtD5JiW/bXRENR0e9LndVIZql8Nc9o9CcFlz9AI DR1lKHRK/y6KIegZODQ+4agMNa2/nr+rDEGjqwkVslnKwMPz4smPkBBku/NN uWtFGWQ7XooH8YZg4XKHydeHxyF6I3fCyOMi/pnufOWMswqcKHceYIgGIyV2 u+1rHxWIDvu2TOYNxj0Xq6QDQlXg7arKwE72YHR1mB8syVKBzoMNdpd/BeER mWjh9W4VMKbGZg69DMKkxyV/M6RUoUa/0GdfVhC6bR9fEVhUhbt8ZVteu4OQ L8zBdzWeAL18s2aMvYE4fvFDxd1MArBclPRgMAfizUDPd8HFBJhq/zTX8l8A ivsGW35vIsB37kbpwa8BKOucRpj5QACrA6ud+kMBqKnbvmMM1ED0rdZ2xeIA pHLw38ANNVg3dOd8eDwAq6rfPEsIVocoUynR5/7+KEyNK9OOVYcDuwVJsd7+ WMhz7OJmujokSfsaE9z8MSUxhD+kSh2O63xoarb1R99zHD7nXqtDn0dX9idN f1QU0d+jAxqg19o1eozNH+8XNmozsZ6GkTBfhUMufjiQmHwv4rYmPJ7XuUvZ dgFThsdYJQYA1rZr7Vpo88EXj4Yi2c9oQyX5yZjxkBdOsr5XrB89AwH7/Gtl dnliYoh82SkLXQi2G2ITyXDHFdVcm7AZPSAx3+PhPXYO942MGmhEGkBw4F1+ yqIr1hU4rM4uGsK/Dt3pHPM0FGSszpomG8OD/gM2hxapKDA7fL1khwnwpkhP MvipOBPZn1FWagou1DsafUYuWBtiSs3lNQf71bQjLwSdUQ5e2g0MmwP3X4x0 +3FH5Go5vzhRZgFEcim+LHFArTaxGR8XS2iSXLvXkWqPDxgGTAQ+K/hntjrA PYuCVRZh999OWQEtyclDPu8sDl/pH1y7ZQ2VPxIvi9y3Q2+qZOq8nw0EVfMN No7ZooX8D1dJNTKYX57k+shh+/vk3l0bXiKDxICqVowLGQ/mjwY5dtpCmYb1 5rM7NriguFBjH2UHQlWHtIX326Bg2yWmYsJZeKAt1iMRbo1NCyzrLcwU2MsU lhH20Qoz7nWY6yEFxLzNL8Q6WeHQsShDRqo9VHosym8OW6KDnNPNTCMH8FM/ vV/c0RIJwrXcTTsdQdibO8V9zgIjOnYr1L9whGtMn5o5Qy1w57e4ChG6E+wa /C+wmd0Clx/v7Thv7wzCcx1aSxXmWNy3tX6Z0wWIHg75fNrmSF1h0YvxdwGP 0zaVSkNm+Gqdj+Y34gINi7y7c3nN8Kfe6doiFSroN7IJlgab4n0W7j1T2VSg zq3+5/XKBJXLl44LrFKh8p3B67cnTdA04SM9k0wDr5/1ldJVJNQ3opNU7WjA UDiv1VBOQmBTYxk7S4OjFVmGhFskVMqnX5V0pMHgXEmZ/g0SHqxUi+xwpQFH Z9N5nxwSvnmU4TXnT4PHH2Qde6NJ6LlTQ8cglQbJl5JHntuRkNr3ielbGg3k C7c+u5JJSEnPwhw6DX6Vu7muWpGQdOjzqXdZNIhdpBeImpFQQSJbKaSQBvl+ FxYjdEm4rPNFsLyCBpydvRRtZRLO78kZM6yigVx/wuaYAgm/PD19bf4PGtCr E1hC5Uj4yjrnkPqfNLhVNk6plyJhu5sm61AjDbLi9r4WFSJhi9R036VmGswy T7d38pOwbi4nUeAuDdJbVHY7HyHhzeBpZq9WGvik1A4WHyJhESG3k62NBiYK 5RYaXCTM3tCMam6nwf19pYQxdhKmdE6rUzpocGrlSkIkGwmvxOeubSENZIcI 6gKsJPwfvBJVNw== "]]}, "Charting`Private`Tag$276202#1"], Annotation[{ Directive[ Opacity[1.], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6], Thickness[Large]], Line[CompressedData[" 1:eJwVynk8lAsbxvFUjshxlIgwFYpS9mWi5rmVbMlJ5YmR7aHFdmwlu4lhssxj T6JSkTclInVCbtJGeFGSVpXRQfZdeju9f1yf3x/Xdz3lt//I4kWLFnF/7f+t IBemhkoaWUyecfbAJT4mPHHusqWLiDiDeM2+n3xMfRMTzqDvEYoyZ7IeytE4 rHZDOLG4nshuknpXo0pjZm9my1L6KTFxw9KAq0mjUX5UVnRAC1H+3spnny6N o1vvaEQWtxNKKy9Wm+nR2LD8erpR3kuCH7g2SebXf7b/wvQMv4uQCxkd0NGi 0fNpOrsy+g1RC737vqnTuL2QVxsY8J5o2nKwMnIjjWdMWCvOafcQbZca+qTW 0RhQxmwILv5E9FfsHmqXpZG9VveknfIXot51sO2FJI2m9FZVvbxeol1VxU9r GY2rfZSSxvhfibofR67tnOLjorcKO9p+6yc8FZdXSQ/yccBy9cit6AHCp7gi N7qHjzWq4gd8AoaIH2lCfawmPt4eC+MHFY8RSy/przY5z8dDJR52w/wZojuc +v5Ci4/NvW63nKxmidQeHxBV5iMouIi0/DZHzO+Xs1KR5uPmJIf7N6LniYD5 rk6puWRcOG6j6Bnwg+h2uRAuVpeMtivzxgOKhWBxVZI5vScZZ1riqr7xRSDF YVrOziUJPQgx5opJESgwYQvYfyZhRxldqc9eBumG3aUeRBLeysgui9ooCu+h YSJu7S/vcP2aJIoBkSE+JNqTiB29zel6o79DqY7xU2cqEbt+JOizNq2E18c7 NJ75JmDFqvbf45NkQd9VVpIu5GFNgHyvfrUsqFuyLcfO8fBR65EqwYAs2Jc3 Vzkn8/DVmfmju63k4GFd3w77IB7OLijXLRVdAwyBY8RjEx6yBMGBsfHyEJ8y 1x3XE49NlQpdnNMM6LLIvhOxIR791fXaHhgrwW0VXcvXz7n4wdD8p+IBJWir KR/sqOfiXlO2RpSXEhhtsvnYeY+Lm504yawcJbhol5o7eZWLArrZAqeVoCRK IjMzgovscY/6utvKEBCQ+/mQJhd33c8qb1DdAGHuwYx752NRxnwms1FKDYby xcOMeTE4/mzPrMpWNThmUPHFOSoGW6zyHTlmanDiedF4wskY5NpYKhmGqsHf qgkfpt1/ebvc0oIPavBUx3uxuskv70E0RV/fBKnx9cyphdPIjeH91CfUweSE kGx36GmceLDa64qXBjR7zY8weRyctdXKsY7RgECF68MxHA4uCCyeTedoQNoe xdn2UA4ulQjbuKdRA1rTrslE+3BQxvnd5wlVTfDxx/FV+znI/F++426BJjw/ nVa7mcFBYm3WxslSLfgzpG39/aBojHNhyGZv1oG5sDtbKhcikeXxvNHTUAcW 2qzvZ45G4vTxkPDtpjpg8YYTGtkbiccDOz58ctKBIItcX6/mSLSKiy/ckqYD 58cDpW/nRaLEjWGdhzM6MHZ3cmU/KxLPTdfuHXqkC2HTseUNCRF4k+8Su8tF H7yu7b1sbhiO8qGHfWa5TNg7ImlUNByCRdfftsSfMAbG47m4zQqnsJWXcC/8 Kgve6D/iso6dxMTOd+IbWgH2yX98Jrf0BLY97oiQ3LUTKJuk6cq2QOwV79Eq 7doF5Y/U7+++HoC8YI3LRra7oU/H4nNlhT/OGGTahQ6YwfDL/OqURD9c/qrL YnuEBVjvVPpu2+eLt7IPzw6OW0K/v67uxlgfZJTNDtok7AGRLS7uBSreqDjY mXtx6V7YpjsTPDnniQMRTSmXL9mA4aSyQVD7cSwJtnHLlNsH3AeGcbFPjuFW eG3f2rkPDJSqsrJ6jqJUpe/4p8u2oP/4Yn7r3BE0qVYe8HbdD5raDFGB9hGs L7MQYsofgDKVm1lC4R5YZBta9V5wALyr3uu9qHfHztim9rkrB8GrnqsL69zR y001acTPDiLwwiNmBIW2GhPuqttImFE3/stV4IbRyR/Pd06SIN4qUJx1dcNV Z7uCnOoOQUOo546Cblcc1Rotdoyyh/2Hbk79Rbkio/qUUB7TASaOiTh7f3XB ilGx+crFbBg2u3KqZYkLptyr3WeGbCiNNMrwNXLGjk1RlmVJjnBzkfoSPW8n PLzVOT/V6jD0FHWU2lccRua6EpkKYSeQrs4YjBQ5jOG1IpqlbU5wLNXv8ks7 RxQejilcTzvDpx3asiX32Dj9TLTW19EFzix39l2xio15jT/nI1e6AvP56++N YQ7oNiNmxvF3hVSVkvbRMXvsnpen/F65wvK0uCcd7vY4ZbajJEffDVLMFjne 6D2EVWIyywTpbuDX7Fj22ecQ6hRM6irOuoGX3U38Y5REm/gvdCpJAeOulNR6 DonmVrS1gT0FxeWV3QZRJILENrF3DhR8qXk0bh1BovZZOk7ViQJhny75sBAS V13bFlHrToF0G23+2p/Et49TPL/5U9DSaz9x1Y3E48LbTS2SKCjcREqE7CLR rbFPaDiZgvZ5he/ZJiSy+WmYQVMwZdpo+DdBorX0V6OPaRSskYjNnzMmUXND unbwOQokj+7fytEjcdr0H0ZBIQVeC1uU8zaQOLIs451lEQUpQZLC9cok/tO8 4/zIfyh4GHpJv289id0HM6SNb1JgnhMYo80gscaDJd5RTsFF2/8+ey5DYqVa f+OpOxR4m4wpTqwi8da3DJ7iXQqeaKnUr5EiMf9E/2LP+xRsZPmPef1BYg4z s06imoJ3S9yjMn4nMX2BFXWnhoJA2TUONctJTKzrN2bXUnDUJea0QJTEWG7m 3E+k4MjDMzMSy0j8F/HtFy4= "]]}, "Charting`Private`Tag$276202#2"]}}, {}}}, { DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ Graphics[{ Thickness[0.0050238633509168545`], Style[{ FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld AKjmAn0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJfIGYC4hkzQYDHYc4i5Z1/nms6fN33cWv6NX6H7Q5N j45LaDmApSMFHWTmxWmeNoDyfwrB+Qq7FuxLfScO5z9wjXectVHK4XXxVtHf 3Jpwfguv//oprOpwvmiP1yuWKyoOHmuOLmewEIeIFyo79Ed0+zNuEITzYfbD +NX3f9wyfi0A558BAR8BiDkVyg7ClZNKzrIIOKwV0uFL11N2UP+k8nJWp4BD OKdYu/F9JQd5kHvXCTjwxwbcNzqu5BD89vLHGY6CDu5g/UoQ894IOqSnAYGY EsQeQSGH8sPbXGf+VYSYWyfkcEdTds3/zYoOIiD7XKQdQkDmLBSHmN8n7cAA Ag7iEHNvSEP03RNz+A8C8jIOGmB3iTl8AYV3mYzDm7bcbiNpMYc1IHX7ZCDu WCPqAI4fS1lIOPOJQtXLO5gYg4Cow32Q+z4i+MrXHgUz2CjA+d02nrvSinDz wdRnRbj5MH6MaoTMuRoxiD8MFKH+E4P445yCQw04HqD8OgVIPO0Ud6gCiWuL QdzxRgni3msSDiu/vaw446AMsVdYChJ+zcoOKaBwXibtIAVKPwIqDgEgexTl HAJvSdckflKB+/fn29cHLJXV4HxwempVh/OfJC68ZnJeEx6+kPSrDZE3E4Pz wfYXi8L5YP818EHimw2Tv/zW8seGztxwvl2JY+1pGQ6cfK+t/seT277aw8yH 8c1t9gZNS9RyuPL72PV5kX/tj+/a0csWoOVQuLxkwz9+ZofnWdrfpttqQdMF M9Q8BH+z+Y9DKVoacD4k/KXg/B3BVhH/1cXh5oG0px0Tg9sHiz9IvH+xh8Uv jA+L/5ypCYUWxf/twfrVROHmwdJLs3gtayYbB5y/1WuDxZyfPHB+qwK76hkT AQeYfkh+FIanLxgfZj843e8WgKcv3yeel0yFeeHuh5VPMP/B+DD/o5dfANnI +aI= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQPXUCf5VZto6D+ieVl7M6JRw26OUtZpTRcTjYva/J hFnSISP/Q+vJKVoOJsYgIO5Q/9uq4ByHlkMaCBwTc5CYeoUzg0kTzvc5wW47 u1Qdzn9VvFX0t7aaw45gq4j/6hIOjyLEt19sUHVYL6TDl14n5bBB9UnzPF5V h/uu8Y6zBGUg5j1ScUgFGyDroKMo/yXnmorD3vyatzNFFRz+fit9MCdQA84H y3/ThPOntLdGXf6j5eC+5uhyBg0FB3GQeYt0HJwnNAulZSk4zFmkvPPPch2H /yCwX8GBhbNLPnmdjgN/bMB9o+8I/spvLyvOOCjC+WtB7v2n7LDF/MehlFda EHOOqzrILX/hoWevAee/yNL+Nj1WHc4Huy8M6H+HpkfHK1Qh7otRhYTPMxUH D5A7M5QdBED2H1eG2DNPyeEMCPgowfkilZNKzi6Rh/MPgOJnsQzEX7+UHHoi uv0ZBaQcwjnF2o3nKzswgICDhIMRKNomqzjMBIGdovD4AJtjJwKJr6/qcH5y 7B035hsacP4MsD5NiHkLRBxEerxesWzRcohRjZA5VyPqsB3krwhtaHoRg/Bv aDuEvL38ccZCYPqYF6d5+oO2Q839H7eMX4s5oKc3AEkxAO8= "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQ/SRx4TWTfi0H/tiA+0bfFRz+fit9MCdQ06H6/o9b xq8VHOSWv/DQ26/hIFw5qeTsEwWHX29fH7B8rA7nbzH/cSjllBqc/6p4q+hv bTW4fompVzgzHqk4zAQBTkU4333N0eUMGkoOF66GvdH/reKwVkiHL32dEsQ8 L1WH8sPbXGf6KkPNV4Xoj1RxkJoXp3n6gprDqcNOazP/qTj4nGC3nf1VHc6H uRfGf56l/W16rKYD2J/rVRzegNx3WhNiLpeKg/8t6ZrEIC2Hld9eVpxxUHaY 0t4adblGy+E/CPQrOaCHDwDXJJMI "]}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { 0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQHaPg+DF5jrGDgdZK4Qssqg5/v5U+mPPRyKGR5Wi/ 4XRVh416eYsZ5xg5zFmkvPPPcVWHHq9XLCaGCH7xVtHfp+8ZwvneJ9htZ081 dPj59vUBy8WqDjNBwNPQQRSkMUTV4QwI2Bg4XLga9kbfWsXheZb2t+my+g53 NGXX/G9WdtgAss9GzyE1DQiOKcL5/0GgXh7O74/o9mfcIO3wJEJ8+8UHeg7q n1RezuqUcPiy81bXX1YDh5C3lz/OWCgGMT/XwIEBBBxEHewrI1aY/oXyF4g4 LL6/j2/OYUM4v2BN9+0MBiM4/7rQJ8fzbkYOD1zjHWddFHH4CjI/1MghCGQ+ o6hD/W+rgnMrjCHyhZIQ/840dlDYtWBfKp+oQwkofPRMHEDeSVMTdegLLlGZ Hm/iYGIMAqIOB2plLdJbEHxw+MxB8D9tCMiedRyNz24KNw+sXsbU4U1bbreR tKgDl5tqKVMUGn+WKdw9MH6MaoTMuRoxhxeg8OE1hYcX2H9LTSD+2CkGd08f KLwFxOH8HjBfCs5Pib3jxrxDG5I+Gk0g4fJC22H6BP4qs9/A8AHFU4O2QzrI 3dOMHY7v2tHLFqDtcFu6JtFoqRFEnA3BB8dzjBYkHgKM4XxwumxH8GHpd7tD 06PjEgi+mc3eoGmJmg7o6RsAGf0zeQ== "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHaPg+DF5jrFDjGqEzLk98g4w/oHufU0mi2Uc0tOA YJqxg/onlZezNGUcSraK/j6dZ+zQE9Htzygg7aDxlnefgaSxgzEIXJZwWHx/ H9+cZiMHtzVHlzNEiDvsr5W1SP9iCOd/3hCQPeu5ASpf3QBiT5o0nD8TBDoV 4PxOG89daUrKDtEg950xcGj4bVVwboWKQzHIPfcM4fyDbcvDTwUZwflnwMAI Yl6kCsQ8c2MHgdiA+0bHlR1SYu+4MVcYOzxwjXecVagM9z/MPhgfLP9RyQE9 vAB3CYgb "]}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4pKtor9P/7N2OLFrRy/bBlWHJff38c15bO0w Z5Hyzj/HVR1SYu+4MXtA+e6qDhpvefcZrLRyCLwlXZP4ScXhw4aA7FnsVg4b VJ80zzuL4P98+/qApbKKA4//+impFQi++NQrnBmfEHyI/VYOHmuOLmf4oQzn 782veTszVQnOF6mcVHKWRRbOdwerl3bwuTgx5t9lK4cD3fuaTBZLOTzP0v42 vdfKQf2TystZnZIQ+y2sHFoV2FXPmEg4XBf65Hj+mqWDBlhe3KEvuERlejyC r6+1UvjCFws4/3Hiwmsm8y0c+iK6/RkFJBxOHnZam5lnAbVfwsEPZL+zhcOb ttxuo92SEHk9C4d2sH3ScL78rgX7Uv1k4XxYeB9sWx5+SsgCHt6NLEf7DcvN 4eFd99uq4NwNM3h43wC538wMHt4wPiw8wfG1AsFf8cJD77+iOZwfIb79IoOe OTy8YXxYeMP4O4KtIv4fl4HzH7jGO84qlHQoWNN9O8PB3OHLvo9b07+Jw92b BgLHxBy2mP84lLLL3MENZH6EKNy/DCCwQMQhWsHxY/IdBN/7BLvt7FRLOL8f FB/3LR2q7v+4Zewt6rAc5H5DK4cY1QiZczVi8PiHuQfGh8WPfdOj4zN+Wzmc AQEfcXh6UwCFP58oRP0+awcTYxCAmn8QwQfb/x7BB/tHygYn36YyYoXpWxu4 +TA+zL3/QSDfxiHk7eWPMxaKQeKHw8ZhJgjshPnH2uEgKP0yi8P5PWD/SDmg 508AWQKcIg== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYvGpVzgzfjk43NaUXfOfWckBxj8DAjLKDstf eOj9Z3R00FWU/5IjpuJwXNNq0ml+R4fAW9I1iZ9UHFSfNM87e8nBwUBrpfCF FlUH4U+O59PmOjjMWaS8889xVYfiraK/T8ch+N4n2G1niyL4/0Gg3t5BtMfr FUuIqoPGW959BiftHF6BNGarOCy5v49vzmdbBwYQSFCGuK/J1uEOyL2bFeH8 L/s+bk03k4fz00DgmITD3lpZi/Qldg5rhXT40u1EHObb6FyZJecA50eIb7/I kIfg8/ivn5L6wAGiX00U4t/3UPl7onD/i1ROKjmbIu7grlrKNIvB0eFNW263 kbQExD/HHRx2BFtF/FcXd3iSuPCayXQHh5kgsFPMwfza0VyTBAQ/HGy/PZwP Vt9v52BiDASXpeD8cE6xduN+BTgfFj9fNgRkz1K3d9hi/uNQSpeKw01gtBjJ OsD5MPtgfLA9Kx0cpObFaZ4WUHFgWTzJivGog4PHmqPLGSqUHT6DzDuPmR5g fABe9+7K "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQrfqked7ZW84O6p9UXs7qlHBY0307g+G4s8PB7n1N JsySDjelaxKNUp0dTIxBQNzhwT6+OcZOzg5pIHBMzMFdtZRpFgOCL/zJ8Xza XCc4/3dM7tF/Xk4OO4KtIv6rSziYXzuaa6Lg5LBeSIcvvU7KIZvz54J0ZieH +67xjrMEZRxcQeb9cHRIBRsg6+B9gt129ldHh735NW9niio47K+VtUi/4gTn +4DkbZ3h/CeJC6+Z1Ds7uK85upxBQwHivhfODs4TmoXSshQclr/w0Pv/0tnh PwjsV3BwaHp0fMZrZwf+2ID7Rt8R/JXfXlaccVCE89eC3PtP2eEN7z6DmVXO DnMWKe/8c1zV4bim1aTT553g/J23uv6mTkfwwe4PBfofZFCFKsR94tDweaYC cc9MRwcBkP3HlR0+bwjInpXu6HAGBHyU4HyRykklZ5fIw/kHQPGzWMZhvo3O lVl1jg49Ed3+jAJSEPcsd3RgAAEHCYg5TxwdZoLATlF4fID9YycCia+9CH6E +PaLDN8Q/HSQO/WcIeYtEHFgWTzJijHX2SFGNULmXI2og+6EBT8Mp8HSixiE v83ZIeTt5Y8zFoo5tC8PP2W0x9mh5v6PW8avxRzQ0xsAg9cT0w== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQXRGxwvRssrMDf2zAfaPvCg77a2Ut0kWcHarv/7hl /FrB4bim1aTT750chCsnlZx9ouBQ+9uq4NwOBP8N7z6DmUUI/u+Y3KP/vJzg +l1VS5lm/XB0mAkCnIpwvvuao8sZNJQcireK/j79z9FhrZAOX/o6JYh5Qk4O 5Ye3uc70VYbwjZwg+iNVHNqXh58yKnFyOHXYaW3mPxUH4U+O59P2Ivgw98L4 O291/U0Vd3Z4krjwmsl6FYj7jJwdtpj/OJTCpeIw5Rtb/IwQZ4eV315WnHFQ hqiLd3b4DwL9Sg7o4QMA2w6PgA== "]}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { 0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQ/Scm9+i/WW4OBlorhS+wqDp4nWC3ne3q5tDIcrTf cLqqg+qT5nlnpdwc5ixS3vnnuKqD0CfH82lPXeH8tuXhp4z2IPhfNgRkz5ru 6vDz7esDlotVHWaCQKGrg2iP1yuWEFUHE2MgeO3icOFq2Bt9axWI/ikuDnc0 Zdf8b1Z2qIxYYXo22sUhNQ0IjinC+f9BoF4ezu+P6PZn3CDtwLJ4khVjq4uD +ieVl7M6JRxOaFpNOn3exSHk7eWPMxaKOTg0PTo+g9nVgQEEHEQdcjh/Lkj3 hvIXiDgssNG5Mmsdgg827yyCb3HtaK7JB1eHB67xjrMuikDM/+7qEAQyn1HU AeQtk4VuEPlCSYh/Z7o5KOxasC+VTxTivyduDiDvpKmJOkz5xhY/448bJByM RR3WdN/OYOB3h/PBtDSC76payjTLAI0f4A43Dywe7e7wpi2320ha1OFifjz7 uUo0/kx3uHtg/BjVCJlzNdDwCXaHhxfYf/LuEH/sFIO7pw8U3gLicH4PmC8F 56fE3nFj3qHtIAJKH7zuDvW/rQrOvdB2kJh6hTPjFDB8IsS3X2zQhoTrDDeH 47t29LIFaDvsvNX1N1XezSEd5B82BH+DXt5ixhgthzMgUILg8/ivn5I6AcGH pd/tII9IIPhmNnuDpiVqOqCnbwAwyCph "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/Scm9+i/WW4OMaoRMuf2yDvA+Ae69zWZLJZxYACB GW4O6p9UXs7SlHFoWx5+yqjFzaEnotufUUDaIeHwZe3USDcHYxC4LOGwwEbn yiw+Nwe3NUeXM0SIO6zpvp3BcNwVzndTLWWa5YDGf+DikJ4GAtJw/kwQ6FSA 8zttPHelKSk7/AK5z8jVoeG3VcG5FSoQ9+xB8HUnLPhh+A3BNwE7zA1iXqQK xLwMNweB2ID7RseVHepA6jrcHB64xjvOKlSG+x9mH4wPlv+o5IAeXgBpwIbD "]}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4vrfVgXnFng73NaUXfOfWckBxj8DAjLKDjz+ 66ekrvB20FWU/5IjpuKgP2HBD8Nt3g6Bt6RrEj+pOPR4vWIxqfR2MNBaKXyh RdWhImKF6Vlnb4c5i5R3/jmu6nADqMyIFcHfope3mHGPF5yfngYCXg6iIINC VB1+xOQe/cfl5fCqeKvo72wVB/NrR3NNFng6MIBAgrLDpw0B2bPSPR3ugNy7 WRHO/7Lv49Z0M3k4H2zsMQkHF9VSplk/PB3WCunwpduJOLAsnmTFeNQLzt9f K2uRLuIN55cArT3d5g3RryYK8e80qPw9Ubj/RSonlZxNEXdY0307g2G5t8Ob ttxuI2kJiH/yvB12BFtF/FcXd/A5wW4729bbYSYI7BRzmG+jc2UWG4Iv8snx fFqsF5wfIb79IsM7TwcTYyC4LAXnh3OKtRv3K8D5sPi5v49vjrGVl8MW8x+H UrpUHByaHh2fcRjBh9kH4/8HAX9vB6l5cZqnBVQccjh/LkjP9nbwWHN0OUOF MsT8Msz0AOMDANTJ7PQ= "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKM2yeJIV41xfhzmLlHf+Oa7qoDNhwQ/DfT5w/ga9 vMWMKj4OxiAQrAznnwGBHnlU+csSDuURK0zPrvZxWCukw5duJ+LgqlrKNKvA F863b3p0fEa0H5yfw/lzQTqzv8NMEIiUhPP/g4C9ApzvsebocoYKZYcI8e0X GfL84O5Dd3/C4cvaqY2+DqcOO63N/KfioOD4MfkMrx+c73OC3XZ2qZ+D8rVH wQxzlOD8GNUImXN75OB8BhBwkHQ4rmk16bS6n8MD13jHWRdFHVqXh58yWuML 58+10bkySwzBX/rCQ+//Rh+H9DQQkILz9+bXvJ05VQHOB6svVHYwAYXbbx+4 +9DdDwBFMa3C "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYCYt0JC34Yhvk7/Hz7+oClsopDyVbR36f7EPzy iBWmZ08j+Bfy49nPXfR38FhzdDnDD2U4f29+zduZqUpwfk9Etz+jgBSc3wfm izsIfHI8n3bW32EmCOwUc0g4fFk7daa/Q8jbyx9nLBRzMDEGgmB/hxjVCJlz NQi+wq4F+1L5RB16vF6xmBz0d0gDATVRh/rfVgXnXvhD1BmLOlw/mmvSwB4A 53P8XJC+WQw33121lGlWSQDcfBgfZv+L7euZn/sEwN33hnefwUytAIj9x8Qc gktUpv/XCHCouf/jlvFrBB/mfxj/vmu84yxFRTj/Pwj0K0Hc6x7g8AAkf1AZ Yl8Ogl8JCv9mNP7kAAeVa4+CGXKUIebMD3D4sGi9wtkVSg7Srx+ZSW1A8EHR +2xbgIOB1krhCy2qDs2BnnMb1gU4nNi1o5dtg6rDGRBYEOAwZ5Hyzj/HVR3E PQL+SExG8NuXh58yqkHwwfYnQ/2fpuoQm3v036bgAIcNqk+a551VgfuvEhQe 1spwPsy++/v45hgrIcyba6NzZdY3fwjfXdXhSeLCaybL/R0Cb0nXJH5ScYCl T5j56OkVAIBiN74= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYC4scisiefXg9w+Pn29QFLZRWH9uXhp4y+IPgc PxekbxYKhPO3ttRc2Cwa6OCx5uhyhh/KcP7e/Jq3M1OV4PyeiG5/RgEpOL8P zBd3uHo016RBONBhJgjsFHOoXbctqf5ngEPI28sfZywUc0hPA4JrAQ4xqhEy 52oQfIVdC/al8ok6CH9yPJ/GG+gAEk5TE3Xo8XrFYqIY6GBiDAKiDosnWTH6 miD4YPuccfPB5i0MRDUfyIfZD3Z/ZSDcfTtvdf1NDYfaf0zMQd7xY/KZ0ECH mvs/bhm/RvBh/ofx77vGO85SVITz/4NAvxLEvSWBDg9A8geh4TkTwXdXLWWa tQGNfyDQQeXao2CGHGWHM2AQ6PBh0XqFsyuUHF5sX8/8/A6CH5t79N+mx4EO BlorhS+0qDr4y4ll+d4OdDixa0cv2wZVSDycDXSYs0h555/jqg7g9LAfwQ8u UZn+fwWCD7Z/AtT/aaoO2laTTtc3BDpsUH3SPO+sCtx/laDwsFaG82H2re6+ ncHgjzBP+vUjMykNKN9d1WF/raxFOkOgQ+At6ZrETyoOsPQJMx89vQIAC3I5 Aw== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQXRmxwvSscbCD+ieVl7M6JRysda7MeqYZ7HCwe1+T CbOkQ3CJyvT/P4IcTIxBQNzh+tFck4bnQQ5pIHBMzIHj54L0zccQ/Px49nOS UxH8xyKyJ59mBznsCLaK+K8u4dAc6Dm3ISzIYb2QDl96nZSD9OtHZlIeQQ73 XeMdZwnKQMxzCnJIBRsg69Dj9YrFxDHIYW9+zduZogoO7qqlTLM2IPjdIPmn CH6E+PaLDGzBDu5rji5n0FBw4ASZZxXs4DyhWSgtS8Fh962uv6nWwQ7/QWC/ gkP78vBTRjbBDvyxAfeNviP4K7+9rDjjoAjnrwW595+yQ2zu0X+bmIMd5ixS 3vnnuKqDd3Wzvs+6IDj/8GXtVMlJCD7Y/YVA/zs0PTpeoQpxXxA0fJ6pOOwE uUc4yEEAZP9xZYf7+/jmGP8KdDgDAj5KcL5I5aSSs0vk4fwDoPhZLOOwtaXm wmbWIIeeiG5/RgEpiHukghwYQMBBAmKORZDDTBDYKQqPD7B/7EQg8bUUwRf+ 5Hg+7SCCD9Z3F2reAhGHF9vXMz//E+QQoxohc65G1KF23bakekFYehGD8BWD HULeXv44Y6GYg7bVpNP1KsEONfd/3DJ+LeaAnt4AoecO6g== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQvXiSFaPvjyAH/tiA+0bfFRzcVUuZZl0Icqi+/+OW 8WsFB+/qZn2ffUEOwpWTSs4+UXBQfdI87+wiBD8m9+i/TfUI/mMR2ZNPsxH6 OX4uSN/sFOQwEwQ4FeF89zVHlzNoKDnIO35MPuMa5LBWSIcvfZ0SxDz/IIfy w9tcZ/oqQ/jxUP2RKg7aVpNO1zcEOZw67LQ285+KQ348+znJpQg+zL0w/uHL 2qmSl4IcniQuvGayXgXivvtBDlvMfxxK4VJx2PDw5dRNH4IcVn57WXHGQdkh Qnz7RYZvQQ7/QaBfyQE9fAAhD5BX "]}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIZIGYC4g0PX07dlBLssEEvbzFjjJbD1aO5Jg39CH6P 1ysWk7kIfnOg59yGRcEO2x2aHh2XQPDNbPYGTUvUhPN7Irr9GQWk4Pw+MF/c YfEkK0bfBcEOM0Fgp5iDd3Wzvk9bsEPI28sfZywUczAxBoLkYIcY1QiZczUI vsKuBftS+UQh7lsfDBE3xuS/4d1nMPMQgr+1pebC5qu4+TY6V2Y9UwyBmw/j w+yfsOCH4bN/CPe92L6e+fkThPvB9j1C+A/Gh/kfxk+JvePGvEPboSJihenZ 28EO9b+tCs690HZ4sI9vjvGuYIcHEeLbLzZoO4SUqEz/Dwyf47t29LIFaDvA 4ic9DQjYEHxYfAAACHC6Og== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQnQYCWqEO0aoRMudkJB3e8O4zmKkW6qCwa8G+VD5R h47l4aeMIkIdTIxBAJN/5LJ2qmQSgm+jc2XWs1QEP6REZfr/ilAHsD1qog5N gZ5zG2YhzIfxY0D214g5nAGBmlCHVgV21TNTxCDyWaEOIW8vf5yxUMxh562u v6npoQ4Hu/c1mTCLw/kzQSBSEpXPqQjnG2itFL7QogLhu4c6zFmkvPPPcVWH CQt+GD57FwLng/1zDsH/tCEge9b6EKh+VUj4TApx2OHQ9Oj4DxWI+qwQB58T 7LazTRH8D4vWK5xdoeQQKb79IkNdiEP54W2uM2uVHJ6IyJ582h7iUHn/xy1j a2UIf3oI1P0qDleP5po0zA+Buxds3yEE36u6Wd+HC+EfmdePzKQ0Qh06bTx3 pS1SdoDFJ39swH2jckWI/+6FwMNDwiPgj0R5iMPKby8rzhQoQPznHeIgUjmp 5OwSOTh/vZAOX3qdFJwPNveYGMR9+SEODCCwQMQhJvfov02rEfzadduS6nci +BB9UPOPiDhURKwwPXs6xCEIFJ+Mog7o6Q8AitMSaw== "], {{84.6625, 6.778130000000001}, {84.31720000000001, 6.289059999999999}, { 83.56559999999999, 5.835939999999999}, {83.1, 5.835939999999999}, {82.6234, 5.835939999999999}, {82.2063, 6.27813}, {82.2063, 6.790629999999999}, {82.2063, 7.231249999999999}, {82.44529999999999, 7.64844}, { 82.80309999999999, 7.874999999999999}, {83.1, 8.053130000000001}, {83.75630000000001, 8.22031}, {84.6625, 8.35156}, {84.6625, 6.778130000000001}}}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4kjx7RcZ/oU6iFROKjm7RdkBxpfftWBf6jpJ OH9HsFXEf3UxBwmPgD8S4mEODCCwQMTBRufKrGeBCP7OW11/U5MR/K0tNRc2 l4Y5rBXS4Uu/J+LgVd2s71MV5mBiDAKiDhMW/DB8Ni/MYSYI7BR3CClRmf5/ SpiD+ieVl7M6JSDmN8L0izs0BXrObSgLcwh5e/njjIXiEHsyEHyw+V4IPtj9 dmEOX/Z93Jo+TQLOr7n/45bxayk4H+b/mNyj/zbNR/Df8O4zmLkszOHUYae1 mf9UEPo/bQjIvoXgm9nsDZp2UBXOl5h6hTPjkJrDoklWjL4OYQ4vsrS/TZ+r 7pAGAm5hDgZaK4UvqGg6/GCLn+FjG+YwZ5Hyzj/pmg5rum9nMGiHObwu3ir6 m1vTQeb1IzMpkTCHye2tUZf3aDgcqJW1SP8T6vAfBOo1HDh/LkjfDIyfut9W BedOqDtcPZpr0vA/1CEj/0PryRAEH2K/GpwfeEu6JvGTCiT8joQ6TAGZL4Pg nwGBOYj0AAsPAHxL7qs= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQAWIQ3bY8/JSRTbjDiV07etk2qDoIfXI8n2Ya7jBnkfLO P8dVHZoCPec28EH57qoOqk+a5519FuYQeEu6JvGTioNXdbO+z74whw1gCQT/ 59vXByyVVRze8O4zmHkLwS+IZz8n+RPBl3n9yEzqT5iDx5qjyxl+KMP5e/Nr 3s5MVYLzeyK6/RkFpOD8PjBf3MFG58qsZ0DzZoLATjGHJyKyJ5/eD3MIeXv5 44yFYg5nQGBPmEOMaoTMuRoEX2HXgn2pfKIQ93CGO5gYgwAmHxw+Mgh+gJxY lq8+bv61o7kmDdXhcPNhfJj9mlaTTtdHhMPdBw5fu3C4+2HxAfMfjA/zP3p8 AQBha7vM "], {{92.3922, 13.4891}, {92.0344, 13.4891}, {91.725, 13.179699999999997`}, {91.725, 12.821899999999998`}, {91.725, 12.4766}, {92.0344, 12.165599999999998`}, {92.38130000000001, 12.165599999999998`}, {92.72659999999999, 12.165599999999998`}, {93.04840000000002, 12.4766}, { 93.04840000000002, 12.821899999999998`}, {93.04840000000002, 13.1563}, {92.72659999999999, 13.4891}, {92.3922, 13.4891}}}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKL21pebC5sQIhzmLlHf+Oa7q4FndrO/zKRzO7/F6 xWKyNNzBGASCleH8MyDQI48qf1nCoSCe/Zzky3CHtUI6fOl2Ig7XjuaaNHhH wPnBJSrT/x9A8DcUZUx8KxLpMBMEIiXh/P8gYK8A53usObqcoULZ4f4+vjnG pxDuRXf/YxHZk0+DIxxOHXZam/lPxeHwZe1UyVkIfqT49osM5yIclK89CmaY owTnx6hGyJzbIwfnM4CAg6SDuEfAH4nlEQ4PXOMdZ10UdfjGFj/DJxPBbwr0 nNsgh+C3LQ8/ZfQm3CE9DQSk4Py9+TVvZ05VgPPB6guVIeEogHAfuvsBX724 BA== "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIIaxWZDYzFDMAOUzoLFxqUEWJ8YcYswk1V5i9NLa jwDSKwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYCYoHmA6cWpkY5KOxasC+VT9QhY0/JZIkpUQ4m xiAg6rC+KGPiWyR+wA651tcLEXyRde4Pq9bg5r9ffszb/CHCfBg/RjVC5lyN GMS8g1EOIW8vf5yxUMzhPwgsj3KYCQI7xRxYwvh0Ny2NcjjYva/JhFkczu+J 6PZnFJCC8zttPHelLVKE818VbxX9na3isP/UQtdt1VEOcxYp7/xzXNWhBehd VzUE36U75/lvTjT+z0iHF1na36bPhfJfRjo8SVx4zURfFeK+9ZEOZ0BgjjKc f2LXjl62DaoQ/62MhJsnDnJQE5Tvruqw+UTZvvlRkQ6Bt6RrEj+pOKgZcqyR MYp02KD6pHneWQT/59vXByyVVRzSQMAPwQfHRw6CLxOVYn0/P9LBY83R5Qw/ lOH8vfk1b2emKsH5sPCC8fvAfHEHIVD850bCwxsUPNuCI+HxcURhQ1GGYSQ8 vmB8WHxGAo3zT42EuFNN1CEQFJ+VkfD4B4dPP4K/Hpg8RJYh+EtmA03chdBv c9+/d/o7hPkwPsx+/ySBCMszCPf9Wfnxku8mhPth8QHzH4wP8z+Mnw6yT0wJ zv+waL3CWQ1lB5B1eY8iHUR7vF6xhKg4mHc6JjwViILzy18CY8gFwYflH3D6 U1KG88Hpw0fRAT1/AQDyIYZH "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvWHu++XHPsc4qH9SeTmrU8IhYIdc6+uXMQ4Hu/c1 mTBLOsjo31Vh2xnjYGIMAuIOBRkT39Ysj3FIA4FjYg6yra8Dd7Qh+C1Arlwo gj/FuTvnuXaMw45gq4j/6hIOHjxM2u1iMQ7rhXT40uukHJ4snX1EgSPG4b5r vOMsQRkHEHcDU4xDKtgAWYe3y495mzPGOOzNr3k7U1TBoTZrT8nkAgS/dN98 Kf2lCD5QVoLlWIyD+5qjyxk0FByWgMz7FePgPKFZKC1LwYF9jUxUyu8Yh/8g sF/BwTdJIMLyT4wDf2zAfaPvCP7Kby8rzjgowvlrQe79p+yw/9RC122HYxzm LFLe+ee4qkPLAaBAHoKvasixRiYIwQe73xDof4emR8crVB1cgMHxWxAaPs9U IO65HO0gALL/uLKDOEsYn+6uaIczIOCjBOeLVE4qObtEHs4/AIqfxTIOIO6m o9EOPRHd/owCUg5/Vn685Hsr2oEBBBwkHFy2ff575Ue0w0wQ2CkKjw+wf+xE IPGViuADQ6sooxHBF2gGenBuDMS8BSIO64uACWBPjEOMaoTMuRpRh61A4ysu wtKLGIT/MMYh5O3ljzMWijmIrHN/WPUkxqHm/o9bxq/FHNDTGwB5mhLQ "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQvV2u9XXgjhgH/tiA+0bfFRxqs/aUTJ4Q41B9/8ct 49cKDi0HTi10rYtxEK6cVHL2iYJDh2PC0wtJCL77wyqRdfYI/hTn7pzn2gj9 S2cfUdjAFOMwEwQ4FeF89zVHlzNoKDk8/73y4yXWGIe1Qjp86euUIObxxziU H97mOtNXGcKXh+qPVHHomZ4n1OwQ43DqsNPazH8qDi1A18ulIvGh7oXxVQ05 1shMinF4krjwmsl6FQeZqBTr+/NjHLaY/ziUwqXikCAQYbllQ4zDym8vK844 KDsAfS/Bsi3G4T8I9Cs5oIcPAKBAjZQ= "]}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIIaxWZDYzFDMAOUzoLFxqUEWJ8YcYswk1V5i9NLa jwDSKwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYC4rv+vdPzguIcFHYt2JfKJ+pg2umY8LQhzsHE GAREHWrsTeN2NSL4sq2vA3f0IfgPqkTWuc/Ezd9TMlmC5RzCfBg/RjVC5lyN GMS8dXEOIW8vf5yxUMzhDAhMiXOYCQI7xRzOK93+WTcpzuFg974mE2ZxOL8n otufUUAKzu+08dyVtkgRzn9VvFX0d7aKQ8/0PKHmjDiHOYuUd/45ruoA8q6Q MILPH2G55cS3WFT+s1iHF1na36bPhfKvxTo8SVx4zURfFeK+ObFQWhnOP7Fr Ry/bBlWI/6YhzHtyAeigPCjfXdWhfqpzd457rEPgLemaxE8qDl/+Xql4KRfr sEH1SfO8swj+z7evD1gqq0DC0RrBB8dHJIL/Qs2QY01MrIPHmqPLGX4ow/l7 82vezkxVgvNh4QXj94H54g7g+I+KhYc3OLwcYuHxMeEt0Eage2DxBePD4lMV aJxMUKxDGgioQdNHWiw8/sHhU4Pg1wCTx8NJCH5BxsS3NcsR+tnXyESl3EaY D+PD7JfRv6vCthPhvuNl++ZLzUe4HxYfMP/B+DD/w/jpIPvElOD8D4vWK5zV UHYAWWd9PtZBtMfrFUuIigNLGJ/upr8Ivsu2z3+vGMTB+bD8A05/SspwPthc H0UH9PwFAHsffPI= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQbW8at8tTIMFB/ZPKy1mdEg79h75qxHAnOBzs3tdk wizp8Pz3yo+XnsY7mBiDgLiDLUj9lXiHNBA4JubwJnCHXOtmBD8AyH3diOAn CERYbomId9gRbBXxX13CQfTmue/BzvEO64V0+NLrpBzWF2VMfGsS73DfNd5x lqCMQwmQW6Mf75AKNkDWYU/JZAkWvXiHvfk1b2eKKjj4mHc6JsxF8F26c57/ vojgdzgmPL3wKd7Bfc3R5QwaCg4WW06U7RNOcHCe0CyUlqXgkA0yUCTB4T8I 7Fdw6J2eJ9QM5PPHBtw3+o7gr/z2suKMgyKcvxbk3n/KDj0g/od4hzmLlHf+ Oa7q4A9SMBvB//L3SsXLOgQf7P44oP8dmh4dr1B14AcGxwk7aPg8U3EAqlYz ZIh3EADZf1zZ4ckFpds/n8U5nAEBHyU4X6RyUsnZJfJw/gFQ/CyWcTgP5NZ9 inPoiej2ZxSQcjhetm++FHu8AwMIOEg4CDQfOLVQNd5hJgjsFIXHB9g/diKQ +JqI4E94W2Nvug7Bvwvy4CmoeQtEHGpACeZlvEOMaoTMuRpRhxag8a7/4qHp RcwBFPxK7AkOIW8vf5yxUMyhwJbr+mKOBIea+z9uGb8Wc0BPbwDZehPi "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQ3fI6cIfc03gH/tiA+0bfFRx8zDsdE/bGO1Tf/3HL +LWCg3/v9Dyh1fEOwpWTSs4+UXAI5dPdNLcfwRdZ5/6wKgfBTxCIsNwSgdBf kjHxbY1+vMNMEOBUhPPd1xxdzqCh5LDlRNm++UbxDmuFdPjS1ylBzLOJdyg/ vM11pq8yhO8D1R+p4hCRYn3fPzfe4dRhp7WZ/1QcAnbItb6eiODD3Avjf/l7 peLlvniHJ4kLr5msV3F4oWbIseZMvMMW8x+HUrhUHHTvqrA13o13WPntZcUZ B2WHDseEpxcexTv8B4F+JQf08AEAvCuPJQ== "]}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYCYn7dTXPfayc4/Hz7+oClsoqDuiHHGhkrBP+y b5JAhCeCz6jdLnbTK8HBY83R5Qw/lOH8vfk1b2emKsH5PRHd/owCUnB+H5gv 7vBVI6b/ENC8mSCwU8zh9s+6rD02CQ4hby9/nLFQzMEYBIDuiVGNkDlXg+Ar 7FqwL5VP1GHp7CMKG9wSHNJAQE3U4Xvw46WzAxIcTMAKRR3mS+nfVYlC8MH2 JeLmJwtEWG6ZgDAfxofZvx9kYA3CfftPLXTdlg21/5iYw+e/VypeZiU41Nz/ ccv4NYIP8z+Mf9813nGWoiKc/x8E+pUg7q1KcHgAkj+oDLGvB8G3N43b5TkD jb8gwUHl2qNghhxlh3SQO5YlOHxYtF7h7Aolh3DLLSfK1iH48U8vKN3emOBg oLVS+EKLqkN3zvPfK9cmOJzYtaOXbYOqQ4djwtMLQP1zFinv/HNc1QGcHuYj +L3T84SapyD4YPs7oP5PU3U47m3e6diQ4LBB9UnzvLMqcP9VgsLDWhnOh9lX nDHxbU06wryPl4AJLATKd1d1AKpWM3RIcAi8JV2T+EnFAZY+Yeajp1cA+m03 eA== "]], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCwBmIQ/fdKxUu1ykSHMyAwR9lh6ewjChuaEh0aWY72G05X cXi//Ji3eWOiAwMIPFBxiN/lycPknegwZ5Hyzj/HVRzMOx0TntokOpw67LQ2 s07VAci7oKQPk1d16J2eJ9Qsg+DvP7XQdRs3gn/cG2jCjwSHwFvSNYlFqg7f gx8vnf0iAW6fClvjVOfLCQ5T2lujLsuoOICca3giweGBa7zjrI9KcH754W2u M2sV4XwDYyAolnf4qhHTf+hmgoNI5aSSsyyyDqeB1n/+muBwoHtfk8liGQft drGb564nOLxpy+022i3p8B8EgPYdBMkzSzqoG3KskbmU4CAM0p8iAecr7Fqw L3WdOJzvtubocoYIMQeQdV9vJDi0KrCrnpkiCnH/6wQHjU8qL2e9FIGoP5UA Ce81Qg63f9Zl7TmS4FB9/8ctY28hB/Y1MlEp+xMc0tOAoE0Azp8zEwgk+eD8 F7WPs8/nsDpc9k0SiHgI9F+TzBSDy//s84WaD5wSTITzweq9EXywvRWJDtu8 NljMqeRwgPHPgmgeITg/RjVC5lyNqMMFJaAL0xId1grp8KXfE4eElzeCD4re A3wI/mdQgvqVAOeDw/8jNL4KJeB8WHjD+NNB/ouUgtj/JQESD/elIOb/g4bX G2kHUPT9ZUh0UAeFp6aMA9i/jIkOIW8vf5zhKOMwF5RgmROh8S/jcKJs33wp 9kSHVFB4psk4AFN3UQZnItQ+GQdQci/iQfD3z5fSvyuD4HMzAX1sCDNf1iFZ IMJyi0MiJD0tkXO4cQ6YYgMTIfEnreDwe+XHS75RiQ7hnGLtxvyKcD7IOcbB SnA+2D9nlBzA+S8SypdRhqSPMER+RM+fABP/sCo= "], {{ 136.46099999999998`, 10.4859}, {137.27200000000002`, 10.4859}, {137.82000000000002`, 9.817189999999998}, { 137.82000000000002`, 8.804689999999999}, {137.82000000000002`, 8.02969}, {137.31899999999996`, 7.493750000000002}, { 136.59199999999998`, 7.493750000000002}, {135.79399999999998`, 7.493750000000002}, {135.25599999999997`, 8.112499999999997}, { 135.25599999999997`, 9.031249999999998}, {135.25599999999997`, 9.94844}, {135.69799999999998`, 10.4859}, {136.46099999999998`, 10.4859}}, {{137.02200000000002`, 5.13281}, {138.369, 5.13281}, {138.83299999999997`, 4.859380000000001}, { 138.83299999999997`, 4.084379999999999}, {138.83299999999997`, 3.05938}, {137.891, 2.29531}, {136.63899999999998`, 2.29531}, { 135.60299999999998`, 2.29531}, {134.888, 2.9046900000000004`}, {134.888, 3.7859399999999988`}, {134.888, 4.321879999999999}, {135.19699999999997`, 4.8109399999999996`}, {135.67299999999997`, 5.014060000000001}, {135.86599999999996`, 5.10938}, { 136.19799999999998`, 5.13281}, {137.02200000000002`, 5.13281}}}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGJ5IIaxWaBsBigfRjMjqWHGooZa6kkVp5Z7aO0vXOoB MK4CWQ== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGIHIGYC4gOnFrpu+57ocAYEfCQd5r5ffsz7faJDjGqE zDkZaYcTZfvmS71OdGhVYFc9YyLjcNzbvNPxSaJDxf0ft4y75Ry028Vunjud 6CAQG3DfyF3ZAajbvPNkokMEp1i78Xplh/8gcDzRYYv5j0MpXCpwvsf+WlkL dwR/Sntr1OU5Kg5XKl6qGZ5JdNig+qR53lkVB6DrPv+9kugg2uP1iuWKisPP uqw9JY8TQc5nYHiA4M+YwF9l1q3qEG65BejkRIcdDk2Pjldg8lXYGqc6b0fw wfavx82P3+XJw9SNMB/Gh9kf//SC0u2JCPexr5GJSpmd6GBmszdo2kEVB37d TXPfz090OHXYaW1mnYoDcxif7qaliQ4fFq1XOLtCGeKe84kOJsZAcFnK4TTI wzeh4T1F3OGrRkz/obuJDn0R3f6MBWIO34MfL50NDH+FXQv2pfKJOCwusOW6 fjvRIT0NCNQEHc6DFADNU/+k8nKWJ5fDbVAAHYDG7xlWB+7rQB2bEPzo/kNf NdYg+JEp1vf9ge4rXF6y4V8/m0OHY8LTC/MSIeHynx3i35kIfrJAhOWWCYkO X/Z93Jp+jQHi3+mJDi3itayZx/7bm8QBAwyoX6RJZorB5X/2MPNhfEZQAtqH 4MPCY8ZMILjJBPf/ge59TSbK3A6gYDLWTnJ44BrvOOujIiR+rZIg6UcGGr6O SfDwB5vnnQSPnxvngAEUmgSPPxgfFr/g9GyeBI9/dH53zvPfKw0R/GSgd3q1 cfOBsbO4gBdhPowPsx8U/DHiCPeBw0spyWHOIuWdf45D5dWTHKTmxWmenoDg X7ga9kbfGk1eQMUBZP10tSSHmeDwU3bgZgL6QDUJEr9zlB3Q8zsATTPXLA== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxdk31IU1EYxmd+pAU2xKYbul1379TQUJtapuVLFmIlRoZaaB/nMNcnSkhU hGUGIsMsorLErCRUmCli/aExJdPKrERWWVqTCkzUdKWUWNg5984d8oX7x++e e9/3PM95ThDK22lwlclkLuQB8iyROWoXhkafcG9joQpcwkoU77di0LTethju KyG8uWqyNhZDA13/5AeJMXtbUwQMF7NMaS5yP4i3pZVdVzDu5JqOH3RfxBMI btDarQR7fyqSf0NgyKUVAKR797YRBPO0bIyl9UAn99IaD/z/+7NqeP0r/cs9 wuL+1BqofEIGkv5ldH6TBl7c2fLwpx3BBW6prteqkfbvhp18ZGSu3u7B2Hh5 4kyikrF70dUkUyTjSE9zwJ4EDCE/hNGbzzWSPxsxTN5t5F56ciD6uXnBLw7i Wp6dsIRgKE1Iac3t50BPi2eM5VlxLb6M2wqu+Lv5MKZy184imKL9Bzgg3apV Y4w7Z0Kzy78jGFwVaJ531UKeT3FHzwwCec4O25pkHqicGKLv3Nz6/FehArRX qyI+yjH0vckYj2gTpHU1hopLK07HLtcBpgcaxji7/PFM6DrGQ7OFhx8RfaLO YQH4QfJiO4Ym3dfiW6kCDNTkb1iWhmF2YqwjjhdA8CAGpmM4Zfv9Qd/Gw596 koAMx//7eagj8kpzMAhvP6fLjvIwRfUec+y3TgAriUvWAcd8kw7o+ALSv8it qzzKLxiiqZ/xjI00NlrGYu68MPR0bmo4VKgDGoe/0wjEeOUKQONTOYQkv7W8 xL0IMr0UJfp9QVK+nrJ89WmJ4G4E7SbL+egkNbhmeK9u7mJ5XeBkc1etrCLA yWJeSlUwR/X3IJi22B8Yr/mD9eRocJQVOe+LeD+GkeQPrATi5ruaaUf+zb7S +XliJ9PjydYwFv3QY+Do/fVWSOeRiR3zlLD4vv8DJG2umg== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ5IGYCYgOONTJRd5Id/oOAvLIDjL9WSIcvXQ/B91hz dDmDhbKDClvjVOfryQ4fFq1XONuh7LCnZLIEy6ZkB4mpVzgzHqk6zDmisKFo RbJD/W+rgnMZmnD+j7evD1g668D5pjZ7g6Y16jtYbDlRtm8z1P54Q4j8jWSH LeY/DqV0GcHtvy70yfH8MgTfvunR8RmrEfzDbcvDT21C8Bff38c357CRg2PC 0wtKt5Md1J80zzt7ysjhim+SQMRNBD89DQiuIfgp1vf9e3cnO/D6r5+SqmHk cHqh67bPK4Hyb3n3Gfw0cFg6G+jAWckOLSAFT/Uh5k9PdhDp8XrFckUXzof5 F8Zn4eySTz6nBbEPqP8MCPRoOHSAFKxKdvj7rfTBnEI1h2SBCMste5IdQMrS 1FTg7gOHz3sluPthfJj/YHyU+PuH4MPiFwB3VOwU "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYCYotOx4SnCikOM0HgpKHDBaXbP+v0UhwMtFYK Xzhi6HBEYUNRhmmKg/jUK5wZhwwdfgQ/XjrbIsXhPwisR/Drf1sVnOtA8GtB /ApDB0btdrGbZikOpw87rc38Z+Cwp2SyBAuQ38hytN/wuoHDh+XHvM0VUxxq Pm0IyL6l6QB2jwzUfHsNBwYQkIGar6HhMAfkIIEUh/NXw97oS2s4aBhyrJFh S3E4AwI8GhDzWFMc3hRvFf3dre4QYbnlRBkfgg/2pybUvzPVHZIEgCpcEPKn Frpu++yL4HcAnXPBD2G+DtA75+wR9juYxu3yBPrX7+LEmH/KGvDwAoefC4L/ KEJ8+8UFCP7k9taoy3s0HFjC+HQ3AfmPExdeM3mvAQ8fM5u9QdMYNR3OfQcG qH+Kw+L7+/jmBBtC1AemOICMY1hn6HCibN98qeAUB/W3vPsMdho6pIFAHCK+ eqbnCTVnIOL3ii/Qx5kpDtxuqqVMXEYOM4DSB9LQ+F4pDsYgwGzkAPS90m1X BL/Aluv6YgcEHxjanY4mKQ7eJ9htZ7MaOYC0n1JEmIeevgBTyQZ/ "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ5IGYC4h/Bj5fOPpPi8OPt6wOWzjoOMH4Dy9F+w+26 Dld8kwQiTqY4bHdoenT8h76DRadjwtMdKQ7cbqqlTFyGDjcWF9hyLU9x6A8u UZmub+RwCaS+N8VB/UnzvLOnjBzSQKALwQeb34Hgc6yRiUppT3Ho9nrFYnIQ wT/ctjz81CYE3x5o/YzVCP51oU+O55cZOUyRYAnjA9q3US9vMWONkcOflR8v +a6Cuqff0GHu++XHvHenOOyvlbVIFzGA82H+hfEDbknXJAppOhzzNu903JDi sMX8x6GUU6oQ+e4Uhweu8Y6zCpXh9nusObqcwQLBXyukw5euh+D/BwF5BN8Y BJiV4f4Hy79XgocPjA8LPxj/SsVLNcMVKQ6Z+R9aT5qoOOQJNR84tTPFwQhk 3mQ1iP9PQtXP14DH359vpQ/mbNRyQI9fAMMv6bc= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYCYh4m7Xaxm8kOxiCwWcLhwKmFrtvuI/h7SiZL sDxKdqi4/+OWMbe0w8dLvkkCT5IdQt5e/jgjUcZBZ9Pc98ufJTs8cI13nBUo C9cfoRohc+6OrMNMELia7CC/a8G+VD05h5znv1d+PIXgnwYq/7wXwf8R/Hjp 7BXJDge69zWZPJZxmHNEYUPRDIT9YPmOZIedwVYR/90lIebXJjusFdLhS68T hfPbFdhVz2wRhPNjQO6p4XH4qhHTf6gz2aFwecmGf+c5HM6AwAIEX/n2z7qs DQg+9/XFBbb7kh3+g4A9l4OGIccamXNQfj2vA3vjVOfuO8kOs0H2WApA1N+C ht9nAYcb574HPwb6/8u+j1vTpwk4/L1S8VLtYLLDdd7bYqnbeB0WSOnfVdmG cB84fNcg+EDTc57PRvBTrO/7905OdpDZKDafKYEfzlf/pPJyVqcQnK8ACs88 MYceUIDPhYWvlAMots+tTob4u0faIeHpBaXbG5MdAkDxqSjjcAfo/T07kh1q QOGdLePAEsanu+kggr90NjBCziH4sPTzpi2322i3NJy/BhQf96Qc0NMXAHHd IVA= "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYC4lA+3U1zz6c6pIHAM3aHmP5DXzW2pDrcd413 nGUo4MB1fXGB7apUhzdtud1G1UIODqZxuzwXQNUfE4PwZ6Q6tCuwq54xkXLo nZ4n1Dwl1aEFxL8iC+ev/Pay4swHBThf+dqjYIY3SnD9U9pboy7PUXFIsb7v 3zs/1SEhJEh9gaaagy3IAStTHfwuToz5p6zhYLHlRNm+zakOv96+PmDprOkA cz9Yvae2gwHHGpmoE6kO9b+tCs690HZIEoiw3AJ0r8y8OM3TGzQdpkiwhPFN THUws9kbNC1RwwHo25j+plSHGRP4q8y41RwKQBZWpDoE3pKuSSxScThwaqHr tmKo+w8oofKB/oHxdwRbRfw/LuPwYfkxb/PaVIcv+z5uTf8mDvFPf6rDGRBY I+xg0emY8HQOLDwFHHiYtNvFgP6LUY2QOWfDC3c/JD5YHdDjBwASBLx0 "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQrXT7Z11WRJpDtGqEzDkZSYcLIIGwNAeFXQv2pfKJ Osx9v/yYd36ag4kxCGDyj3mbdzqWIPgLpPTvqpQh+AdOLXTdVp/mkAYCaqIO c44obCiagDAfxo8B2V8j5jATBBrTHFoV2FXPTBGDyFekOYS8vfxxxkIxhy9/ r1S8BJp/sHtfkwmzOJwP1hcpicrnVITzDbRWCl9oUYHw09Ic5ixS3vnnuKqD ziagj6wQfK7riwtstRD8uF2ePEzSMP2qDr3T84SaedIcdjg0PTr+QwXi/x+p Dj4n2G1nmyL4HxatVzi7Qslhwtsae1OmNIfyw9tcZ9YqOTgmPL2gxJ7mUHn/ xy1ja2UInx/mfhWHnOe/V34UQrgXbJ8Kgm/AsUYmygPBV2FrnOocnubQaeO5 K22RsgMsPvljA+4blStC/GeECI8ZQOMO/Et1WPntZcWZAgUHYOx8/vsi1UGk clLJ2SVycP56IR2+9DopOB8cf8fEIO77lerAAAILRBymSLCE8Ummwfl8ukAL 5RF8SLynQcw/IuLAw6TdLqaZ5hAEik9GUQf09AcAJhwXOA== "], {{ 178.76299999999998`, 6.778130000000001}, {178.41699999999997`, 6.289059999999999}, {177.66599999999997`, 5.835939999999999}, { 177.2, 5.835939999999999}, {176.72299999999998`, 5.835939999999999}, {176.30599999999998`, 6.27813}, { 176.30599999999998`, 6.790629999999999}, {176.30599999999998`, 7.231249999999999}, {176.545, 7.64844}, {176.90300000000002`, 7.874999999999999}, {177.2, 8.053130000000001}, {177.856, 8.22031}, {178.76299999999998`, 8.35156}, {178.76299999999998`, 6.778130000000001}}}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 182.378, 6.623440000000001}, {182.01999999999998`, 6.623440000000001}, {181.69799999999998`, 6.289059999999999}, { 181.69799999999998`, 5.9312499999999995`}, {181.69799999999998`, 5.57344}, {182.01999999999998`, 5.2406299999999995`}, { 182.36599999999999`, 5.2406299999999995`}, {182.748, 5.2406299999999995`}, {183.08100000000002`, 5.5625}, { 183.08100000000002`, 5.9312499999999995`}, {183.08100000000002`, 6.289059999999999}, {182.748, 6.623440000000001}, {182.378, 6.623440000000001}}}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4gJbruuL96Q7nNi1o5dtg6pDxsS3NfY70x3m LFLe+ee4qkOeUPOBU0uhfHdVh1MLXbd9npjuEHhLuibxk4rDV42Y/kO16Q4b VJ80zzuL4P98+/qApbKKwxKQBd0I/omyffOlZiP4YPvnpDt4rDm6nOGHMpy/ N7/m7cxUJThfpHJSyVkWWTjfHaxe2mHu++XHvKenOxzo3tdksljK4YLS7Z91 fekO6p9UXs7qlITY35zu0KrArnrGRMLh3Pfgx0vL0x00wPLiDnd+1mXtyUDw OdbIRKVEI/hJAhGWWwLSHfoiuv0ZBSQcbO779073gtkv4RCZYn3f3zXd4U1b brfRbkmIvFO6QzvYPmk4X37Xgn2pfrJwPiy8HROeXlCyR4T3AVAAayPCe6pz d85zcUR4g93PjAhvGB8WnuD4EkTwp0iwhPEpIviHQBGkhAhvGB8W3jD+jmCr iP/HZeD8B67xjrMKJR2Asad/VyXd4cu+j1vTv4nD3ZsGAsfEHLL2lEyWMEl3 cAOZHyEK9y8DCCwQcTAABXAEEv+uCltjJoIPjo+KdIeq+z9uGXuLOtxYDIxA YPzFqEbInKsRg8c/zD0wPix+jnmbdzoC+WdAwEccnt4UQOHPJwpRvyXdwcQY BEQh4bMVwZ8BCsBdCD7YPwdw84Gp40TZLYT5MD7MvR2gCD6V7hDy9vLHGQvF IPGzN91hJgjshPoHmP8OgtIvszic3wP2j5QDev4EACT/mEU= "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 192.57799999999997`, 6.623440000000001}, {192.22, 6.623440000000001}, {191.89800000000002`, 6.289059999999999}, { 191.89800000000002`, 5.9312499999999995`}, {191.89800000000002`, 5.57344}, {192.22, 5.2406299999999995`}, {192.56599999999997`, 5.2406299999999995`}, {192.94799999999998`, 5.2406299999999995`}, {193.28099999999998`, 5.5625}, { 193.28099999999998`, 5.9312499999999995`}, {193.28099999999998`, 6.289059999999999}, {192.94799999999998`, 6.623440000000001}, { 192.57799999999997`, 6.623440000000001}}}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYCYp1Nc98vD8twSAOBZ6wOGjH9h74WZDjMmQkE kjwOHy/5JgnUZDjEqEbInLPhd1hcYMt1vT3DoVWBXfXMF0EHx4SnF5TmQ/lT xByAujViVkPVy8jA+dX3f9wyfq0A56/89rLizAEliL3LMhwCb0nXJBapOMw+ orChaE6Gw4wJ/FVm3GoOpxa6bvvcm+Fw/mrYG/1oDYeSyRIsYXUZDtNB8qs1 HWDur/9tVXDuhbYD+xqZqBT/DIeEkCD1BZ7aDipsjVOdszMcJre3Rl220XRY fszbvLM0w+HUYae1mXIaDifK9s2Xqoeq11RzWApyQFuGwxSQ+jkqDiDn9ndl OChfexTM8EYJzge7/4MCnN8C8v8VWbj+dhDfRArCr4OG7zExhzMgUJLh8KYt t9uoWsiBUbtd7GZWhsN913jHWYYCcPdD4oPdAT1+AIksvW8= "]]}, Thickness[0.0050238633509168545`]]}, { ImageSize -> {398.0929912826899, 39.52181320049813}, ImageSize -> {199.04649564134496`, 19.760906600249065`}, BaselinePosition -> Scaled[0.26821463664500295`], ImageSize -> {200., 20.}, PlotRange -> {{0., 199.05}, {0., 19.759999999999998`}}, AspectRatio -> Automatic}], None}, { Graphics[{ Thickness[0.006683151774376796], Style[{ FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld AKjmAn0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJfIGYC4hkzQYDHYc4i5Z1/nms6fN33cWv6NX6H7Q5N j45LaDmApSMFHWTmxWmeNoDyfwrB+Qq7FuxLfScO5z9wjXectVHK4XXxVtHf 3Jpwfguv//oprOpwvmiP1yuWKyoOHmuOLmewEIeIFyo79Ed0+zNuEITzYfbD +NX3f9wyfi0A558BAR8BiDkVyg7ClZNKzrIIOKwV0uFL11N2UP+k8nJWp4BD OKdYu/F9JQd5kHvXCTjwxwbcNzqu5BD89vLHGY6CDu5g/UoQ894IOqSnAYGY EsQeQSGH8sPbXGf+VYSYWyfkcEdTds3/zYoOIiD7XKQdQkDmLBSHmN8n7cAA Ag7iEHNvSEP03RNz+A8C8jIOGmB3iTl8AYV3mYzDm7bcbiNpMYc1IHX7ZCDu WCPqAI4fS1lIOPOJQtXLO5gYg4Cow32Q+z4i+MrXHgUz2CjA+d02nrvSinDz wdRnRbj5MH6MaoTMuRoxiD8MFKH+E4P445yCQw04HqD8OgVIPO0Ud6gCiWuL QdzxRgni3msSDiu/vaw446AMsVdYChJ+zcoOKaBwXibtIAVKPwIqDgEgexTl HAJvSdckflKB+/fn29cHLJXV4HxwempVh/OfJC68ZnJeEx6+kPSrDZE3E4Pz wfYXi8L5YP818EHimw2Tv/zW8seGztxwvl2JY+1pGQ6cfK+t/seT277aw8yH 8c1t9gZNS9RyuPL72PV5kX/tj+/a0csWoOVQuLxkwz9+ZofnWdrfpttqQdMF M9Q8BH+z+Y9DKVoacD4k/KXg/B3BVhH/1cXh5oG0px0Tg9sHiz9IvH+xh8Uv jA+L/5ypCYUWxf/twfrVROHmwdJLs3gtayYbB5y/1WuDxZyfPHB+qwK76hkT AQeYfkh+FIanLxgfZj843e8WgKcv3yeel0yFeeHuh5VPMP/B+DD/o5dfANnI +aI= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQPWMmEOzUdIhWjZA5JyPpcP5q2Bv92ZoOCrsW7Evl E3WYs0h55x91bQcTYxDA5LewHO03LEfwfU6w286eiuCzcHbJJ+vpOKSBgJqo Q82nDQHZVrpw82H8GJD9NWIOZ0DAR8ehVYFd9cwUMYj8Lm2HkLeXP85YKOZg brM3aNpCbYeD3fuaTJjF4XyQN2ZGSqLyORXhfAOtlcIXWlSgfC2IP46rOrzI 0v42/a46nN8I8s91NTj/19vXBywfq0L1qzpcAIXPbxWHHQ5Nj47/UHEQiA24 b7RdGeJvUwT/w6L1CmdXKDnoKMp/yQlTcSg/vM11Zq2SQwuv//opS1UcKu// uGVsrQzhq6pC3a/iIDH1CmdGkircvWD7qtXg/O0ge3dowPnu+2tlLZZrOnTa eO5KW6TsAItPfpA7yhUh/otVh4eH7PIXHnryKg4rv72sOFOg4ACOpsNKDiKV k0rOLpGD89cL6fCl10nB+eD4Oybm0A2y55GyAwMILBBx8L04MebfYVU4P/CW dE2ikRqcD7Z3phrE/CMiEHcfUXMIAsUno6gDevoDAAZuBUQ= "], {{ 12.862499999999997`, 6.778130000000001}, {12.517199999999997`, 6.289059999999999}, {11.7656, 5.835939999999999}, { 11.299999999999999`, 5.835939999999999}, {10.8234, 5.835939999999999}, {10.406300000000002`, 6.27813}, { 10.406300000000002`, 6.790629999999999}, {10.406300000000002`, 7.231249999999999}, {10.645299999999999`, 7.64844}, {11.0031, 7.874999999999999}, {11.299999999999999`, 8.053130000000001}, { 11.956299999999999`, 8.22031}, {12.862499999999997`, 8.35156}, {12.862499999999997`, 6.778130000000001}}}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { 0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQrfGWd5/BS2MHA62VwhdYVB1OH3Zam2ln7NDIcrTf cLqqQ/1vq4JzL4wc5ixS3vnnuKpDpPj2iwx1CL5906PjM7QRfPGpVzgzHhk6 /Hz7+oDlYlWH9DQgmGboINrj9YolRNVhJgh0GjhcuBr2Rt9axaEBZM92fYc7 mrJr/jcrO/icYLedfVXPIRWk75ginP8fBOrl4fz+iG5/xg3SDjWfNgRkV+k7 qH9SeTmrU8LhYNvy8FNBBg4hby9/nLFQzGGL+Y9DKbsMHBhAwEHUgdtNtZTJ yxDCXyDiULCm+3aGgBGcb1sZscLUF8FffH8f35zJRg4PXOMdZ10UcTgMMn+R kUMQyHxGUYh7vhpD5AslIf59ZuygsGvBvlQ+UQdHUPhUmziAhNPURB1iFBw/ Jq8xcTAxBgFRB1CwmFxE8MHh8xLBP1Ara5EuYorKDzGFmwdWn2nq8KYtt9tI WtThhtAnx/PL0PjPTOHugfFjVCNkztVAwyfKFB5eh0D++2QCMXenGNw9faDw FhCH83vAfCk4PyX2jhvzDm2HCFD6OGcCTTfaEHEPE4cHIIkGbYg/Hhs7HN+1 o5ctQNth+QsPvf8fjSDhxobgb9DLW8wYo+VwBgTmGMP5/hcnxvy7jODD0u92 B2BASyD4ZjZ7g6Ylajqgp28AjAE3Kg== "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrfGWd5/BS2OHGNUImXN75B1g/APd+5pMFss4mBgD wWNjB/VPKi9naco4ODY9Oj5jt7FDT0S3P6OAtMPXnbe6/qYaO4CUGV+WcChY 030744KRg9uao8sZIsQdur1esZg4Ivj7a2Ut0k0MUfklBg7paSAgDefPBIFO BTi/08ZzV5qSMsR9koYODb+tCs6tUHGwB7lH2wjO7w8uUZk+H8EHmyNpDKEj VRwOgMxrMXYQiA24b3Rc2cFAa6XwhSPGDg9c4x1nFSrD/Y9i30uo/EclB/Tw AgAyuIMf "]}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQAWIQvcX8x6GULguHE7t29LJtUHV4krjwmkm+hcOcRco7 /xxXdVhyfx/fnMvmEL67qoOB1krhCybmDoG3pGsSP6k4HGxbHn5qkpnDBtUn zfPOIvg/374+YKms4uB3cWLMP2ZzOD9SfPtFhjoEn8dNtZSpy9zBY83R5Qw/ lOH8vfk1b2emKsH5PRHd/owCUnB+H5gv7tDj9YrFpNHcYSYI7BRz0HjLu89A 0twh5O3ljzMWijmcAYEeM4cY1QiZczUIvsKuBftS+UQh7tln7mBiDAKYfHD4 cFnA+deFPjmeD8PN/7QhIHtWuyXcfBgfZr9j06PjM35bwN23GBS+ky3g7ofF B8x/MD7M/+jxBQACjLzO "], {{23.9922, 13.4891}, {23.6344, 13.4891}, {23.325000000000003`, 13.179699999999997`}, { 23.325000000000003`, 12.821899999999998`}, { 23.325000000000003`, 12.4766}, {23.6344, 12.165599999999998`}, {23.981299999999997`, 12.165599999999998`}, {24.326599999999996`, 12.165599999999998`}, {24.6484, 12.4766}, {24.6484, 12.821899999999998`}, {24.6484, 13.1563}, {24.326599999999996`, 13.4891}, {23.9922, 13.4891}}}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4qUvPPT+b7R3OLFrRy/bBlWHq0KfHM9Ps3eY s0h555/jqg5TJ/BXmf22g/DdVR1iFBw/JsfYOQTekq5J/KTioPKked7ZXbYO G1RBDAT/59vXByyVVRzsmx4dn6FtB+f7nGC3nb0UwYfYb+fgsebocoYfynD+ 3vyatzNTleB8kcpJJWdZZOF8d7B6aYd6lqP9hu12Dge69zWZLJZykJgXp3na wc5B/ZPKy1mdkhD7X9s6tCqwq54xkXDgcFMtZeqyddAAy4s7HGhbHn5KCMFP ib3jxrzCBs4Xn3qFMyPIxqEvotufUUDC4c+30gdzFG2g9ks4NIDs/27t8KYt t9totyRE/qG1QzvYPmk4X37Xgn2pfrJwPiy8v+y81fX3qDU8vLeY/ziUomUN D+8NenmLGXus4OHNA3L/K0t4eMP4sPCcDoqvaCs4/wZQm9FVBL/H6xWLyUMr eHjD+LDwhvF3BFtF/D8uA+c/cI13nFUo6bDk/j6+OZ+tHL7s+7g1/Zs43L1p IHBMzOF5lva36bnWDm4g8yNE4f5lAIEFIg79wSUq0/tt4Pza31YF5yRs4Xxw fEyydai6/+OWsbcoxP1PbR1iVCNkztWIweMf5h4YHxY/JVtFf59eZ+dwBgR8 xOHpTQEU/nyiEPWF9g4mxiAANb8UwT8Csn8Rgv8U5J+zuPnm147mmgQ4wM2H 8WHunQkCgg4OIW8vf5yxUAySn3bbQ8R3wvxj73AQlH6ZxeH8HrB/pBzQ8ycA wBWfgQ== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJTIGYC4vk2Oldm7XNwEKmcVHKWRcYBxn/TlttttFvC YfkLD73/Ox0czoCAj7iDvOPH5DNroepTRB1uStckGv11cGhVYFc9M0XEwVW1 lGmWhaPDWiEdvnQ7EYfiraK/T9ch+GDz3Zzg/Cnf2OJnXHGC6heH80PeXv44 w1EGzo9RjZA5t0cWYt4xJ4cWkPorcg4X8+PZz610clD/pPJy1kl5h/v7+OYY Nzk5nAW5t0bB4bim1aTT/k4OqWlAcEzBYSYInIS6R0/RYX+trEW6j6PDfxDo V3QwBgFlR4g6TiU4v9PGc1eakjKcL9rj9YolRAXi3whHh1OHndZm/lOBhM9W BH+jXt5iRhknOB/s3kwnh4bfVgXnNBB85wnNQmlcynB++eFtrjNrlSD+n4Lg R4hvv8gwzcmBAQQeKDt83hCQPWu6k0PgLWBEFKk4tC8PP2U0x8nhSeLCayb6 qhD3ejs5vMjS/jZ9rirEvyJODnMWKe/8c1wV4t6rjnA+OJ5VEHwe//VTUnc4 OKTE3nFjrlCB88HmBivB+bDwBKeXm1B+nIKD+bWjuSYKjtD4k3dIOHxZO9XT ERJfmtD4muUIiZ80OYh+RieH3ohuf8YNsvD08mXfx63pZrIO9k2Pjs9IhqYX Exk4Px2sXwrONwG577K4w85bXX9TxZ0cDnbvazJhFnP4HZN79N8qRzjfAaTe GsEHh88bBweFXQv2pa4Th/N7QO4RkILz0fMLjA8ARH1dVg== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKH0xP579nKabw5xFyjv/HFd1+BOTe/SflyucX/fb quDcBhcHYxAIVobzz4BAjzyq/GUJB1fVUqZZFq4Oa4V0+NLtRByEPjmeT/uL 4PP6r5+S+sINzre4djTXZIK7w0wQiJSE8/+DgL0CnO+x5uhyhgplB9UnzfPO /kK4F939ehMW/DDkc3M4ddhpbeY/FYc3vPsMZs5C8CWmXuHMYHJ3UL72KJhh jhKcH6MaIXNujxyczwACDpIOU76xxc/Y4ubwwDXecdZFUYeQEpXp/y0Q/BzO nwvSF7vC+SVbRX+ftnN1SE8DASk4f29+zduZUxXgfLD6QmWIPR2ucPehux8A KqeyWQ== "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzFDMAOUz4BEnlU2MOchqSFVPLbcRYyYA kW8CJQ== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJdIGYCYh7/9VNST3g6/PlW+mDORm0H82tHc01WeDpI TL3CmfFI2yFCfPtFhmmeDhn5H1pPftF2uL+Pb45xE4Lf4/WKxSQQwa+MWGF6 VtrT4QwI9Gg7iIPM+eUBlddyuJQfz35uoYeDmc3eoGmJmg7eJ9htZ5d6OCTH 3nFjnqEBkU/0cGjhBTqsVR3OD7wlXZP4SRWNr+IAdv8PdwcfkDmmCH4Ep1i7 8XpluHqB2ID7RscR/J6Ibn9GASk4vw/MF3e4CTTWKNbDYSYI7BRz6Ab5T9PD IeTt5Y8zFoo5/IrJPfrvkbtDjGqEzLkaBF9h14J9qXyiDg5Nj47PqPZwMDEG AUw+zP8w/n8QOI6b76ZayjQrwRNuPowPsx8cvlKecPelgcAzhPuXv/DQ+/8Q 4T8YH+Z/GB8WPk8SF14zme8J518AuXelp8OMCfxVZtyqcPWw8Ifxd4A8+kMN zm9gOdpvuF3TQd7xY/KZrx4O5uD41oKkCx9POB+cvsoQ/MTDl7VTJ3pC9JtD 5bd5ws2DpdcNenmLGe8g+LD0CwDgWzYJ "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, { 0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYp8T7Lazr3o7iFROKjm7RdkBxpfftWBf6jpJ OH9HsFXEf3Uxh+OaVpNOs/s4MIDAAhEHkU+O59NqEXwe//VTUhcg+CyLJ1kx HvVxWCukw5d+T8RBd8KCH4bnfBxMjEFA1GHHra6/qeK+DjNBYKe4g0PTo+Mz mH0d1D+pvJzVKQEx/y5Mv7jDXBudK7OO+TiEvL38ccZCcYcZIH0rEXyw+XkI Ptj9oT4OX/Z93Jo+TQLOr7n/45bxayk4H+b/kBKV6f8lfOH8kq2iv0+r+Tqc Ouy0NvOfCkL/pw0B2bcQfDObvUHTDqrC+RJTr3BmHFJzuLuPb45xlI/Diyzt b9PnqjukpoGAj4OB1krhCyqaDu3Lw08Zhfg4zFmkvPNPuqbDF6Cxs/R9HF4X Ay3m1nS4kB/Pfo7Rx2Fye2vU5T0aDuIgcy95O/wHgXoNhzXdtzMYrns71P22 Kjh3Qt3BRbWUadYNb4eM/A+tJ0MQfIj9anB+4C3pmsRPKpDwS/R2mAIyXwbB PwMCcxDpARYeAPk58ZA= "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjEcakhVT2p5tDTLlLNBADS cwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYCYnnHj8lnbH0dNujlLWaM0XLI4fy5IH0ygl+y VfT36XUIfsLhy9qpO30dtjs0PTougeCb2ewNmpaoCef3RHT7MwpIwfl9YL64 wxkQ2OLrMBMEdoo5hJSoTP/f4OsQ8vbyxxkLxRz218papNv4OsSoRsicq0Hw FXYt2JfKJ+rQujz8lNESX4c0EFATdRD45Hg+7ayvg4kxCIg6zACZ+xPBB/tP 1Q/OX9N9O4PB3w+uH+y/bX5w82F8mP1LX3jo/S/0g7tPZ8KCH4Z2fnD3g+2z 9IP7D8aH+R/GTwfZJ6YE539YtF7hrIayQypIfJ6fg2iP1yuWEBVI+P9G8MHq E/3hfHD4LfF36LTx3JWmpAzng2kfRTgf5p8X29czP2cIgPt/a0vNhc2MCD7I us18CP53tvgZPpK4+ZHi2y8y+AXAzYfxYeEFNk8vAB5eYPeIBMDDqznQc26D UIDDwe59TSbM4nA+LLxgfLD/FinC+a+KgRGTrQJJLxf8HeYsUt7557iqgy4o PtQQfJ8T7Laz3/qh8s/6ObzI0v42fS6Uv9bP4Uniwmsm+qrw+AC7c44ynJ8S e8eNeYc2JN3r+DnU/7YqOPdCG0r7OjyIAHq8QRsSf9t8HY7v2tHLFqDtAMtP 4PhmQ/Bh+QcAk4tu3g== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvab7dgbD8kAH9U8qL2d1Sjjkx7Ofk5wb6HCwe1+T CbOkQ/vy8FNGOYEOJsYgIO7A+XNB+uaoQIc0EDgm5mCtc2XWM0sEf/EkK0Zf DgRf3CPgj8T9AIcdwVYR/9UlHLa21FzYfDLAYb2QDl96nZSDv5xYlu/uAIf7 rvGOswRlIOZtDXBIBRsg67C/VtYifUuAw978mrczRRUcKiNWmJ5VDoTzwfIR CH631ysWk8pAB/c1R5czaCg42IDMWxvo4DyhWSgtS8HhLe8+g5nrAh3+g8B+ BYedt7r+pq4PdOCPDbhv9B3BX/ntZcUZB0U4fy3Ivf+UHSYs+GH4rCzQYc4i 5Z1/jqs61K7bllSviOB/Z4uf4cOK4IPd9wTof4emR8crVCHuOxoACZ9nKg5v QO5pC3AQANl/XNlB+JPj+bTcAIczIOCjBOeLVE4qObtEHs4/AIqfxTIOL7av Z35eEeDQE9HtzyggBXFPb4ADAwg4SED8uTrAYSYI7BSFxwfYP3YikPiSCITz 3VVLmWaZIPhgdwQEQsxbIOIg/fqRmVRBoEOMaoTMuRpRhw0PX07d1AJLL2IQ /pRAh5C3lz/OWCjmEJt79N+m6YEONfd/3DJ+LeaAnt4AIzMVoA== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQff1orklDdqADf2zAfaPvCg6VEStMzzoHOlTf/3HL +LWCQ+26bUn1hoEOwpWTSs4+UXCIEN9+kUEMwe9f8MPw2acAOF/cI+CPxP0A uH5rnSuznm0NcJgJApyKcL77mqPLGTSUHIJLVKb/3xHgsFZIhy99nRLEvEMB DuWHt7nO9FWG8C9B9UeqOMTmHv236XOAw6nDTmsz/6k4LJ5kxegrEQjnw9wL 439ni5/h4xro8CRx4TWT9SoQ9wUHOmwx/3EohUvF4bGI7MmnyYEOK7+9rDjj oOzQ7fWKxSQz0OE/CPQrOaCHDwBOxI/G "]}], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCwBmIQ7VndrO8jFOJwBgTmKDsIfXI8n6Ya4tDIcrTfcLqK QxoIKIU4MIDAAxWHCPHtFxm2BTvMWaS8889xFQcFx4/JZ2YGO5w67LQ2s07V wRtkXh1MXtUhpERl+v8IBH/nra6/qeYIvrbVpNP1AsEOgbekaxKLVB16vF6x mHwMgtvXHOg5t+FYkMOU9taoyzIqDvtrZS3SNwQ5PHCNd5z1UQnOLz+8zXVm rSKcb2AMBMXyDleP5po0XA5yEKmcVHKWRdbhsYjsyafcwQ4Huvc1mSyWcfi8 ISB71vkghzdtud1GuyUd/oPA8SCHgyB5ZkmH9uXhp4yOBDkIg/SnSMD5CrsW 7EtdJw7nu605upwhQszBRufKrGcXgxxaFdhVz0wRhbj/W5CDxieVl7NeikDU bwmChPcaIYfadduS6lcGOVTf/3HL2FvIQfVJ87yz84Ic0kHh3iYA58+ZCQSS fHD+i9rH2edzWB04fi5I3/wI6L8mmSkGl//Zg/3jHAzng9VvQ/BBxswUDHHY 5rXBYk4lhwOMfxbkHh4hOD9GNULmXI0oJP7eBDusFdLhS78n7vAFZP52BB/s flsEXx6UHkQRfHD4MwdD4qtQAs6HhTeMPx1kb6QUxH7OYEg83JeCmC8bDAmv N9KQ9KcU7KAOCk9NaPwpBzuEvL38cYajjMMb3n0GM9WCofEv43B/H98cY71g h1RwQpaBhJ8RzD4Zhxfb1zM/t0Dwt7bUXNgcieA/AOlvgpkv6yACyh8LgyHp aYmcQ2XECtOzh4Mh8Set4OCuWso060qwQzinWLsxvyKcD3KOcbASnA/2zxkl B3D+uwTlyyhD0seZYHh+RM+fAME7pIM= "], {{76.9609, 10.4859}, { 77.77190000000002, 10.4859}, {78.32030000000002, 9.817189999999998}, {78.32030000000002, 8.804689999999999}, { 78.32030000000002, 8.02969}, {77.81880000000001, 7.493750000000002}, {77.09219999999999, 7.493750000000002}, { 76.29379999999999, 7.493750000000002}, {75.7563, 8.112499999999997}, {75.7563, 9.031249999999998}, {75.7563, 9.94844}, {76.19839999999999, 10.4859}, {76.9609, 10.4859}}, {{ 77.52190000000002, 5.13281}, {78.86880000000002, 5.13281}, { 79.3328, 4.859380000000001}, {79.3328, 4.084379999999999}, { 79.3328, 3.05938}, {78.3906, 2.29531}, {77.13909999999998, 2.29531}, {76.10309999999998, 2.29531}, {75.38749999999999, 2.9046900000000004`}, {75.38749999999999, 3.7859399999999988`}, {75.38749999999999, 4.321879999999999}, { 75.69689999999999, 4.8109399999999996`}, {76.1734, 5.014060000000001}, {76.36559999999999, 5.10938}, { 76.69839999999999, 5.13281}, {77.52190000000002, 5.13281}}}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIZIGYCYq/qZn0fuxCHDXp5ixljtBwK4tnPSWYi+KpP muedLUPwZV4/MpOqCXHY7tD06LgEgm9mszdoWqImnN8T0e3PKCAF5/eB+eIO NjpXZj2rDHGYCQI7xRyeiMiefBof4hDy9vLHGQvFHM6AgE2IQ4xqhMy5GgRf YdeCfal8ohD3dYY4mBiDACa/bXn4KaM5CH6AnFiW73rc/GtHc00afiPMh/Fh 9mtaTTpdfwPhvqZAz7kN+xDuB9u3B+E/GB/mfxg/JfaOG/MObQehT47n07aG ONT/tio490LboTJihenZySEODyLEt19s0HZ4w7vPYGZViMPxXTt62QK0HWDx k54GBGwIPiw+AMfHsig= "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKL21pebC5oehDnMWKe/8c1zVwbO6Wd+nCMHv8XrF YqIa6mAMAsHKcP4ZEOiRR5W/LOFQEM9+TjIz1GGtkA5fup2Iw7WjuSYNpxH8 kBKV6f8dwuD8F9vXMz+fEuYwEwQiJeH8/yBgrwDne6w5upyhQtnhwT6+OcZe YXD3obv/iYjsyaeXQx1OHXZam/lPxeHIZe1USakwOD9SfPtFBr8wB+Vrj4IZ 5ijB+TGqETLn9sjB+Qwg4CDpIOER8EdCPczhgWu846yLog7f2OJn+LwMhfOb Aj3nNsxD8NuWh58yygl1SE8DASk4f29+zduZUxXgfLD6QmVIOE5AuBfd/QCe hrZb "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGJtIAaxQYAJSjNCxZiR+PjEcakhVT2p5gxm9ww2u4ix FwCf5QKP "], CompressedData[" 1:eJx11G1IU1EYB/DrC5ZB0tvmtGnq3ZWswEQJW314RCwTpSnj3rOwTGkahtkH i6iZkX1Kq2VEOlRUAv0wciiZGi1D7MW3CsNAI1eaoDbKQaJg2s5155wWeOB+ +H05z3n+9zknMq84y+jHcZyP+xPdn6/7u5F5rO56twhLzrmeg7wGhKny+qFR 5oWAnOr038yPqrQ+GYsipFr7mrlFnvp5sclZY4yirkQVx322hFLfkR0MKPjp B25BhBq8upSgnvt2IPSzCHrnyHx1oxL0JZqHq50iZAtIPWxijuhusBuDFOCw B9XG+0qQEI+XAvZoqwbK/JkP7/tomQ5h1oUrCzNimVWpumVVsgT5eEUrwPZ1 5kFbiUT3Jyb1jwgXfS16iZ4vcKmhoF0r0fP3lIYlFiRKtD9i0j9xAa6njKL+ 1dQaMbSbh2icd6EEisq0WX+9BmJwP9XMT26a3re/ZDbg/L5IMIiXmvd2eiQ1 qU9Mzpdd1LfSNs7OT/Yn/Tk32/fX1LP+iUk+5obFuOlZluf/luutMBfnbBgO 2YrW9XZX0rv8k4juT0zqp10tj03XInq+JjxPEYieX64Xjmh/xF79u03yJyb5 v8D/Q4dovhN4vq4xd43d+mNsZnbZdOcsvYjm72V3/sSkn96RvcYQF+v3Ls7r H0/uCHv7fZX5/Lbynv5Aw7puq/vZ/CrZQPcnJnmpT5w5NLHLQPN6VnJf5R9g YPPa35jS4Wdg8+oxnVePHSk5SZb5SGobfhgyPHl8QlDbxHctvxYAx5Jwj1l+ Ty4xy/meRhBafypmwCzARnx/shBM5TaOJsQK0IrvmwpBy8LM5UEzv/Z/OeR5 b4S1+++Q6H7y/bEyy++HmVm+T1ckWu8Cnrciidbzun8tPPWb7s7bATYBSh93 5JXFsf1+4Pnf5PFRAawV42e5SREyx3aacl0aIO+nnM8QM3kv/wKO2DxQ "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQXZ+1p2TygigH9U8qL2d1SjjIt74O3DEtyuFg974m E2ZJh+e/V368lBrlYGIMAuIO9qZxuzxDohzSQOCYmMObwB1yrcYIfgCQ+5oR wU8QiLDcciPSYUewVcR/dQkH8ZvnvgcfjnRYL6TDl14n5bC+KGPi2y2RDvdd 4x1nCco4lAC5NesjHVLBBsg6AF0nwbIu0mFvfs3bmaIKDj7mnY4JslFwvkt3 zvPfgQh+h2PC0wtFUQ7ua44uZ9BQcCgAmbc8ysF5QrNQWpaCw5WKl2qGK6Ic /oPAfgUHGf27Kmwroxz4YwPuG31H8Fd+e1lxxkERzl8Lcu8/ZYee6XlCzQVR DnMWKe/8c1zVwb8XKCCN4H/5C7ThXyScD3b/PaD/HZoeHa9QdeAHBseJfZGQ 8HmmAnFPQ6SDAMj+48oOTy8o3f6ZFulwBgR8lOB8kcpJJWeXyMP5B0Dxs1jG AcStK4p06Ino9mcUkHI4UbZvvlR7pAMDCDhIOAg0Hzi1cGmkw0wQ2CkKjw+w f+xEIPElGAXnT3hbY2+qh+DfB3nQKwpi3gIRhxpQAsiMcohRjZA5VyPq0AI0 3rUOll7EIPy+KIeQt5c/zlgo5vCgSmSd+8Qoh5r7P24ZvxZzQE9vAJHNFYw= "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQ3fI6cIdcapQDf2zAfaPvCg4+5p2OCbZRDtX3f9wy fq3g4N87PU9IO8pBuHJSydknCg7hfLqb5vIj+CLr3B9WvYmE8xMEIiy33IiE 6y/JmPi2Zn2kw0wQ4FSE893XHF3OoKHksOVE2b75myId1grp8KWvU4KYtyfS ofzwNteZvsoQ/hmo/kgVh4gU6/v+byMdTh12Wpv5T8UhYIdc62vBKDgf5l4Y /8vfKxUv7aIcniQuvGayXsXhhZohxxqfKIct5j8OpXCpOOjfVWFrjI1yWPnt ZcUZB2WHDseEpxeSohz+g0C/kgN6+AAAV1WNQg== "]}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGI1IAaxQYAJSjNCxZjR2DA5dDXI4rjYpKrHpZcY95DK ppabKTGTVHfiEgcA+NYCcw== "], CompressedData[" 1:eJxllGlIFVEUx91aMQv1Ta98mvV8u2aZGWHhX8peC6amlDl3zDUlcsFsEyly ydQ+WEm2mqZhQaSE5kKZRRtpognR8sFcokytrNCkoObO6AzVgfvhx9x77rn/ 8z+zMCZlS7y1hYWFJb828cuKX5l+yyObBljYzChYEJtshOub8UO7HAlWrLqz 5XS0Ec65gyENWoKaxckVlsSIx/uaL833JCgpmp3hY5K5OC83ouu2QeILl9WN vxIMSLydfkrpTrDEeM2ho1KPehc+oZ7Pp+nPLh3Wob9j0ZvxTyx0X90Gzhmc cMw/6l1HL4u3ATv8z3UyeJvheMPcw+IsjUZG/H6fhZ7uz2cwFNLgklvBwvHg yfRncQyOlyTbZ5excG0qa463U4jcwmLoaFKhl5NCfF8/C+9lNBTIpOm/yryX lj+FSHxdFRHnG0SkfFzTBlurWJnD43y7g+KJdD/d3u1HpPoUr9rHQk0EYcNd I2fKGfF+N4J7hc1Z3tZzJf7ePFKXMCqzg5BPKdajIRDK6VIiNfHEcKaOoIWe r5gn6plIUE31TNJLfIbqdVCPwJg54St3EyiOb/xo810vvieFwEforwFR/Ofa VILg106Z0ScN+HVt5HlgmtzPsdC+K+fTCdpo2BpRef6Ba00Bgao00tC6xIhg Xv7BswTvd5lGS1Ybsd7WypR3Q+bl+XzDvsi8f0C7dLojh3fR5S+8gwwSD+2p U/ws1Eks+MesEfv3cuL+C2p8rnq0aUW+zGF2HjcvJsg82Q/BL9vVoj9aCeJ3 0nAW+9pHQDThqnaVE9yo3ipO6qfg982c1P/qNF7wMO5vf3AyU3vbRMos6JnI QbhOO+Gf/XJ+Kg9z5H9ed/1hlUU4g9on/ADFcMh1naZpK2Yw12arnUcEN+EP RpyntRzMdP8PJcw9/IDUE6wpyrbfOVMNYZ57COZwwd1eZjXc8xjegQRXRwcO tBWpxTodOPRT/T3dkE795DfJGnF+t3FwqfqwfvFhrcTCuW86iX8LYUBOy9Py AC2HnFlB1cUak+i7ToJ6ZPU+VprE9+8gSKB6TDXhLr/9VqjMgn7rZBb6P8RK 5//9P/0BW4HvQw== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYCYoHmA6cWusY7pIHAM3YH2dbXgTv44h3uu8Y7 zjIUcKgRWef+8Fecw5u23G6jaiGHJxeUbv98FgdRf0wMwr8W59CuwK56xkTK oWGqc3fO+TiHFhD/iiycv/Lby4ozHxTgfOVrj4IZ3ijB9U9pb426PEfFQfeu Clvj0ziHhJAg9QWaag4PqoAO+Bnn4HdxYsw/ZQ2H6+e+Bz/mjXf49fb1AUtn TQeY+8HqPbUdjpftmy9lHu9Q/9uq4NwLbQeddrGb557HOcjMi9M8vUHToWd6 nlDziTgHM5u9QdMSNRzeBO6Qa10d5zBjAn+VGbeag/tDoIXT4xwCb0nXJBap ODz9vfLjpV6o+w8oofKB/oHxdwRbRfw/LuPgsu3z3ysL4hy+7Pu4Nf2bOMQ/ R+MczoDAGmGHKxUv1QwfwMJTwKE2a0/J5B9xDjGqETLnbHjh7ofEB6sDevwA AIiTz1k= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQHcqnu2mudoJDtGqEzDkZSQfmMKCAZoKDwq4F+1L5 RB0uKN3+WeeU4GBiDAKY/J91WXtK3BH8y75JAhGeCP7nv1cqXgYlOKSBgJqo w/nvwY+XJiPMh/FjQPbXiDmcAYGQBIdWBXbVM1PEIPLeCQ4hby9/nLFQzEHd kGONjFeCw8HufU0mzOJw/kwQiJRE5XMqwvkGWiuFL7SoQPhWCQ5zFinv/HNc 1SH+KdBHvAh+jcg694e/4uF8FaB3s+7EQ/WrOjRMde7O2R/vsMOh6dHxHyoO X0D+mxbv4HOC3Xa2KYL/YdF6hbMrlBzaHROeXlgV71B+eJvrzFolhxdqQAds iXeovP/jlrG1MoR/JB7qfhUHe9O4XZ5n4uHuBdv3HsFPtr7v3yuN8E+45ZYT ZVoJDp02nrvSFik7wOKTPzbgvlG5IsR/rIjwmAI07vnieIeV315WnClQcFjx 8ZJvUkW8g0jlpJKzS+Tg/PVCOnzpdVJwPjj+jolB3Dcn3oEBBBaIOPRMzxNq voHgtxw4tdD1GYIPTgefoeYfEXGoBSaXyT/iHYJA8cko6oCe/gBIeg9R "], {{ 129.36299999999997`, 6.778130000000001}, {129.01699999999997`, 6.289059999999999}, {128.26599999999996`, 5.835939999999999}, { 127.80000000000001`, 5.835939999999999}, {127.32299999999998`, 5.835939999999999}, {126.906, 6.27813}, {126.906, 6.790629999999999}, {126.906, 7.231249999999999}, { 127.14499999999998`, 7.64844}, {127.50299999999999`, 7.874999999999999}, {127.80000000000001`, 8.053130000000001}, { 128.456, 8.22031}, {129.36299999999997`, 8.35156}, { 129.36299999999997`, 6.778130000000001}}}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 132.97799999999998`, 6.623440000000001}, {132.61999999999998`, 6.623440000000001}, {132.29799999999997`, 6.289059999999999}, { 132.29799999999997`, 5.9312499999999995`}, {132.29799999999997`, 5.57344}, {132.61999999999998`, 5.2406299999999995`}, { 132.96599999999998`, 5.2406299999999995`}, {133.34799999999998`, 5.2406299999999995`}, {133.681, 5.5625}, {133.681, 5.9312499999999995`}, {133.681, 6.289059999999999}, { 133.34799999999998`, 6.623440000000001}, {132.97799999999998`, 6.623440000000001}}}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4sUFtlzX+xMdTuza0cu2QdVh9hGFDUU9iQ5z Finv/HNc1WGh67bPfyugfHdVh79XKl6qpSY6BN6Srkn8pOKgEdN/6GtAosMG 1SfN884i+D/fvj5gqazicB1kQTyC/3vlx0u+eQg+2P78RAePNUeXM/xQhvP3 5te8nZmqBOeLVE4qOcsiC+e7g9VLO1xQuv2zLivR4UD3viaTxVIOzGF8upsS Ex3UP6m8nNUpCbE/PNGhVYFd9YyJhAOjdrvYTa9EBw2wvLgDv+6mue+tEXzr +/690/UQ/KnO3TnPlRMd+iK6/RkFJBzyhZoPnJKF2S/h0DM9T6hZItHhTVtu t9FuSYi8aKJDO9g+aThffteCfal+snA+LLxLJkuwhAkhwvszKID/JcDD+0TZ vvlSrxPg4Q12/7UEeHjD+LDwBMfXEwT/uLd5p+MXBP8rOIIS4OEN48PCG8bf EWwV8f+4DJz/wDXecVahpAMw9pIEfiQ4fNn3cWv6N3G4e9NA4JiYw9z3y495 syc6uIHMjxCF+5cBBBaIOCSDAlgbiS8QYbnFBsEHx4d3okPV/R+3jL1FHbhB ERiW6BCjGiFzrkYMHv8w98D4sPgBJoY9JUD+GRDwEYenNwVQ+POJQtS3JzqY GIOAKCR8OhD806AA7EXwwf6ZjJsPTB2/V65FmA/jw9y7GxTB8xIdQt5e/jhj oRgkfiYkOswEgZ1Q/wDz30FQ+mUWh/N7wP6RckDPnwDifJ9x "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 143.17799999999997`, 6.623440000000001}, {142.82000000000002`, 6.623440000000001}, {142.49800000000002`, 6.289059999999999}, { 142.49800000000002`, 5.9312499999999995`}, {142.49800000000002`, 5.57344}, {142.82000000000002`, 5.2406299999999995`}, { 143.16599999999997`, 5.2406299999999995`}, {143.54799999999997`, 5.2406299999999995`}, {143.88099999999997`, 5.5625}, { 143.88099999999997`, 5.9312499999999995`}, {143.88099999999997`, 6.289059999999999}, {143.54799999999997`, 6.623440000000001}, { 143.17799999999997`, 6.623440000000001}}}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJpIGYCYp1Nc98vV0tySAOBZ6wOGjH9h746JDnMmQkE kjwOHy/5Jgn4JDnEqEbInLPhd1hcYMt1PTzJoVWBXfXMF0EHx4SnF5Tyofwp Yg5A3Rox1VD1MjJwfvX9H7eMXyvA+Su/vaw4c0DJIR1kb1mSQ+At6ZrEIhWH 2UcUNhTlJDnMmMBfZcat5nB6oeu2z7FJDuevhr3Rj9ZwKJkswRLml+QwHSS/ WtMB5v7631YF515oO7CvkYlKkU9ySAgJUl/gqe2gwtY41dk6yWFye2vUZRtN h+XHvM07XZMcTh12Wpspp+FwomzffCl/qHpNNYelIAeEJTlMAamfo+JwGOjc /qgkB+Vrj4IZ3ijB+WD3f1CA81tA/r8iC9ffDuKbSEH4ftDwPSbmcAYEXJIc 3rTldhtVCzkwareL3bRKcrjvGu84y1AA7n5IfLA7oMcPAK39t8I= "]]}, Thickness[0.006683151774376796]]}, { ImageSize -> {299.2508094645081, 32.67741967621419}, ImageSize -> {149.62540473225405`, 16.338709838107096`}, BaselinePosition -> Scaled[0.32439307852814453`], ImageSize -> {150., 17.}, PlotRange -> {{0., 149.63}, {0., 16.34}}, AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ Thickness[Large], 20], FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], ImageSize -> Large, LabelStyle -> {FontFamily -> "Times"}, Method -> { "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange -> {{0, 150.}, {-0.023391913368829433`, 0}}, PlotRangeClipping -> True, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], Placed[ Unevaluated[ PointLegend[{ Directive[ PointSize[0.012833333333333334`], RGBColor[0.9, 0.36, 0.054], CapForm["Butt"], AbsoluteThickness[1.6]], Directive[ PointSize[0.012833333333333334`], RGBColor[0.365248, 0.427802, 0.758297], CapForm["Butt"], AbsoluteThickness[1.6]]}, { Graphics[{ Thickness[0.009790483649892304], Style[{ FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJLIGYCYvc1R5czeCg6eOyvlbV4ruawJ7/m7UxWJQz+ qcNOazPlNBycJzQLpWkpOUxub426bKPpEM4p1m5cr+SQngYEbVoOrQrsqme2 yDskhASpL/DUdhCpnFRy1kXW4UGE+PaLDdoQ+RJJOL9gecmGf/5ccL6JMQh8 sW/m9V8/hVUDzq+8/+OW8W4lOL/TxnNXWpCCw5vax9nn1/yynz4TCCJlHGaC aWaHB67xjrMKJR1egOTfcDrsCLaK+K8u5hCtGiFzTkbIYa2QDl+6nQjEfUvE 4fztIHXs0nA+2JxAOQj/nogDf2zAfaN0JQeFXQv2pa4Tg/N7I7r9GTfIwfl7 QeEmquBw+gwQ5Cg53AeZo6gACb9VSg4zQO60VHCoBvkrWhmir1zBoRvkLydl SLjyKzqAvasMpZkVIe4RRPDvaMqu+R+sAOenguLBTR7OjwH5948cnP9l38et 6dek4ObD+B8WrVc4G6HgcAYM5BzKD29znamrANUvD3c/2F+mCg4toHi8Ig/n w/wP4/8HgfuScP6bttxuo90SkPjRVIDGh4TDim8vK84IKEDi9bI4RN1seYca ULi8FnNYAwr3fTIODCDgIAbRP1MSzoeYIwDng53vw+JQAdLfLQPng9OPtTKc n5H/ofXkFXVIPMzkg6Y/LQdwfrCQgPPB4b1RCs4Hu+u0jMMGvbzFjDFaUPfK OQTckq5JFNKCuGODgsMJUH6Zp+kAy18QeQR/s/mPQylaGg7o+Q8AunloPg== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIdIGYCYrnlLzz09qs4/Hz7+oClsoqDqc3eoGkLVeF8 nxPstrOnqsH5G1SfNM9bq+bgsebocoYfynD+3vyatzNTleD8nohuf0YBKTi/ D8wXd9ikl7eYcY6aw0wQ2Cnm8KZ4q+jv06oOIW8vf5yxUMzBxBgINqs4xKhG yJyrQfAVdi3Yl8on6jBjAn+VWbaaQxoIqIk6JIQEqS/gVIeoMxZ1kJh6hTNj EYIPtk9GAyd/Csg8bm24+TA+zP71IPef1YS77/zVsDf6uzUg9h8Tc2Dm7JJP XqfhUHP/xy3j1wg+zP8w/n3XeMdZiopw/n8Q6FdyEAe7V9PhAUj+oDLUPi04 X19rpfCFFm1UPouOg8q1R8EMOcoOqWCH6Dh8WLRe4ewKJQf3/bWyFs8R/OdZ 2t+my+o6GIDNUXWo+bQhIPuWjsOJXTt62TaoOpwBgRwdhzmLlHf+Oa7qIA9K D/+14Xww7Y7gQ9yjBfF/mqqD/8WJMf+YtSDxfFYF7r9KUHhYK8P5MPuSY++4 MVdowM17FCG+/aKDOtQeVYdfoHTGrOYQeEu6JvGTigMsfcLMR0+vAK9vIzw= "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKG1bGbHC9K2hw5xFyjv/HFd16A8uUZmubwDn6yjK f8n5putgDALBynD+GRDokUeVvyzhoP6ked5ZLgOHtUI6fOl2Ig77a2Ut0qcY wvlbzH8cSskyhvO53FRLmXaZOMwEgUhJOP8/CNgrwPkea44uZ6hQdniSuPCa Sb8x3H3o7v+y81bX362GDqcOO63N/KfiULxV9Pfpc0Zw/mkQPc/YQfnao2CG OUpwfoxqhMy5PXJwPgMIOEg6HGxbHn6KydjhgWu846yLog4OTY+Oz+A2gvML 1nTfznhgAOc3shztNxQ3cEhPAwEpOH9vfs3bmVMV4Hyw+kJliL9XGsDdh+5+ AGxcs0Q= "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYC4uUvPPT+G1o7nNi1o5dtg6rDdaFPjufFrB3m LFLe+ee4qsP0CfxVZtVWEL67qkOMguPH5DuWDoG3pGsSP6k4qD5pnnfWytJh A5iB4P98+/qApbKKg33To+MzViP4PifYbWerWsH5EPutHDzWHF3O8EMZzt+b X/N2ZqoSnC9SOankLIssnO8OVi/tUM9ytN+Q3crhQPe+JpPFUg4S8+I0Tx+w dFD/pPJyVqckxP5sS4dWBXbVMyYSDtxuqqVMXJYOGmB5cYeDbcvDT02ygPOT Y++4MWsg+BJTr3BmXDJ36Ivo9mcUkHD48630wZyF5lD7JRwaQfaXmzu8acvt NtotCZFPNHdoB9snDefL71qwL9VPFs6HhfeXnbe6/rqaw8N7i/mPQymrzODh vVEvbzEjjxk8vLlA7s8yhYc3jA8Lz2mg+LqN4N8BajMKNYPze7xesZgkmsHD G8aHhTeMvyPYKuL/cRk4/4FrvOOsQkmHJff38c0pNnP4su/j1vRv4nD3poHA MTGHF1na36a/NXNwA5kfIQr3LwMILBBx6AsuUZnObwHn1/22Kjg3A8EHx4eQ pUPV/R+3jL1FHUDeNkq1dIhRjZA5VyMGj3+Ye2B8WPyUbBX9fVrPyuEMCPiI w9ObAij8+UQh6j9aOZgYg4Coww2Q+V8R/CMg+5Ws4fznIP/44ubnr+m+naFg Azcfxoe5F6xusbVDyNvLH2csFIPkJ2trh5kgsBPmH2uHg6D0yywO5/eA/SPl gJ4/AXCIjtM= "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIIaxWZDYzFDMAOUzoLFxqUEWJ8YcYswk1V5i9NLa jwDSKwJB "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJzIGYC4jMgsMTBQWHXgn2pfKIOl/Pj2c8xOjqYGIOA qEM2588F6cwIvvAnx/Npsgj+G959BjONcPM36uUtZpzjCDcfxo9RjZA5VyMG MS/W0SHk7eWPMxaKOcwEAU1HCL1TzIFl8SQrRlVHh4Pd+5pMmMXh/J6Ibn9G ASk4v9PGc1faIkU4/1XxVtHf2SoOwSUq0/9fcHCYs0h555/jqg66Exb8MFRD 8KdO4K8yu22Pyp9t7/AiS/vb9LlQfrS9w5PEhddM9FUh/iq2cwCH2xxlOP/E rh29bBtUHRJi77gxR9jBzdsC8u8eWwjfXdXhOchcWVuHwFvSNYmfVBzsmx4d n1Ft47BB9UnzvLMI/s+3rw9YKqtA7HmD4F8VAgWYLZx/oG15+KkiWwePNUeX M/xQhvP35te8nZmqBOfDwgvG7wPzxR1mgMI50xYe3ktfeOj9Z7SFx0ftb6uC cxU28PiC8WHxyeO/fkqqh61DGgioiTqAvTHLFh7/YPozgg/2n7cdnB8hvv0i wzw7uP6noPDJtYebD+PD7Pe5ODHm32M7uPtiFBw/JtfYwd0Piw+Y/2B8mP9h /HSQfWJKcP6HResVzmooQ8Lbxt5BtMfrFUuIisN1UHh/Q/DB9iQ6wPmw/ANO f0rKcD6Y9lF0QM9fAJ9larY= "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { 0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQ/Scm9+g/KRcHA62VwhdYVB28T7Dbzj7q7NDIcrTf cLqqg+qT5nlnZzk7zFmkvPPPcVUH4U+O59NSEfz25eGnjGwQ/M8bArJniTs7 /Hz7+oDlYlWHmSDw0clBtMfrFUuIqoMxCGQ7OVy4GvZG31oFol/EyeGOpuya /83KDpURK0zP3nZ0SE0DgmOKcP5/EKiXh/P7I7r9GTdIO7AsnmTFyOrkoP5J 5eWsTgmH45pWk077OzmEvL38ccZCMQf7pkfHZzQ7OTCAgIOoQzbnzwXpp6H8 BSIO8210rszSc4bzweb5IvgW147mmhQ4OzxwjXecdVHE4QTI/HJnhyCQ+Yyi DiBvmSi6QOQLJSH+lXRxUNi1YF8qn6hDG8h/KS4OIO+kqYk6TPnGFj+jxsXB BBwQog5rum9nMPQj+GB6NoLvqlrKNGsDGv8Cwjyw+G0Xhzdtud1G0qIOF/Pj 2c/9RONLusLdA+PHqEbInKsRc3AAhc9lF3h4gf033wXij51icPf0gcJbQBzO 7wHzpeD8lNg7bsw7tB1EQOmj18Wh/rdVwbkX2g4SU69wZngBwydCfPvFBm1I uEq4OBzftaOXLUDbYeetrr+p850d0kH+YUPwN+jlLWaM0XI4AwJfEHwe//VT UgVc4HxY+t0O8ogEgm9mszdoWqKmA3r6BgAFmSlq "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/Scm9+g/KReHGNUImXN75B1g/APd+5pMFss4MICA hIuD+ieVl7M0ZRzaloefMmJxceiJ6PZnFJB2SDh8WTv1prODMQhclnBYYKNz ZVafs4PbmqPLGSLEHdZ0385gcEfw3VVLmWYdcELlJzg5pKeBgDScPxMEOhXg /E4bz11pSsoOv0Hu2+Tk0PDbquDcChWHdpB7bJzhfN0JC34YliH4JiB3bXaG mBepAjHvhbODQGzAfaPjyg51IHUcLg4PXOMdZxUqw/0Psw/GB8t/VHJADy8A 1KeCnA== "]}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJTIGYC4hzOnwvSud0dRConlZxlkXGA8d+05XYb7ZZw KNkq+vs0m7vDGRDwEXd4w7vPYOYvN4j6FFGHZS889P57uju0KrCrnpki4iD0 yfF8Wqu7w1ohHb50OxEHh6ZHx2ecRvCzQeZP9oDzEw9f1k5V9ITqF4fzQ95e /jjDUQbOj1GNkDm3R9bBHmSesKdDC0j9FTmHeTY6V2Z983BQ/6TyctZJeYc1 3bczGM57OJwFubdGwWHyN7b4GXM8HFLTgOCYggOIShOD2q+n6NDj9YrFZKa7 w38Q6Fd0YACBAneHmSDAqQTnd9p47kpTUobzRUEaQ1Qg/l3q7nDqsNPazH8q kPBh8oDz635bFZzLQPDB7t3m4dAAEtdA8J0nNAulcSnD+eWHt7nOrFWC+P8h gq/6pHne2UceEHc8UHbYXytrkf7EwyHwlnRNYpGKQ3CJyvT/LzwcniQuvGai rwrx13QPhxdZ2t+mz1V16Ab5N9HDYc4i5Z1/jqtC3KuE4IP9XegO598EGmvE 6u6QEnvHjblCBc43BoFgJTgfFp7g9KIG5ccpOLAsnmTFmOsOjT95B90JC34Y TnOHxJcmNL6eu0PiJ03OoRik38/DoTei259xgyw8vXzZ93FrupmsA4//+imp Gzwg6cVEBs5PB+uXgvNNQO67LO7Qtjz8lFGKh8PB7n1NJsxiDic0rSad/u4O 5/OC1Hcg+OD0YOnuoLBrwb7UdeJwfg/IPQJScD56foHxAfRPV5M= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4ueJC6+ZvPd0EKmcVHJ2i7IDjC+/a8G+1HWS cP6OYKuI/+piDgmHL2unKno5MIDAAhGHNd23MximI/jLX3jo/d+J4M+30bky 656Xw1ohHb70eyIOxzWtJp1+7uVgYgwCog4hJSrT/xt4O8wEgZ3iDnekaxKN ZL0d1D+pvJzVKQEx/ztMv7iD+bWjuSYPvBxC3l7+OGOhOMScwwg+2Px2BB/s /nwvhy/7Pm5NnyYB59fc/3HL+LUUnA/z/xvefQYzjbzhfB7/9VNSHbwdTh12 Wpv5TwWh/9OGgOxbCL6Zzd6gaQdV4XyJqVc4Mw6pOZRHrDA9W+zl8CJL+9v0 ueoO/0Gg3svBQGul8AUVTQcFx4/JZ3K9HOYsUt75J13TocfrFYuJp5fD6+Kt or+5NR1yOH8uSJf2cpjc3hp1eY+Gwwa9vMWMbzyh5mg4uKuWMs364OlQ99uq 4NwJdYf7+/jmGH/ydMjI/9B6MgTBh9ivBucH3gIG9CcVB3A0VHs6TAGZL4Pg nwGBOYj0AAsPAJGB+94= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQbWIMBNa+DtGqETLnZCQd7JseHZ9h7OugsGvBvlQ+ UYeSraK/T0/zdQCrM8bkv+HdZzBzFYJ/dx/fHONNCD6P//opqTd8HdJAQE3U IYfz54J0aT+4+TB+DMj+GjGH/yBw39ehVYFd9cwUMYj8bl+HkLeXP85YKOZw Q7om0Wirr8PB7n1NJszicP5MEIiUROVzKsL5BlorhS+0qED4pb4OcxYp7/xz XNWhdXn4KaMjPnD+W5B/mhB8nxPstrNdfaD6VSHhw+3jsMMByPih4vAepH6X N0SdKYL/YdF6hbMrlBwkpl7hzHjk7VB+eJvrzFolB/0JC34YfvN2qLz/45ax tbKDLogv5gN1v4qDwCfH82mqPnD3gu3LRvD/xOQe/fcLwZ9ro3NllpmvQ6eN 5660RcoOsPjkjw24b1SuCPHfEh94eEz5xhY/44q3w8pvLyvOFChA3F3r7SBS Oank7BI5OH+9kA5fep0UnA+Ov2NiEPcd9XZgAIEFIg7yjh+Tz9j6wPkJhy9r p0Yi+GD3FPtAzD8i4hAuvv0iQ52PQxAoPhlFHdDTHwC6qwcJ "], {{ 58.462500000000006`, 6.778130000000001}, {58.1172, 6.289059999999999}, {57.3656, 5.835939999999999}, { 56.900000000000006`, 5.835939999999999}, {56.423399999999994`, 5.835939999999999}, {56.00629999999999, 6.27813}, { 56.00629999999999, 6.790629999999999}, {56.00629999999999, 7.231249999999999}, {56.245299999999986`, 7.64844}, { 56.60309999999998, 7.874999999999999}, {56.900000000000006`, 8.053130000000001}, {57.55629999999999, 8.22031}, { 58.462500000000006`, 8.35156}, {58.462500000000006`, 6.778130000000001}}}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYompVzgzHvk5iFROKjm7RdkBxpfftWBf6jpJ OH9HsFXEf3Uxhynf2OJniPg7MIDAAhGH+/v45hh3Ifg3pGsSjdYi+Bfy49nP XfR3WCukw5d+T8ThT0zu0X+3/B1MjEFA1OHwZe1USaEAh5kgsFPcoX15+Ckj jgAH9U8qL2d1SkDMfwXTL+6Qw/lzQfplf4eQt5c/zlgo7pCaBgTbEHyw+VUI Ptj9Sf4OX/Z93Jo+TQLOr7n/45bxayk4H+b//gU/DJ8B3QPjyzt+TD4jGeBw 6rDT2sx/Kgj9nzYEZN9C8M1s9gZNO6gK54PpQ2oOa7pvZzCk+zu8yNL+Nn2u OsTfxf4OBlorhS+oaDqElKhM/5/g7zBnkfLOP+maDvtrZS3SbfwdXhdvFf3N rekw10bnyiw+f4fJ7a1Rl/doODxJXHjN5L6fw38QqNdwqIhYYXr2sZ9D3W+r gnMn1B0EPjmeT3vq55CR/6H1ZAiCD7FfDc4PvAWMqE8qkPDL83OYAjJfBsE/ AwJzEOkBFh4AlzHz4g== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQLfzJ8XxabqCD+ieVl7M6JRyuHs01aUgOdDjYva/J hFnS4Q3vPoOZRoEOJsYgIO6QH89+TlIx0CENBI6JOSyeZMXoy4Dgc/5ckL75 XACcX7NuW1L90gCHHcFWEf/VJRykXz8yk5oQ4LBeSIcvvU7KYWtLzYXNjQEO 913jHWcJykDMqwlwSAUbIOug/qR53tmqAIe9+TVvZ4oqONzfxzfH+BWCrwqS lwuE8z9vCMieZR/o4L7m6HIGDQWIeSWBDs4TmoXSshQcgktUpv8H8v+DwH4F B3nHj8lnSgMd+GMD7ht9R/BXfntZccZBEc5fC3LvP2WH72zxM3xsAx3mLFLe +ee4qsNjEdmTT58HwPkxuUf/bTqN4IPdvwrof4emR8crVCHu64aGzzMViHt8 AhwEQPYfV3aojFhhetY4wOEMCPgowfkilZNKzi6Rh/MPgOJnsYyDv5xYlq99 gENPRLc/o4AUxD3BAQ4MIOAg4ZAOsqcowGEmCOwUhccH2D92IpD4uofgr+m+ ncHwG8GHRHsgxLwFIg7NgZ5zG8wCHWJUI2TO1Yg6iHsE/JHwhqUXMQg/OtAh 5O3ljzMWijkcvqydKhkX6FBz/8ct49diDujpDQCrngqm "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQbaNzZdYzw0AH/tiA+0bfFRzu7+ObY8wV6FB9/8ct 49cKDo9FZE8+/R7gIFw5qeTsEwWH/bWyFul3EPzvbPEzfHYi+DXrtiXVLw2A 6188yYrRtybAYSYIcCrC+e5rji5n0FBy2Hmr629qfYDDWiEdvvR1ShDzOgMc yg9vc53pqwzhz4Tqj1RxOHxZO1VyV4DDqcNOazP/qThw/lyQvvkegg9zL4wf k3v03ybuQIcniQuvmaxXcagFuU8y0GGL+Y9DKVwqDt7Vzfo+WoEOK7+9rDjj oOzweUNA9iz9QIf/INCv5IAePgDes46A "]}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYC4vbl4aeMTgQ5sHB2ySfnaTn8B4HXQQ7mNnuD piVqOXhXN+v7/Aty2KCXt5gxRsuB4+eC9M1swQ7TJ/BXmWkj+D/evj5geVgT zt/u0PTo+AxNh/v7+OYYMwU7ZOR/aD0ZouHwWET25NP/QPNUnzTPe6vu8GL7 eubnQPvVP6m8nKUp7VC7bltS/d4gh5r7P24ZvxZzMAaB3UEOCrsW7EtdJ+aw 4eHLqZvmBDlogNR3ijn0eL1iMWkMchCpnFRyNkXMoX/BD8NndVD1fKIOO291 /U2djuCLewT8kbgf5GACNljUAeSMs2rBcHmwuD2CD3aPYzDcfHnHj8lnJIPh 9keIb7/IAPRvyNvLH2csFIOH15d9H7emf0PwIf4Rh/NbFdhVz5hIQNwDDI83 bbndRrsl4OFTDVYv4VAZscL0rHOwQwPL0X5Dc02Hgnj2c5KewQ76WiuFL6ho QcLPBxr+zloOnKDwzwqGx5fwJ8fzaa3B8PiNzT36b1M7NH4ktB3OgEADgg8O D7Ngh/Q0IGDThvhXE8GXfv3ITEoGwfeXE8vy/R0EMYdH26E50HNuw6kguHno 6QsAv84Qeg== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJ+KL1okhWj74Iwh24bz11pm5Qc2paHnzJag+CbGAPB bkz+ym8vK84YKMP5DCCwQRmuH8YviGc/J7kQwW8K9JzbcCwEzt91q+tv6m4E /0CtrEX6Gkw+zD4YH+YemH4YP0BOLMv3OIKP7j+Ye9Q/qbycdVIa7l4YH+Yf dH56GhAck4HzRSonlZw9IgvXD+PD7IPxYe6B8WHuhfFh/kHnw+yD8WHugemH 8WHhCeOj+w8AEwO/1A== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{ 98.33439999999999, 13.512500000000001`}, {96.4875, 13.512500000000001`}, {95.5453, 12.046899999999999`}, {95.5453, 9.1625}, {95.5453, 7.7671899999999985`}, {95.7953, 6.564060000000001}, {96.21249999999999, 5.9796900000000015`}, { 96.6297, 5.395309999999999}, {97.2984, 5.0609399999999996`}, { 98.0375, 5.0609399999999996`}, {99.83749999999999, 5.0609399999999996`}, {100.74399999999999`, 6.6109399999999985`}, {100.74399999999999`, 9.6625}, { 100.74399999999999`, 12.2734}, {99.9688, 13.512500000000001`}, { 98.33439999999999, 13.512500000000001`}}, {{98.1203, 13.095300000000002`}, {99.27659999999999, 13.095300000000002`}, {99.74219999999998, 11.9281}, { 99.74219999999998, 9.067189999999998}, {99.74219999999998, 6.528130000000001}, {99.28909999999999, 5.47813}, { 98.19219999999999, 5.47813}, {97.03589999999998, 5.47813}, { 96.54689999999998, 6.68281}, {96.54689999999998, 9.590629999999999}, {96.54689999999998, 12.1063}, {96.9875, 13.095300000000002`}, {98.1203, 13.095300000000002`}}}]}, Thickness[0.009790483649892304]]}, { ImageSize -> {204.2692303860523, 32.67741967621419}, ImageSize -> {102.13461519302615`, 16.338709838107096`}, BaselinePosition -> Scaled[0.32439307852814453`], ImageSize -> {103., 17.}, PlotRange -> {{0., 102.14}, {0., 16.34}}, AspectRatio -> Automatic}], Graphics[{ Thickness[0.007051191651389083], Style[{ FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGBQB2IQLbNRbD7Tg1/2O4KtIv6riznA+Aq7FuxL5RN1+A8C 9RwOJsYggMnviej2Z9zABefzOPJ5zcjkgfN7QfIfeOH89DQgWMbvAKLS1EQd 3NccXc4wQ9gBZh86/2D3viYTZxE4P0Y1QuZcjBScDzFfziHk7eWPMxaKOYCt UVZ0qLn/45bxa0mHahB9W8lBHqTeT9ZBIDbgvtFzZQfnCc1CaVaKcD6YPq4M 5+sqyn/JMdNwKD28zXXmXAWH7Q5Nj45LaDtUgczTFofz2xTYVc9cEYPzv+z7 uDXdDMF/05bbbRQtCvG/sLbDTBD4KeRwBgR4tCHuey0ACRc2bYj/9vDC+Td4 b4ulmnHB+du8NljM+ckC1w8J1y/2MPtgfHObvUHTErUcxJtkphhc/m1/fNeO XrYALYg+HyaH51na36bbajk0i9eyZh5jgpqP4G82/3EoRUsDzgf7Y7cknA/2 R6SEAzcovl8yQs0VdzgAiq9kBmj4I9ITLH0BAESa+vo= "], CompressedData[" 1:eJxTTMoPSmViYGAQB2IQ/X3fx63p17gdRHq8XrF80XQoWF6y4Z8/n0PALema RCEtB2MQuCzgoK+1UviCipbDF5B6M2E4/4FrvOOsjWJwfsjbyx9nNEo5+Jxg t519VRPKl3Ews9kbNC1R00F+14J9qX2yDpvNfxxK0dKEmFcm5+AFVq8BMS9Q 3sFjf62sRbqGw1ohHb70cwoOElOvcGY4qTs4T2gWSotSdJgxgb/KrFsVzv+w aL3CWQ1lOP/sGSCoUXCovv/jlnG3gsN/ELgv49Ab0e3P+EHWASR9xkfKwQTk P2FpiDu+iTu4rzm6nMFCwmFHsFXEf3Vxh3YFdtUzV4Tg/IPd+5pMFgvA+bDw YgABB3EHWHhqfFJ5OasTwYeFLwAt8Z2s "]}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJeKL1e9UnzPF5thzmLlHf+Oa7qEHBLuiZxkjqcnxAS pL5AU9XBGASCleH8MyDQI48qf1nCoe63VcE5D3WHtUI6fOl2Ig4b9PIWM8Zo wflgc9n14PzF9/fxzQk2cJgJApGScP5/ELBXgPM91hxdzlCh7PDnW+mDOYF6 cPehu19m+QsPvflaDqcOO63N/KfiIDMvTvP0BR04//iuHb1sBXoOytceBTPM UYLzY1QjZM7tkYPzGUDAQdJhq0PTo+MWug4PXOMdZ10Uddhi/uNQipc2nC/a 4/WK5YsGnG9mszdoWqK6Q3oaCEjB+Xvza97OnKoA54PVFyo7pIKUtWkg3Ivm fgCtta96 "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+AxobFxqkMWJYZNqPrXcQIl6 YtwAANeLAk0= "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJrIGYCYoemR8dnnDZzOLFrRy/bBlWHwjXdtzM2mDnM WaS8889xVQcDrZXCF0SgfHdVhy87b3X9LTV1CLwlXZP4ScXhQK2sRfoVE4cN qk+a551F8H++fX3AUlnF4SZQmZGrKZz/JHHhNZP9CD7EflMHjzVHlzP8UIbz 9+bXvJ2ZqgTni1ROKjnLIgvnu4PVSzvIzIvTPL3A1OFA974mk8VSDlvMfxxK iTJ1UP+k8nJWpyTEflZTh1YFdtUzJhIOS+7v45uz2MRBAywv7hCj4PgxWQfB //Ot9MGcg8Zw/ga9vMWMOcYOfRHd/owCEg7TJ/BXmVkbQ+2XcJAG2S9g7PCm LbfbaLckRP63kUM72D5pOF9+14J9qX6ycD4svPuDS1Sm3zeCh7f/xYkx/5yN 4OHtfYLddvZSQ3h4Lwa5n9kQHt4wPiw89UHxVYLgl2wV/X36HYIP1vbLEB7e MD4svGH8HcFWEf+Py8D5D1zjHWcVSjrYVkasMOU1cviy7+PW9G/icPemgcAx MYdGlqP9hu1GDm4g8yNE4f5lAIEFIg4ab3n3Gaw0hvMlpl7hzDAygfPB8bHG xKHq/o9bxt6iEPf/M3GIUY2QOVcjBo9/mHtgfFj88Pmvn5J6wtThDAj4iMPT mwIo/PlEIeq7zRxMjEEAan4fgg+2fw+CD/bPc9x8LjfVUqZd5nDzYXyYe8Hu sDF3CHl7+eOMhWKQ/HTFzGEmCOyE+cfM4SAo/TKLw/k9YP9IOaDnTwD5IZcz "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGBQAmIQPWMmEJy0dEiJvePGvEPb4cRhp7WZ6ywd6n9bFZx7 oe2QDBLXsHR4ECG+/WKDtoMxCBy2cDi+a0cvW4C2g8TUK5wZl8wd0tOAgA3B 36CXt5gxRsvBrjJihWmtBZzvd3FizL/NCP5MsP0WDtsdmh4dl0DwzWz2Bk1L 1ITz1wrp8KXXycD56p9UXs7qlHQAWZt2zMKBAQQcJByk58Vpnt5g4aABkn8p 4rD8hYfe/4dQ+QUiDhvB9lo6uK05upwhQszh+85bXX+vWjq8acvtNpIWdfAH uc/ZCq7e5wS77eynCH6MguPH5BhrOB/sjzXWDl/2fdya/g3Kf2PtcAYE1og6 2IL8L2vrEK0aIXNORtJhyf19fHMW2zoc6N7XZLJYChLefHYO7iD3zJCD88H+ 5FSE88sPb3OdeVbZQeMt7z4DTVuHOYuUd/45rurwBeT+p9ZwPjgewhB8CVB4 HLByqPm0ISA7StXhz7fSB3MKrRwuXA17o79bxQEW/3vza97OTFV2QE8PABVA 52c= "], {{25.787499999999994`, 8.971879999999999}, { 25.787499999999994`, 9.139059999999999}, {25.907799999999995`, 9.353129999999998}, {26.098399999999994`, 9.567189999999998}, { 26.431299999999993`, 9.9125}, {26.896900000000002`, 10.1156}, { 27.385900000000007`, 10.1156}, {28.387500000000003`, 10.1156}, { 29.018799999999995`, 9.304689999999999}, {29.018799999999995`, 8.02969}, {29.018799999999995`, 6.695309999999999}, { 28.30309999999999, 5.76563}, {27.290599999999998`, 5.76563}, { 26.670299999999994`, 5.76563}, {25.787499999999994`, 6.1468799999999995`}, {25.787499999999994`, 6.409379999999999}, {25.787499999999994`, 8.971879999999999}}}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGIZIGYC4t7gEpXp9+0cNujlLWaM0XJQedI872yXPZz/ 51vpgzkHEfyrQp8cz1+zd9ju0PTouASCb2azN2haoiac3xPR7c8oIAXn94H5 4g4R4tsvMpyzd5gJAjvFHL7svNX1N9XeIeTt5Y8zFoo5zACJ37RziFGNkDlX g+Ar7FqwL5VP1EEYaFwaq4ODiTEIYPLtgc6aoY3gX8yPZz8XiJt/fx/fHONX DnDzYXyY/e3Lw08ZLXGAu8/82tFckwIHuPvB9mU7wP0H48P8D+OnxN5xY96h 7RAJ8n+cg0P9b6uCcy+0HVRB4S3l4PAAFDAN2g4y8+I0T1+wdzi+a0cvW4C2 Ayx+0tOAgA3Bh8UHAHOEuq4= "]], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGJ5IIaxWaBsBigfRjMjqWHGooZa6kkVp5Z7aO0vXOoB MK4CWQ== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGIHIGYC4uUvPPT+X3RyOAMCPpIOPP7rp6RucHKIUY2Q OScj7fB5Q0D2rPlODq0K7KpnTGQc2peHnzJqcXKouP/jlnG3nIP41CucGUpO DgKxAfeN3JUdEg5f1k6VdHKI4BRrN16v7GAMAsJODlvMfxxK4VKB8z3218pa uCP4U9pboy7PUXHYqJe3mFHFyWGD6pPmeWdVHJ4kLrxm4u7kINrj9YrliopD cInK9P8NTiDnMzA8QPBnTOCvMutWdWBZPMmK8a2jww6HpkfHKzD55teO5ppc QPDB9m/GzX8Msl/eEW4+jA+z/w3vPoOZVo5w99X/tio4l+DoYGazN2jaQRWH 3zG5R/8VOTqcOuy0NrNOxQEc3p2ODh8WrVc4u0IZ4h4DJwcTkL2XpSDqo6Dh PUXc4f4+vjnGWU4OfRHd/owFYg7eJ9htZ7c6OSjsWrAvlU8EYn+Sk0N6GhCo CTpczI9nP2fo5KD+SeXlLE8uB90JC34YfnOExO8ZVkj87UHwKyJWmJ5djODz guK/w9GhcHnJhn/9bBBz8xwd/oMBO8S+KAQ/Qnz7RQYzR4cv+z5uTb/GAHF/ kKNDi3gta+ax//bZnD8XpGc7Oog0yUwxuPzPHmY+jD/fRufKrHcIPiw8ZswE gptMcP8f6N7XZKLMDQn3Bc4OD1zjHWd9VITE711nSPqRgYbvT2d4+FuAzFNw gcePGihZebnA4w/Gh8WvBCg9X3KGxz86Hxy+OxH8RFB6X4ibD06fGs5w82F8 mP2uqqVMswKc4e7LAYVXtbPDnEXKO/8ch8pPcHaQmheneXoCgn/hatgbfWs0 eQEVBx9Q+uh1dpgJDj9lSP5td4bE7xxlB/T8DgAqbbGh "]], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{44.060900000000004`, 7.862499999999997}, { 44.418800000000005`, 8.660939999999998}, {44.359399999999994`, 8.721879999999999}, {41.224999999999994`, 8.721879999999999}, { 40.903099999999995`, 7.921879999999999}, {40.962500000000006`, 7.862499999999997}, {44.060900000000004`, 7.862499999999997}}}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvb9W1iL9i4eD+ieVl7M6JRzcVEuZZj3wcDjYva/J hFnSoXir6O/TdR4OJsYgIO5QGbHC9Gy0h0MaCBwTc7i/j2+OsRSCv6b7dgbD dnc4f8o3tvgZKe4OO4KtIv6rSzhczI9nP2fp7rBeSIcvvU7KgWXxJCtGWXeH +67xjrMEZRwegMwTcndIBRsg6/AkceE1E353h735NW9niio4RIhvv8jwDsEH y4d7wPm1v60Kzs3wcHBfc3Q5g4YCxH1Mng7OE5qF0rIUHOybHh2fwezp8B8E 9is43JSuSTRi9XTgjw24b/QdwV/57WXFGQdFOH8tyL3/lB3aloefMpri4TBn kfLOP8dVHRIOX9ZOfekO54eUqEz/vwHBB7svH+h/B6DFFaoOdSD3GUDD55mK A0h4xmY3BwGQ/ceVHXq8XrGYNLo5nAEBHyU4X6RyUsnZJfJw/gFQ/CyWcbC4 djTXZIabQ09Etz+jgJRDIsg9B90cGEDAQQJizz83h5kgsFMUHh9g/9iJQOLr OoL/aUNA9ix+DzgfHE7uHhDzFog4zLPRuTKrzcMhRjVC5lyNqMNxTatJp9fD 0osYhH/ewyHk7eWPMxaKOcg7fkw+c9XDoeb+j1vGr8Uc0NMbAMSqDZk= "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQLfTJ8XxarYcDf2zAfaPvCg4R4tsvMuh5OFTf/3HL +LWCQ8Lhy9qpnB4OwpWTSs4+UXCQmHqFM+OSO5zftjz8lFEPgj/lG1v8jBR3 uP4H+/jmGAu5O8wEAU5FON99zdHlDBpKDjz+66ekSrg7rBXS4UtfpwQxT8fd ofzwNteZvsoQvg9Uf6SKg4Ljx+Qzve4Opw47rc38p+Kwpvt2BsN1BB/mXhg/ uERl+n8DD4cniQuvmaxXcZgMcp+Ph8MW8x+HUrhUHPQmLPhhmOfhsPLby4oz DsoOtb+tCs5VeDj8B4F+JQf08AEAIz2Jzg== "]}], FilledCurve[CompressedData[" 1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZiR+AxksEk1hxj1lJhJLb2UuBMA 8t8CMw== "], CompressedData[" 1:eJxTTMoPSmVmYGBgBGJjIGYC4je8+wxmvvJycF9zdDnDCgWHHM6fC9IPeztM aW+NujxHxWF/raxF+hlvhzmLlHf+Oa7icEe6JtHorrcDAwg8UHF4krjwmsl3 BH/KN7b4GTw+GPwZE/irzLpVHfbc6vqb2u8N59/fxzfH+JKXQzinWLtxvKKD zoQFPwzjvBx+vn19wFJZBaLe3cuh4bdVwbkVKg7zbXSuzDLzctjh0PTo+A8V B/UnzfPOMnlB3afqcDE/nv1coKfDBlWghK+qQ8Lhy9qpkZ4Qd65XgfArPSHm L1ZxOAMCUzzh/k1PA4Jtng4eII+7qzj4nGC3nX3U06HbxnNX2idliPoaaHjN kIeYN9PTwcQYBMQdireK/j7d5+kAMibtmJjD75jco/+qPB1iVCNkztWIOdgD nT0jG8GHuRedDzFP1IFl8SQrxqsI/ocNAdmz7ns6zASBnaIO70Hx98jTQeOT ystZL6HqvyLsF/jkeD6N18vhTVtut5G0hIO848fkM6peEH/4SDrw+6+fkmrg 5SC/a8G+1HWSEP8shKqPloPEn4u3Q8jbyx9nLBRz0AfFj5s3xL5OMYcNenmL GUO8HdYK6fCl3xN1ML92NNckwdtBpHJSydkUUUj6yfF2UACZzycK8f9ub7h/ 0Plg+08i+C6qpUyzbuDm/wcBdR+4+TA+LDwvgMKT0Qfu/i+g8HsPdc86MXh6 7ovo9mcUEIend0j4iTug5w8ATSJXnA== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYCYp8T7Laz1/o53NaUXfOfWckBxj8DAjLKDjek axKNtvo56CrKf8kRU3H4E5N79N8hP4fAW0CJTyoO4eLbLzK0+TkYaK0UvtCi 6uCqWso0K8DPYc4i5Z1/jqs6LH3hofdfEMGv/21VcO6EL5xvYgwExb4Ooj1e r1hCVB2OalpNOi3u6/CqeKvo72wVB5bFk6wY1/o4MIBAgrLD/lpZi/QSH4c7 IPduVoTzv+z7uDXdTB7OTwOBYxIOAp8cz6ex+jqsFdLhS7cTcbiQH89+7iKC D7LWRNEPzrdvenR8xmQ/iH41UYh/F0Hl74nC/S9SOankbIq4Q3nECtOzm/0c 3rTldhtJS0D8U+3nsCPYKuK/uriD+NQrnBlefg4zQWCnmEMO588F6cII/v19 fHOMs3zhfNUnzfPO/vKBmHNZCs4P5xRrN+5XgPNh8bOm+3YGg7uvwxbzH4dS ulQceP3XT0m9gODD7IPxwfpi/Byk5sVpnhZQcTC/djTXpMLPwWPN0eUMFcoQ 85sw0wOMDwD3D+wW "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQAWIQHVyiMv0/R4DDiV07etk2qDrc38c3x5gpwGHOIuWd f46rOsy10bkya5s/hO+u6vAkceE1k3R/h8Bb0jWJn1QcdCcs+GEo5u+wQfVJ 87yzCP7Pt68PWCqrOJRsFf192g/BL49YYXq2G8G/kB/Pfm6iv4PHmqPLGX4o w/l782vezkxVgvN7Irr9GQWk4Pw+MF/cQeCT4/m0Xn+HmSCwU8wh4fBl7dRI f4eQt5c/zlgo5mBiDATC/g4xqhEy52oQfIVdC/al8olC3LPaHyJujMlf+sJD 7/9FBN/82tFckx+4+YsnWTH6egTAzYfxYfZ/Z4uf4aMaAHefv5xYli93ANz9 sPiA+Q/Gh/kfPb4AXia1hw== "], {{63.592199999999984`, 13.4891}, { 63.23439999999999, 13.4891}, {62.92499999999999, 13.179699999999997`}, {62.92499999999999, 12.821899999999998`}, {62.92499999999999, 12.4766}, { 63.23439999999999, 12.165599999999998`}, {63.58129999999999, 12.165599999999998`}, {63.926599999999986`, 12.165599999999998`}, {64.24839999999999, 12.4766}, { 64.24839999999999, 12.821899999999998`}, {64.24839999999999, 13.1563}, {63.926599999999986`, 13.4891}, {63.592199999999984`, 13.4891}}}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4v21shbpSwIcRConlZzdouwA48vvWrAvdZ0k nL8j2Criv7qYQ+26bUn1ewMcGEBggYjD4klWjL4/EHx5x4/JZzgD4Xzp14/M pGQCHdYK6fCl3xNx2PDw5dRNCoEOJsYgIOrwnS1+ho9roMNMENgp7rD7Vtff VOtAB/VPKi9ndUpAzNeA6Rd3eLF9PfNzoHkhby9/nLFQ3CE9DQj4EHyw+R8C 4Hyw+58EOHzZ93Fr+jQJOL/m/o9bxq+l4HyY/w9f1k6VdAuE84NLVKb/9wl0 OHXYaW3mPxWE/k8bArJvIfhmNnuDph1UhfMlpl7hzDik5sDxc0H65mcBDi+y tL9Nn6vucAYE3gQ4GGitFL6goukQm3v036bHAQ5zFinv/JOu6SD8yfF82sUA h9fFW0V/c2s6NAd6zm3YFeAwub016vIeDQfVJ83zzi4KcPgPAvUaDvnx7Ock lwY41P22Kjh3Qt3BWufKrGdAfkb+h9aTIQg+xH41OD/wlnRN4icVSPhlBThM AZkvg+CD3TkHkR5g4QEA+276nQ== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQ7a5ayjRrQZCD+ieVl7M6JRw4fi5I3zwtyOFg974m E2ZJB3nHj8lnUoMcTIxBQNxh8SQrRt+QIIc0EDgm5nD1aK5JgzGCb6NzZdYz RgR//cOXUzfdCHTYEWwV8V9dwsFfTizL93Cgw3ohHb70OimHF9vXMz/fEuhw 3zXecZagDMS89YEOqWADZB0ixbdfZFgX6LA3v+btTFEFB+FPjufTZIPg/AiQ fBCCr/qked7ZoiAH9zVHlzNoKDhcB5m3PMjBeUKzUFqWgkP78vBTRiuCHP6D wH4Fh+ASlen/gXz+2ID7Rt8R/JXfXlaccVCE89eC3PtP2UHbatLp+oIghzmL lHf+Oa7qIO4R8EdCGsHvX/DD8Nm/QDgf7P57QP87ND06XqEKcd++QEj4PFOB uKch0EEAZP9xZYc13bczGNIDHc6AgI8SnC9SOank7BJ5OP8AKH4Wyzg0B3rO bSgKdOiJ6PZnFJCCuKc90IEBBBwkHGaCwNJACL1TFB4fYP/YiUDiSzAIzr+/ j2+OsR6Cnw5yp1cQxLwFIg5bW2oubM4McohRjZA5VyPq4F3drO9TB0svYhB+ X5BDyNvLH2csFHP4zhY/w2dikEPN/R+3jF+LOaCnNwAnDQ7V "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQnR/Pfk4yNciBPzbgvtF3BQfhT47n02yDHKrv/7hl /FrBQdwj4I+EdpCDcOWkkrNPFBw+bwjInsWP4GtaTTpd/yYQzl//8OXUTTcC 4fqvHs01aVgf6DATBDgV4Xz3NUeXM2goObzh3Wcwc1Ogw1ohHb70dUoQ8/YE OpQf3uY601cZwj8D1R+p4vCdLX6Gz9tAh1OHndZm/lNxsNG5MuuZYBCcD3Mv jN+/4IfhM7sghyeJC6+ZrFdx2AByn0+QwxbzH4dSuFQcatdtS6qPDXJY+e1l xRkHZQfVJ83zziYFOfwHgX4lB/TwAQDiI49d "]}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { 0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQB2IQ7V3drO/zK9jBQGul8AUWVYfPGwKyZ50PdmhkOdpv OF3V4cE+vjnGu4Id5ixS3vnnuKrD1aO5Jg3zEfwJC34YPutC8F1VS5lmVQQ7 /Hz7+oDlYlWHmSCQGuwg2uP1iiVE1SE9DQiUgh0uXA17o2+tAtH/Lcjhjqbs mv/Nyg6cPxekb74V5JAKUndMEc7/DwL18nB+f0S3P+MGaQd/ObEs3/dBDuqf VF7O6pRw2PDw5dRNIsEOIW8vf5yxUMzhLe8+g5l6wQ4MIOAg6tAc6Dm3IQjK XyDiIPP6kZlUC4IfADJvMoL/Yvt65udLgh0euMY7zrooAjF/RbBDEMh8RlEH kU+O59P+QuULJSH+/RnsoLBrwb5UPlGI/+RCHEDeSVMTdZDwCPgjoR3iYGIM AqIOSyZZMfqaIPhgdVYIfkE8+zlJVzR+KMI8MB0V4vCmLbfbSFrUYWtLzYXN mWj8yhC4e2D8GNUImXM1Yg5vQOETFgIPL7D/bEIg/tgpBndPHyi8BcTh/B4w XwrOT4m948a8QxuSPoxDHOp/WxWce6HtECG+/SKDUIjDAxCjQdvhDAj8CHY4 vmtHL1uAtoOm1aTT9XuCIemCDcHfoJe3mDFGC+Lv5wh+SInK9P9fEHxY+t3u 0PTouASCb2azN2haoqYDevoGAGpFNTE= "], CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7V3drO/zK9ghRjVC5tweeQcY/0D3viaTxTIOZ0Dg R7CD+ieVl7M0ZRwmLPhh+OxdsENPRLc/o4C0Q+26bUn1N4MdjEHgsoSDzOtH ZlJbgh3c1hxdzhAh7rB4khWj7wQEvyCe/ZykL4KfD+LLBjukp4GANJw/EwQ6 FeD8ThvPXWlKyhD3uQU7NPy2Kji3QgXini4E/4mI7MmnyxF8sLnHoOZFqkDs fxjsIBAbcN/ouLJDj9crFpOPwQ4PXOMdZxUqw/2PYt8vqPxHJQf08AIAx9KF 4g== "]}], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJTIGYC4qZAz7kNRaEOIpWTSs6yyDjA+G/acruNdks4 tC0PP2VUEOpwBgR8xB2OXNZOlcyCqk8RdVBw/Jh8ZmKoQ6sCu+qZKSIOV4/m mjSsD3VYK6TDl24n4vCGd5/BzEsIPth8szA4v3bdtqT62jCofnE4P+Tt5Y8z HGXg/BjVCJlze2Qh5pWFObSA1F+Rc5B5/chMKiPMQf2TystZJ+UdlkyyYvQN CXM4C3JvjYKDhEfAHwnrMIfUNCA4puDAAAI/oO7RU3QQ+uR4Pm1nqMN/EOhX hPhzSajDTBDgVILzO208d6UpKcP5oj1er1hCVCD+3R/qcOqw09rMfyqQ8HmH 4IOUmSiGwflg93qEOTT8tio4p4HgO09oFkrjUobzyw9vc51ZqwTxfyyC/2Af 3xzjuDCIPx4oO6zpvp3BEB/mEHhLuiaxSMXhB1v8DJ/EMIcniQuvmeirQtxr EebwIkv72/S5qg4iIP/KhjnMWaS8889xVYh7/4XC+WB/L0Xwd97q+puaH+qQ EnvHjblCBc43BoFgJTgfFp7g9NIA5ccpOATIiWX5Lg6Fxp+8wxMR2ZNPt4dC 4ktT3mERKL4ehELiJ00Ool8kzKE3otufcYMsPL182fdxa7qZrENIicr0/y7Q 9GIiA+eng/VLwfkmIPddFneYsOCH4TO5MIeD3fuaTJjFHDY8fDl104tQOB+s fgOCD04PnaEOCrsW7EtdJw7n94DcIyAF56PnFxgfAPsaZ+0= "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4gO1shbpT8IcRConlZzdouwA48vvWrAvdZ0k nL8j2Criv7qYQ+26bUn1f8McGEBggYjDkklWjL4W4XC+guPH5DOeCL7M60dm UjHhDmuFdPjS74k4bHj4cuqmhHAHE2MQEHX4xhY/w6c13GEmCOwUd9h1q+tv anW4g/onlZezOiUg5mfA9Is7vNi+nvk50LyQt5c/zlgo7pAGAn4IPth8AwQf 7H6VcIcv+z5uTZ8mAefX3P9xy/i1FJwP8/+Ry9qpkm0IfkiJyvT/PeEOpw47 rc38p4LQ/2lDQPYtBN/MZm/QtIOqcL7E1CucGYfUHDh+LkjfrBbu8CJL+9v0 ueoOZ0BAJ9zBQGul8AUVTYfY3KP/NimHO8xZpLzzT7qmg8gnx/NpguEOr4u3 iv7m1nRoCvSc2/ArzGFye2vU5T0aDqpPmuedfRTm8B8E6jUcCuLZz0k+DXOo +21VcO6EuoONzpVZz4D8jPwPrSdDEHyI/WpwfuAt6ZrETyqQ8FsV5jAFZL4M gg925xxEeoCFBwAqK/hK "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQBGIQnQYCXREO0aoRMudkJB3e8O4zmNkW4aCwa8G+VD5R h/bl4aeMdkQ4mBiDACb/8GXtVMlDCL61zpVZz44i+MElKtP/34hwANujJurQ FOg5t+EXwnwYPwZkf42YwxkQuBPh0KrArnpmihhE/lSEQ8jbyx9nLBRz2Hmr 62/q8QiHg937mkyYxeH8mSAQKYnK51SE8w20VgpfaFGB8JdHOMxZpLzzz3FV h/4FPwyf+SH4YP/oIfifNgRkz+KH6VeFhM+ncIcdDk2Pjv9QcTgCUn8q3MHn BLvtbFME/8Oi9QpnVyg5RIpvv8hwL9yh/PA215m1Sg5PRGRPPn0e7lB5/8ct Y2tlCP97ONT9Kg5Xj+aaNPwPh7sXbJ8Swv1e1c36PlkIvvTrR2ZSHREOnTae u9IWKTvA4pM/NuC+UbkixH92iPCQ8Aj4I3E93GHlt5cVZwoUIP5bHe4gUjmp 5OwSOTh/vZAOX3qdFJwPNveYGMR958MdGEBggYhDTO7Rf5u4I+D82nXbkuol EXxIvEdAzD8i4lARscL0rHaEQxAoPhlFHdDTHwAu/RlG "], {{98.1625, 6.778130000000001}, {97.8172, 6.289059999999999}, { 97.06559999999999, 5.835939999999999}, {96.6, 5.835939999999999}, {96.12339999999999, 5.835939999999999}, { 95.7063, 6.27813}, {95.7063, 6.790629999999999}, {95.7063, 7.231249999999999}, {95.94529999999999, 7.64844}, { 96.30309999999999, 7.874999999999999}, {96.6, 8.053130000000001}, {97.2563, 8.22031}, {98.1625, 8.35156}, { 98.1625, 6.778130000000001}}}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4jA+3U1zwyMdRConlZzdouwA48vvWrAvdZ0k nL8j2Criv7qYQ5JAhOWWgkgHBhBYIOLwJnCHXOtqBH+B67bPf/cg+HPeLz/m fT7SYa2QDl/6PRGHKc7dOc8vRzqYGIOAqEPP9Dyh5h+RDjNBYKe4g819/97p 7yId1D+pvJzVKQEx/zZMv7jDk6WzjyhciHQIeXv544yF4g4zQPoOIvhg8xcj +GD3T490+LLv49b0aRJwfs39H7eMX0vB+TD/P6gSWef+E8G/UvFSzZAhyuHU Yae1mf9UEPo/bQjIvoXgm9nsDZp2UBXOl5h6hTPjkJpDAND5r2dGOrzI0v42 fa66w38QmB/pYKC1UviCiqbD579AG6ZFOsxZpLzzT7qmw/fgx0tnt0Q6vC7e KvqbW9OBGWRgbqTD5PbWqMt7NBx2l0yWYAmLhJhTr+GwHWh8YESkQ91vq4Jz J9QduJm028UiIx0y8j+0ngxB8CH2q8H5gbekaxI/qTgINR84tVA20mEKyHwZ BP8MCMxBpAdYeAAASWL3RQ== "]], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" 1:eJxTTMoPSmViYGDQAGIQvWHu++XHgqMd1D+pvJzVKeEQsEOu9bVntMPB7n1N JsySDjL6d1XYJKMdTIxBQNyhIGPi2xr2aIc0EDgm5iDf+jpwx7MoOL8FyJXb iuBPce7Oed4d5bAj2Criv7qEgwcPk3Z7WZTDeiEdvvQ6KYcnS2cfUciIcrjv Gu84S1DGYTmQuyEpyiEVbICsA9B13uaJUQ5782vezhRVcKjP2lMy+QKCX75v vpQ+azScD5SVYFGLdnBfc3Q5g4aCwxKQeVHRDs4TmoXSshQc2NfIRKVERzv8 B4H9Cg7+SQIRljHRDvyxAfeNviP4K7+9rDjjoAjnrwW595+yw/5TC123KUc7 zFmkvPPPcVWHlgNAgXNRcL66IccamU0IPtj9E4H+d2h6dLxC1cEFGBy/C6Hh 80wF4h7jKAcBkP3HlR3EWcL4dKWiHM6AgI8SnC9SOank7BJ5OP8AKH4WyziA uJtUoxx6Irr9GQWkHP6s/HjJ1yrKgQEEHCQcXLZ9/nslIsphJgjsFIXHB9g/ diKQ+DqK4ANDqyjjIYIv0Az04F+oeQtEHNYXAROATLRDjGqEzLkaUYftQOMr DGHpRQzCd4x2CHl7+eOMhWIOIuvcH1a5RDvU3P9xy/i1mAN6egMANsMJsA== "], CompressedData[" 1:eJxTTMoPSmViYGAQBmIQvV2u9XWgRLQDf2zAfaPvCg71WXtKJn+Icqi+/+OW 8WsFh5YDpxa63otyEK6cVHL2iYJDh2PC0wuHEHz3h1Ui6+Yj+FOcu3OedyP0 L599RGFDUpTDTBDgVITz3dccXc6goeTw/PfKj5dSoxzWCunwpa9TgpiXH+VQ fnib60xfZQi/Hqo/UsWhZ3qeUPOCKIdTh53WZv5TcWh5HbhD7igSH+peGF/d kGONzKcohyeJC6+ZrFdxkIlKsb7/P8phi/mPQylcKg4JAhGWWwSiHVZ+e1lx xkHZAeh7CRaxaIf/INCv5IAePgBlaZCa "]}], FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJ1IGYC4gWu2z7/3RLjwMLZJZ+cp+XgAuReuRHjYG6z N2haopaDf+/0PKHXMQ4b9PIWM8ZoObwJ3CHX+jnGYfoE/iozbQT/x9vXBywP a8L52x2aHh2foenw5ILS7Z/vYhwy8j+0ngzRcHihZsix5g3QPNUnzfPeqjuw hPHpbtoa46D+SeXlLE1phz8rP17yXRXjUHP/xy3j12IO/0FgeYyDwq4F+1LX iTlsBTqvojPGQQOkvlPMYU/JZAmWvBgHkcpJJWdTxBz2n1roui0bqp5P1MEn SSDCsgXBn+LcnfP8dIyDiTEIiDrcUWFrnCocC5cvfwl0oA6C33IAaKBeLNx8 m/vAEGGLhdvf4Zjw9MKnGIeQt5c/zlgoBg+vL/s+bk3/huBD/CMO57cqsKue MZGAuAfIf9OW2220WwIePtVg9RIOtVlAHxrEOjSwHO03NNd0uHHue/Bj01gH fa2VwhdUtBxq7E3jdlnGQsLfWcuhIGPi25rwWHh8iYMCuCgWHr8i69wfVpXE QuJHQttBoBnowVwEHxweyrEO6WlAwKYN8a8Ygm/aCfQwB4L/ZOnsIwovYhzO gACPtsOc98uPeW+PgZuHnr4ADEIX3Q== "]], FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgAmJ+KH34q0ZMv1uCQ7eN5660TUoOvdPzhJp9EPz/IBCM yV/57WXFGQNlOJ8BBDYow/XD+NnPf6/86Ibgi9489z14cxycf6XipZrhCgT/ /fJj3uYzMfkw+2B8mHtg+mH8jD0lkyW2IPjo/oO5R/2TystZJ6Xh7oXxYf5B 56enAcExGThfpHJSydkjsnD9MD7MPhgf5h4YH+ZeGB/mH3Q+zD4YH+YemH4Y HxaeMD66/wDlIN9I "]], FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJlIGYC4pLJEixh3xIcMvI/tJ68ou4wX0r/rsovBJ99 jUxUinaiQwPL0X5Dc00Hiy0nyvYB+ZPbW6Mu22g6RPcf+qqhg+D3Ts8Takbi dzgmPL2gh+CH8ulumquf6JCaBgRsCL5oj9crlhINOD8dJH9MEs4/AwI+4nD3 pIHlxSDmiyU6hLy9/HHGQjGHIwobijIYEx1iVCNkztUg+Aq7FuxL5ROFuNcm 0cHEGAQw+QYcQAscEPzIFOv7/q4IPnMY0EG+CP7S2UAboqDuURN1UGFrnOoc n+jwpi2320ha1OF78OOls3MQ/OPe5p2ONQj3wPgw9yrf/lmXlYHwD5C3pyQY 4V9wePgjwgPGRwkvGJ9N2+H3yo+XfL0SHVp4/ddPUdV2AMYuW6NhooPPCXbb 2aFaEHXA8Dtx2Glt5jxNh/2nFrpu+5zgcP5q2Bv92xoO6OkDAGol3jM= "]]}, Thickness[0.007051191651389083]]}, { ImageSize -> {283.64999252801994`, 32.67741967621419}, ImageSize -> {141.82499626400997`, 16.338709838107096`}, BaselinePosition -> Scaled[0.32439307852814453`], ImageSize -> {142., 17.}, PlotRange -> {{0., 141.82000000000002`}, {0., 16.34}}, AspectRatio -> Automatic}]}, LegendMarkers -> {{ Graphics[{{ GrayLevel[1], Disk[{0, 0}, Offset[{6, 6}]]}, AbsoluteThickness[3.], Dashing[{}], Circle[{0, 0}, Offset[{6, 6}]]}], 19.5}, { Graphics[{{ GrayLevel[1], Polygon[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}]}]}, AbsoluteThickness[3.], Dashing[{}], JoinedCurve[ Line[{ Offset[{0, 8}], Offset[{(-4) 3^Rational[1, 2], -4}], Offset[{4 3^Rational[1, 2], -4}], Offset[{0, 8}]}], CurveClosed -> True]}], 19.5}}, Joined -> {False, False}, LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], {Right, Bottom}, Identity]]& ], AutoDelete->True, Editable->True, SelectWithContents->False, Selectable->True]], "Output", CellChangeTimes->{ 3.753610163139979*^9, 3.791266774685768*^9, 3.791266812658596*^9, { 3.7912674565459023`*^9, 3.79126746714496*^9}, 3.7912762548417053`*^9, 3.791276316999722*^9, 3.791276421206999*^9, {3.791276494677837*^9, 3.79127659166986*^9}, 3.7913027453085003`*^9, 3.791303768260851*^9}, CellLabel->"Out[74]=",ExpressionUUID->"3814bb40-977e-43cc-93e3-d1f0e33f8853"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Ground state correlation functional for glomium", "Subsection", CellChangeTimes->{{3.782625187684318*^9, 3.782625205187807*^9}, { 3.7826253413716393`*^9, 3.7826253532482758`*^9}, {3.782625846786179*^9, 3.782625848068905*^9}, {3.7826293000392017`*^9, 3.7826293054927187`*^9}},ExpressionUUID->"ee1991f0-6627-4afa-871c-\ 73710071f6fd"], Cell[, "Text",ExpressionUUID->"a6c10556-4f53-4da2-8cf0-79bbf3ec1242"], Cell[, "Input",ExpressionUUID->"1885d9ca-6bb6-490d-a0bb-a3b96576a614"], Cell[, "Text",ExpressionUUID->"ead26072-79d4-4549-aab6-46fe8cf9b6db"] }, Closed]], Cell[CellGroupData[{ Cell["Singly-excited state correlation functional for glomium", "Subsection", CellChangeTimes->{{3.782625187684318*^9, 3.782625205187807*^9}, { 3.7826253413716393`*^9, 3.7826253532482758`*^9}, {3.782625846786179*^9, 3.7826258696716547`*^9}, {3.782629497369335*^9, 3.782629498706218*^9}, { 3.791197603495945*^9, 3.791197604695796*^9}},ExpressionUUID->"c8de2476-91f6-4969-bc63-\ 5a0edddc037b"], Cell[, "Text",ExpressionUUID->"948c535c-78c0-4ae1-af5f-ceb0ef5ab1d8"], Cell[, "Input",ExpressionUUID->"edc3aa38-1c1d-4d5b-b770-bc52ca77fadc"] }, Closed]], Cell[CellGroupData[{ Cell["Doubly-excited state correlation functional for glomium", "Subsection", CellChangeTimes->{{3.782625187684318*^9, 3.782625205187807*^9}, { 3.7826253413716393`*^9, 3.7826253532482758`*^9}, {3.782625846786179*^9, 3.7826258696716547`*^9}, {3.782629497369335*^9, 3.782629498706218*^9}},ExpressionUUID->"ac951d60-fbce-44ba-8f12-\ 9e5545df5beb"], Cell[, "Text",ExpressionUUID->"dca5790f-2358-43e0-b359-677842457a7d"], Cell[, "Input",ExpressionUUID->"cce86f90-52f7-41f4-a63d-73a6c518b4c3"] }, Closed]], Cell[CellGroupData[{ Cell["Weight-dependent exchange functional for glomium", "Subsection", CellChangeTimes->{{3.782625187684318*^9, 3.782625205187807*^9}, { 3.7826253413716393`*^9, 3.7826253532482758`*^9}, {3.782625846786179*^9, 3.7826258696716547`*^9}, {3.782626481389626*^9, 3.7826264948791018`*^9}},ExpressionUUID->"9f2ce783-2740-403c-974c-\ 46a7ef9321fe"], Cell[, "Text",ExpressionUUID->"6c7b6dc7-06c2-4f95-a398-fe8f7adea7db"], Cell[, "Input",ExpressionUUID->"c5451bea-41ca-4be3-9429-a6d8ddd06c4a"] }, Closed]], Cell[CellGroupData[{ Cell["\<\ LDA-centered weight-dependent correlation functional for molecules\ \>", "Subsection", CellChangeTimes->{{3.782625187684318*^9, 3.782625205187807*^9}, { 3.7826253413716393`*^9, 3.7826253532482758`*^9}, {3.782625846786179*^9, 3.7826258696716547`*^9}, {3.782626481389626*^9, 3.7826264948791018`*^9}, { 3.782626761697323*^9, 3.78262677063722*^9}, {3.782629584583153*^9, 3.782629586157028*^9}},ExpressionUUID->"ab8ea4d9-6951-44dc-96fc-\ 10c74ccd1a4f"], Cell["\<\ The corresponding LDA-centered weight-dependent correlation functional is then\ \>", "Text", CellChangeTimes->{{3.782626772664956*^9, 3.7826268526294622`*^9}, { 3.782629595887004*^9, 3.782629603557575*^9}},ExpressionUUID->"f0dac186-7114-4a5e-b53c-\ f938d8c4fd37"], Cell[BoxData[ RowBox[{ RowBox[{ SubsuperscriptBox[ OverscriptBox["e", "_"], "c", "w"], "[", "\[Rho]", "]"}], "\[Equal]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", "w"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{ SubsuperscriptBox["e", "c", RowBox[{"(", "0", ")"}]], "[", "\[Rho]", "]"}], "+", RowBox[{"(", RowBox[{ RowBox[{ SubsuperscriptBox["e", "c", "LDA"], "[", "\[Rho]", "]"}], "-", RowBox[{ SubsuperscriptBox["e", "c", RowBox[{"(", "0", ")"}]], "[", "\[Rho]", "]"}]}], ")"}]}], ")"}]}], "+", RowBox[{"w", " ", RowBox[{"(", RowBox[{ RowBox[{ SubsuperscriptBox["e", "c", RowBox[{"(", "1", ")"}]], "[", "\[Rho]", "]"}], "+", RowBox[{"(", RowBox[{ RowBox[{ SubsuperscriptBox["e", "c", "LDA"], "[", "\[Rho]", "]"}], "-", RowBox[{ SubsuperscriptBox["e", "c", RowBox[{"(", "0", ")"}]], "[", "\[Rho]", "]"}]}], ")"}]}], ")"}]}]}]}]], "Input", CellChangeTimes->{{3.782627011728672*^9, 3.782627035640417*^9}, { 3.7826270657535143`*^9, 3.782627143829431*^9}, {3.782627423090889*^9, 3.782627582604439*^9}, {3.782629605968178*^9, 3.782629619974502*^9}},ExpressionUUID->"2ca8802e-361f-4487-a3f0-\ 67d18fc8fe5f"], Cell["\<\ where we use the VWN5 functional as the LDA correlation functional (cf DFAs \ section)\ \>", "Text", CellChangeTimes->{{3.782627269045208*^9, 3.7826272742216253`*^9}, { 3.7826273182152567`*^9, 3.7826273287284517`*^9}, {3.782629622259294*^9, 3.782629656207426*^9}, {3.782629733745845*^9, 3.782629760414081*^9}},ExpressionUUID->"00fbe382-6c25-4893-a74d-\ 546919a831b8"], Cell[BoxData[ RowBox[{ RowBox[{ SubsuperscriptBox["e", "c", "LDA"], "[", "\[Rho]", "]"}], "\[Congruent]", RowBox[{ SubsuperscriptBox["e", "c", "VWN5"], "[", "\[Rho]", "]"}]}]], "Input", CellChangeTimes->{{3.782627279816565*^9, 3.782627314689026*^9}, { 3.782629630477713*^9, 3.7826296413735*^9}},ExpressionUUID->"b7e98868-257f-43e4-b057-ff1cbb083046"], Cell[TextData[StyleBox["Note that this functional is only valid for \ closed-shell system.\nIf one wants to extend this to open-shell system, one \ needs to take into account spin polarization.\nThere are several ways of \ doing this...\nThe extension to GGAs is also more tricky as the GGA is not \ usual a multiplicative factor compared to the LDA functional.", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.7826266896125298`*^9, 3.782626751796768*^9}, { 3.782627617737678*^9, 3.7826277263447857`*^9}, {3.782627817686021*^9, 3.78262782048987*^9}, {3.782629782084593*^9, 3.782629838089308*^9}, { 3.782629871341579*^9, 3.7826299046888933`*^9}},ExpressionUUID->"336e8167-7e94-4334-9956-\ c0652866375e"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Uniform scaling", "Section", CellChangeTimes->{{3.78488690364141*^9, 3.784886906701776*^9}},ExpressionUUID->"32a651af-a3d2-413d-9f35-\ 7c39c325142c"], Cell[, "Text",ExpressionUUID->"36150f4f-2e5c-47ee-a5bf-01307e79bf8c"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"83381296-964a-478d-9311-55bb4bfa3868"], Cell[, "Output",ExpressionUUID->"4060d59e-f126-4563-8f66-924798c9a356"] }, Open ]], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"b9647e70-b4d2-4087-8f5e-b33fdef2477f"], Cell[, "Output",ExpressionUUID->"24dc2015-e906-4b61-85ce-d7c040f0a99f"] }, Open ]], Cell[, "Text",ExpressionUUID->"38868322-9474-42e6-8c64-219d7c4bae84"], Cell[, "Text",ExpressionUUID->"13c78453-f1c1-4854-92cd-b80d6af14b81"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"5d222dbb-a1d4-47ed-91f8-960fb45a6796"], Cell[, "Output",ExpressionUUID->"89459a83-2c7d-48c6-861a-380e25f1eb9e"] }, Open ]], Cell[, "Text",ExpressionUUID->"201a58be-f2a7-46a3-83f2-0ea3fd86a05c"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"9d8cd929-2a73-473b-9f38-5b575f35323f"], Cell[, "Output",ExpressionUUID->"d7e5146b-7859-447e-8e59-27a8ecc6d109"] }, Open ]], Cell[, "Text",ExpressionUUID->"df0161b1-c572-4c9e-a7dd-915170b4bf06"], Cell[CellGroupData[{ Cell[, "Input",ExpressionUUID->"34b4a3a0-197b-4fa0-af8e-5feba6af095e"], Cell[, "Output",ExpressionUUID->"86152b86-44c6-486b-8a24-60adc90b85a2"] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Hydrogen molecule", "Title", CellChangeTimes->{{3.7850491155949287`*^9, 3.785049118067005*^9}, { 3.790585065501623*^9, 3.790585066350246*^9}},ExpressionUUID->"d8a7ce9c-a1d9-4ac0-b8bf-\ 9ca66a94ac58"], Cell["LDA exchange functionals", "Text", CellChangeTimes->{{3.790617745116544*^9, 3.7906177720649967`*^9}}, FontColor->RGBColor[ 1, 0, 0],ExpressionUUID->"d408aeeb-1654-4525-903e-88994da645ee"], Cell[BoxData[{ RowBox[{ RowBox[{"\[Epsilon]xLDA", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"CxLDA", "=", RowBox[{ RowBox[{"-", FractionBox["3", "4"]}], SuperscriptBox[ RowBox[{"(", FractionBox["3", "\[Pi]"], ")"}], RowBox[{"1", "/", "3"}]]}]}], "}"}], ",", RowBox[{"CxLDA", " ", SuperscriptBox["n", RowBox[{"1", "/", "3"}]]}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]x0", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"Cx0", "=", RowBox[{ RowBox[{"-", FractionBox["4", "3"]}], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", "\[Pi]"], ")"}], RowBox[{"1", "/", "3"}]]}]}], "}"}], ",", RowBox[{"Cx0", " ", SuperscriptBox["n", RowBox[{"1", "/", "3"}]]}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]x1", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"Cx1", "=", RowBox[{ RowBox[{"-", FractionBox["16", "10"]}], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", "\[Pi]"], ")"}], RowBox[{"1", "/", "3"}]]}]}], "}"}], ",", RowBox[{"Cx1", " ", SuperscriptBox["n", RowBox[{"1", "/", "3"}]]}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]x2", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"Cx1", "=", RowBox[{ RowBox[{"-", FractionBox["176", "105"]}], " ", SuperscriptBox[ RowBox[{"(", FractionBox["1", "\[Pi]"], ")"}], RowBox[{"1", "/", "3"}]]}]}], "}"}], ",", RowBox[{"Cx1", " ", SuperscriptBox["n", RowBox[{"1", "/", "3"}]]}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]xeLDA", "[", RowBox[{"n_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]xLDA", "[", "n", "]"}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"\[Epsilon]x1", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]x0", "[", "n", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"\[Epsilon]x2", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]x0", "[", "n", "]"}]}], ")"}]}]}]}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.79059838113128*^9, 3.7905985061910954`*^9}, 3.7906057050230303`*^9, {3.7906109479713078`*^9, 3.790610952959711*^9}, { 3.790617319564548*^9, 3.790617416879177*^9}, {3.790618439965136*^9, 3.7906184689663363`*^9}, {3.79066088543036*^9, 3.790660891318091*^9}, { 3.791197816799444*^9, 3.791197861336274*^9}}, CellLabel->"In[12]:=",ExpressionUUID->"f51f78c8-fe8e-48f3-a562-1209bfc50f71"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xLDAdn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]xLDA", "[", "n", "]"}], ",", "n"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]x0dn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]x0", "[", "n", "]"}], ",", "n"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]x1dn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]x1", "[", "n", "]"}], ",", "n"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]x2dn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]x2", "[", "n", "]"}], ",", "n"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]xeLDAdn", "[", RowBox[{"n_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{"d\[Epsilon]xLDAdn", "[", "n", "]"}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"d\[Epsilon]x1dn", "[", "n", "]"}], "-", RowBox[{"d\[Epsilon]x0dn", "[", "n", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"d\[Epsilon]x2dn", "[", "n", "]"}], "-", RowBox[{"d\[Epsilon]x0dn", "[", "n", "]"}]}], ")"}]}]}]}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.79059838113128*^9, 3.7905985061910954`*^9}, 3.7906057050230303`*^9, {3.7906109479713078`*^9, 3.790610952959711*^9}, { 3.790617319564548*^9, 3.790617416879177*^9}, {3.790618439965136*^9, 3.7906184689663363`*^9}, {3.79066088543036*^9, 3.7906609462132797`*^9}, { 3.791197871150556*^9, 3.791197891101996*^9}}, CellLabel->"In[17]:=",ExpressionUUID->"dd062623-5a91-460e-945c-d5f15e24abfb"], Cell["LDA correlation functionals", "Text", CellChangeTimes->{{3.790617745116544*^9, 3.790617768448262*^9}}, FontColor->RGBColor[ 1, 0, 0],ExpressionUUID->"683219a6-4bcc-4fb8-93b5-7c590bc511b5"], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Intermediate", " ", "quantities"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"X", "[", RowBox[{"x_", ",", "b_", ",", "c_"}], "]"}], "=", RowBox[{ SuperscriptBox["x", "2"], "+", RowBox[{"b", " ", "x"}], "+", "c"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"x", "[", "d_", "]"}], "=", SqrtBox["d"]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Q", "[", RowBox[{"b_", ",", "c_"}], "]"}], "=", SqrtBox[ RowBox[{ RowBox[{"4", "c"}], "-", SuperscriptBox["b", "2"]}]]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", "\[Zeta]_", "]"}], "=", FractionBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "+", "\[Zeta]"}], ")"}], RowBox[{"4", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Zeta]"}], ")"}], RowBox[{"4", "/", "3"}]], "-", "2"}], RowBox[{"2", RowBox[{"(", RowBox[{ SuperscriptBox["2", RowBox[{"1", "/", "3"}]], "-", "1"}], ")"}]}]]}], ";"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"interpolation", " ", "function"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vwn", "[", RowBox[{"A_", ",", "a_", ",", "b_", ",", "c_", ",", "d_"}], "]"}], "=", RowBox[{"A", RowBox[{"(", RowBox[{ RowBox[{"Log", "[", FractionBox[ SuperscriptBox[ RowBox[{"x", "[", "d", "]"}], "2"], RowBox[{"X", "[", RowBox[{ RowBox[{"x", "[", "d", "]"}], ",", "b", ",", "c"}], "]"}]], "]"}], "+", RowBox[{ FractionBox[ RowBox[{"2", "b"}], RowBox[{"Q", "[", RowBox[{"b", ",", "c"}], "]"}]], RowBox[{"ArcTan", "[", FractionBox[ RowBox[{"Q", "[", RowBox[{"b", ",", "c"}], "]"}], RowBox[{ RowBox[{"2", RowBox[{"x", "[", "d", "]"}]}], "+", "b"}]], "]"}]}], "-", RowBox[{ FractionBox[ RowBox[{"b", "*", "a"}], RowBox[{"X", "[", RowBox[{"a", ",", "b", ",", "c"}], "]"}]], RowBox[{"(", RowBox[{ RowBox[{"Log", "[", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"x", "[", "d", "]"}], "-", "a"}], ")"}], "2"], RowBox[{"X", "[", RowBox[{ RowBox[{"x", "[", "d", "]"}], ",", "b", ",", "c"}], "]"}]], "]"}], "+", RowBox[{ FractionBox[ RowBox[{"2", RowBox[{"(", RowBox[{"b", "+", RowBox[{"2", "a"}]}], ")"}]}], RowBox[{"Q", "[", RowBox[{"b", ",", "c"}], "]"}]], RowBox[{"ArcTan", "[", FractionBox[ RowBox[{"Q", "[", RowBox[{"b", ",", "c"}], "]"}], RowBox[{ RowBox[{"2", RowBox[{"x", "[", "d", "]"}]}], "+", "b"}]], "]"}]}]}], ")"}]}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"VWN5", " ", "correlation", " ", "functional"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]cVWN5", "[", RowBox[{"rs_", ",", "\[Zeta]_"}], "]"}], "=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"f2", "=", FractionBox["4", RowBox[{"9", RowBox[{"(", RowBox[{ SuperscriptBox["2", RowBox[{"1", "/", "3"}]], "-", "1"}], ")"}]}]]}], "}"}], ",", RowBox[{ RowBox[{"vwn", "[", RowBox[{ FractionBox["0.0621814", "2"], ",", RowBox[{"-", "0.10498"}], ",", "3.72744", ",", "12.9352", ",", "rs"}], "]"}], "+", RowBox[{ RowBox[{"vwn", "[", RowBox[{ RowBox[{"-", FractionBox["1", RowBox[{"6", SuperscriptBox["\[Pi]", "2"]}]]}], ",", RowBox[{"-", "0.00475840"}], ",", "1.13107", ",", "13.0045", ",", "rs"}], "]"}], RowBox[{"(", FractionBox[ RowBox[{"f", "[", "\[Zeta]", "]"}], "f2"], ")"}], SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", "\[Zeta]"}], ")"}], "4"]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"vwn", "[", RowBox[{ FractionBox["0.0310907", "2"], ",", RowBox[{"-", "0.32500"}], ",", "7.06042", ",", "18.0578", ",", "rs"}], "]"}], "-", RowBox[{"vwn", "[", RowBox[{ FractionBox["0.0621814", "2"], ",", RowBox[{"-", "0.10498"}], ",", "3.72744", ",", "12.9352", ",", "rs"}], "]"}]}], ")"}], RowBox[{"f", "[", "\[Zeta]", "]"}], SuperscriptBox["\[Zeta]", "4"]}]}]}], "]"}]}], ";"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.783426305086109*^9, 3.7834263553520613`*^9}, { 3.783426480832552*^9, 3.783426485774303*^9}, {3.783426632185308*^9, 3.783426658830944*^9}, {3.783427391840214*^9, 3.783427392389812*^9}, 3.7834287156166573`*^9, {3.7836773637524137`*^9, 3.7836775311274233`*^9}, { 3.7906176573902884`*^9, 3.790617676290105*^9}}, CellLabel->"In[22]:=",ExpressionUUID->"c5e15fc2-7ce6-4ed3-bc7f-bcdc9085134d"], Cell[BoxData[{ RowBox[{ RowBox[{"\[Epsilon]cLDA", "[", "n_", "]"}], ":=", RowBox[{"\[Epsilon]cVWN5", "[", RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox["3", RowBox[{"4", "\[Pi]", " ", "n"}]], ")"}], RowBox[{"1", "/", "3"}]], ",", "0"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]c0", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"a", "=", RowBox[{"-", "0.0238184`"}]}], ",", RowBox[{"b", "=", "0.005409938954959674`"}], ",", RowBox[{"c", "=", "0.08307660433135138`"}]}], "}"}], ",", FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["n", RowBox[{ RowBox[{"-", "1"}], "/", "6"}]]}], "+", RowBox[{"c", " ", SuperscriptBox["n", RowBox[{ RowBox[{"-", "1"}], "/", "3"}]]}]}]]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]c1", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"a", "=", RowBox[{"-", "0.0282814`"}]}], ",", RowBox[{"b", "=", "0.002739250132910031`"}], ",", RowBox[{"c", "=", "0.06649138204575991`"}]}], "}"}], ",", FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["n", RowBox[{ RowBox[{"-", "1"}], "/", "6"}]]}], "+", RowBox[{"c", " ", SuperscriptBox["n", RowBox[{ RowBox[{"-", "1"}], "/", "3"}]]}]}]]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]c2", "[", "n_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"a", "=", RowBox[{"-", "0.0144633`"}]}], ",", RowBox[{"b", "=", RowBox[{"-", "0.05060204953178828`"}]}], ",", RowBox[{"c", "=", "0.033141734861014335`"}]}], "}"}], ",", FractionBox["a", RowBox[{"1", "+", RowBox[{"b", " ", SuperscriptBox["n", RowBox[{ RowBox[{"-", "1"}], "/", "6"}]]}], "+", RowBox[{"c", " ", SuperscriptBox["n", RowBox[{ RowBox[{"-", "1"}], "/", "3"}]]}]}]]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]ceLDA", "[", RowBox[{"n_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]cLDA", "[", "n", "]"}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"\[Epsilon]c1", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]c0", "[", "n", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"\[Epsilon]c2", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]c0", "[", "n", "]"}]}], ")"}]}]}]}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.79059838113128*^9, 3.7905985061910954`*^9}, 3.7906057050230303`*^9, {3.7906109479713078`*^9, 3.790610952959711*^9}, { 3.790617319564548*^9, 3.790617516913457*^9}, {3.790617702215055*^9, 3.790617719701961*^9}, {3.7906182605153427`*^9, 3.790618262031168*^9}, { 3.790618364188952*^9, 3.790618401731085*^9}, {3.791197899150729*^9, 3.79119794166324*^9}, {3.791266134226925*^9, 3.791266160344372*^9}, { 3.791276876530004*^9, 3.791276902864431*^9}}, CellLabel->"In[28]:=",ExpressionUUID->"8db93606-ec73-4fe8-9228-51f79c4ef957"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]cLDAdn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]cLDA", "[", "n", "]"}], ",", "n"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]c0dn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]c0", "[", "n", "]"}], ",", "n"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]c1dn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]c1", "[", "n", "]"}], ",", "n"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]c2dn", "[", "n_", "]"}], ":=", RowBox[{"D", "[", RowBox[{ RowBox[{"\[Epsilon]c2", "[", "n", "]"}], ",", "n"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]ceLDAdn", "[", RowBox[{"n_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{"d\[Epsilon]cLDAdn", "[", "n", "]"}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"d\[Epsilon]c1dn", "[", "n", "]"}], "-", RowBox[{"d\[Epsilon]c0dn", "[", "n", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"d\[Epsilon]c2dn", "[", "n", "]"}], "-", RowBox[{"d\[Epsilon]c0dn", "[", "n", "]"}]}], ")"}]}]}]}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.79059838113128*^9, 3.7905985061910954`*^9}, 3.7906057050230303`*^9, {3.7906109479713078`*^9, 3.790610952959711*^9}, { 3.790617319564548*^9, 3.790617416879177*^9}, {3.790618439965136*^9, 3.7906184689663363`*^9}, {3.79066088543036*^9, 3.790660978615497*^9}, { 3.791197952974031*^9, 3.791197965261272*^9}}, CellLabel->"In[33]:=",ExpressionUUID->"3c5be8aa-305f-4c0e-a51a-4bc92cdcf171"], Cell["LDA exchange-correlation functionals", "Text", CellChangeTimes->{{3.790617745116544*^9, 3.790617768448262*^9}, { 3.790617800705172*^9, 3.790617802097224*^9}}, FontColor->RGBColor[ 1, 0, 0],ExpressionUUID->"264d5181-32f7-492d-a01f-33c1ad90708e"], Cell[BoxData[{ RowBox[{ RowBox[{"\[Epsilon]xcLDA", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]xLDA", "[", "n", "]"}], "+", RowBox[{"\[Epsilon]cLDA", "[", "n", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xc0", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]x0", "[", "n", "]"}], "+", RowBox[{"\[Epsilon]c0", "[", "n", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xc1", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]x1", "[", "n", "]"}], "+", RowBox[{"\[Epsilon]c1", "[", "n", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xc2", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]x2", "[", "n", "]"}], "+", RowBox[{"\[Epsilon]c2", "[", "n", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Epsilon]xceLDA", "[", RowBox[{"n_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]xeLDA", "[", RowBox[{"n", ",", "w"}], "]"}], "+", RowBox[{"\[Epsilon]ceLDA", "[", RowBox[{"n", ",", "w"}], "]"}]}]}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.790617806453972*^9, 3.7906178574975023`*^9}, { 3.791197974030027*^9, 3.791197978149313*^9}}, CellLabel->"In[38]:=",ExpressionUUID->"f6517707-c164-4ea9-b57c-8d4d27eafad3"], Cell[BoxData[{ RowBox[{ RowBox[{"d\[Epsilon]xcLDAdn", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"d\[Epsilon]xLDAdn", "[", "n", "]"}], "+", RowBox[{"d\[Epsilon]cLDAdn", "[", "n", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xc0dn", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"d\[Epsilon]x0dn", "[", "n", "]"}], "+", RowBox[{"d\[Epsilon]c0dn", "[", "n", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xc1dn", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"d\[Epsilon]x1dn", "[", "n", "]"}], "+", RowBox[{"d\[Epsilon]c1dn", "[", "n", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xc2dn", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"d\[Epsilon]x2dn", "[", "n", "]"}], "+", RowBox[{"d\[Epsilon]c2dn", "[", "n", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]xceLDAdn", "[", RowBox[{"n_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{"d\[Epsilon]xeLDAdn", "[", RowBox[{"n", ",", "w"}], "]"}], "+", RowBox[{"d\[Epsilon]ceLDAdn", "[", RowBox[{"n", ",", "w"}], "]"}]}]}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.790617806453972*^9, 3.7906178574975023`*^9}, { 3.790660991606427*^9, 3.790661018422545*^9}, {3.7911979815336847`*^9, 3.791197986348868*^9}}, CellLabel->"In[43]:=",ExpressionUUID->"33dfcd59-33cc-4f88-bc22-62c17b91dbeb"], Cell[BoxData[{ RowBox[{ RowBox[{"d\[Epsilon]xeLDAdw1", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]x1", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]x0", "[", "n", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]ceLDAdw1", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]c1", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]c0", "[", "n", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]xceLDAdw1", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]xc1", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]xc0", "[", "n", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]xeLDAdw2", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]x2", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]x0", "[", "n", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]ceLDAdw2", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]c2", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]c0", "[", "n", "]"}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d\[Epsilon]xceLDAdw2", "[", "n_", "]"}], ":=", RowBox[{ RowBox[{"\[Epsilon]xc2", "[", "n", "]"}], "-", RowBox[{"\[Epsilon]xc0", "[", "n", "]"}]}]}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.7906610362852507`*^9, 3.790661042510214*^9}, { 3.790661095924047*^9, 3.790661108253295*^9}, {3.790661781802154*^9, 3.790661784729022*^9}, {3.791197995454302*^9, 3.791198007807596*^9}}, CellLabel->"In[48]:=",ExpressionUUID->"9663902a-8667-481b-b613-f1c2b56b8e76"], Cell[TextData[StyleBox["Molecular coordinates", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790585499997554*^9, 3.790585503381317*^9}},ExpressionUUID->"d38e2fe6-260d-4638-b639-\ 6984dd9d14e4"], Cell[BoxData[ RowBox[{ RowBox[{"ZA", "=", "1"}], ";", "\t", RowBox[{"ZB", "=", "1"}], ";", "\t", RowBox[{ RowBox[{"rA", "[", "R_", "]"}], "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"-", FractionBox["R", "2"]}]}], "}"}]}], ";", "\t", RowBox[{ RowBox[{"rB", "[", "R_", "]"}], "=", RowBox[{"{", RowBox[{"0", ",", "0", ",", RowBox[{"+", FractionBox["R", "2"]}]}], "}"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790612571234482*^9, 3.790612583186882*^9}, { 3.790612652169979*^9, 3.790612655860166*^9}}, CellLabel->"In[54]:=",ExpressionUUID->"36b985d7-30a2-430d-8dc3-30d6b4a45727"], Cell[TextData[StyleBox["Basis functions", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.7905855167750597`*^9, 3.790585520805128*^9}},ExpressionUUID->"e115f0cc-d9e8-4997-a5a4-\ 88b0e9ed97e0"], Cell[BoxData[ RowBox[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"nG", "=", "3"}], ",", RowBox[{"d", "=", RowBox[{"{", RowBox[{"0.1543289673", ",", "0.5353281423", ",", "0.4446345422"}], "}"}]}], ",", RowBox[{"\[Alpha]", "=", RowBox[{"{", RowBox[{"3.425250914", ",", "0.6239137298", ",", "0.1688554040"}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "A"], "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_"}], "]"}], "=", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"k", "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", RowBox[{ "\[Alpha]", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}]}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", RowBox[{ "\[Alpha]", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}]}], SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], "-", RowBox[{"rA", "[", "R", "]"}]}], "]"}], "2"]}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "B"], "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_"}], "]"}], "=", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"k", "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], SuperscriptBox[ RowBox[{"(", FractionBox[ RowBox[{"2", RowBox[{ "\[Alpha]", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}]}], "\[Pi]"], ")"}], RowBox[{"3", "/", "4"}]], RowBox[{"Exp", "[", RowBox[{ RowBox[{"-", RowBox[{ "\[Alpha]", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}]}], SuperscriptBox[ RowBox[{"Norm", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], "-", RowBox[{"rB", "[", "R", "]"}]}], "]"}], "2"]}], "]"}]}]}]}]}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790585522858306*^9, 3.790585573549855*^9}, { 3.7905858144379053`*^9, 3.790585875501539*^9}, {3.7905859443497963`*^9, 3.790585990206952*^9}, {3.790586022013885*^9, 3.790586034909927*^9}, { 3.790586153134603*^9, 3.790586260399447*^9}, {3.790587429719051*^9, 3.790587430109853*^9}, 3.790590184504653*^9, {3.790611134040208*^9, 3.790611142811584*^9}, {3.790612085404666*^9, 3.790612086432859*^9}, 3.790612188260309*^9, {3.7906126717632303`*^9, 3.79061267734007*^9}, 3.790612782078556*^9, {3.790612892956616*^9, 3.790612905674065*^9}, { 3.790612947951182*^9, 3.790612965035768*^9}, {3.790613311831658*^9, 3.790613358728168*^9}, {3.790613507527297*^9, 3.79061350977219*^9}, { 3.790614141437229*^9, 3.7906141534618187`*^9}}, CellLabel->"In[55]:=",ExpressionUUID->"f0a2825f-92fc-42d2-aeee-57f53535b1d5"], Cell[TextData[StyleBox["Integrals over basis functions", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790586406973572*^9, 3.7905864081493177`*^9}, { 3.790587204829371*^9, 3.7905872084457607`*^9}},ExpressionUUID->"5353bb94-3a0f-4a57-a4c7-\ bf24da4dc996"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"nG", "=", "3"}], ",", RowBox[{"d", "=", RowBox[{"{", RowBox[{"0.1543289673", ",", "0.5353281423", ",", "0.4446345422"}], "}"}]}], ",", RowBox[{"\[Alpha]", "=", RowBox[{"{", RowBox[{"3.425250914", ",", "0.6239137298", ",", "0.1688554040"}], "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["S", "AA"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalS]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}], "]"}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["S", "BB"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalS]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}], "]"}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["S", "AB"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalS]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["t", "AA"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalT]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}], "]"}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["t", "BB"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalT]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}], "]"}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["t", "AB"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalT]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["v", "AA"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"\[ScriptCapitalV]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ZA", ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}]}], "]"}], "+", RowBox[{"\[ScriptCapitalV]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ZB", ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}], ")"}]}]}]}], "]"}]}], ";", RowBox[{ RowBox[{ SubscriptBox["v", "BB"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"\[ScriptCapitalV]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ZA", ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}]}], "]"}], "+", RowBox[{"\[ScriptCapitalV]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ZB", ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}], ")"}]}]}]}], "]"}]}], ";", RowBox[{ RowBox[{ SubscriptBox["v", "AB"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"\[ScriptCapitalV]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ZA", ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}]}], "]"}], "+", RowBox[{"\[ScriptCapitalV]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"ZB", ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}], ")"}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["h", "AA"], "[", "R_", "]"}], "=", RowBox[{ RowBox[{ SubscriptBox["t", "AA"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["v", "AA"], "[", "R", "]"}]}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["h", "BB"], "[", "R_", "]"}], "=", RowBox[{ RowBox[{ SubscriptBox["t", "BB"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["v", "BB"], "[", "R", "]"}]}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["h", "AB"], "[", "R_", "]"}], "=", RowBox[{ RowBox[{ SubscriptBox["t", "AB"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["v", "AB"], "[", "R", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"AAAA", "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "3"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "4"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalU]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"BBBB", "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "3"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "4"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalU]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"ABAB", "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "3"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "4"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalU]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"AABB", "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "3"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "4"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalU]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"AAAB", "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "3"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "4"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalU]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"BBAB", "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "1"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "2"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "3"], "=", "1"}], "nG"], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{ SubscriptBox["k", "4"], "=", "1"}], "nG"], RowBox[{ RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], RowBox[{"d", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], RowBox[{"\[ScriptCapitalU]", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "1"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "2"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "3"], "\[RightDoubleBracket]"}], ",", RowBox[{"rA", "[", "R", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[Alpha]", "\[LeftDoubleBracket]", SubscriptBox["k", "4"], "\[RightDoubleBracket]"}], ",", RowBox[{"rB", "[", "R", "]"}]}], "}"}]}], "]"}]}]}]}]}]}], "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790586409237515*^9, 3.790586416789282*^9}, { 3.790586519869673*^9, 3.790586646126953*^9}, {3.790586840542666*^9, 3.790586904158124*^9}, {3.7905869574145403`*^9, 3.790586995550918*^9}, { 3.7905870746701403`*^9, 3.790587132023671*^9}, {3.790587178278302*^9, 3.7905871883999863`*^9}, 3.790587412791628*^9, {3.790587490192586*^9, 3.790587536264368*^9}, {3.790587610680653*^9, 3.79058765873384*^9}, { 3.790587918649395*^9, 3.7905879881868057`*^9}, {3.790588031536386*^9, 3.790588064809623*^9}, {3.790588116425434*^9, 3.790588122617651*^9}, { 3.790589958211094*^9, 3.7905899595395327`*^9}, {3.790590017090168*^9, 3.7905900647156267`*^9}, {3.790590188107126*^9, 3.790590188443287*^9}, { 3.790590259300644*^9, 3.79059026249852*^9}, {3.790590572948614*^9, 3.790590598010453*^9}, {3.79061268483996*^9, 3.790612743776194*^9}, { 3.790614708170142*^9, 3.790614712227317*^9}}, CellLabel->"In[56]:=",ExpressionUUID->"341cb469-2a0b-4b3f-a5c7-4a3d8fb61885"], Cell[BoxData["$Aborted"], "Output", CellChangeTimes->{3.791302716348133*^9}, CellLabel->"Out[56]=",ExpressionUUID->"f432100a-10f5-44c5-9286-be6719695a77"] }, Open ]], Cell[TextData[StyleBox["Spatial orbitals in minimal basis:", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790585084725306*^9, 3.790585104069684*^9}},ExpressionUUID->"5b2593a5-509e-44f9-a6a7-\ 5b7dcf896d99"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Phi]", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_"}], "]"}], "=", FractionBox[ RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "A"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "+", RowBox[{ SubscriptBox["\[Chi]", "B"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], SqrtBox[ RowBox[{"2", RowBox[{"(", RowBox[{"1", "+", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]]]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["\[Phi]", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_"}], "]"}], "=", FractionBox[ RowBox[{ RowBox[{ SubscriptBox["\[Chi]", "A"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "-", RowBox[{ SubscriptBox["\[Chi]", "B"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], SqrtBox[ RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]]]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.7905850270009003`*^9, 3.790585079807232*^9}, { 3.790585431622954*^9, 3.79058543356772*^9}, {3.7905858844788322`*^9, 3.7905859157992983`*^9}, {3.790587433782695*^9, 3.790587438383739*^9}, { 3.790613976434304*^9, 3.79061399579806*^9}, {3.790614159389223*^9, 3.7906141606657143`*^9}}, CellLabel->"In[57]:=",ExpressionUUID->"3bf77406-a77c-45d7-8c2f-817ad440cdff"], Cell[TextData[StyleBox["One-electron densities", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790585084725306*^9, 3.790585104069684*^9}, { 3.790605567798952*^9, 3.790605573521681*^9}},ExpressionUUID->"8580055f-686c-403d-8800-\ a4eab889fce4"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_"}], "]"}], "=", RowBox[{"2", SuperscriptBox[ RowBox[{ SubscriptBox["\[Phi]", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "2"]}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["n", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_"}], "]"}], "=", RowBox[{ SuperscriptBox[ RowBox[{ SubscriptBox["\[Phi]", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "2"], "+", SuperscriptBox[ RowBox[{ SubscriptBox["\[Phi]", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "2"]}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_"}], "]"}], "=", RowBox[{"2", SuperscriptBox[ RowBox[{ SubscriptBox["\[Phi]", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "2"]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.7905850270009003`*^9, 3.790585079807232*^9}, { 3.790585431622954*^9, 3.79058543356772*^9}, {3.7905858844788322`*^9, 3.7905859157992983`*^9}, {3.790587433782695*^9, 3.790587438383739*^9}, { 3.790605575633658*^9, 3.790605631352661*^9}, {3.790611080408037*^9, 3.790611083617523*^9}, {3.791200145718028*^9, 3.7912001826915007`*^9}}, CellLabel->"In[58]:=",ExpressionUUID->"4bf40614-2147-47eb-9ce0-13fe949a9c00"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_", ",", "z_"}], "}"}], ",", "R_", ",", "w_"}], "]"}], "=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], " ", RowBox[{ SubscriptBox["n", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], " ", RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.7905850270009003`*^9, 3.790585079807232*^9}, { 3.790585431622954*^9, 3.79058543356772*^9}, {3.7905858844788322`*^9, 3.7905859157992983`*^9}, {3.790587433782695*^9, 3.790587438383739*^9}, { 3.790605575633658*^9, 3.790605631352661*^9}, {3.790611080408037*^9, 3.790611083617523*^9}, {3.790619238747375*^9, 3.790619276696437*^9}, { 3.7912001925165*^9, 3.791200209995207*^9}}, CellLabel->"In[59]:=",ExpressionUUID->"33c091a9-0792-4be2-bcd6-e02a256b26b5"], Cell[TextData[StyleBox["Integrals over orbitals", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790586406973572*^9, 3.7905864081493177`*^9}, { 3.790587204829371*^9, 3.790587219589327*^9}},ExpressionUUID->"6e302dfa-38b2-43a3-a507-\ 71bf2633d8e8"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "+", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["h", "AA"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "BB"], "[", "R", "]"}], "+", RowBox[{"2", RowBox[{ SubscriptBox["h", "AB"], "[", "R", "]"}]}]}], ")"}]}], "]"}]}], ";", "\t", RowBox[{ RowBox[{ SubscriptBox["h", "2"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["h", "AA"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "BB"], "[", "R", "]"}], "-", RowBox[{"2", RowBox[{ SubscriptBox["h", "AB"], "[", "R", "]"}]}]}], ")"}]}], "]"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790587238182136*^9, 3.790587267173367*^9}, { 3.790587455877968*^9, 3.790587477805868*^9}, {3.7905875469262457`*^9, 3.790587604542864*^9}, {3.790587670334567*^9, 3.790587690230748*^9}, { 3.790590272880838*^9, 3.790590291365608*^9}, 3.7905903766007347`*^9}, CellLabel->"In[60]:=",ExpressionUUID->"41a0d75d-44b6-4653-b70e-858ab3e937b8"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["J", "11"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "+", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], ")"}], "2"], RowBox[{"(", RowBox[{ RowBox[{"AAAA", "[", "R", "]"}], "+", RowBox[{"BBBB", "[", "R", "]"}], "+", RowBox[{"2", RowBox[{"AABB", "[", "R", "]"}]}], "+", RowBox[{"4", RowBox[{"ABAB", "[", "R", "]"}]}], "+", RowBox[{"4", RowBox[{"AAAB", "[", "R", "]"}]}], "+", RowBox[{"4", RowBox[{"BBAB", "[", "R", "]"}]}]}], ")"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["J", "22"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ SuperscriptBox[ RowBox[{"(", FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], ")"}], "2"], RowBox[{"(", RowBox[{ RowBox[{"AAAA", "[", "R", "]"}], "+", RowBox[{"BBBB", "[", "R", "]"}], "+", RowBox[{"2", RowBox[{"AABB", "[", "R", "]"}]}], "+", RowBox[{"4", RowBox[{"ABAB", "[", "R", "]"}]}], "-", RowBox[{"4", RowBox[{"AAAB", "[", "R", "]"}]}], "-", RowBox[{"4", RowBox[{"BBAB", "[", "R", "]"}]}]}], ")"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["J", "12"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"(", FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "+", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], ")"}], RowBox[{"(", FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], ")"}], RowBox[{"(", RowBox[{ RowBox[{"AAAA", "[", "R", "]"}], "+", RowBox[{"BBBB", "[", "R", "]"}], "+", RowBox[{"2", RowBox[{"AABB", "[", "R", "]"}]}], "-", RowBox[{"4", RowBox[{"ABAB", "[", "R", "]"}]}]}], ")"}]}], "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.790587701078045*^9, 3.790587721308972*^9}, { 3.790588079838372*^9, 3.790588105093894*^9}, 3.790588135725808*^9, { 3.790588310918952*^9, 3.790588322533786*^9}, {3.790588364656127*^9, 3.7905883758140497`*^9}, {3.790588409551832*^9, 3.7905884242861843`*^9}, { 3.790588557126391*^9, 3.7905885830952806`*^9}}, CellLabel->"In[61]:=",ExpressionUUID->"1430ab04-b05a-4d2d-bbf6-f9edc3cd5345"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["K", "11"], "[", "R_", "]"}], "=", RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["K", "22"], "[", "R_", "]"}], "=", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["K", "12"], "[", "R_", "]"}], "=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"(", FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "+", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], ")"}], RowBox[{"(", FractionBox["1", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{ SubscriptBox["S", "AB"], "[", "R", "]"}]}], ")"}]}]], ")"}], RowBox[{"(", RowBox[{ RowBox[{"AAAA", "[", "R", "]"}], "+", RowBox[{"BBBB", "[", "R", "]"}], "-", RowBox[{"2", RowBox[{"AABB", "[", "R", "]"}]}]}], ")"}]}], "]"}]}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.790588642589957*^9, 3.790588682679491*^9}, { 3.790588776310627*^9, 3.790588778758974*^9}}, CellLabel->"In[64]:=",ExpressionUUID->"09f7d062-2fdd-45b1-8df2-0dd679b5cbc6"], Cell[TextData[StyleBox["Nuclear energy", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790587253093514*^9, 3.790587257373096*^9}, { 3.7906590777707577`*^9, 3.790659080098378*^9}},ExpressionUUID->"94763911-d015-4b98-a645-\ b27f631322bf"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "NN"], "[", "R_", "]"}], "=", FractionBox[ RowBox[{"ZA", " ", "ZB"}], RowBox[{"Norm", "[", RowBox[{ RowBox[{"rA", "[", "R", "]"}], "-", RowBox[{"rB", "[", "R", "]"}]}], "]"}]]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790585364582788*^9, 3.790585422341731*^9}, { 3.790588811486704*^9, 3.7905888669431877`*^9}, {3.7906190335224743`*^9, 3.7906190337111177`*^9}, {3.790619093049782*^9, 3.790619093357505*^9}, { 3.7906590832436953`*^9, 3.790659125362174*^9}}, CellLabel->"In[67]:=",ExpressionUUID->"46e4593c-f9e1-4f4a-a999-d0f67e325be6"], Cell[TextData[StyleBox["Hartree-Fock energies", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790587253093514*^9, 3.790587257373096*^9}},ExpressionUUID->"04f91dc9-a818-4dc9-a431-\ 8d20ab592198"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R_", "]"}], "=", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "11"], "[", "R", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}], "+", RowBox[{"2", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}]}], ")"}]}], "-", RowBox[{ FractionBox["1", "2"], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["K", "11"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["K", "22"], "[", "R", "]"}]}], ")"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "22"], "[", "R", "]"}]}]}], "\[IndentingNewLine]", "}"}], "+", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "NN"], "[", "R", "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790585364582788*^9, 3.790585422341731*^9}, { 3.790588811486704*^9, 3.7905888669431877`*^9}, {3.7906190335224743`*^9, 3.7906190337111177`*^9}, {3.790619093049782*^9, 3.790619093357505*^9}, { 3.79065915742903*^9, 3.790659168377755*^9}, {3.790660617755475*^9, 3.790660622626095*^9}, {3.7911998268640203`*^9, 3.791199845711309*^9}, { 3.791201819941881*^9, 3.791201824310074*^9}, {3.7912829207510347`*^9, 3.7912829475488234`*^9}}, CellLabel->"In[93]:=",ExpressionUUID->"78388547-17f1-4781-bf29-2487d17b5c53"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "HF"], "[", RowBox[{"R_", ",", "w_"}], "]"}], "=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], "2", RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], "2", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], "+", RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], "2"], RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "11"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox[ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "2"], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["K", "12"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{ SuperscriptBox[ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], "2"], RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "22"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "12"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "NN"], "[", "R", "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{ 3.790659173613167*^9, {3.791199860655905*^9, 3.7911999305330067`*^9}, { 3.791200307883546*^9, 3.791200345041842*^9}, {3.791200384707233*^9, 3.791200389585492*^9}, {3.7912018386633863`*^9, 3.791201844175105*^9}, { 3.791202056171996*^9, 3.791202065996952*^9}, {3.791203301074733*^9, 3.7912033108417263`*^9}, 3.791204383116537*^9}, CellLabel->"In[69]:=",ExpressionUUID->"1039bc21-357b-49d9-a514-fd3af5ae05a7"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalDelta]\[CapitalEpsilon]w", "HF"], "[", RowBox[{"R_", ",", "w_"}], "]"}], "=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}], "-", RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "HF"], "[", RowBox[{"R", ",", "w"}], "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790660001969771*^9, 3.790660072444165*^9}, { 3.7912000484296703`*^9, 3.7912001021713533`*^9}}, CellLabel->"In[70]:=",ExpressionUUID->"01749816-6d54-416a-ab4f-bab2e420acb4"], Cell[BoxData[ RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Epsilon]w", "HF"], "[", RowBox[{"R_", ",", "w_"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "w"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "11"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{"w", RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "12"], "[", "R", "]"}]}], ")"}]}]}], ",", RowBox[{ RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "w"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "12"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{"w", RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "-", RowBox[{ SubscriptBox["K", "22"], "[", "R", "]"}]}], ")"}]}]}]}], "}"}]}], ";"}], "*)"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790660423886979*^9, 3.790660530808771*^9}, { 3.790661586617362*^9, 3.7906615882014847`*^9}, {3.791201941589872*^9, 3.791201957380183*^9}}, CellLabel->"In[71]:=",ExpressionUUID->"36f3a3dd-e13f-4bbf-a50c-b11a31e789f8"], Cell[TextData[StyleBox["LDA energies", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790587253093514*^9, 3.790587257373096*^9}, { 3.79060545274035*^9, 3.790605453095336*^9}, {3.790605665401697*^9, 3.7906056655375757`*^9}},ExpressionUUID->"acf62eaa-9c57-4e21-98ab-\ 4e5f44a5d9f7"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "LDA"], "[", "R_", "]"}], ":=", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "+", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "]"}], RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}], "-", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "]"}], RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}], ")"}]}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}], "-", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "]"}], RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}], ")"}]}], "+", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "+", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], "]"}], RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "}"}], "+", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "NN"], "[", "R", "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790605458040031*^9, 3.790605458543043*^9}, { 3.790605491525733*^9, 3.79060554005932*^9}, {3.7906056671315413`*^9, 3.790605692291338*^9}, {3.790610838410942*^9, 3.790610918068091*^9}, { 3.7906110542128553`*^9, 3.790611062835252*^9}, {3.790618152013009*^9, 3.790618153069519*^9}, {3.790618673469589*^9, 3.790618675001255*^9}, 3.790659180965103*^9, {3.790660627881838*^9, 3.7906606344245253`*^9}, { 3.791200126342725*^9, 3.791200136533306*^9}, {3.791200416721519*^9, 3.7912004207310658`*^9}, 3.791282521010787*^9, {3.791284031708661*^9, 3.7912840765397778`*^9}}, CellLabel-> "In[103]:=",ExpressionUUID->"4419a1ba-532a-442b-95d2-330c205bfd7e"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "LDA"], "[", RowBox[{"R_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], "2", RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], " ", "2", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], "+", RowBox[{"2", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], "2"], RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "+", RowBox[{ SuperscriptBox[ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "2"], RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{"2", SuperscriptBox[ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], "2"], RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], " ", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], "]"}], RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}], "+", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "NN"], "[", "R", "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.7906191044624767`*^9, 3.7906191773964367`*^9}, { 3.790619286782889*^9, 3.790619299369211*^9}, {3.790619337303144*^9, 3.790619344809649*^9}, {3.790619402147251*^9, 3.790619402226974*^9}, 3.790659183868813*^9, {3.791200471586405*^9, 3.791200583640974*^9}, { 3.791202038909951*^9, 3.791202042771472*^9}, {3.791203315170907*^9, 3.7912033164753933`*^9}, 3.7912043756852818`*^9}, CellLabel->"In[73]:=",ExpressionUUID->"c0b69368-df8e-46ab-a64b-3ea147722dd9"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalDelta]\[CapitalEpsilon]w", "LDA"], "[", RowBox[{"R_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "LDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "LDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "LDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}], "-", RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "LDA"], "[", RowBox[{"R", ",", "w"}], "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790660001969771*^9, 3.790660091003895*^9}, 3.790660542656966*^9, {3.791200446570538*^9, 3.791200465560381*^9}}, CellLabel->"In[74]:=",ExpressionUUID->"0dd5826b-1b72-4f2c-834b-e79b419ac43e"], Cell[BoxData[ RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Epsilon]w", "LDA"], "[", RowBox[{"R_", ",", "w_"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", "w"}], ")"}], RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "+", RowBox[{"2", "w", " ", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xcLDAdn", "[", RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], "]"}], RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}]}], "+", RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], "]"}]}], ")"}], RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{ "w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "+", RowBox[{"2", "w", " ", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xcLDAdn", "[", RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], "]"}], RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}]}], "+", RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], "]"}]}], ")"}], RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", "w"}], ")"}], RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{"2", "w", " ", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xcLDAdn", "[", RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], "]"}], RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}]}], "+", RowBox[{"\[Epsilon]xcLDA", "[", RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], "]"}]}], ")"}], RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "}"}]}], ";"}], "*)"}]], "Input",\ InitializationCell->True, CellChangeTimes->{{3.790660423886979*^9, 3.790660614840477*^9}, { 3.790660673368799*^9, 3.790660734031897*^9}, {3.790661577778819*^9, 3.7906615810821047`*^9}, {3.79066238202234*^9, 3.7906624156374083`*^9}, { 3.791200602481963*^9, 3.791200628768276*^9}, 3.791201965399434*^9}, CellLabel->"In[75]:=",ExpressionUUID->"61cc9c57-6cf1-464b-bd07-45e24fd7c9c3"], Cell[TextData[StyleBox["eLDA energies", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790587253093514*^9, 3.790587257373096*^9}, { 3.79060545274035*^9, 3.790605453095336*^9}, {3.790605665401697*^9, 3.7906056655375757`*^9}, 3.790615223845895*^9, 3.790615777404924*^9},ExpressionUUID->"1e4ce167-3a3b-4c53-9c2a-\ 63a8f4ac6e4e"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "eLDA"], "[", "R_", "]"}], ":=", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "+", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xceLDA", "[", RowBox[{ RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], ",", "0"}], "]"}], RowBox[{ SubscriptBox["n", "0"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}], "+", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xceLDA", "[", RowBox[{ RowBox[{ SubscriptBox["n", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], ",", "0"}], "]"}], RowBox[{ SubscriptBox["n", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"2", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "+", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xceLDA", "[", RowBox[{ RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}], ",", "1"}], "]"}], RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "}"}], "+", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "NN"], "[", "R", "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790605458040031*^9, 3.790605458543043*^9}, { 3.790605491525733*^9, 3.79060554005932*^9}, {3.7906056671315413`*^9, 3.790605692291338*^9}, {3.790610838410942*^9, 3.790610918068091*^9}, { 3.7906110542128553`*^9, 3.790611062835252*^9}, {3.790615225694908*^9, 3.7906152329132547`*^9}, {3.790618147868698*^9, 3.790618149719122*^9}, { 3.790618670193342*^9, 3.79061867932382*^9}, 3.790659187972827*^9, { 3.790660643667115*^9, 3.790660649050318*^9}, {3.7912006670402403`*^9, 3.791200683792675*^9}}, CellLabel->"In[76]:=",ExpressionUUID->"d4265afd-5fb1-4adc-ad27-da2413b01953"], Cell[BoxData[ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "eLDA"], "[", RowBox[{"R_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], "2", RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{"(", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], ")"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], " ", "2", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}]}], "+", RowBox[{"2", SuperscriptBox[ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], "2"], RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "+", RowBox[{ SuperscriptBox[ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "2"], RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{"2", SuperscriptBox[ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], "2"], RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "+", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], " ", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"\[Epsilon]xceLDA", "[", RowBox[{ RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], ",", "w"}], "]"}], RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}]], "Input", InitializationCell->True, CellChangeTimes->{{3.7906191044624767`*^9, 3.7906191943435097`*^9}, { 3.790619315024371*^9, 3.79061931729541*^9}, {3.790619349519698*^9, 3.790619356926655*^9}, {3.790619407198872*^9, 3.790619409338375*^9}, { 3.7906194502646437`*^9, 3.790619451317535*^9}, {3.7906195478586807`*^9, 3.790619547970214*^9}, 3.790659191412819*^9, 3.791200701890439*^9, { 3.791202030995595*^9, 3.791202034579583*^9}, {3.791203323380628*^9, 3.7912033241311407`*^9}, 3.791204368788007*^9}, CellLabel->"In[77]:=",ExpressionUUID->"9cd135b3-7599-482f-9e19-dfd18b561c56"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalDelta]\[CapitalEpsilon]w", "eLDA"], "[", RowBox[{"R_", ",", "w_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], ")"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "eLDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "eLDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], "+", RowBox[{ RowBox[{"w", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "eLDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}], "-", RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "eLDA"], "[", RowBox[{"R", ",", "w"}], "]"}]}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790660001969771*^9, 3.790660105027638*^9}, 3.790660544962287*^9, {3.7912007078886833`*^9, 3.791200724622361*^9}}, CellLabel->"In[78]:=",ExpressionUUID->"99ae0dcb-f21c-46d4-84aa-7f172765d9d8"], Cell[BoxData[ RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[Epsilon]w", "eLDA"], "[", RowBox[{"R_", ",", "w_"}], "]"}], ":=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", "w"}], ")"}], RowBox[{ SubscriptBox["J", "11"], "[", "R", "]"}]}], "+", RowBox[{"2", "w", " ", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xceLDAdn", "[", RowBox[{ RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], ",", "w"}], "]"}], RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}]}], "+", RowBox[{"\[Epsilon]xceLDA", "[", RowBox[{ RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], ",", "w"}], "]"}]}], ")"}], RowBox[{ SubscriptBox["n", "1"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{"2", RowBox[{"(", RowBox[{"1", "-", "w"}], ")"}], RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}]}], "+", RowBox[{"2", "w", " ", RowBox[{ SubscriptBox["J", "22"], "[", "R", "]"}]}], "+", RowBox[{ FractionBox["1", "2"], RowBox[{"NIntegrate", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"d\[Epsilon]xceLDAdn", "[", RowBox[{ RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], ",", "w"}], "]"}], RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}]}], "+", RowBox[{"\[Epsilon]xceLDA", "[", RowBox[{ RowBox[{"nw", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R", ",", "w"}], "]"}], ",", "w"}], "]"}]}], ")"}], RowBox[{ SubscriptBox["n", "2"], "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y", ",", "z"}], "}"}], ",", "R"}], "]"}]}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}], ",", RowBox[{"{", RowBox[{"z", ",", RowBox[{"-", "\[Infinity]"}], ",", "\[Infinity]"}], "}"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "}"}]}], ";"}], "*)"}]], "Input",\ InitializationCell->True, CellChangeTimes->{{3.790660423886979*^9, 3.790660614840477*^9}, { 3.790660673368799*^9, 3.790660753527668*^9}, {3.7906615534098883`*^9, 3.790661574889584*^9}, 3.791201969495487*^9}, CellLabel->"In[79]:=",ExpressionUUID->"57a35adb-5f0e-4384-a38f-33a0653fb6b6"], Cell[TextData[StyleBox["CID energies", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790587253093514*^9, 3.790587257373096*^9}, { 3.79060545274035*^9, 3.790605453095336*^9}},ExpressionUUID->"eeb33af8-ab09-4c5f-98a3-\ 684ae529c2b6"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "CISD"], "[", "R_", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{ FractionBox[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "+", RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}], "2"], "-", RowBox[{ FractionBox["1", "2"], SqrtBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}], ")"}], "2"], "+", RowBox[{"4", SuperscriptBox[ RowBox[{ SubscriptBox["K", "12"], "[", "R", "]"}], "2"]}]}]]}]}], ",", RowBox[{ RowBox[{ SubscriptBox["h", "1"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["h", "2"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["J", "12"], "[", "R", "]"}], "+", RowBox[{ SubscriptBox["K", "12"], "[", "R", "]"}]}], ",", RowBox[{ FractionBox[ RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "+", RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}], "2"], "+", RowBox[{ FractionBox["1", "2"], SqrtBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}], ")"}], "2"], "+", RowBox[{"4", SuperscriptBox[ RowBox[{ SubscriptBox["K", "12"], "[", "R", "]"}], "2"]}]}]]}]}]}], "}"}]}], ";"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790605458040031*^9, 3.790605458543043*^9}, { 3.790605491525733*^9, 3.79060554005932*^9}, {3.790614460047532*^9, 3.790614470197546*^9}, 3.7906591751978273`*^9, {3.791203214626651*^9, 3.791203219675529*^9}, 3.79120426233991*^9, {3.791204559313012*^9, 3.7912045606144743`*^9}, 3.791282429474617*^9, 3.7912829076326513`*^9}, CellLabel->"In[99]:=",ExpressionUUID->"ab8163b6-fc27-4314-ae7e-a7f0f7d95629"], Cell[TextData[StyleBox["Data", FontColor->RGBColor[1, 0, 0]]], "Text", CellChangeTimes->{{3.790587253093514*^9, 3.790587257373096*^9}, { 3.79060545274035*^9, 3.790605453095336*^9}, 3.791202822900754*^9, { 3.79120430385709*^9, 3.7912043045212307`*^9}},ExpressionUUID->"d81923d6-2f61-4e28-9498-\ a6ac201db475"], Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Rmin", "=", "1.3"}], ",", RowBox[{"Rmax", "=", "1.5"}], ",", RowBox[{"\[CapitalDelta]R", "=", "0.1"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"ScanEHF", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"R", ",", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"R", ",", "Rmin", ",", "Rmax", ",", "\[CapitalDelta]R"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ScanEwHF", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"R", ",", RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "HF"], "[", RowBox[{"R", ",", RowBox[{"{", RowBox[{ FractionBox["1", "3"], ",", FractionBox["1", "3"]}], "}"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"R", ",", "Rmin", ",", "Rmax", ",", "\[CapitalDelta]R"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ScanECID", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"R", ",", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "CID"], "[", "R", "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"R", ",", "Rmin", ",", "Rmax", ",", "\[CapitalDelta]R"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ScanELDA", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"R", ",", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "LDA"], "[", "R", "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"R", ",", "Rmin", ",", "Rmax", ",", "\[CapitalDelta]R"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ScanEwLDA", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"R", ",", RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "LDA"], "[", RowBox[{"R", ",", RowBox[{"{", RowBox[{ FractionBox["1", "3"], ",", FractionBox["1", "3"]}], "}"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"R", ",", "Rmin", ",", "Rmax", ",", "\[CapitalDelta]R"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ScanEeLDA", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"R", ",", RowBox[{ SubscriptBox["\[CapitalEpsilon]", "eLDA"], "[", "R", "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"R", ",", "Rmin", ",", "Rmax", ",", "\[CapitalDelta]R"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ScanEweLDA", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"{", RowBox[{"R", ",", RowBox[{ SubscriptBox["\[CapitalEpsilon]w", "eLDA"], "[", RowBox[{"R", ",", RowBox[{"{", RowBox[{ FractionBox["1", "3"], ",", FractionBox["1", "3"]}], "}"}]}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{"R", ",", "Rmin", ",", "Rmax", ",", "\[CapitalDelta]R"}], "}"}]}], "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}]], "Input", InitializationCell->True, CellChangeTimes->{{3.790658215232338*^9, 3.790658236824192*^9}, { 3.7906583897274837`*^9, 3.790658524654791*^9}, {3.790659704040538*^9, 3.790659705870874*^9}, {3.790659735886373*^9, 3.790659813232091*^9}, { 3.791200850944066*^9, 3.791200866071169*^9}, {3.791204325244298*^9, 3.7912043285127363`*^9}}, CellLabel->"In[81]:=",ExpressionUUID->"93054b36-78ec-4bb1-83ea-8fbb31835fb9"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"R", "=", "1.4"}], "}"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", RowBox[{"2", ";;", "3"}], "\[RightDoubleBracket]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "HF"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"R", "=", "1.4"}], "}"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "CISD"], "[", "R", "]"}], "\[LeftDoubleBracket]", RowBox[{"2", ";;", "3"}], "\[RightDoubleBracket]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "CISD"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}]}], "]"}], "\[IndentingNewLine]", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"R", "=", "1.4"}], "}"}], ",", RowBox[{ RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "LDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", RowBox[{"2", ";;", "3"}], "\[RightDoubleBracket]"}], "-", RowBox[{ RowBox[{ SubscriptBox["\[CapitalEpsilon]", "LDA"], "[", "R", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}]}], "]"}]}], "Input", CellChangeTimes->{{3.791205113215897*^9, 3.791205153700055*^9}, { 3.791282362947442*^9, 3.791282408665889*^9}, {3.791282440401436*^9, 3.791282445082849*^9}}, CellLabel-> "In[104]:=",ExpressionUUID->"293b9dfc-cd24-4a8a-b0b7-a433a83278d6"], Cell[BoxData[ RowBox[{"{", RowBox[{"0.7661646615167571`", ",", "1.5772907718396145`"}], "}"}]], "Output", CellChangeTimes->{{3.791282384653077*^9, 3.79128244573182*^9}, 3.7912829588137608`*^9, 3.7912833193163233`*^9, 3.79128408169239*^9}, CellLabel-> "Out[104]=",ExpressionUUID->"5baa1ee5-d061-41e0-9e24-f851d6cf1b98"], Cell[BoxData[ RowBox[{"{", RowBox[{"0.25369848003474105`", ",", "1.6184140090700623`"}], "}"}]], "Output", CellChangeTimes->{{3.791282384653077*^9, 3.79128244573182*^9}, 3.7912829588137608`*^9, 3.7912833193163233`*^9, 3.791284081694116*^9}, CellLabel-> "Out[105]=",ExpressionUUID->"cccf10bf-6911-4eae-a50d-7ec6de319142"], Cell[BoxData[ RowBox[{"{", RowBox[{"2.185399718539706`", ",", "1.5009453234856762`"}], "}"}]], "Output",\ CellChangeTimes->{{3.791282384653077*^9, 3.79128244573182*^9}, 3.7912829588137608`*^9, 3.7912833193163233`*^9, 3.7912840981639147`*^9}, CellLabel-> "Out[106]=",ExpressionUUID->"5695bfdf-3698-4b91-9497-1a934ac79932"] }, Open ]] }, Open ]] }, WindowSize->{1280, 755}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 156, 3, 98, "Title",ExpressionUUID->"9a643c6d-1044-4612-8f7a-377e028cd777"], Cell[739, 27, 574, 12, 68, "Input",ExpressionUUID->"8b7c0bbd-9f99-42dc-b8a5-a4dc3cb8cc89", InitializationCell->True], Cell[1316, 41, 308, 6, 46, "Input",ExpressionUUID->"b24e8243-3c38-4b03-af3a-708cb1afa004", InitializationCell->True], Cell[1627, 49, 341, 9, 49, "Input",ExpressionUUID->"5822ee69-a453-46a0-9a58-bd14b8a97301", InitializationCell->True], Cell[1971, 60, 914, 21, 71, "Input",ExpressionUUID->"43788edb-8cf4-404a-88d1-db5bf1515eb0", InitializationCell->True], Cell[2888, 83, 343, 8, 46, "Input",ExpressionUUID->"058853fd-911e-44b3-8eac-1c3fbeb8c4a5", InitializationCell->True], Cell[3234, 93, 279, 6, 46, "Input",ExpressionUUID->"5dbbd40c-d911-445f-b476-85cd91f8d014", InitializationCell->True] }, Closed]], Cell[CellGroupData[{ Cell[3550, 104, 157, 3, 72, "Title",ExpressionUUID->"98d632cb-7177-481c-9b9f-d6f48d10e284"], Cell[CellGroupData[{ Cell[3732, 111, 72, 0, 67, "Section",ExpressionUUID->"9458067c-0b7a-4f70-9a58-1f771c4b3842"], Cell[CellGroupData[{ Cell[3829, 115, 75, 0, 54, "Subsection",ExpressionUUID->"11bf4889-b9bd-4f4e-8dbb-a1e9e8a04d2a"], Cell[3907, 117, 1682, 43, 65, "Input",ExpressionUUID->"fd4d58e4-e6f8-4497-ac22-d536c7dc2652", InitializationCell->True], Cell[5592, 162, 1412, 35, 65, "Input",ExpressionUUID->"f4215905-d329-4e5c-925a-feafdeee6fce", InitializationCell->True], Cell[7007, 199, 2169, 59, 65, "Input",ExpressionUUID->"517a10dc-802a-4ead-9f44-0905089379ba", InitializationCell->True], Cell[9179, 260, 3587, 99, 72, "Input",ExpressionUUID->"440fb372-2001-4d90-ade1-e5498676702f", InitializationCell->True] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[12827, 366, 151, 3, 72, "Title",ExpressionUUID->"cdfcc3a6-7299-4a1b-a9d0-f29078225f1e"], Cell[CellGroupData[{ Cell[13003, 373, 72, 0, 67, "Section",ExpressionUUID->"23d29e55-92a0-4dbd-8800-76494f7702a3"], Cell[CellGroupData[{ Cell[13100, 377, 75, 0, 54, "Subsection",ExpressionUUID->"5917ba4c-2cd7-4975-9b3b-073e72bd0e40"], Cell[CellGroupData[{ Cell[13200, 381, 70, 0, 48, "Input",ExpressionUUID->"c8ade4e2-951f-4fce-ae16-fdd4ea72db6f"], Cell[13273, 383, 71, 0, 62, "Output",ExpressionUUID->"e2c1e6f8-35e1-43ee-b47e-a64bb64f8585"] }, Open ]], Cell[13359, 386, 70, 0, 30, "Input",ExpressionUUID->"02e08ec6-7c15-4841-9609-90296edfe494"], Cell[CellGroupData[{ Cell[13454, 390, 70, 0, 48, "Input",ExpressionUUID->"150e916f-8806-4d8e-b5d0-c0bc713b1f4d"], Cell[13527, 392, 71, 0, 34, "Output",ExpressionUUID->"fb35d58c-512f-4f74-aa01-67c7b7b81a77"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[13659, 399, 72, 0, 53, "Section",ExpressionUUID->"8fd0ca40-ccd3-410e-8538-798441b5cf4b"], Cell[CellGroupData[{ Cell[13756, 403, 75, 0, 54, "Subsection",ExpressionUUID->"10e37c4d-fcc0-4a25-949c-6383c67ff9eb"], Cell[CellGroupData[{ Cell[13856, 407, 70, 0, 145, "Input",ExpressionUUID->"b7e33c7b-f239-4612-b339-911d66bee804"], Cell[13929, 409, 71, 0, 34, "Output",ExpressionUUID->"3acd8e38-829c-4dd5-ac53-54c357a30852"], Cell[14003, 411, 71, 0, 34, "Output",ExpressionUUID->"0a957f43-bd43-468d-a336-addbe42a4e30"] }, Open ]], Cell[CellGroupData[{ Cell[14111, 416, 70, 0, 57, "Input",ExpressionUUID->"5bc098a3-a8b3-48df-b81b-4249253ebc03"], Cell[14184, 418, 71, 0, 34, "Output",ExpressionUUID->"3597039b-63a4-48ef-b436-f5b1fb49d7fd"] }, Open ]], Cell[CellGroupData[{ Cell[14292, 423, 70, 0, 94, "Input",ExpressionUUID->"7707f078-0791-4cee-b4ea-44b37115dc20"], Cell[14365, 425, 71, 0, 34, "Output",ExpressionUUID->"d4f8c9be-6e4c-40eb-ba9a-d4053731284e"], Cell[14439, 427, 71, 0, 34, "Output",ExpressionUUID->"2e03225f-8957-4361-919c-4f6a7c36dc6e"] }, Open ]], Cell[CellGroupData[{ Cell[14547, 432, 70, 0, 54, "Input",ExpressionUUID->"731b5390-31ed-4914-91db-765023c263dd"], Cell[14620, 434, 71, 0, 34, "Output",ExpressionUUID->"ed71661b-3a8d-4eee-a4d0-69211937142a"] }, Open ]], Cell[14706, 437, 70, 0, 53, "Input",ExpressionUUID->"1f5927dc-663a-4f11-a2d1-7bc195f79332"] }, Closed]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[14837, 444, 150, 3, 72, "Title",ExpressionUUID->"e756f09e-4f67-4fb6-a4c1-1a4fcf53e013"], Cell[CellGroupData[{ Cell[15012, 451, 259, 4, 67, "Section",ExpressionUUID->"81f07a4a-071b-4e38-8018-d116e770b20b"], Cell[CellGroupData[{ Cell[15296, 459, 75, 0, 54, "Subsection",ExpressionUUID->"7471e1f3-36cd-497f-a3e0-06aa7035995d"], Cell[15374, 461, 69, 0, 35, "Text",ExpressionUUID->"c0165a48-1e75-4237-86f9-15c7a0fc2c6e"], Cell[15446, 463, 70, 0, 49, "Input",ExpressionUUID->"eeea1fbc-15c7-4b79-b5b2-0d2e682c7cb1"], Cell[15519, 465, 69, 0, 35, "Text",ExpressionUUID->"6509cf0c-3cb5-4484-a79b-9a4e9a4c867b"], Cell[15591, 467, 70, 0, 48, "Input",ExpressionUUID->"ea3020ca-486a-47b1-95e0-aa46f448646d"], Cell[15664, 469, 69, 0, 35, "Text",ExpressionUUID->"dc6b5921-169b-4f2d-9120-4c7ca89c05f3"], Cell[15736, 471, 70, 0, 48, "Input",ExpressionUUID->"12ac5e19-b8fd-477e-a85d-a74e029b6d4c"], Cell[15809, 473, 69, 0, 35, "Text",ExpressionUUID->"21ac5bf4-2ae7-4b41-8495-ff3b6d5d2017"], Cell[15881, 475, 70, 0, 45, "Input",ExpressionUUID->"c8865179-994b-4123-9657-507eae2fd52f"], Cell[15954, 477, 69, 0, 35, "Text",ExpressionUUID->"d352d13e-d96f-4f21-9cc5-32da8a2e376d"], Cell[16026, 479, 70, 0, 50, "Input",ExpressionUUID->"e2a90d7c-9765-4224-b6c1-0cb3ba56719e"], Cell[16099, 481, 69, 0, 35, "Text",ExpressionUUID->"4256ed0c-1e05-4553-a95a-370962e94038"], Cell[16171, 483, 70, 0, 58, "Input",ExpressionUUID->"d7507220-76aa-479e-af51-0886ad0e4f5c"] }, Closed]], Cell[CellGroupData[{ Cell[16278, 488, 75, 0, 38, "Subsection",ExpressionUUID->"06909924-3ce1-46cd-9951-a1961992331f"], Cell[16356, 490, 69, 0, 35, "Text",ExpressionUUID->"00f96a87-a2a3-4e94-b9f7-ae8b20115f53"], Cell[16428, 492, 70, 0, 49, "Input",ExpressionUUID->"4eb0128c-86a9-44cb-baf0-ed4eebc1e580"], Cell[16501, 494, 69, 0, 35, "Text",ExpressionUUID->"9803e7ae-a081-4acb-a592-f69d3de67cb1"], Cell[16573, 496, 70, 0, 48, "Input",ExpressionUUID->"6f3a9707-559f-42d1-a790-59e5b1f4e142"], Cell[16646, 498, 69, 0, 35, "Text",ExpressionUUID->"d5065f92-c8dc-4b04-8355-2a9254137fdd"], Cell[16718, 500, 70, 0, 48, "Input",ExpressionUUID->"701f739c-3702-4026-bb77-fd214c3d2d73"], Cell[16791, 502, 69, 0, 35, "Text",ExpressionUUID->"de63bd9f-a6da-4080-be2f-7a3017d5f45e"], Cell[16863, 504, 70, 0, 45, "Input",ExpressionUUID->"8bcda35c-6687-40f7-8100-1822b15b723a"], Cell[16936, 506, 69, 0, 35, "Text",ExpressionUUID->"426f209f-956e-43ba-9527-ec27b0f09378"], Cell[17008, 508, 70, 0, 50, "Input",ExpressionUUID->"cf1020b9-32d9-40d8-a3f9-f6fd7cc9eb77"], Cell[17081, 510, 69, 0, 35, "Text",ExpressionUUID->"8b03673b-8e98-4de2-b69e-483417ba6223"], Cell[17153, 512, 70, 0, 58, "Input",ExpressionUUID->"a883904a-8742-4fa2-8a54-45a9e5a1e807"] }, Closed]], Cell[CellGroupData[{ Cell[17260, 517, 75, 0, 38, "Subsection",ExpressionUUID->"77af7129-5b6f-46d1-972e-088c04a397e1"], Cell[17338, 519, 69, 0, 35, "Text",ExpressionUUID->"137a2815-3e41-4c54-bb77-2baab3309f67"], Cell[17410, 521, 70, 0, 49, "Input",ExpressionUUID->"ee1a49a3-d78d-48fd-b18b-b45c556268d6"], Cell[17483, 523, 69, 0, 35, "Text",ExpressionUUID->"7f6139ea-87a7-485f-96a7-072785ed5a50"], Cell[17555, 525, 70, 0, 48, "Input",ExpressionUUID->"e2512605-e53f-4895-bc29-b005c70f53b5"], Cell[CellGroupData[{ Cell[17650, 529, 70, 0, 50, "Input",ExpressionUUID->"2caf6c5b-6ae4-41ea-a5bc-6e2553b311b0"], Cell[17723, 531, 71, 0, 55, "Output",ExpressionUUID->"71a67885-8142-46b8-9292-410654424b59"] }, Open ]], Cell[17809, 534, 69, 0, 35, "Text",ExpressionUUID->"32015b28-f5cc-4eff-8d8d-b8691b888e8f"], Cell[17881, 536, 70, 0, 48, "Input",ExpressionUUID->"1fcbd290-f3ea-43bd-b2ef-f31601137679"], Cell[17954, 538, 69, 0, 35, "Text",ExpressionUUID->"9b1e04fb-55cb-4e81-8daf-ba707c78dfce"], Cell[18026, 540, 70, 0, 45, "Input",ExpressionUUID->"c51ccbbc-5ee1-4cca-ade7-af230c7f6ba6"], Cell[18099, 542, 69, 0, 35, "Text",ExpressionUUID->"8bfb35af-a4e4-4813-ae15-3703f4aeab96"], Cell[18171, 544, 70, 0, 50, "Input",ExpressionUUID->"60e340d1-6bd1-4928-9814-51c59353edd1"], Cell[18244, 546, 69, 0, 35, "Text",ExpressionUUID->"f5f45693-a80c-4a46-ad73-07811620c0d9"], Cell[18316, 548, 70, 0, 58, "Input",ExpressionUUID->"f99857fd-0430-402d-a733-929b6b359e23"] }, Closed]], Cell[CellGroupData[{ Cell[18423, 553, 75, 0, 38, "Subsection",ExpressionUUID->"ef62b877-dbc0-41f4-bb50-f7bab5069a50"], Cell[18501, 555, 69, 0, 35, "Text",ExpressionUUID->"5b10be0f-a732-422f-9446-681c78cbd103"], Cell[18573, 557, 70, 0, 32, "Input",ExpressionUUID->"009be4dc-79a6-499d-b9af-ddbb9078f85a"], Cell[18646, 559, 70, 0, 53, "Input",ExpressionUUID->"afd8bd15-999f-411c-a673-53d5b75e5201"], Cell[18719, 561, 69, 0, 35, "Text",ExpressionUUID->"1fe4835f-3b82-458a-9e2a-9272922b081a"], Cell[18791, 563, 70, 0, 58, "Input",ExpressionUUID->"b5e6e435-424a-4f3e-8416-709ae4356a73"], Cell[18864, 565, 69, 0, 58, "Text",ExpressionUUID->"d05917ae-a767-4a78-834a-c4b18c1c0b13"] }, Closed]], Cell[CellGroupData[{ Cell[18970, 570, 75, 0, 38, "Subsection",ExpressionUUID->"bcd158fd-9aa7-4c7b-837e-afd37c54f55a"], Cell[19048, 572, 69, 0, 58, "Text",ExpressionUUID->"a0112f10-d580-4370-a6ed-bff98b24a4a6"], Cell[19120, 574, 70, 0, 101, "Input",ExpressionUUID->"aabf1284-1a62-408f-8d1c-50c99b5acc35"], Cell[19193, 576, 69, 0, 35, "Text",ExpressionUUID->"88a4bd50-0ba7-4f7c-9fc0-e0feb01831fc"], Cell[19265, 578, 70, 0, 48, "Input",ExpressionUUID->"a889f096-9a50-426c-9cf3-81c363ec2eaf"], Cell[19338, 580, 69, 0, 35, "Text",ExpressionUUID->"d3c69495-05ef-49fe-8484-fa7fd62cc408"], Cell[19410, 582, 70, 0, 58, "Input",ExpressionUUID->"0138b572-760b-4f82-a618-73197e776fa2"], Cell[19483, 584, 69, 0, 35, "Text",ExpressionUUID->"b83db319-04e5-42b8-ae4c-57f93abe09fd"] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[19601, 590, 240, 4, 53, "Section",ExpressionUUID->"258ca12d-c8c5-4bc9-84ec-1711f7860786"], Cell[CellGroupData[{ Cell[19866, 598, 378, 6, 54, "Subsection",ExpressionUUID->"1f7fd91a-8b15-493d-99e6-d7e40486d265"], Cell[20247, 606, 4280, 105, 217, "Input",ExpressionUUID->"2c3eb4d2-28fa-4072-acba-f33846909355"], Cell[24530, 713, 3542, 81, 152, "Input",ExpressionUUID->"c078489f-d878-44cc-991e-1146d0ec84cb"], Cell[28075, 796, 4668, 125, 128, "Input",ExpressionUUID->"9d8f3aff-de80-478e-b7fa-93c98d3997e8"], Cell[CellGroupData[{ Cell[32768, 925, 2263, 57, 127, "Input",ExpressionUUID->"04f137ec-ad47-4cb8-a976-ec708cc8747a"], Cell[35034, 984, 1227, 20, 34, "Output",ExpressionUUID->"5fafddca-de0e-4199-8a06-2f07bcbeb991"], Cell[36264, 1006, 1225, 20, 34, "Output",ExpressionUUID->"fc860ff0-d7ef-459d-b9bd-49bdcfea456c"], Cell[37492, 1028, 1244, 21, 34, "Output",ExpressionUUID->"be1fc15b-822b-40ee-83e7-f10e88666d7f"] }, Open ]], Cell[38751, 1052, 2896, 78, 136, "Input",ExpressionUUID->"f39e798a-cf02-4ca3-8667-7392e238bcca"], Cell[CellGroupData[{ Cell[41672, 1134, 6107, 141, 539, "Input",ExpressionUUID->"b42b1902-b9ba-401f-a9df-30e4652a34c1"], Cell[47782, 1277, 246230, 4464, 548, "Output",ExpressionUUID->"3814bb40-977e-43cc-93e3-d1f0e33f8853"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[294061, 5747, 347, 5, 54, "Subsection",ExpressionUUID->"ee1991f0-6627-4afa-871c-73710071f6fd"], Cell[294411, 5754, 69, 0, 58, "Text",ExpressionUUID->"a6c10556-4f53-4da2-8cf0-79bbf3ec1242"], Cell[294483, 5756, 70, 0, 64, "Input",ExpressionUUID->"1885d9ca-6bb6-490d-a0bb-a3b96576a614"], Cell[294556, 5758, 69, 0, 35, "Text",ExpressionUUID->"ead26072-79d4-4549-aab6-46fe8cf9b6db"] }, Closed]], Cell[CellGroupData[{ Cell[294662, 5763, 402, 6, 38, "Subsection",ExpressionUUID->"c8de2476-91f6-4969-bc63-5a0edddc037b"], Cell[295067, 5771, 69, 0, 35, "Text",ExpressionUUID->"948c535c-78c0-4ae1-af5f-ceb0ef5ab1d8"], Cell[295139, 5773, 70, 0, 64, "Input",ExpressionUUID->"edc3aa38-1c1d-4d5b-b770-bc52ca77fadc"] }, Closed]], Cell[CellGroupData[{ Cell[295246, 5778, 353, 5, 38, "Subsection",ExpressionUUID->"ac951d60-fbce-44ba-8f12-9e5545df5beb"], Cell[295602, 5785, 69, 0, 35, "Text",ExpressionUUID->"dca5790f-2358-43e0-b359-677842457a7d"], Cell[295674, 5787, 70, 0, 64, "Input",ExpressionUUID->"cce86f90-52f7-41f4-a63d-73a6c518b4c3"] }, Closed]], Cell[CellGroupData[{ Cell[295781, 5792, 348, 5, 38, "Subsection",ExpressionUUID->"9f2ce783-2740-403c-974c-46a7ef9321fe"], Cell[296132, 5799, 69, 0, 35, "Text",ExpressionUUID->"6c7b6dc7-06c2-4f95-a398-fe8f7adea7db"], Cell[296204, 5801, 70, 0, 32, "Input",ExpressionUUID->"c5451bea-41ca-4be3-9429-a6d8ddd06c4a"] }, Closed]], Cell[CellGroupData[{ Cell[296311, 5806, 468, 8, 38, "Subsection",ExpressionUUID->"ab8ea4d9-6951-44dc-96fc-10c74ccd1a4f"], Cell[296782, 5816, 279, 6, 35, "Text",ExpressionUUID->"f0dac186-7114-4a5e-b53c-f938d8c4fd37"], Cell[297064, 5824, 1342, 40, 33, "Input",ExpressionUUID->"2ca8802e-361f-4487-a3f0-67d18fc8fe5f"], Cell[298409, 5866, 386, 8, 35, "Text",ExpressionUUID->"00fbe382-6c25-4893-a74d-546919a831b8"], Cell[298798, 5876, 368, 8, 32, "Input",ExpressionUUID->"b7e98868-257f-43e4-b057-ff1cbb083046"], Cell[299169, 5886, 728, 11, 104, "Text",ExpressionUUID->"336e8167-7e94-4334-9956-c0652866375e"] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[299946, 5903, 159, 3, 67, "Section",ExpressionUUID->"32a651af-a3d2-413d-9f35-7c39c325142c"], Cell[300108, 5908, 69, 0, 35, "Text",ExpressionUUID->"36150f4f-2e5c-47ee-a5bf-01307e79bf8c"], Cell[CellGroupData[{ Cell[300202, 5912, 70, 0, 47, "Input",ExpressionUUID->"83381296-964a-478d-9311-55bb4bfa3868"], Cell[300275, 5914, 71, 0, 34, "Output",ExpressionUUID->"4060d59e-f126-4563-8f66-924798c9a356"] }, Open ]], Cell[CellGroupData[{ Cell[300383, 5919, 70, 0, 67, "Input",ExpressionUUID->"b9647e70-b4d2-4087-8f5e-b33fdef2477f"], Cell[300456, 5921, 71, 0, 34, "Output",ExpressionUUID->"24dc2015-e906-4b61-85ce-d7c040f0a99f"] }, Open ]], Cell[300542, 5924, 69, 0, 35, "Text",ExpressionUUID->"38868322-9474-42e6-8c64-219d7c4bae84"], Cell[300614, 5926, 69, 0, 35, "Text",ExpressionUUID->"13c78453-f1c1-4854-92cd-b80d6af14b81"], Cell[CellGroupData[{ Cell[300708, 5930, 70, 0, 69, "Input",ExpressionUUID->"5d222dbb-a1d4-47ed-91f8-960fb45a6796"], Cell[300781, 5932, 71, 0, 34, "Output",ExpressionUUID->"89459a83-2c7d-48c6-861a-380e25f1eb9e"] }, Open ]], Cell[300867, 5935, 69, 0, 35, "Text",ExpressionUUID->"201a58be-f2a7-46a3-83f2-0ea3fd86a05c"], Cell[CellGroupData[{ Cell[300961, 5939, 70, 0, 69, "Input",ExpressionUUID->"9d8cd929-2a73-473b-9f38-5b575f35323f"], Cell[301034, 5941, 71, 0, 34, "Output",ExpressionUUID->"d7e5146b-7859-447e-8e59-27a8ecc6d109"] }, Open ]], Cell[301120, 5944, 69, 0, 35, "Text",ExpressionUUID->"df0161b1-c572-4c9e-a7dd-915170b4bf06"], Cell[CellGroupData[{ Cell[301214, 5948, 70, 0, 69, "Input",ExpressionUUID->"34b4a3a0-197b-4fa0-af8e-5feba6af095e"], Cell[301287, 5950, 71, 0, 55, "Output",ExpressionUUID->"86152b86-44c6-486b-8a24-60adc90b85a2"] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[301419, 5957, 211, 4, 98, "Title",ExpressionUUID->"d8a7ce9c-a1d9-4ac0-b8bf-9ca66a94ac58"], Cell[301633, 5963, 197, 3, 35, "Text",ExpressionUUID->"d408aeeb-1654-4525-903e-88994da645ee"], Cell[301833, 5968, 3010, 88, 213, "Input",ExpressionUUID->"f51f78c8-fe8e-48f3-a562-1209bfc50f71", InitializationCell->True], Cell[304846, 6058, 1921, 50, 131, "Input",ExpressionUUID->"dd062623-5a91-460e-945c-d5f15e24abfb", InitializationCell->True], Cell[306770, 6110, 198, 3, 35, "Text",ExpressionUUID->"683219a6-4bcc-4fb8-93b5-7c590bc511b5"], Cell[306971, 6115, 5783, 167, 394, "Input",ExpressionUUID->"c5e15fc2-7ce6-4ed3-bc7f-bcdc9085134d", InitializationCell->True], Cell[312757, 6284, 3491, 99, 207, "Input",ExpressionUUID->"8db93606-ec73-4fe8-9228-51f79c4ef957", InitializationCell->True], Cell[316251, 6385, 1919, 50, 131, "Input",ExpressionUUID->"3c5be8aa-305f-4c0e-a51a-4bc92cdcf171", InitializationCell->True], Cell[318173, 6437, 256, 4, 35, "Text",ExpressionUUID->"264d5181-32f7-492d-a01f-33c1ad90708e"], Cell[318432, 6443, 1355, 35, 131, "Input",ExpressionUUID->"f6517707-c164-4ea9-b57c-8d4d27eafad3", InitializationCell->True], Cell[319790, 6480, 1460, 39, 131, "Input",ExpressionUUID->"33dfcd59-33cc-4f88-bc22-62c17b91dbeb", InitializationCell->True], Cell[321253, 6521, 1531, 35, 152, "Input",ExpressionUUID->"9663902a-8667-481b-b613-f1c2b56b8e76", InitializationCell->True], Cell[322787, 6558, 214, 4, 35, "Text",ExpressionUUID->"d38e2fe6-260d-4638-b639-6984dd9d14e4"], Cell[323004, 6564, 679, 19, 63, "Input",ExpressionUUID->"36b985d7-30a2-430d-8dc3-30d6b4a45727", InitializationCell->True], Cell[323686, 6585, 210, 4, 35, "Text",ExpressionUUID->"e115f0cc-d9e8-4997-a5a4-88b0e9ed97e0"], Cell[323899, 6591, 3586, 92, 187, "Input",ExpressionUUID->"f0a2825f-92fc-42d2-aeee-57f53535b1d5", InitializationCell->True], Cell[327488, 6685, 276, 5, 35, "Text",ExpressionUUID->"5353bb94-3a0f-4a57-a4c7-bf24da4dc996"], Cell[CellGroupData[{ Cell[327789, 6694, 28451, 690, 843, "Input",ExpressionUUID->"341cb469-2a0b-4b3f-a5c7-4a3d8fb61885", InitializationCell->True], Cell[356243, 7386, 156, 2, 34, "Output",ExpressionUUID->"f432100a-10f5-44c5-9286-be6719695a77"] }, Open ]], Cell[356414, 7391, 227, 4, 35, "Text",ExpressionUUID->"5b2593a5-509e-44f9-a6a7-5b7dcf896d99"], Cell[356644, 7397, 1855, 57, 68, "Input",ExpressionUUID->"3bf77406-a77c-45d7-8c2f-817ad440cdff", InitializationCell->True], Cell[358502, 7456, 264, 5, 35, "Text",ExpressionUUID->"8580055f-686c-403d-8800-a4eab889fce4"], Cell[358769, 7463, 1851, 57, 68, "Input",ExpressionUUID->"4bf40614-2147-47eb-9ce0-13fe949a9c00", InitializationCell->True], Cell[360623, 7522, 1639, 43, 46, "Input",ExpressionUUID->"33c091a9-0792-4be2-bcd6-e02a256b26b5", InitializationCell->True], Cell[362265, 7567, 267, 5, 35, "Text",ExpressionUUID->"6e302dfa-38b2-43a3-a507-71bf2633d8e8"], Cell[362535, 7574, 1612, 49, 66, "Input",ExpressionUUID->"41a0d75d-44b6-4653-b70e-858ab3e937b8", InitializationCell->True], Cell[364150, 7625, 2945, 90, 153, "Input",ExpressionUUID->"1430ab04-b05a-4d2d-bbf6-f9edc3cd5345", InitializationCell->True], Cell[367098, 7717, 1366, 45, 109, "Input",ExpressionUUID->"09f7d062-2fdd-45b1-8df2-0dd679b5cbc6", InitializationCell->True], Cell[368467, 7764, 258, 5, 35, "Text",ExpressionUUID->"94763911-d015-4b98-a645-b27f631322bf"], Cell[368728, 7771, 685, 16, 65, "Input",ExpressionUUID->"46e4593c-f9e1-4f4a-a999-d0f67e325be6", InitializationCell->True], Cell[369416, 7789, 214, 4, 35, "Text",ExpressionUUID->"04f91dc9-a818-4dc9-a431-8d20ab592198"], Cell[369633, 7795, 2288, 64, 162, "Input",ExpressionUUID->"78388547-17f1-4781-bf29-2487d17b5c53", InitializationCell->True], Cell[371924, 7861, 3146, 89, 68, "Input",ExpressionUUID->"1039bc21-357b-49d9-a514-fd3af5ae05a7", InitializationCell->True], Cell[375073, 7952, 1429, 36, 46, "Input",ExpressionUUID->"01749816-6d54-416a-ab4f-bab2e420acb4", InitializationCell->True], Cell[376505, 7990, 1812, 56, 46, "Input",ExpressionUUID->"36f3a3dd-e13f-4bbf-a50c-b11a31e789f8", InitializationCell->True], Cell[378320, 8048, 301, 5, 35, "Text",ExpressionUUID->"acf62eaa-9c57-4e21-98ab-4e5f44a5d9f7"], Cell[378624, 8055, 5975, 164, 201, "Input",ExpressionUUID->"4419a1ba-532a-442b-95d2-330c205bfd7e", InitializationCell->True], Cell[384602, 8221, 3479, 95, 68, "Input",ExpressionUUID->"c0b69368-df8e-46ab-a64b-3ea147722dd9", InitializationCell->True], Cell[388084, 8318, 1454, 36, 46, "Input",ExpressionUUID->"0dd5826b-1b72-4f2c-834b-e79b419ac43e", InitializationCell->True], Cell[389541, 8356, 6593, 178, 211, "Input",ExpressionUUID->"61cc9c57-6cf1-464b-bd07-45e24fd7c9c3", InitializationCell->True], Cell[396137, 8536, 352, 6, 35, "Text",ExpressionUUID->"1e4ce167-3a3b-4c53-9c2a-63a8f4ac6e4e"], Cell[396492, 8544, 4527, 122, 131, "Input",ExpressionUUID->"d4265afd-5fb1-4adc-ad27-da2413b01953", InitializationCell->True], Cell[401022, 8668, 3408, 94, 68, "Input",ExpressionUUID->"9cd135b3-7599-482f-9e19-dfd18b561c56", InitializationCell->True], Cell[404433, 8764, 1461, 36, 46, "Input",ExpressionUUID->"99ae0dcb-f21c-46d4-84aa-7f172765d9d8", InitializationCell->True], Cell[405897, 8802, 4506, 122, 165, "Input",ExpressionUUID->"57a35adb-5f0e-4384-a38f-33a0653fb6b6", InitializationCell->True], Cell[410406, 8926, 253, 5, 35, "Text",ExpressionUUID->"eeb33af8-ab09-4c5f-98a3-684ae529c2b6"], Cell[410662, 8933, 3160, 87, 102, "Input",ExpressionUUID->"ab8163b6-fc27-4314-ae7e-a7f0f7d95629", InitializationCell->True], Cell[413825, 9022, 320, 6, 35, "Text",ExpressionUUID->"d81923d6-2f61-4e28-9498-a6ac201db475"], Cell[414148, 9030, 4155, 112, 284, "Input",ExpressionUUID->"93054b36-78ec-4bb1-83ea-8fbb31835fb9", InitializationCell->True], Cell[CellGroupData[{ Cell[418328, 9146, 1706, 50, 73, "Input",ExpressionUUID->"293b9dfc-cd24-4a8a-b0b7-a433a83278d6"], Cell[420037, 9198, 333, 7, 34, "Output",ExpressionUUID->"5baa1ee5-d061-41e0-9e24-f851d6cf1b98"], Cell[420373, 9207, 335, 7, 34, "Output",ExpressionUUID->"cccf10bf-6911-4eae-a50d-7ec6de319142"], Cell[420711, 9216, 334, 7, 34, "Output",ExpressionUUID->"5695bfdf-3698-4b91-9497-1a934ac79932"] }, Open ]] }, Open ]] } ] *)