9565 lines
432 KiB
Mathematica
9565 lines
432 KiB
Mathematica
(* 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", "[", "\"\<MaTeX`\>\"", "]"}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"SetOptions", "[",
|
|
RowBox[{"MaTeX", ",",
|
|
RowBox[{"\"\<Preamble\>\"", "\[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[{"\"\<OpenMarkers\>\"", ",", "Large"}], "}"}]}], ",",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"Frame", "\[Rule]", "True"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"FrameStyle", "\[Rule]",
|
|
RowBox[{"Directive", "[",
|
|
RowBox[{"Thick", ",", "20"}], "]"}]}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",",
|
|
"\[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]", "\"\<Scientific\>\""}]}], "]"}]}],
|
|
"}"}], "]"}]}], "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 ]]
|
|
}
|
|
]
|
|
*)
|
|
|